目标预测 升级版 通达信主图指标 贴图

{N:=103; M=1; P=1;}
DRAWGBK(P=1,RGB(0,0,0),RGB(0,1,0),0,0,0);
DRAWKLINE(H,O,L,C);
DD:=IF(P=1,CONST(FINDLOW(L,0,10*N,1)),DRAWNULL);
DT:=CONST(BARSLAST(DD=L));
SL:=CONST(IF(DT=1,L,REF(L,DT)));
涨幅:((C-SL)/SL)*100,NODRAW;
周期:IF(CURRBARSCOUNT<=DT+1,BARSLAST(DD=L),DRAWNULL),COLORWHITE,NODRAW;
底:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL,SL*2*(M-1)),DRAWNULL);
一:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.146,SL*2*(M-1+0.146)),DRAWNULL);
二:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.191,SL*2*(M-1+0.191)),DRAWNULL);
三:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.236,SL*2*(M-1+0.236)),DRAWNULL);
四:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.382,SL*2*(M-1+0.382)),DRAWNULL);
五:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.5,SL*2*(M-1+0.5)),DRAWNULL);
六:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.618,SL*2*(M-1+0.618)),DRAWNULL);
七:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.764,SL*2*(M-1+0.764)),DRAWNULL);
八:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.809,SL*2*(M-1+0.809)),DRAWNULL);
九:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*1.854,SL*2*(M-1+0.854)),DRAWNULL);
十:=IF(CURRBARSCOUNT<=DT+1,IF(M<2,SL*2,SL*2*(M-1+1)),DRAWNULL);
底2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0),DRAWNULL) ;
一2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.146),DRAWNULL);
二2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.191),DRAWNULL);
三2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.236),DRAWNULL);
四2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.382),DRAWNULL);
五2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.5),DRAWNULL);
六2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.618),DRAWNULL);
七2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.764),DRAWNULL);
八2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.809),DRAWNULL);
九2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+0.854),DRAWNULL);
十2:=IF(CURRBARSCOUNT<=DT+1 AND M>0,SL*2*(M+1),DRAWNULL);
STICKLINE(CURRBARSCOUNT=DT+1 AND P=1,SL*20,SL,0,-1),COLOR666600;
DRAWBAND(底,RGB(0,120,120),底,RGB(0,0,0));
DRAWBAND(一,RGB(0,0,0),一,RGB(0,0,0)),DOTLINE,COLOR666600;
DRAWBAND(二,RGB(0,120,120),二,RGB(0,0,0));
DRAWBAND(三,RGB(0,0,0),三,RGB(0,0,0)),DOTLINE,COLOR666600;
DRAWBAND(四,RGB(0,120,120),四,RGB(0,0,0));
DRAWBAND(五,RGB(0,120,120),五,RGB(0,0,0));
DRAWBAND(六,RGB(0,120,120),六,RGB(0,0,0));
DRAWBAND(七,RGB(0,0,0),七,RGB(0,0,0)),DOTLINE,COLOR666600;
DRAWBAND(八,RGB(0,120,120),八,RGB(0,0,0));
DRAWBAND(九,RGB(0,0,0),九,RGB(0,0,0)),DOTLINE,COLOR666600;
DRAWBAND(十,RGB(0,120,120),十,RGB(0,0,0));

DRAWBAND(底2,RGB(0,180,10),底2,RGB(0,0,0));
DRAWBAND(一2,RGB(0,0,0),一2,RGB(0,0,0)),DOTLINE,COLOR006600;
DRAWBAND(二2,RGB(0,120,10),二2,RGB(0,0,0));
DRAWBAND(三2,RGB(0,0,0),三2,RGB(0,0,0)),DOTLINE,COLOR006600;
DRAWBAND(四2,RGB(0,120,10),四2,RGB(0,0,0));
DRAWBAND(五2,RGB(0,120,10),五2,RGB(0,0,0));
DRAWBAND(六2,RGB(0,120,10),六2,RGB(0,0,0));
DRAWBAND(七2,RGB(0,0,0),七2,RGB(0,0,0)),DOTLINE,COLOR006600;
DRAWBAND(八2,RGB(0,120,0),八2,RGB(0,0,0));
DRAWBAND(九2,RGB(0,0,0),九2,RGB(0,0,0)),DOTLINE,COLOR006600;
DRAWBAND(十2,RGB(0,120,10),十2,RGB(0,0,0));
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*1.191,STRCAT('-19.1% ',CON2STR(SL*1.191,2))),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*1.382,STRCAT('-38.2% ',CON2STR(SL*1.382,2))),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*1.5,STRCAT('-50% ',CON2STR(SL*1.5,2))),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*1.618,STRCAT('-61.8% ',CON2STR(SL*1.618,2))),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*1.809,STRCAT('-80.9% ',CON2STR(SL*1.809,2))),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2,STRCAT('-100% ',CON2STR(SL*2,2))),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*1.191,STRCAT('-138.2% ',CON2STR(SL*2*1.191,2))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*1.382,STRCAT('-176.4% ',CON2STR(SL*2*1.382,2))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*1.5,STRCAT('-200.0% ',CON2STR(SL*2*1.5,2))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*1.618,STRCAT('-223.6% ',CON2STR(SL*2*1.618,2))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=DT+1+1,SL*2*1.809,STRCAT('-261.8% ',CON2STR(SL*2*1.809,2))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*2,STRCAT('-300.0% ',CON2STR(SL*2*2,2))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*2.191,STRCAT('-338.2% ',CON2STR(SL*2*2.191,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*2.382,STRCAT('-376.4% ',CON2STR(SL*2*2.382,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*2.5,STRCAT('-400.0% ',CON2STR(SL*2*2.5,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*2.618,STRCAT('-423.6% ',CON2STR(SL*2*2.618,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*2.809,STRCAT('-461.8% ',CON2STR(SL*22.809,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*3,STRCAT('-500.0% ',CON2STR(SL*2*3,2))),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*3.191,STRCAT('-538.2% ',CON2STR(SL*2*3.191,2))),COLORLIMAGENTA;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*3.382,STRCAT('-576.4% ',CON2STR(SL*2*3.382,2))),COLORLIMAGENTA;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*3.5,STRCAT('-600.0% ',CON2STR(SL*2*3.5,2))),COLORLIMAGENTA;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*3.618,STRCAT('-623.6% ',CON2STR(SL*2*3.618,2))),COLORLIMAGENTA;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*3.809,STRCAT('-661.8% ',CON2STR(SL*2*3.809,2))),COLORLIMAGENTA;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*4,STRCAT('-700.0% ',CON2STR(SL*2*4,2))),COLORLIMAGENTA;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*4.191,STRCAT('-738.2% ',CON2STR(SL*2*4.191,2))),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*4.382,STRCAT('-776.4% ',CON2STR(SL*2*4.382,2))),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*4.5,STRCAT('-800.0% ',CON2STR(SL*2*4.5,2))),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=DT+1+1,SL*2*4.618,STRCAT('-823.6% ',CON2STR(SL*2*4.618,2))),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*4.809,STRCAT('-861.8% ',CON2STR(SL*2*4.809,2))),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=DT+1,SL*2*5,STRCAT('-900.0% ',CON2STR(SL*2*5,2))),COLORGREEN;