以下是通达信缠论系列指标主图源码和截图通达信缠论系列指标主图源码: 顶:=BBI+3*STD(BBI,13),COLOR004AFF; 底:=BBI-3*STD(BBI,13),COLOR67FF00; KU1:=IF(HIGH=HHV(HIGH,3),1,0); KD1:=IF(LOW=LLV(LOW,3),1,0); UL:=IF(REF(KU1,2)=1ANDREF(KU1,1)=0 ANDKU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 ANDREF(KU1,1)=0ANDKU1=0))); DL:=IF(REF(KD1,2)=1ANDREF(KD1,1)=0 ANDKD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 ANDREF(KD1,1)=0ANDKD1=0))); HV:=H ULANDH REF(H,1); LV:=L DLANDL REF(L,1); GP:=BARSLAST(HV); DP:=BARSLAST(LV); IP:=IF(GP=0,DP,GP) HHV1:=HVANDIPANDH =HHV(H,BARSLAST(LV)); LV1:=LVANDIPANDL =LLV(L,BARSLAST(HV)); DRAWLINE(LV1,LOW,HHV1,HIGH,0),coloryellow,LINETHICK1; DRAWLINE(HHV1,HIGH,LV1,LOW,0),colormagenta,LINETHICK1; V00:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); V01:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); V02:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); V03:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); V04:=REF(HIGH,2) HIGHANDREF(LOW,2) LOW ANDREF(HIGH,2) REF(HIGH,1)ANDREF(LOW,2) REF(LOW,1); V1:=COUNT(V00,6) =3ANDCOUNT(V01ORV02,5)=0ANDLLVBARS(LOW,6)=1ANDHHVBARS(HIGH,6) =5ANDV03; V2:=COUNT(V00,7) =3ANDCOUNT(V01ORV02,6)=1ANDLLVBARS(LOW,7)=2ANDHHVBARS(HIGH,7) =6ANDV04; V3:=COUNT(V00,7) =3ANDCOUNT(V01ORV02,6)=1ANDLLVBARS(LOW,7)=1ANDHHVBARS(HIGH,7) =6ANDV03; V4:=COUNT(V00,8) =3ANDCOUNT(V01ORV02,7) =2ANDLLVBARS(LOW,8)=2ANDHHVBARS(HIGH,8) =7ANDV04; V5:=COUNT(V00,8) =3ANDCOUNT(V01ORV02,7) =2ANDLLVBARS(LOW,8)=1ANDHHVBARS(HIGH,8) =7ANDV03; V6:=COUNT(V00,9) =3ANDCOUNT(V01ORV02,8) =3ANDLLVBARS(LOW,9)=2ANDHHVBARS(HIGH,9) =8ANDV04; V7:=COUNT(V00,9) =3ANDCOUNT(V01ORV02,8) =3ANDLLVBARS(LOW,9)=1ANDHHVBARS(HIGH,9) =8ANDV03; V8:=COUNT(V00,10) =3ANDCOUNT(V01ORV02,9) =4ANDLLVBARS(LOW,10)=2ANDHHVBARS(HIGH,10) =9ANDV04; V9:=COUNT(V00,10) =3ANDCOUNT(V01ORV02,9) =4ANDLLVBARS(LOW,10)=1ANDHHVBARS(HIGH,10) =9ANDV03; V10:=COUNT(V00,11) =3ANDCOUNT(V01ORV02,10) =5ANDLLVBARS(LOW,11)=2ANDHHVBARS(HIGH,11) =10ANDV04; XG:=V1ORV2ORV3ORV4ORV5ORV6ORV7ORV8ORV9ORV10; HV00:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); HV01:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); HV02:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); HV03:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1); HV04:=REF(HIGH,2) HIGHANDREF(LOW,2) LOWANDREF(HIGH,2) REF(HIGH,1)ANDREF(LOW,2) REF(LOW,1); HV1:=COUNT(HV00,6) =3ANDCOUNT(HV01ORHV02,5)=0ANDHHVBARS(HIGH,6)=1ANDLLVBARS(LOW,6) =5ANDHV03; HV2:=COUNT(HV00,7) =3ANDCOUNT(HV01ORHV02,6)=1ANDHHVBARS(HIGH,7)=2ANDLLVBARS(LOW,7) =6ANDHV04; HV3:=COUNT(HV00,7) =3ANDCOUNT(HV01ORHV02,6)=1ANDHHVBARS(HIGH,7)=1ANDLLVBARS(LOW,7) =6ANDHV03; HV4:=COUNT(HV00,8) =3ANDCOUNT(HV01ORHV02,7) =2ANDHHVBARS(HIGH,8)=2ANDLLVBARS(LOW,8) =7ANDHV04; HV5:=COUNT(HV00,8) =3ANDCOUNT(HV01ORHV02,7) =2ANDHHVBARS(HIGH,8)=1ANDLLVBARS(LOW,8) =7ANDHV03; HV6:=COUNT(HV00,9) =3ANDCOUNT(HV01ORHV02,8) =3ANDHHVBARS(HIGH,9)=2ANDLLVBARS(LOW,9) =8ANDHV04; HV7:=COUNT(HV00,9) =3ANDCOUNT(HV01ORHV02,8) =3ANDHHVBARS(HIGH,9)=1ANDLLVBARS(LOW,9) =8ANDHV03; HV8:=COUNT(HV00,10) =3ANDCOUNT(HV01ORHV02,9) =4ANDHHVBARS(HIGH,10)=2ANDLLVBARS(LOW,10) =9ANDHV04; HV9:=COUNT(HV00,10) =3ANDCOUNT(HV01ORHV02,9) =4ANDHHVBARS(HIGH,10)=1ANDLLVBARS(LOW,10) =9ANDHV03; HV10:=COUNT(HV00,11) =3ANDCOUNT(HV01ORHV02,10) =5ANDHHVBARS(HIGH,11)=2ANDLLVBARS(LOW,11) =10ANDHV04; HXG:=HV1ORHV2ORHV3ORHV4ORHV5ORHV6ORHV7ORHV8ORHV9ORHV10; AC5:=REF(C,5)*1.03 HHV(C,5)ANDC MA(C,20)ANDVOL MA(VOL,20); AA:=(C-REF(C,1))/REF(C,1)*100; BB:=AA 3ANDAA BIAS3:=(CLOSE-MA(CLOSE,30))/MA(CLOSE,30)*100; CC:=BIAS3 0ANDBIAS3 二买:=BBANDAC5ANDCC; DRAWTEXT(二买=1,L, 二买 ),COLORYELLOW; STICKLINE(二买,OPEN,CLOSE,8,0),COLORYELLOW; AC3:=REF(C,1); DIFF1:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA1:=EMA(DIFF1,9); MACD1:=2*(DIFF1-DEA1); AA1:=BARSLAST(REF(CROSS(DIFF1,DEA1),1)); 一买:=REF(CLOSE,AA1+1) CLOSEANDDIFF1 REF(DIFF1,AA1+1)ANDCROSS(DIFF1,DEA1)ANDLLV(LOW,6)=LLV(LOW,60); DRAWTEXT(一买=1,L, 一买 ),COLORMAGENTA; STICKLINE(一买,OPEN,CLOSE,8,0),COLORMAGENTA; Ma5:Ma(C,5);Ma10:ma(C,10);Ma20:ma(C,20);Ma60:ma(C,60); kx:= chanlun$kxian {这个放第一个要不会出问题滴-_-\~~} kxg:= chanlun$kxg kxd:= chanlun$kxd kxfx:= chanlun$kxfx 笔:= chanlun$bi 笔周期: chanlun$bilast ,linethick0,coloryellow; bilast:= chanlun$bilast {笔周期}; 段:= chanlun$duan 段周期: chanlun$duanlast ,linethick0,coloryellow; duanlast:= chanlun$duanlast {段周期}; 中枢:= chanlun$zs zszg:= chanlun$zszg zszd:= chanlun$zszd zsgg:= chanlun$zsgg zsdd:= chanlun$zsdd zszz:= chanlun$zszz zsks:= chanlun$zskslast zsjs:= chanlun$zsjslast bifx:=-REF(笔,bilast); duanfx:=-REF(段,duanlast); kxqj:= chanlun$kxqj {画中枢Begin}{以背景方式画} STICKLINE(zszg zszdANDduanfx=1,zszg,zszd,20,502),colorf00ff0; STICKLINE(zszg zszdANDduanfx=-1,zszg,zszd,20,502),colore6002d; {中枢震荡监视器} DRAWLINE(zsks=1,zszz,zsjs=1,zszz,0),coloryellow; {画中枢END} {顶底分型} STICKLINE(kx 0,kxg,kxd,5,1),colorwhite; STICKLINE(kx 0,kxg,kxd,5,1),colorblue; {笔段} STICKLINE(笔=1,kxg,kxd,5,1),colorgreen,linethick1; STICKLINE(笔=-1,kxg,kxd,5,1),colorred,linethick1; STICKLINE(段=1,kxg,kxd,5,0),colore66878,linethick1; STICKLINE(段=-1,kxg,kxd,5,0),color00cccc,linethick1; {画K线END} {画笔段} drawline(笔=1,h,笔=-1,l,0),coloryellow,linethick2; drawline(笔=-1,l,笔=1,h,0),coloryellow,linethick2; drawline(段=1,h,段=-1,l,0),colorblue,linethick2; drawline(段=-1,l,段=1,h,0),colorblue,linethick2; {笔高低点周期力度提示} DRAWTEXT(笔=1,h, +h+ /T +bilast+ / +(h-REF(l,bilast))),coloryellow,align1,valign2; DRAWTEXT(笔=-1,l, +l+ /T +bilast+ / +(l-REF(h,bilast))),colorCyan,align1; {当下提示周期} {DRAWTEXT(BARSTATUS=2ANDbifx=1ANDbilast 4,h*1.008, T +bilast+ /+ +(c-REF(l,bilast))),colorMagenta,align0,valign2;} {DRAWTEXT(BARSTATUS=2ANDbifx=-1ANDbilast 4,l*0.992, T +bilast+ / +(c-REF(h,bilast))),colorGreen,align0;} K:=1; 局部低点预选A:=BacKSET(LLV(L,5) REF(LLV(L,4),1),4); 局部低点预选B:=BACKSET(局部低点预选A=0ANDREF(局部低点预选A,1)=1,2); 局部低点预选C:=IF(局部低点预选B=1ANDREF(局部低点预选B,1)=0,-1,0); 局部高点预选A:=BACKSET(HHV(H,5) REF(HHV(H,4),1),4); 局部高点预选B:=BACKSET(局部高点预选A=0ANDREF(局部高点预选A,1)=1,2); 局部高点预选C:=IF(局部高点预选B=1ANDREF(局部高点预选B,1)=0,1,0); 缺口判断:=IF(L REF(H,1),1,IF(H REF(L,1),-1,0)); 距前高天:=BArslAst(局部高点预选C=1); 距前低天:=BARSLAST(局部低点预选C=-1); 小值周期:=LOwrANGE(L); 大值周期:=topRANGE(H); 低保留AA:=IF(局部低点预选C=-1ANDREF(距前高天,1) REF(距前低天,1)ANDLLV(L,距前高天+1) REF(LLV(L,距前高天+1),1),-1,0); 低保留AB:=IF(局部低点预选C=-1ANDREF(距前高天,1) =REF(距前低天,1)AND(距前高天 =4ORLLV(缺口判断,距前高天)=-1ORLLV(L,距前低天+2) REF(LLV(L,距前低天+1),1)),-1,0); 低保留S:=IF((低保留AA=-1OR低保留AB=-1)ANDL REF(H,距前高天+1),-1,0); 预判:=IF((距前低天 4ANDHHV(缺口判断,距前低天)!=1)ORREF(低保留S,距前低天)=0,1,0); 判断:=IF(局部高点预选C=1ANDREF(距前低天,1) =REF(距前高天,1)AND预判=1AND大值周期 REF(小值周期,距前低天+1)AND大值周期 REF(小值周期,距前低天)AND大值周期 REF(大值周期,距前高天),1,0); 高保留A:=IF(局部高点预选C=1ANDREF(距前低天,1) REF(距前高天,1)ANDHHV(H,距前低天+1) REF(HHV(H,距前低天+1),1),1,0); 高保留B:=IF(局部高点预选C=1ANDREF(距前低天,1) =REF(距前高天,1)ANDREF(低保留S,距前低天)=-1AND(距前低天 =4ORHHV(缺口判断,距前低天)=1),1,0); 高保留:=IF((高保留A=1OR高保留B=1OR判断=1)ANDH REF(L,距前低天+1),1,0); 预判A:=IF((距前高天 4ANDHHV(缺口判断,距前高天)!=1)ORREF(高保留,距前高天)=0,1,0); 判断A:=IF(局部低点预选C=-1ANDREF(距前高天,1) =REF(距前低天,1)AND预判A=1AND小值周期 REF(大值周期,距前高天+1)AND小值周期 REF(大值周期,距前高天)AND小值周期 REF(小值周期,距前低天),-1,0); 低保留A:=IF(局部低点预选C=-1ANDREF(距前高天,1) REF(距前低天,1)ANDLLV(L,距前高天+1) REF(LLV(L,距前高天+1),1),-1,0); 低保留B:=IF(局部低点预选C=-1ANDREF(距前高天,1) =REF(距前低天,1)AND(距前高天 =4ORLLV(缺口判断,距前高天)=-1OR判断A=-1),-1,0); 低保留:=IF((低保留A=-1OR低保留B=-1)ANDL REF(H,距前高天+1),-1,0); 距前高天A:=BARSLAST(高保留=1); 距前低天A:=BARSLAST(低保留=-1); 预判X:=IF((距前低天A 4ANDHHV(缺口判断,距前低天A)!=1)ORREF(低保留,距前低天A)=0,1,0); 判断X:=IF(局部高点预选C=1ANDREF(距前低天A,1) =REF(距前高天A,1)AND预判X=1AND大值周期 REF(小值周期,距前低天A+1)AND大值周期 REF(小值周期,距前低天A)AND大值周期 REF(大值周期,距前高天A),1,0); 高保留XA:=IF(局部高点预选C=1ANDREF(距前低天A,1) REF(距前高天A,1)ANDHHV(H,距前低天A+1) REF(HHV(H,距前低天A+1),1),1,0); 高保留XB:=IF(局部高点预选C=1ANDREF(距前低天A,1) =REF(距前高天A,1)ANDREF(低保留,距前低天A)=-1AND(距前低天A =4ORHHV(缺口判断,距前低天A)=1),1,0); 高保留X:=IF((高保留XA=1OR高保留XB=1OR判断X=1)ANDH REF(L,距前低天A+1),1,0); 预判XA:=IF((距前高天A 4ANDHHV(缺口判断,距前高天A)!=1)ORREF(高保留XA,距前高天A)=0,1,0); 判断XA:=IF(局部低点预选C=-1ANDREF(距前高天A,1) =REF(距前低天A,1)AND预判XA=1AND小值周期 REF(大值周期,距前高天A+1)AND小值周期 REF(大值周期,距前高天A)AND小值周期 REF(小值周期,距前低天A),-1,0); 低保留XA:=IF(局部低点预选C=-1ANDREF(距前高天A,1) REF(距前低天A,1)ANDLLV(L,距前高天A+1) REF(LLV(L,距前高天A+1),1),-1,0); 低保留XB:=IF(局部低点预选C=-1ANDREF(距前高天A,1) =REF(距前低天A,1)AND(距前高天A =4ORLLV(缺口判断,距前高天A)=-1OR判断XA=-1),-1,0); 低保留X:=IF((低保留XA=-1OR低保留XB=-1)ANDL REF(H,距前高天A+1),-1,0); 距前高天YA:=BARSLAST(高保留X=1); 距前低天YA:=BARSLAST(低保留X=-1); 预判YX:=IF((距前低天YA 4ANDHHV(缺口判断,距前低天YA)!=1)ORREF(低保留X,距前低天YA)=0,1,0); 判断YX:=IF(局部高点预选C=1ANDREF(距前低天YA,1) =REF(距前高天YA,1)AND预判YX=1AND大值周期 REF(小值周期,距前低天YA+1)AND大值周期 REF(小值周期,距前低天YA)AND大值周期 REF(大值周期,距前高天YA),1,0); 高保留YXA:=IF(局部高点预选C=1ANDREF(距前低天YA,1) REF(距前高天YA,1)ANDHHV(H,距前低天YA+1) REF(HHV(H,距前低天YA+1),1),1,0); 高保留YXB:=IF(局部高点预选C=1ANDREF(距前低天YA,1) =REF(距前高天YA,1)ANDREF(低保留X,距前低天YA)=-1AND(距前低天YA =4ORHHV(缺口判断,距前低天YA)=1),1,0); 高保留YX:=IF((高保留YXA=1OR高保留YXB=1OR判断YX=1)ANDH REF(L,距前低天YA+1),1,0); 预判YXA:=IF((距前高天YA 4ANDHHV(缺口判断,距前高天YA)!=1)ORREF(高保留YXA,距前高天YA)=0,1,0); 判断YXA:=IF(局部低点预选C=-1ANDREF(距前高天YA,1) =REF(距前低天YA,1)AND预判YXA=1AND小值周期 REF(大值周期,距前高天YA+1)AND小值周期 REF(大值周期,距前高天YA)AND小值周期 REF(小值周期,距前低天YA),-1,0); 低保留YXA:=IF(局部低点预选C=-1ANDREF(距前高天YA,1) REF(距前低天YA,1)ANDLLV(L,距前高天YA+1) REF(LLV(L,距前高天YA+1),1),-1,0); 低保留YXB:=IF(局部低点预选C=-1ANDREF(距前高天YA,1) =REF(距前低天YA,1)AND(距前高天YA =4ORLLV(缺口判断,距前高天YA)=-1OR判断YXA=-1),-1,0); 低保留YX:=IF((低保留YXA=-1OR低保留YXB=-1)ANDL REF(H,距前高天YA+1),-1,0); AAAD:=IF(高保留YX=1AND低保留YX=-1ANDH REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1AND低保留YX=-1ANDL REF(L,REF(距前低天YA,1)+2),-1,0)); 极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD); 局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)),CIRCLEDOT,COLORYELLOW; 局部天数:BARSLAST(Abs(极点保留)),NODRAW; 局部换手:IF(极点保留=0,SUM( HSL.HSL ,局部天数),0),NODRAW; 局部涨跌:C/REF(C,局部天数)*100-100,NODRAW,COLORWHITE; 换手G:=VARCAT(VAR2STR(SUM( HSL.HSL ,BARSLAST(高保留X)),2), %H 高点换手:=VARCAT(VARCAT(VARCAT(换手G, ( ),VAR2STR(BARSLAST(高保留X),0)), T) 换手D:=VARCAT(VAR2STR(SUM( HSL.HSL ,BARSLAST(低保留X)),2), %H 低点换手:=VARCAT(VARCAT(VARCAT(换手D, ( ),VAR2STR(BARSLAST(低保留X),0)), T) 高跌幅:=IF(K=1,L/REF(H,BARSLAST(高保留X))*100-100,C/REF(C,BARSLAST(高保留X))*100-100); 低涨幅:=IF(K=1,H/REF(L,BARSLAST(低保留X))*100-100,C/REF(C,BARSLAST(低保留X))*100-100); 高跌幅A:=VARCAT(VAR2STR(高跌幅,2), %F 低涨幅A:=VARCAT(VAR2STR(低涨幅,2), %F 高点显示:=VARCAT(低点换手,低涨幅A); 低点显示:=VARCAT(高点换手,高跌幅A); DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORLIRED; DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORYELLOW; DRAWTEXT(极点保留=-1,L*0.99,低点显示),COLORGREEN; DRAWTEXT(极点保留=1,H*1.01,高点显示),COLORYELLOW;通达信缠论系列指标主图截图