n:9;
m:35;
R1:=(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N))*100-70;
R2:=SMA(R1,N,1)+100;
R3:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
R4:=SMA(R3,3,1);
R5:=SMA(R4,3,1)+100;
R6:=R5-R2;
短線操盤1:IF(R6>0,R6,0),coloryellow,POINTDOT;
STICKLINE(REF(短線操盤1,1)<短線操盤1,短線操盤1,REF(短線操盤1,1),1,1),colorred,linethick3; ;
STICKLINE(REF(短線操盤1,1)>短線操盤1,短線操盤1,REF(短線操盤1,1),1,1),color00ff00,linethick3;
短線天使:CROSS(短線操盤1,m)*50;