现货趋势指标源码之中线波段主图

源码

N:=5;
  SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100 > 100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
  AA10:MA(CLOSE,8),COLOR0000FF;
  AA12:MA(CLOSE,12),COLOR0000FF;
  BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
  BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);
  MA13:=MA(CLOSE,13);
  趋势:EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),42),POINTDOT,COLORFF00FF,LINETHICK4;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000077;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000099;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR0000AA;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD;
  STICKLINE(CLOSE >  REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF;
  STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR777777;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR999999;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORAAAAAA;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;
  STICKLINE(CLOSE <  REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORCYAN;
  X1:=(C+L+H)/3;BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
  EMA8:=EMA(C,8);DRAWTEXT(FILTER(BB13 > 1 AND EMA(X1,13) > REF(EMA(X1,8),1),10),
  EMA8,'∠45上升'),COLORWHITE;
  压力:MA(REF(HHV(C,30),1),2),COLOR00FF00;
  支撑:MA(REF(LLV(C,30),1),2),COLOR0000FF;
  AA1:=AMOUNT/V;BB1:=L < AA1*0.9;
  CC1:=(C-REF(C,1))/REF(C,1)*100 > 1.2;DD1:=L < MA(C,5)*0.921;EE1:=V < MA(V,5)*1.5;
  FF1:=BB1 AND CC1 AND DD1 AND EE1;DRAWTEXT(FF1,(LOW* 0.99),'鼠'),COLOR4080FF;
  A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);
  黑码线:=EMA(A51,5);A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
  趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2));
  DRAWTEXT(CROSS(趋势线,0)AND 黑码线 < 40,(HIGH* 0.97),'▲大马'),COLORYELLOW;
  LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
  FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);
  {www.qill.cnDRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背'),COLORFF00FF;}
  STICKLINE(CROSS(FF,MA15),O,C,0.3,0),COLOR00FFFF;
  {www.qill.cnDRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背'),COLOR00FF00;}
  STICKLINE(CROSS(88,RSI),O,C,0.3,0),COLOR113311;
  VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*25;
  注意买:=IF((VAR4 < 10),80,100);RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
  K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J < 0,10,0);BDDD:=LLV(J,2)=LLV(J,8);
  买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J < 20,30,0);
  DRAWTEXT(买入 AND 注意买=100 AND 超跌=0,LOW,'B'),COLOR8000FF;
  MTM:=C-REF(C,1);DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
  买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX < 0,2) AND CROSS(DX,MA(DX,2)),1,0);
  DRAWTEXT(FILTER(买=1,5),LOW-0.03,'拉'),COLOR0000FF;
  GET:ZIG(3,N),COLORYELLOW;
  PL5:=ZIG(3,5);
  EN1:=ZIG(3,5) > REF(ZIG(3,5),1) AND REF(ZIG(3,5),1) < REF(ZIG(3,5),2) AND REF(ZIG(3,5),2) < REF(ZIG(3,5),3);
  EX1:=ZIG(3,5) < REF(ZIG(3,5),1) AND REF(ZIG(3,5),1) > REF(ZIG(3,5),2) AND REF(ZIG(3,5),2) > REF(ZIG(3,5),3);
  PL10:=ZIG(3,10);
  EN2:=ZIG(3,10) > REF(ZIG(3,10),1) AND REF(ZIG(3,10),1) < REF(ZIG(3,10),2) AND REF(ZIG(3,10),2) < REF(ZIG(3,10),3);
  EX2:=ZIG(3,10) < REF(ZIG(3,10),1) AND REF(ZIG(3,10),1) > REF(ZIG(3,10),2) AND REF(ZIG(3,10),2) > REF(ZIG(3,10),3);
  PL20:=ZIG(3,20);
  EN3:=ZIG(3,20) > REF(ZIG(3,20),1) AND REF(ZIG(3,20),1) < REF(ZIG(3,20),2) AND REF(ZIG(3,20),2) < REF(ZIG(3,20),3);
  EX3:=ZIG(3,20) < REF(ZIG(3,20),1) AND REF(ZIG(3,20),1) > REF(ZIG(3,20),2) AND REF(ZIG(3,20),2) > REF(ZIG(3,20),3);
  PL40:=ZIG(3,40);
  走强1:=BARSLAST(PL5 < REF(PL5,1));
  走弱1:=BARSLAST(PL5 > REF(PL5,1));
  走强2:=BARSLAST(PL10 < REF(PL10,1));
  走弱2:=BARSLAST(PL10 > REF(PL10,1));
  走强3:=BARSLAST(PL20 < REF(PL20,1));
  走弱3:=BARSLAST(PL20 > REF(PL20,1));
  ZTJZ5:=IF(PL10 > REF(PL10,1),COUNT(EN1,走强2),0);
  ZTJD5:=IF(PL10 > REF(PL10,1),COUNT(EX1,走强2),0);
  DTJZ5:=IF(PL10 < REF(PL10,1),COUNT(EN1,走弱2),0);
  DTJD5:=IF(PL10 < REF(PL10,1),COUNT(EX1,走弱2),0);
  ZTJZ10:=IF(PL20 > REF(PL20,1),COUNT(EN2,走强3),0);
  ZTJD10:=IF(PL20 > REF(PL20,1),COUNT(EX2,走强3),0);
  DTJZ10:=IF(PL20 < REF(PL20,1),COUNT(EN2,走弱3),0);
  DTJD10:=IF(PL20 < REF(PL20,1),COUNT(EX2,走弱3),0);
  DRAWTEXT(EN1 AND DTJZ5=1,L*0.95,'(A)'),COLORFFFF00;
  DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)'),COLORFF00FF;
  DRAWTEXT(EN2 AND ZTJZ5=1,L*0.95,'(C)'),COLOR0000FF;
  DRAWTEXT(EX1 AND PL10 > REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF;
  DRAWTEXT(EN1 AND PL10 > REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF;
  DRAWTEXT(EX1 AND PL10 > REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF;
  DRAWTEXT(EN1 AND PL10 > REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF;
  DRAWTEXT(EX2 AND PL20 > REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLOR0000FF;
  DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'Ⅰ'),COLORFF00FF;
  DRAWTEXT(EX2 AND DTJD10=2,H*1.01,'Ⅱ'),COLORFFFF00;
  DRAWTEXT(EN3 AND ZTJZ10=1,L*0.93,'Ⅲ'),COLOR0000FF;
  DRAWTEXT(EX2 AND PL20 > REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLOR00FFFF;
  DRAWTEXT(EN2 AND PL20 > REF(PL20,1) AND ZTJZ10=2,L*0.94,'②'),LINETHICK3,COLOR00FFFF;
  DRAWTEXT(EX2 AND PL20 > REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,'③'),LINETHICK3,COLOR00FFFF;
  DRAWTEXT(EN2 AND PL20 > REF(PL20,1) AND ZTJZ10=3,L*0.94,'④'),LINETHICK3,COLOR00FFFF;