[转]通达信绝隹主图和五线波段幅图源码

阿米达

非非小草儿

好好学习 认真领悟

好新男人

好好学习，天天炒股！！！！

zanyfish

谢谢分享，向您学习。

建国

谢谢楼主分享

不宜饮用

谢谢楼主 无私的分享  辛苦

不宜饮用

相互学习共同提高

lzh6868689

MMS:=MA(SMA((L+H+2*C)/4-REF((L+H+2*C)/4,1),5,1)/SMA(ABS((L+H+2*C)/4-REF((L+H+2*C)/4,1)),5,1)*100,1)+50; G1:=IF(-MMS>95,0,20); UOO:=(-(((CLOSE-LLV(CLOSE,7))/(HHV(CLOSE,7)-LLV(CLOSE,7))*100=100)>0 AND G1)+1); KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100)); KS1:=IF(BARSCOUNT(C)=1,C/10000,(1-C/SMA(C,13,1))*100); 趋势线:=EMA(((KS / 10) + EMA(CLOSE,10)),3); AA:=-100*(趋势线-CLOSE)/趋势线; AC:=(EMA(AA,5) ); SSL:=EMA(CLOSE,3); MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55); MM:=MA(MMV,1); STICKLINE(((SSL>MM)),SSL,MM,0.01,0),COLORRED; SA:=(MM*0.985); SS:=(MA(CLOSE,5)); DD:=(MA(CLOSE,13)); GG:=(MA(CLOSE,21)); 捞钱手:IF(((SSL>MM)),MM,SA),LINETHICK2,COLORFF00FF; {IF(SSL<MM,捞钱手,DRAWNULL),LINETHICK2,COLORFFFFFF;} 能量线:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) *4))); 上开:=O; 上收:=C; 上高:=H; 上低:=L; JJ:=(上开+上高+上低)/3; A:=EMA(JJ,4); 智能黄金线:A,COLORYELLOW,LINETHICK1; B:=REF(A,1); STICKLINE(((SSL<MM)),捞钱手,智能黄金线,0.01,0),COLORFFFF00; VA1:=EMA(上收,8); VA2:=EMA(上收,20); DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'★绝佳') ,LINETHICK2,COLORRED; DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'★卖'); DRAWTEXT(CROSS(VA1,VA2)AND(C>=O)AND 智能黄金线>REF(智能黄金线,1),VA1*0.97,'★买'),COLOR00FF00; 选手Ａ:=MA(上收,3); 箱顶Ａ:=MA(REF(HHV(上收,6),1),3); 箱底Ａ:=MA(REF(LLV(上收,3),1),3); T1:=MA(上收,20)>=REF(MA(上收,20),1); T2:=CROSS(选手Ａ,箱底Ａ) AND 箱顶Ａ/箱底Ａ>100/100 AND T1; T3:=CROSS(箱顶Ａ,选手Ａ) AND 箱顶Ａ/箱底Ａ>100/100; 选手:=MA(上收,2); 箱顶:MA(REF(HHV(上收,30),1),2),COLOR0000FF,LINETHICK2; 箱底:MA(REF(LLV(上收,30),1),2),COLOR00FF00,LINETHICK2; T4:=CROSS(选手,箱底) AND 箱顶/箱底>110/100; T5:=CROSS(箱顶,选手) AND 箱顶/箱底>110/100; VAR1:=(上收-LLV(上低,27))/(HHV(上高,27)-LLV(上低,27))*100; VAR2:=SMA(VAR1,3,1); VAR3:=SMA(VAR2,3,1); VAR4:=SMA(VAR3,3,1); {DRAWTEXT(VAR3 >=VAR4 ,箱顶,'--中期好'),COLOR00FFFF; DRAWTEXT(VAR3<VAR4 ,箱顶,'--中期坏'),COLORF0F000; DRAWTEXT(A>B ,箱底,'--短期好'),COLOR00FFFF; DRAWTEXT(A<B ,箱底,'--短期坏'),COLORF0F000;} DRAWTEXT(CROSS(VAR3,VAR4)AND(C>=O)AND VAR3<40 AND UOO>0,LOW*0.96,'★'),COLORF00FF0; STICKLINE(C>=O,C,O,5,0),COLORRED; STICKLINE(C>=O,H,L,0,0),COLORYELLOW; STICKLINE(C<=O,C,O,5,0),COLORGREEN; STICKLINE(C<=O,H,L,0,0),COLORFFFF00; 买线:=EMA(C,2); 卖线:=EMA(SLOPE(C,21)*20+C,42);  DRAWTEXT(CROSS(买线,卖线)AND 箱顶>=REF(箱顶,1),LOW*0.95,'★跟'),COLOR00FFFF; STICKLINE(CROSS(买线,卖线),OPEN,CLOSE,3,0),COLOR00FFFF;   五线波段（副图） {坐标线位置:0;20;30;50;80;90;100;} {额外Y轴:0;20;50} STICKLINE(C>0,20,100,10,0),COLOR95AA95; STICKLINE(C>0,80,80,10,0),COLORCC55CC; STICKLINE(C>0,90,90,10,0),COLORCC55CC; STICKLINE(C>0,20,30,10,0),COLOR557575; 强弱分界:50,COLORLIRED,NODRAW; {信号灯} SAR1:=(CLOSE+HIGH+LOW)/3; SAR2:=EMA(SAR1,10); SAR3:=REF(SAR2,1); 绿等待:IF(SAR2,99,DRAWNULL),COLOR00DD00,LINETHICK5; 黄买: IF(SAR2>SAR3,99,DRAWNULL), COLOR00DDDD,LINETHICK5; 蓝卖: IF(SAR2<SAR3,99,DRAWNULL),COLORDD0000,LINETHICK5; {波段强弱} ZC:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))) COLOR00DDDD; DRAWBAND(ZC,RGB(100,15,55),50,RGB(0,100,50)); {中线波段} VAR0:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100; VARA:=SMA(VAR0,3,1); VAR1:=SMA(VARA,4,1)-10; STICKLINE(REF(VAR1,1)<VAR1,VAR1,REF(VAR1,1),5,0),COLOR0055FF; STICKLINE(REF(VAR1,1)>VAR1,VAR1,REF(VAR1,1),5,1),COLOR007500; {趋势顶底判断} A4:=SMA((HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100-70,9,1)+100; A5:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100; A6:=SMA(SMA(A5,3,1),3,1)+100; A7:=(A6-A4)/1.5+10; 趋势:A7,COLOR00AAFF,NODRAW; 趋势底线:=EMA(趋势,5),COLORGREEN; STICKLINE(趋势>趋势底线,趋势,趋势底线,0.1,0),COLOR0099FF; STICKLINE(趋势<=趋势底线,趋势,趋势底线,0.1,-1),COLOR95AA00; 趋势金叉:IF(CROSS(趋势,趋势底线),趋势,DRAWNULL),CIRCLEDOT,COLORFF33FF; 趋势死叉:IF(CROSS(趋势底线,趋势),趋势,DRAWNULL),CIRCLEDOT,COLOR66FF00; TV1:=趋势; TV2:=趋势底线; TV3:=BARSLAST(REF(CROSS(TV1,TV2),1)); TV3A:=REF(CLOSE,TV3+1)>CLOSE AND TV1>REF(TV1,TV3+1) AND  CROSS(TV1,TV2); 趋势底背离:IF(TV3A,TV1,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORFF00FF; TV4:=BARSLAST(REF(CROSS(TV2,TV1),1)); TV4A:=REF(CLOSE,TV4+1)<CLOSE AND REF(TV1,TV4+1)>TV1 AND CROSS(TV2,TV1); 趋势顶背离:IF(TV4A,TV1,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORFF6600; {KD} SSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:SMA(SSV,3,1),LINETHICK2,COLOR0033FF; D:=SMA(K,3,1); K弱:IF(K<=REF(K,1),K,DRAWNULL),LINETHICK2,COLORDDDD00; KD金叉:IF(CROSS(K,D),K,DRAWNULL),CIRCLEDOT,COLOR0000FF; KD死叉:IF(CROSS(D,K),K,DRAWNULL),CIRCLEDOT,COLORFF0000;

lzh6868689

发现未来函数ZIG！

448448

学习了，谢谢分享！

王海雁

非常不错，谢谢分享。

逍遥汉

谢谢楼主，支持楼主，顶起

咖啡豆80

谢谢分享，好好学习。

浙江阿明

感谢分享！

逆进而行

谢谢楼主分享！