乾坤大法通达信主图指标源码附图.docx

1、乾坤大法通达信主图指标源码附图乾坤大法【通达信主图指标，源码，附图】 直接上源码:MA1:MA(CLOSE,5),COLOR0000FF;MA2:MA(CLOSE,10);MA3:MA(CLOSE,20);MA4:MA(CLOSE,60);MA5:MA(CLOSE,120);MA6:MA(CLOSE,250);A:=BARSCOUNT(CLOSE);AH:=HHV(HIGH,200);AL:=LLV(LOW,200);B0:=(AH-AL)/40;B1:=HIGH B0;B2:=LOW-B0;DRAWTEXT(A 0)/34=FLOOR(A0)/34),B2-2.2*B0*1.1,窗,变盘),

2、COLORRED;LC:=REF(CLOSE,1);RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;DRAWICON(CROSS(RSI,11) ,L*0.99,3);VAR28:=SMA(MAX(CLOSE-LC,0),5.5,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12)>0 ANDEMA(CLOSE,12)/LOW>1.15,5),LOW,买),COLORFF00FF;VARA:=(AMOUNT)/(VO

3、L)/(100);VARB:=(3)*(HIGH) LOW OPEN (2)*(CLOSE)/(7);VARC:=(SUM(AMOUNT,7)/(VARA)/(100);VARD:=DMA(VARB,(VOL)/(VARC);VARE:=(CLOSE-VARD)/(VARD)*(100);VARF:=(CLOSE-LLV(LOW,34)/(HHV(HIGH,34)-LLV(LOW,34)*(100);VARJ:=MA(VARE,20) STD(VARE,20);BIAS18:=(CLOSE-MA(CLOSE,18)/(MA(CLOSE,18)*(100);AA:=SMA(VARF,3,1);S

4、S:=(REF(BIAS18,1)>=5) AND CROSS(VARJ,VARE) AND(AA>79);V7:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);STICKLINE(V7>=1,O,C,1,0),COLORYELLOW;LC1:=REF(CLOSE,1);RSI1:=(SMA(MAX(CLOSE - LC1),0),3,1) / SMA(ABS(CLOSE -LC1),3,1) * 100);FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);DRAW

5、TEXT(CROSS(FF,MA15),(LOW * 0.85),底背离),COLORYELLOW;AA1:=(HHV(HIGH,20) - (2 * ATR);BB:=CROSS(CLOSE,REF(HHV(HIGH,55),1);SSS:=CROSS(MIN(MA(CLOSE,13),AA1),CLOSE);BBB:=BARSLAST(BB);SSSB:=BARSLAST(SSS);B11:=(BBB = 0) AND (REF(SSSB,1) <REF(BBB,1);B1B:=BARSLAST(B11);B21:=(BB = 1) AND (B1B < SSSB) AND (

6、B1B> 0) AND (COUNT(BB,SSSB) <3);B2B:=BARSLAST(B21);B3:=(BB = 1) AND (B2B < B1B) AND (COUNT(BB,SSSB)< 4) AND (COUNT(BB,SSSB) >2);VAR2S:=(2*CLOSE HIGH LOW)/4;VAR3S:=IF(YEAR>=2099 ANDMONTH>2,0,1);VAR4S:=LLV(LOW,5); VAR5S:=HHV(HIGH,4);散户:=EMA(VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;

7、庄家:=EMA(0.667*REF(散户,1) 0.333*散户,2)*VAR3S;DRAWTEXT(CROSS(散户,庄家) AND散户<30,L-0.05,吸),COLORRED;MA20:=MA(C,20);MA90:=MA(C,90);Y1:=BARSLAST(CROSS(MA5,MA20) AND MA5>MA20;Y2:=Y1 AND BARSLAST(CROSS(MA5,MA90);Y3:=Y2 AND CROSS(MA20,MA90);STICKLINE(Y3,O,C,3,0),COLORYELLOW;DRAWTEXT(Y3,L-0.40,黑马),COLORWHIT

8、E;F0:=BARSLAST(CROSS(MA(C,5),MA(C,90);F1:=F0 AND BARSLAST(CROSS(MA(C,20),MA(C,90);F2:=F1 AND CROSS(MA(C,5),MA(C,20) ANDMA(C,20)>MA(C,90);DRAWICON(F2,L-0.10,1);DRAWTEXT(F2,L-0.40,黑马),COLORFF00FF;M:=OPEN;M1:=MA(C,1);M2:=REF(M1,1);M3:=REF(M2,1);保护价:(M2 M3 M)/3,COLORWHITE,LINETHICK0;STICKLINE(L<EM

9、A(EMA(L,8),6)*0.799,B2,B2-0.8*B0,3,0),COLORYELLOW;波动回调提示图:=MA(CLOSE,10000);DRAWICON(CROSS(FF,MA15),(LOW -0.49),9);VAR1:=1;VAR2:=LLV(LOW,10);VAR3:=HHV(HIGH,25);X:=EMA(SLOPE(CLOSE,21) * 20) CLOSE),68);Y:=EMA(CLOSE,10);LL:=REF(CLOSE,2);MM:=(SMA(MAX(CLOSE - LL),0),6,1) / SMA(ABS(CLOSE - LL),6,1) *100);D

10、B:=IF(MM < REF(MM,1) AND (MM >79),MM,0);DRAWTEXT(CROSS(Y,X),(LOW * 0.985),),LINETHICK2,COLORRED;DRAWTEXT(CROSS(X,Y),(HIGH *1.02),),LINETHICK2,COLOR00FF00;DRAWTEXT(DB,(HIGH * 1.02),),LINETHICK2,COLOR00FF00;VAR11:=LLV(LOW,21);VAR21:=HHV(HIGH,21);AK1:=EMA(CLOSE - VAR1) / (VAR2 - VAR1) * 100),5);A

11、K:=EMA(CLOSE - VAR1) / (VAR2 - VAR1) * 50),13);DD:=EMA(0.667 * REF(AK1,1) (0.333 * AK1),2);VAR31:=LLV(LOW,55);VAR4:=HHV(HIGH,34);VAR5:=EMA(CLOSE - VAR3) / (VAR4 - VAR3) * 100),3);VAR6:=(AK VAR5) / 2);VAR7:=EMA(0.667 * REF(VAR5,1) (0.333 * AK1),2);VAR8:=EMA(VAR6,5);BBA:=EMA(0.667 * REF(VAR8,1) (0.333

12、 * VAR8),2);AB:=CROSS(AK1,AK);BB1:=(CROSS(AK1,BBA) AND (BBA < 30);CD:=(BBA * 0.6);DRAWTEXT(CD = 0.6),(LOW * 0.99),),LINETHICK2,COLOR33CC99;DRAWTEXT(AB = 1),(LOW * 0.99),),LINETHICK2,COLORWHITE;C1:=(CLOSE LOW HIGH)/3;C2:=EMA(C1,6);C3:=EMA(C2,5);C4:=CROSS(C2,C3);DRAWTEXT(C4,LOW/1.01,),COLORRED;C5:=

13、CROSS(C3,C2);DRAWTEXT(C5,HIGH*1.03,),COLORBLUE;IF(MA1>REF(MA1,1),MA1,DRAWNULL),COLORRED,LINETHICK2;IF(MA1<REF(MA1,1),MA1,DRAWNULL),COLORGREEN,LINETHICK2;JG:=CROSS(MA1,MA2);VOLUME:=VOL,VOLSTICK;MAVOL1:=MA(VOLUME,5);MAVOL2:=MA(VOLUME,10);NL:=CROSS(MAVOL1,MAVOL2);DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

14、DEA:=EMA(DIF,9);MACD:=(DIF-DEA)*2,COLORSTICK;NA:=CROSS(DIF,DEA);RSV:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100;K:=SMA(RSV,9,1);D:=SMA(K,9,1);J:=3*K-2*D;KD:=CROSS(K,D) AND CROSS(J,D);定乾坤:DRAWTEXT(JG AND NL AND NA) OR (JG AND NL AND KD) OR(JG AND NA AND KD) OR (NL AND NA ANDKD),L*0.93,定乾坤),COLORYE

15、LLOW;X1:=LLV(J,2)=LLV(J,8);DRAWTEXT(CROSS(J,REF(J 0.01,1) AND X1 ANDJ<20,LOW*0.98,进),COLORLIMAGENTA;JH9:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1),5,1)*100;DRAWTEXT(CROSS(84,JH9),H*1.02,S),COLORGREEN;空:=EMA(C,5);均衡:=EMA(空,5),COLORWHITE;中轨:=HHV(MA(H,13),13),COLORRED,LINETHICK2;VAR55:=FILTER(均衡>REF(均衡,1)AND中轨<REF(中轨,1)AND C>REF(C,1),11);DRAWTEXT(VAR55,L*0.98,追),COLORYELLOW;