大智慧公式源码

1、SELECT:OPENMA(CLOSE,13)+0.01 AND OPENMA(CLOSE,34)+0.01 AND OPENMA(CLOSE,13)-0.01 AND CLOSEMA(CLOSE,34)-0.01 AND CLOSEMA(CLOSE,55)-0.011. 缠中说禅：笔MA5:MA(C,5), colorwhite;MA13:MA(C,13), coloryellow;MA21:MA(C,21), colormagenta;MA34:MA(C,34), colorgreen;MA55:MA(C,55), colorf00ff0, linethick2;MA89:MA(C,89)

2、, colorgray;MA144:MA(C,144), colorblue;MA233:MA(C,233), colorf0f000,linethick2;布林曲线MID :MA(CLOSE,26),pointdot,colorwhite;UPPER:MID + 2*STD(CLOSE,26),linethick0,coloryellow, dotline;LOWER:MID - 2*STD(CLOSE,26),linethick0,colorgreen, dotline;收口:=UPPER-LOWER;partline(MID,MID=ref(MID,1),rgb(255,255,0),M

3、ID=ref(UPPER,1),rgb(255,255,0),UPPERref(LOWER,1),rgb(255,255,0),LOWER=ref(收口,1),rgb(255,255,0),收口=ref(收口,1),rgb(255,255,0),收口ref(收口,1),rgb(0,255,0),linethick1, dotline;缠中说禅分型:=chanlunkxian; 这个放第一个 要不会出问题滴-_-笔:=chanlunbi;bilast:=chanlunbilast;段:=chanlunduan;duanlast:=chanlunduanlast;jxyl:=chanlunJXYL

4、2;jxzc:=chanlunJXZC2;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+/MA:+jxyl), coloryellow, align1, valign2;DRAWTEXT(笔=-1, l

5、, +l+/T+bilast+/MA:+ jxzc), colorCyan, align1;2.macd面积DIF : EMA(CLOSE,short) - EMA(CLOSE,long);DEA : EMA(DIF,mid);MACD : 2*(DIF-DEA), COLORSTICK;面积计算绿面积:IF (MACD0) * 100,0),linethick0,colorblue;红面积:IF (MACD0,SUM(MACD,BARSLAST(MACD0, -macd*0.03, NUMTOSTRN(红面积, 0), coloryellow,valign0, align2;DRAWTEXT

6、(BARSTATUS=2 and macd=0, -macd*0.03, NUMTOSTRN(绿面积, 0), COLORFFCC66,valign2,align2;多空线: 0, colorwhite, dotline;stickline(MACD=REF(MACD, 1), 0, macd, 0, 0), COLORFFCC66;stickline(MACD0 and MACD=0 and MACDREF(MACD, 1), 0, macd, 0, 0), COLORRed;stickline(MACD=0 and MACD=ref(dif,1),rgb(255,0,0),dif=上证_开

7、,上证_开,上证_收,7,0),COLORRED; STICKLINE(上证_收=上证_开,上证_高,上证_低,0.1,0),COLORRED; STICKLINE(上证_收=上证_开,上证_开,上证_收,7,0),COLORGREEN; STICKLINE(上证_收4, h*1.008, T+bilast+/+(c-REF(l,bilast), colorMagenta, align0, valign2;DRAWTEXT(BARSTATUS=2 AND bifx=-1 AND bilast4, l*0.992,T+bilast+/+(c-REF(h,bilast), colorGreen,

8、align0;主图公式：N P P1中 : MA(CLOSE,N),colorgray, dotline;压: 中+ P*STD(CLOSE,N),colorgray, dotline;支: 中 - P*STD(CLOSE,N),colorgray, dotline;MA1:MA(CLOSE,5),colorwhite;MA2:MA(CLOSE,10),coloryellow;MA3:MA(CLOSE,30),colorgreen;MA4:MA(CLOSE,60),colorred;MA5:MA(CLOSE,120),colorf00ff0;MA6:MA(CLOSE,250),colorblu

9、e;kx:=chanlunkxian; 这个放第一个 要不会出问题滴-_-kxg:=chanlunkxg;kxd:=chanlunkxd;kxfx:=chanlunkxfx;kxno:chanlunkxno, linethick0, coloryellow;kxnobh:chanlunkxnobh, linethick0, coloryellow;笔:=chanlunbi;bilast:chanlunbilast, linethick0, coloryellow;段:=chanlunduan;duanlast:chanlunduanlast, linethick0, coloryellow;b

10、ifx:=-REF(笔,bilast);duanfx:=-REF(段,duanlast);笔高低点 周期 力度 提示DRAWTEXT(笔=1, h, +h+/T+bilast+/+(h-REF(l,bilast),colorred, align1, valign2;DRAWTEXT(笔=-1, l, +l+/T+bilast+/+(l-REF(h,bilast), colorgreen, align1;当下提示 周期DRAWTEXT(BARSTATUS=2 AND bifx=1 AND bilast4, h*1.008, T+bilast+/+(c-REF(l,bilast), colorMa

11、genta, align0, valign2;DRAWTEXT(BARSTATUS=2 AND bifx=-1 AND bilast4, l*0.992,T+bilast+/+(c-REF(h,bilast), colorGreen, align0;主图公式：kx:=chanlunkxian; 这个放第一个 要不会出问题滴-_-kxg:=chanlunkxg;kxd:=chanlunkxd;kxfx:=chanlunkxfx;kxno:chanlunkxno, linethick0, coloryellow;kxnobh:chanlunkxnobh, linethick0, coloryell

12、ow;笔:=chanlunbi;bilast:chanlunbilast, linethick0, coloryellow;段:=chanlunduan;duanlast:chanlunduanlast, linethick0, coloryellow;bifx:=-REF(笔,bilast);duanfx:=-REF(段,duanlast);笔高低点 周期 力度 提示DRAWTEXT(笔=1, h, +h+/T+bilast+/+(h-REF(l,bilast),colorred, align1, valign2;DRAWTEXT(笔=-1, l, +l+/T+bilast+/+(l-REF

13、(h,bilast), colorgreen, align1;主图公式：kxian:=chanlunkxian; 初始化kxg:=chanlunkxg;kxd:=chanlunkxd;bi:=chanlunbi;duan:=chanlunduan;duanfx:=chanlunduanfx;当下提示 周期DRAWTEXT(BARSTATUS=2 AND bifx=1 AND bilast4, h*1.008, T+bilast+/+(c-REF(l,bilast), colorMagenta, align0, valign2;DRAWTEXT(BARSTATUS=2 AND bifx=-1 A

14、ND bilast4, l*0.992,T+bilast+/+(c-REF(h,bilast), colorGreen, align0;MA60:MA(CLOSE,60);partline(MA60,MA60=ref(MA60,1),rgb(255,0,0),MA60ref(MA60,1),rgb(0,250,0),linethick1;MACD：DIF : EMA(CLOSE,short) - EMA(CLOSE,long);DEA : EMA(DIF,mid);MACD : 2*(DIF-DEA), COLORSTICK;面积计算绿面积:IF (MACD0) * 100,0),lineth

15、ick0,colorblue;红面积:IF (MACD0,SUM(MACD,BARSLAST(MACD0, -macd*0.03, NUMTOSTRN(红面积, 0), coloryellow,valign0, align2;DRAWTEXT(BARSTATUS=2 and macd=0, -macd*0.03, NUMTOSTRN(绿面积, 0), COLORFFCC66,valign2,align2;多空线: 0, colorwhite, dotline;stickline(MACD=REF(MACD, 1), 0, macd, 0, 0), COLORFFCC66;stickline(M

16、ACD0 and MACD=0 and MACDREF(MACD, 1), 0, macd, 0, 0), COLORRed;stickline(MACD=0 and MACD=ref(dif,1),rgb(255,0,0),dif4, h*1.008, T+bilast+/+(c-REF(l,bilast), colorMagenta, align0, valign2;DRAWTEXT(BARSTATUS=2 AND bifx=-1 AND bilast4, l*0.992,T+bilast+/+(c-REF(h,bilast), colorGreen, align0;主图公式： 底分型V0

17、0:= HIGHREF(HIGH,1) AND LOWREF(LOW,1);V01:= HIGHREF(LOW,1);V02:= HIGHREF(HIGH,1) AND LOWREF(HIGH,1) AND LOWREF(LOW,1);V04:= REF(HIGH,2) HIGH AND REF(LOW,2) REF(HIGH,1) AND REF(LOW,2) =3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND HHVBARS(HIGH,6) = 5 AND V03;V2:= COUNT(V00,7)=3 AND COUNT(V01

18、 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) = 6 AND V04;V3:= COUNT(V00,7)=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) = 6 AND V03;V4:= COUNT(V00,8)=3 AND COUNT(V01 OR V02,7)= 7 AND V04;V5:= COUNT(V00,8)=3 AND COUNT(V01 OR V02,7)= 7 AND V03;V6:= COUNT(V00,9)=3 A

19、ND COUNT(V01 OR V02,8)= 8 AND V04;V7:= COUNT(V00,9)=3 AND COUNT(V01 OR V02,8)= 8 AND V03;V8:= COUNT(V00,10)=3 AND COUNT(V01 OR V02,9)= 9 AND V04;V9:= COUNT(V00,10)=3 AND COUNT(V01 OR V02,9)= 9 AND V03;V10:= COUNT(V00,11)=3 AND COUNT(V01 OR V02,10)= 10 AND V04;XG:CURRENTTIME AND (V1 OR V2 OR V3 OR V4

20、 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10) AND STRFIND(stkname,ST,1)=0 AND STRFIND(stkname,S,1)=0 AND DYNAINFO(4)0;顶分型V00:= HIGHREF(HIGH,1) AND LOWREF(LOW,1);V01:= HIGHREF(HIGH,1) AND LOW HIGH AND REF(LOW,2) LOW AND REF(HIGH,2) REF(HIGH,1) AND REF(LOW,2) =2 AND HHVBARS(HIGH,4) = 1 AND V01;V2:= COUNT(V00

21、,5)=2 AND HHVBARS(HIGH,5) = 2 AND V02;V3:= COUNT(V00,5)=2 AND HHVBARS(HIGH,5) = 1 AND V01;V4:= COUNT(V00,6)=2 AND HHVBARS(HIGH,6) = 2 AND V02;XG:CURRENTTIME AND (V1 OR V2 OR V3 OR V4) AND STRFIND(stkname,ST,1)=0 AND STRFIND(stkname,S,1)=0 AND DYNAINFO(4)0;主图公式：买卖点REFLINE: 0, 2;MA26:=EMA(C,26);MA13:=

22、EMA(C,13);var1:=chzhshchkxian;var2:=chzhshchbi;分型:=var1;笔:=var2;a1:=barslast(var20);上个顶底到现在的时间a2:=ref(var2,a1); 是顶还是底aa1:=ref(a1+1,1); 上个顶底到现在的时间aa2:=-ref(a2,1); 1 上涨, -1下跌方向:aa2, linethick0,colorwhite;aa3:=AA1+REF(AA1+1,AA1);AA4:=AA3+REF(AA1+1,AA3);H1:=barslast(var2=1);H2:=ref(var2,H1);HH1:=ref(H1+

23、1,1); HH2:=-ref(H2,1);L1:=barslast(var2=-1);L2:=ref(var2,L1);LL1:=ref(L1+1,1); LL2:=-ref(L2,1);高低点GG:=REF(H,h1);GG1:=REF(H,HH1);GG2:=REF(GG1,HH1);GG3:=REF(GG2,HH1);GG4:=REF(GG3,HH1);GG5:=REF(GG4,HH1);DD:=REF(L,l1);DD1:=REF(L,LL1);DD2:=REF(DD1,LL1);DD3:=REF(DD2,LL1);DD4:=REF(DD3,LL1);DD5:=REF(DD4,LL1

24、);买点主要是从形态考虑TJA， 空间做为次要条件KJ提高成功率 一买反弹高点站不上26天线就利用形态抓下+盘+下一买TJ1:=方向=1 AND LMA13 AND LL1=5;一五段下跌:=DD1GG1 AND DD1DD2 AND DD1DD3 AND GG1GG2 AND GG1GG3;一买TJA:=GG1DD3; 存在缺口一买A:一买TJ1 AND 一五段下跌 AND 一买TJA, linethick0, colorred; 89%一买KJA:=GG1-DD1GG3-DD3 AND GG3-DD3(GG1-DD1)*1.618;一买AAA:一买TJ1 AND 一五段下跌 AND 一买T

25、JA AND 一买KJA, linethick0, colorred; 93%一买TJB:=GG1DD3; 不存在缺口一买KJB:=GG3-DD3GG1-DD1 AND GG3-DD3GG2-DD2 AND GG2-DD2GG2 AND DD1DD2强二买TJ:=方向=1 AND CMA13 AND LL1=8;强二买TJ2:=DD1GG1 AND DD3DD2 AND DD3DD1 AND DD3GG2-DD2 AND GG2-DD3GG1-DD1;强二买A:强二买TJ AND 强二买TJ2 AND 强二买KJ, linethick0, colorRED; 85强二买TJA:=GG1GG2

26、AND DD1DD2 AND GG2-DD3(GG2-DD2)*1.618;力度大概影响3个点左右强二买AAA:强二买A AND 强二买TJA, linethick0, colorRED; 最强买 90二买1:OK:PASS二买买TJ1:=方向=1 AND LMA26 AND LL1=8;二买TJ:=DD1DD2; 二买形态三段下跌:=GG3GG2 AND DD3DD2; 三段式下跌二买TJA1:=GG1DD3; 第一段上涨至少回到前中枢内二买A:买TJ1 AND 二买TJ AND 三段下跌 AND 二买TJA1, linethick0, coloryellow; 77.5五段下跌:=GG4G

27、G3 AND GG4GG2 AND DD2DD3 AND DD2DD4; 五段下跌二买TJB1:=GG2DD3; 存在缺口二买TJB2:=GG2DD4; 不存在缺口二买B1:买TJ1 AND 二买TJ AND 五段下跌 AND 二买TJB1, linethick0, coloryellow;91.7 - 3二买B2:买TJ1 AND 二买TJ AND 五段下跌 AND 二买TJB2, linethick0, coloryellow;75.8二买AAA:二买B1, linethick0, coloryellow;三买三买TJ:=DD1DD2;三买TJA1:=方向=1 AND LMA13 AND

28、LL1MIN(GG2,GG3) AND GG3DD2 AND DD4DD4 ; GG2 GG3 在同一中枢内三买A: 三买TJ AND 三买TJA1 AND 三买TJA2 , linethick0, colormagenta; 如果DD1GG4成功率更高卖点主要是从形态考虑 买点 的逆向思维 不考虑空间一卖一卖TJ1:=方向=-1 AND HMA13 AND HH1GG2 AND GG1GG3 AND DD1DD2 AND DD1DD3;一卖TJA:=DD1GG3; 缺口一卖A:一卖TJ1 AND 一五段上涨 AND 一卖TJA,linethick0, colorgreen;一卖TJB:=DD

29、1GG2-DD2 AND GG3-DD3-GG2-DD2;一卖B:一卖TJ1 AND 一五段上涨 AND 一卖TJB,linethick0, colorgreen;一卖TJC:=GG1GG2 AND GG2GG3 AND GG3GG4 AND GG4GG5 AND DD1DD2 AND DD2DD3 AND DD3DD4 AND DD4DD5; 连涨4段一卖C:一卖TJ1 AND 一卖TJC,linethick0, colorgreen; 27 - 68二卖卖TJ1:=方向=-1 AND HMA13 AND HH1DD1 AND GG1GG2; 二卖形态三段上涨:=GG3GG2 AND DD3

30、GG3; 第一段下跌至少回到前中枢内二卖A:卖TJ1 AND 二卖TJ AND 三段上涨 AND 二卖TJA1, linethick0, colorf0f000; 44-50五段上涨:=GG2GG3 AND GG2GG4 AND DD4DD3 AND DD4DD2; 五段上涨二卖TJB1:=GG4DD2 AND DD1DD2; 不存在缺口二卖B1:卖TJ1 AND 二卖TJ AND 五段上涨 AND 二卖TJB1, linethick0, colorf0f000;38 - 48二卖B2:卖TJ1 AND 二卖TJ AND 五段上涨 AND 二卖TJB2, linethick0, colorf0

31、f000;39 - 48一段上涨:=GG2GG3 AND GG2GG4 AND DD1MIN(GG3, GG4); 在下跌时有点三卖的感觉二卖C1:卖TJ1 AND 二卖TJ AND 一段上涨, linethick0, colorf0f000; 41 47三卖三卖TJ:=DD1GG1 AND GG1MA13 AND HH1=5;三卖TJA2:=GG1DD3 AND GG4MIN(GG2,GG3) AND GG1GG4 ; GG2 GG3 在同一中枢内三卖A: 三卖TJ AND 三卖TJA1 AND 三卖TJA2 , linethick0, colorwhite; GG14, h*1.008,

32、T+bilast+/+(c-REF(l,bilast), colorMagenta, align0, valign2;DRAWTEXT(BARSTATUS=2 AND bifx=-1 AND bilast4, l*0.992,T+bilast+/+(c-REF(h,bilast), colorGreen, align0;*买卖点REFLINE: -3,-2, -1, 0, 1, 2,3;kxian:=chanlunkxian;bi:=chanlunbi;duan:=chanlunduan;s_lqs:chanluns_lqs, colorgreen;b_bi:chanlunb_bi, line

33、thick0;b_duan:chanlunb_duan,linethick0;这个无实用性 滞后 纯用来验证b_pz:chanlunb_pz, colorwhite;b_1b:chanlunb_1b, colorred, linethick2;b_2b:chanlunb_2b, coloryellow;b_3b:chanlunb_3b, colormagenta, linethick2;b_lqs:chanlunb_lqs, colorred;b_l3b:chanlunb_l3b, colormagenta;BB: b_pz0 OR b_1b0 OR b_2b0 OR b_3b0 OR b_l

34、qs0 OR b_l3b0, linethick0;底分型: BB AND REF(BB,1)0, linethick0;P_PBASEKX:chanlunkxian;KXG:chanlunkxg;KXD:chanlunkxd;BI:chanlunbi;中枢kx:=chanlunkxian; 这个放第一个 要不会出问题滴-_-kxg:=chanlunkxg;kxd:=chanlunkxd;kxfx:=chanlunkxfx;kxno:chanlunkxno, linethick0, coloryellow;kxnobh:chanlunkxnobh, linethick0, coloryellow;笔:=chanlunbi;bilast:chanlunbilast, linethick0, coloryellow;段:=chanlunduan;duanlast:chanlunduanlast, linethick0, coloryellow;bifx:=-REF(笔,bilast);duanfx:=-REF(段,