参考:
TB:=IF(HIGH>REF(CLOSE,1),HIGH-REF(CLOSE,1)+CLOSE-LOW,CLOSE-LOW);
TS:=IF(REF(CLOSE,1)>LOW,REF(CLOSE,1)-LOW+HIGH-CLOSE,HIGH-CLOSE);
VOL_:=(TB-TS)*VOL/(TB+TS)/10000;
VOL_0:=DMA(VOL_,0.1);
VOL_1:=DMA(VOL_,0.05);
RES1:=VOL_0-VOL_1;
LON1:=SUM(RES1,0);
LON:=SUM(RES1,0);
SAR1A:=SAR(7,2,10);
SAR2:=SAR(7,2,10);
MA1:=MA(LON,10);
A:=100;
B:=1;
MAA:=MA(CLOSE,20);
MAB:=MA(CLOSE,60);
FILLRGN(LON>0 AND C>=SAR1A,100,1,COLOR000040);
FILLRGN(LON<0 AND C<SAR1A,100,1,COLOR408000);
FILLRGN(LON>0 AND C<=SAR1A,100,1,COLOR808080);
FILLRGN(LON<0 AND C>SAR1A,100,1,COLOR683D15);
FILLRGN(LON>0 AND C>=SAR1A,10,1,COLOR0000FF);
FILLRGN(LON<0 AND C<SAR1A,100,90,COLOR00FF00);
DRAWICON(LON>0 AND C>=SAR1A,50,1);
DRAWICON(LON<0 AND C<SAR1A,50,2);
VAR1:=EMA(EMA(CLOSE,7),7);
控盘2:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
控盘1:=IF(PERIOD-4<=0,0,控盘2);
MAH3:=MA(HIGH,30);
MAH2:=IF(PERIOD-4<=0,0,MAH3);
MAL3:=MA(LOW,30);
MAL2:=IF(PERIOD-4<=0,0,MAL3);
{减仓信号}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:=SMA(RSV,3,1);
D1:=SMA(K1,3,1);
{以下是短线指标}
SAR1A11:=SAR(7,2,10);
SARC:=SAR(7,2,10);
MAH1:=MA(HIGH,30);
MAH:=MA(HIGH,30);
MAL1:=MA(LOW,30);
MAL:=MA(LOW,30);
{减仓信号}
SAR3:=SAR(7,2,10);
SAR21:=IF(PERIOD-6=0,0,SAR3);
DRAWICON(CROSS(K1,D1) AND C<SAR21 AND C<MAL AND K1<30,20,3);
DRAWICON(CROSS(D1,K1) AND C>SAR21 AND SAR2>0 AND C>MAH AND K1>70,70,10);
DRAWBMP(CROSS(K1,D1) AND C<SAR2 AND C<MAL AND K1<30,20,'预警');