缠论主图通达信指标公式源码.doc

选股指标一缠论主图（指标 选股/通达信 贴图）我把主图里的黄金分割位换成半对数，这在投资领域里最擅长用的，比黄金分割在投资领域 里更合理是上班族和平时没空看盘投资者最佳的指标｛智能版:=“核心指标.VAR100#DAY”;｝智能版：=“指标.核心#DAY“；MA1:MA(CLOSE,M1),COLORWHITE;MA2:MA(CLOSE,M2),COLORYELLOW;MA3:MA(CLOSE,M3),COLORCYAN;MA4:MA(CLOSE,M4),COLORCYAN;日线:=IF(PERIOD=5,1,0)；CA3: = REF(C,1)* 日线；A1:=REF(HIGH,3)=HHV(HIGH,笔周期 *3+1)* 智能版；B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1);D1: = FILTER(C1,3);｛高点｝A2:=REF( LOW, 3)=LLV( LOW,笔周期 *3+1)* 智能版；B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1);D2:=FILTER(C2,3);｛低点｝E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E2:=(HIGH+LOW)/2;｛高低点出现在同一 K线上时可作取舍｝H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;H2: = D1 AND NOT(D2 AND E1>=E2);L1:=D2 AND NOT(D1 AND E1=E2);X1: = REF(BARSLAST(H1),1)+1；F1:=BACKSET(H1 AND COUNT(L1ZX1)>0/LLVBARS(IF(L1,LOW,10000),X1));G1:=F1>REF(F1,1)；I1:=BACKSET(G1,2);LD:=I1>REF(I14);｛过滤后低点｝L2:=LD OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;X2:=REF(BARSLAST(L2),1)+1;F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));G2:=F2>REF(F2,1);I2:=BACKSET(G2Z2);HD:=I2>REF(I2,1);｛过滤后高点｝DRAWLINE(LDZL,HDZH,O),COLORYELLOW,LINETHICK1;DRAWLINE(HD,H,LD,L,O),COLORYELLOW,LINETHICK1;A3:=H;B3:=REF(H,REF(BARSLAST(HD),l)+l)>REF(HzREF(BARSLAST(HD),l)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),l)+2));D3:=A3 AND B3 AND HD;E3: = BACKSET(D3zREF(BARSLAST(HD),l)+2);HH:=E3>REF(E3,1)；｛找出全部长期高点｝A4:=L>REF(L,REF(BARSLAST(LD),1)+1);B4:=REF(L,REF(BARSLAST(LD),1)+1);D4:=A4 AND B4 AND LD;E4: = BACKSET(D4,REF(BARSLAST(LD),l)+2);LL:=E4>REF(E4,1);｛找出全部长期低点｝H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1; (后面进行过滤，方法同前。

只是不用 考虑高低点出现在同一K线｝X3 : = REF(BARSLAST(H3), 1)+1;F3：=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));G3:=F3>REF(F3,1)； I3:=BACKSET(G3,2);LZ:=I3>REF(I3,1)； ｛长期低点，也可供引用｝L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;X4: = REF(BARSLAST(L4), 1)+1;F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H广POW(10,20)),X4));G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1);｛长期高点，也可供引用｝｛DRAWLINE(HZ,H,LZ,L,O),COLORGREEN,LINETHICK1;Kl:=BACKSET(BARSTATUS=2zMIN(BARSLAST(HZ)zBARSLAST(LZ))+l);K2:=K1>REF(K1,1);｛DRAWLINE(K2,IF(H乙H,L),BARSTATUS=2,C,0),COLORGREEN,LINETHICK1;最后的长期 连线，连在收盘价上｝UU: = BACKSET(BARSTATUS=2,BARSLAST(LD)+1);W:=UU>REF(UU,1)；WW:=BACKSET(W,REF(BARSLAST(LD),l)+2);XX:=WW>REF(WWZ1);WWQ:=BACKSET(XXzREF(BARSLAST(LD),l)+2);XXQ:= WWQ > REF(WWQ, 1);下轨:DRAWLINE(XX,L,W,L,1)* 画趋势,COLORMAGENTA,LINETHICK1;｛画趋势线｝UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);W2:=UU2>REF(UU2Z1);WW2:=BACKSET(W2,REF(BARSLAST(HD),l)+2);XX2 :=WW2 > REF( W W2,1);WW3Q:=BACKSET(XX2,REF(BARSLAST(HD),l)+2);XX3Q:=WW3Q > REF( W W3Q, 1);WW4Q:=BACKSET(XX3Q,REF(BARSLAST(HD),l)+2);XX4Q:=WW4Q > REF( W W4Q, 1);上轨:DRAWLINE(XX2,HZW2,HZ1)* 画趋势,COLORMAGENTA,LINETHICK1;｛画趋势线｝上轨 1: = DRAWLINE(XX2ZH, W2,HZ 1)；低 一:REF(L,BARSLAST(W)),DOTLINE,COLOR99FF66;高 一:REF(H,BARSU\ST(W2)),DOTLINE,COLOR99FF66;低二:REF(L,BARSLAST(XX)),DOTLINE,COLORFF66FF;高二:REF(H,BARSLAST(XX2)),DOTLINE,COLORFF66FF;DRAWTEXT(CURRBARSCOUNT=1,低一,STRCAT(‘低一:,CON2STR(低一,2))),COLOR99FF66;DRAWTEXT(CURRBARSCOUNT=1,高一,STRCATC 高一二 CON2STR(高%1, 2))),COLOR99FF66;DRAWTEXT(CURRBARSCOUNT=1,低二,STRCAT(‘低二:,CON2STR(低%1, 2))),COLORFF66FF;DRAWTEXT(CURRBARSCOUNT=1,高二,STRCATC 高二二 CON2STR(高二,2))),COLORFF66FF;Q0:=BARSLAST(XX2>0);Ql:=BARSLAST(XX>0);Q2:=BARSLAST(WW2 >0);Q3:=BARSLAST(W>0);Q4:=BARSLAST(XXQ>0);Q5:=BARSLAST(XX3Q>0);Q6 :=BARSLAST(XX4Q>0);近 0.382 对数值:POW(低一,0.382 对数值)*POW(高一,0.618 对数值)COLORCYAN;DRAWTEXT(CURRBARSCOUNT=1,近 0.382 对数值,STRCAT。

近 0.382 位:ZCON2STR(近 0.382 对数值,2))),COLORCYAN;近半分位:POW(低一/0.5)*POW(高一 ,0.5),COLOR99FF66,LINETHICK2;DRAWTEXT(CURRBARSCOUNT= 1,近半分位,STRCAT(‘近半分位:,CON2STR(近半分位,2))),COLORGREEN;近 0.618 对数值:POW(低一,0.618 对数值)*POW(高一,0.382 对数值),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=1,近 0.618 对数值,STRCAT(近 0.6182 位CON2STR(近 0.618 对数值,2))),COLORMAGENTA;STICKLINE(W,高一，低一 ,0,1),COLOR99FF66;STICKLINE(W2，高一，低一,0,0),COLOR99FF66;DRAWTEXT( W=1 AND QO>Q1,L,C)COLORMAGENTA;DRAWTEXT(W2=1 AND QO>Q1,H； B )COLORMAGENTA;DRAWTEXT( XX=1 AND QO>Q1ZL；A)COLORMAGENTA;DRAWTEXT(XX2=1 AND Q5>Q4 ZH；*)COLORMAGENTA;DRAWTEXT(XXQ=1 AND Q5>Q4 ,L,*)COLORMAGENTA;DRAWTEXT( W=1 AND Q0vQl,L,②)COLORMAGENTA;DRAWTEXT(W2=1 AND Q0REF(LOW,1);V02:= HIGH>REF(HIGH,1) AND LOWvREF(LOW,l);V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);Vl:= COUNT(VOO,3)> = 1 AND LLVBARS(LOWZ3) = 1 AND V03;V2:= COUNT(VOO,4)> = 1 AND LLVBARS(LOW,4) = 2 AND V04;V3:= COUNT(VOO,4)> = 1 AND COUNT(V01 OR V02,4)=l AND LLVBARS(LOW,4) = 1 AND V03;V4:= COUNT(VOO,5)> = 1 AND COUNT(V01 OR V02,5)=2 AND LLVBARS(LOW,5) =。