以下是通达信龙头判官源码副图贴图(无源码的请下载附件导入)
INDEXC1:= INDEXC;
TMPMAXZF:= IF(PERIOD<5,21,IF(PERIOD=5,10.06,IF(PERIOD=6,63,IF(PERIOD=7,263,IF(PERIOD=9,39,23)))));
TZF_C:= MAX(MIN(IF(BETWEEN(CLOSE/REF(CLOSE,1),0.0001,10000),CLOSE/REF(CLOSE,1)*100 - 100,0),TMPMAXZF),-TMPMAXZF);
TDP_C:= IF((INDEXC1=0) OR (INDEXC1=DRAWNULL),DRAWNULL,INDEXC1/REF(INDEXC1,1)*100 - 100);
HY_INDEXC1:= HY_INDEXC;
HYZF:= HY_INDEXC1/REF(HY_INDEXC1,1) * 100 - 100;
TMP基准:= MAX(MIN(MAX(TDP_C,HYZF),TMPMAXZF * 31/100),-TMPMAXZF * 31/100);
TOBJ:= MIN(TZF_C,MAX(MIN(TZF_C - TMP基准,TMPMAXZF),-TMPMAXZF));
Q1Q:= SUM(TOBJ * SIGN(20200521 - (DATE + 19000000)),0);
Q1:=Q1Q/50;
龙头指数: Q1,COLORRED,DOTLINE;
涨:TZF_C,NODRAW,COLORWHITE;
MA5: MA(Q1,MIN(TOTALBARSCOUNT - CURRBARSCOUNT + 1,5)),COLORYELLOW;
MA10: MA(Q1,MIN(BARSCOUNT(TOBJ) + 1,10)),COLORMAGENTA,LINETHICK2;
MA20: MA(Q1,MIN(BARSCOUNT(TOBJ) + 1,20)),COLORCYAN;
627166953.jpg
|