|
以下是通达信大阴战法主图源码（无源码的请下载附件导入）
VAR1:=DATE<=1151210;
VAR2:=N1;
VAR3:=5;
周期:CURRBARSCOUNT,NODRAW,COLORGREEN;
VAR4:=周期-1;
VAR5:=IF(VAR1,CLOSE/REF(CLOSE,1)<=1-VAR2/100 AND OPEN>=CLOSE,DRAWNULL);
VAR6:=REFX(CLOSE,VAR4);
VAR7:=REFX(HIGH,VAR4);
VAR8:=REFX(OPEN,VAR4);
VAR9:=REFX(LOW,VAR4);
VAR10:=BARSLAST(VAR5 AND CLOSE>=VAR8 AND 周期>=VAR3);
VAR11:=REFX(REF(OPEN,VAR10),VAR4);
VAR12:=REFX(REF(CLOSE,VAR10),VAR4);
VAR13:=REFX(REF(周期,VAR10),VAR4);
VAR14:=周期>VAR13;
压力顶:IF(VAR14,DRAWNULL,VAR11),DOTLINE,COLORGREEN;
压力底:IF(VAR14,DRAWNULL,VAR12),DOTLINE,COLORGREEN;
VAR15:=BARSLAST(VAR5 AND OPEN>=VAR8 AND 周期>=VAR3);
VAR16:=REFX(REF(OPEN,VAR15),VAR4);
VAR17:=REFX(REF(CLOSE,VAR15),VAR4);
VAR18:=REFX(REF(周期,VAR15),VAR4);
VAR19:=周期>VAR18;
震荡顶:IF(VAR19,DRAWNULL,VAR16),DOTLINE,COLORMAGENTA;
震荡底:IF(VAR19,DRAWNULL,VAR17),DOTLINE,COLORMAGENTA;
VAR20:=BARSLAST(VAR5 AND OPEN<=VAR8 AND 周期>=VAR3);
VAR21:=REFX(REF(OPEN,VAR20),VAR4);
VAR22:=REFX(REF(CLOSE,VAR20),VAR4);
VAR23:=REFX(REF(周期,VAR20),VAR4);
VAR24:=周期>VAR23;
支撑顶:IF(VAR24,DRAWNULL,VAR21),DOTLINE,COLORLIRED;
支撑底:IF(VAR24,DRAWNULL,VAR22),DOTLINE,COLORLIRED;
VAR25:=CLOSE/REF(CLOSE,1)>=1.099 AND CLOSE=HIGH AND VAR1;
STICKLINE(VAR25,OPEN,CLOSE,(-1),0),COLORMAGENTA;
VAR26:=CLOSE/REF(CLOSE,1)<=0.901 AND LOW=CLOSE AND VAR1;
STICKLINE(VAR26 AND OPEN/CLOSE>1.007,OPEN,CLOSE*1.005,(-1),0),COLORLIBLUE;
DRAWTEXT(ISLASTBAR,VAR16,VAR2STR(VAR16,2)),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,VAR21,VAR2STR(VAR21,2)),COLORLIRED;
DRAWTEXT(ISLASTBAR,VAR11,VAR2STR(VAR11,2)),COLORGREEN;
DRAWTEXT(ISLASTBAR,VAR17,VAR2STR(VAR17,2)),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,VAR22,VAR2STR(VAR22,2)),COLORLIRED;
DRAWTEXT(ISLASTBAR,VAR12,VAR2STR(VAR12,2)),COLORGREEN;
VAR27:=0;
VAR28:=0.8;
VAR29:=STRCAT(STRSPACE(DYBLOCK),STRSPACE(HYBLOCK));
DRAWTEXT_FIX(ISLASTBAR,VAR28,VAR27,0,VAR29),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,VAR28,VAR27+0.03*1,0,GNBLOCK),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,VAR28,VAR27+0.03*2,0,STKNAME),COLORGREEN;
65722649.jpg
|
