R:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100);

K:=EMA(R,3);

D:=EMA(K,3);

十二倍:20,colorred;

峻峭度:=IF((BARSCOUNT(CLOSE)>7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7))-1),1);

N:=IF((峻峭度>0.35),6,65);

VAR1:=((-((100)*(HHV(HIGH,N)-CLOSE))/(HHV(HIGH,N)-LLV(LOW,N))))*((DATE<20170110));

VAR1A:=((-((100)*(HHV(HIGH,N)-CLOSE))/(HHV(HIGH,N)-LLV(LOW,N)))+100)*((DATE<20170110));

获利盘:=(WINNER(CLOSE))*(100);

获利线:=FORCAST(获利盘,7);

线:=(FORCAST(VAR1A,7))*((DATE<20070110));

满仓:=((线>REF(线,1))and(线<25)and(COUNT((线>REF(线,1)),5)=1)andIF((N=6),(获利盘<60),(获利盘<40))and(COUNT((获利线>20),20)>0))*(40);

STICKLINE(满仓,0,40,5,0),Color008000;

DRAWTEXT(满仓,45,'满仓'),Color008000;

轻仓:=IF((获利盘>=60)and(线>REF(线,1))and(REF(线,1)<20)and(线<40)and(COUNT((线>REF(线,1)),5)=1)and(REF(N,1)=6),1,0);

STICKLINE(轻仓,20,D,4,1),ColorFF00FF;

DRAWTEXT(轻仓,45,'轻仓'),ColorFF00FF;

反击:=CROSS(线,20)andIF((COUNT(CROSS(K,D),3)=1)and(D<40),1,(线>D)or(K>D)and(D<60))andIF((N=6),(获利盘<70),(获利盘<40))and(COUNT((获利线>20),20)>0);

STICKLINE(反击,0,50,3,1),Color44BB00;

DRAWTEXT(反击,55,'反击'),colorred;

进一:=CROSS(线,D)and(D>30)and(D>REF(D,1))and(D<80);

进二:=CROSS(线,获利线)and(D>30)and(获利线>25)and(D>REF(D,1));

低进:=IF(进一and(D>获利线),进二,进一);

DRAWTEXT(低进,30,'低进'),ColorFF0000;

STICKLINE(低进,20,30,3,1),Color000080;

DRAWTEXT(进二,50,'高进'),Color800080;

STICKLINE(进二,30,50,3,1),coloryellow;

狂喜:=(30)*(CROSS(VAR1,(-2)));

STICKLINE(狂喜,0,20,3,1),coloryellow;

DRAWTEXT(狂喜,(-5),'要涨停'),coloryellow;

狂喜过望:=(50)*((VAR1=0));

惊惧:(-20)*((VAR1<(-94))),ColorC1C1C1;

STICKLINE(惊惧,0,(-20),5,0),ColorC1C1C1;

DRAWTEXT(惊惧,(-25),'惊惧'),ColorC1C1C1;

极度惊惧:(-40)*((VAR1=(-100))),Color800000;

STICKLINE(极度惊惧,0,(-40),7,1),Color800000;

DRAWTEXT(极度惊惧,(-45),'极度惊惧'),Color800000;

半仓:=(30)*(CROSS(VAR1,(-94))and(COUNT(惊惧,5)>0)and(N=REF(N,1))andIF((N=6),(获利盘<60),(获利盘<40))and(COUNT((获利线>20),20)>0));

STICKLINE(半仓,0,30,4,1),ColorFFFF00;

DRAWTEXT(半仓,35,'半仓'),ColorFFFF00;

加仓:=(30)*(CROSS(K,20)and(COUNT(半仓,5)>0));

STICKLINE(加仓,0,20,6,1),Color808080;

DRAWTEXT(加仓,25,'加仓'),Color808080;

违背:=(COUNT(惊惧,2)>0)and(CLOSE<REF(CLOSE,1))and(VAR1>REF(VAR1,1));

DRAWICON(违背,0,1),ColorFFFFFF;

操盘:60,ColorFFFF00;

(-55),colorred;