大智慧指标公式源码概况：
指标类别： 大智慧指标公式
授权方式： 免费版
指标评级： ★★★★★
指标分类： 策略
画线方法： 副图
漓江渔歌
VarA:=MA(CLOSE,20);
RSV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27));
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
D2:=SMA(K,2,1);
t1:=(3*K-2*D)*100;
天空:STICKLINE(t1,0,120,0.5,0),COLORFFFFFF;
山:=(3*K-2*D)*100;
桂山:STICKLINE(山,0,山,5,0),COLOR00FFDD;
STICKLINE(山,0,山*0.95,5,0),COLOR00FFBB;
STICKLINE(山,0,山*0.88,5,0),COLOR00FF99;
STICKLINE(山,0,山*0.8,5,0),COLOR00DD99;
STICKLINE(山,0,山*0.71,5,0),COLOR00BB99;
STICKLINE(山,0,山*0.6,5,0),COLOR00AA99;
STICKLINE(山,0,山*0.5,5,0),COLOR009999;
STICKLINE(山,0,山*0.4,5,0),COLOR008899;
t2:=((100-山)-100)*2/3;
漓江水:STICKLINE(t2,懒旅呐魄壬仕掏COLORCCFF00;
倒影:t2,COLOR00FFCC,STICK;
STICKLINE(倒影,0,倒影*4/5,0.1,0),COLOR00CC99;
STICKLINE(倒影,0,倒影*3/5,0.1,0),COLOR009999;
STICKLINE(倒影,0,倒影*2/5,0.1,0),COLOR006699;
顶线:=100-((HIGH-VarA)/VarA);
RSV2:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var1:=SMA(RSV2,3,1);
Var2:=SMA(Var1,3,1);
买入:=Var1 16andVar2
卖出预警:=t1 =88or顶线
卖出:=CROSS(顶线,t1)orCROSS(90,t1);
t3:=买入;
打渔船:DRAWTEXT(FILTER(t3,2),山-45, ︼ ),COLOR0000FF,LINETHICK2;
t4:=卖出预警or卖出;
南归雁:DRAWTEXT(FILTER(t4,2),山+10, ),COLORFFFF00;
示例2一个副图公式：《雨季彩虹》
ys1:=(high+low+close*2)/4;
rk3:=ema(ys1,10);
rk4:=std(ys1,10);
rk5:=(ys1-rk3)*100/rk4;
rk6:=ema(rk5,5);
rk7:=ema(rk6,10);
涨:ema(rk6,10)+100/2-5,linethick1,colorred;
跌:ema(涨,4),linethick1,colorwhite;
天晴:if(cross(涨,跌)and跌 -10,30,0),linethick1,colorccccff;
雨季:if(cross(跌,80),70,100),color0099ff,linethick1;
彩虹1:ema(跌,4),colorf00ff0;
彩虹2:ema(彩虹1,4),colorgreen;
彩虹3:=ema(彩虹2,4),coloryellow;
彩虹4:=ema(彩虹3,4),colorcc9900;
-10,pointdot,color888888,linethick2;
80,pointdot,color888888,linethick2;
stickline(涨 ref(涨,1),涨,ema(涨,3),0,0),color00bbff;
stickline(涨 ref(涨,1),涨,ema(涨,3),8,0),color0011ff;
stickline(涨 ref(涨,1),涨,ema(涨,3),7,0),color0022ff;
stickline(涨 ref(涨,1),涨,ema(涨,3),6,0),color0044ff;
stickline(涨 ref(涨,1),涨,ema(涨,3),5,0),color0066ff;
stickline(涨 ref(涨,1),涨,ema(涨,3),4,0),color0088ff;
stickline(涨 ref(涨,1),涨,ema(涨,3),3,0),color0099ff;
stickline(涨 ref(涨,1),涨,ema(涨,3),2,0),color00aaff;
stickline(涨 ref(涨,1),涨,ema(涨,3),1,0),color00bbff;
drawicon(天晴,30,1),color0000ff;
drawicon(cross(跌,80),70,2),colorgreen;
drawtext(cross(涨,跌)and跌 20and跌 -10,40, 停雨多云 ),colorccff99;
drawtext(天晴 0,-20, 天晴 ),color0000ff;
var11:=sumbars(,finance(7)*100);
var22:=dma(ema(close,12),sum(vol,5)/3/capital);
var3:=(close-var22)/var22*100;
var4:=hhv(var3,var11);
var5:=llv(var3,var11);
var6:=(var3-var5)/(var4-var5)*100;
k:=sma(var6,3,1);
d:=sma(k,3,1);
j:=3*k-2*d;
ma1:=ma(j,3),colorgreen;
stickline(filter(j ma1andj =3,5)=1and跌 0,涨,涨+20,6,0),coloryellow;
drawtext(filter(j ma1andj =3,5)=1and跌 0,60, 注意 ),colorffffff;
1.缠中说禅：笔
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),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),MID ref(MID,1),rgb(0,255,0)),linethick1,
dotline;
partline(UPPER,UPPER =ref(UPPER,1),rgb(255,255,0),UPPER ref(UPPER,1),rgb(0,255,0)),linethick
1,dotline;
partline(LOWER,LOWER ref(LOWER,1),rgb(255,255,0),LOWER =ref(LOWER,1),rgb(0,255,0)),linethick
1,dotline;
{
partline(UPPER,收口 =ref(收口,1),rgb(255,255,0),收口 ref(收口,1),rgb(0,255,0)),linethick1,
dotline;
partline(LOWER,收口 =ref(收口,1),rgb(255,255,0),收口 ref(收口,1),rgb(0,255,0)),linethick1,
dotline;
}
{缠中说禅}
分型:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
笔:= chanlun@bi
bilast:= chanlun@bilast
段:= chanlun@duan
duanlast:= chanlun@duanlast
jxyl:= chanlun@JXYL2
jxzc:= chanlun@JXZC2
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, +l+ /T +bilast+ /MA: +jxzc),colorCyan,align1;
2.面积
DIF:EMA(CLOSE,short)-EMA(CLOSE,long);
DEA:EMA(DIF,mid);
MACD:2*(DIF-DEA),COLORSTICK;
{面积计算}
绿面积:IF(MACD 0,SUM(MACD,BARSLAST(MACD 0))*100,0),linethick0,colorblue;
红面积:IF(MACD 0,SUM(MACD,BARSLAST(MACD 0))*100,0),linethick0,colorred;
红显示:=CROSS(DEA,DIF);
绿显示:=CROSS(DIF,DEA);
DRAWTEXT(红显示,DEA*1.03,NUMTOSTRN(REF(红面积,1),0)),colorred,valign2;
DRAWTEXT(绿显示,DEA*0.97,NUMTOSTRN(REF(绿面积,1),0)),colorgreen;
{当前面积}
DRAWTEXT(BARSTATUS=2andmacd 0,-macd*0.03,NUMTOSTRN(红面积,0)),coloryellow,valign0,
align2;
DRAWTEXT(BARSTATUS=2andmacd =0,-macd*0.03,NUMTOSTRN(绿面积,0)),
COLORFFCC66,valign2,align2;
多空线:0,colorwhite,dotline;
stickline(MACD 0andMACD =REF(MACD,1),0,macd,0,0),COLORFFCC66;
stickline(MACD 0andMACD REF(MACD,1),0,macd,0,0),COLORGREEN;
stickline(MACD =0andMACD REF(MACD,1),0,macd,0,0),COLORRed;
stickline(MACD =0andMACD =REF(MACD,1),0,macd,0,0),COLORYellow;
partline(dif,dif =ref(dif,1),rgb(255,0,0),dif ref(dif,1),rgb(0,255,0)),linethick1;
3.中:MA(CLOSE,N),colorgray,dotline;
上:中+P*STD(CLOSE,N),colorgray,dotline;
下:中-P*STD(CLOSE,N),colorgray,dotline;
MA1:MA(CLOSE,P1),colorwhite;
MA2:MA(CLOSE,P2),coloryellow;
MA3:MA(CLOSE,P3),colorred;
MA4:MA(CLOSE,P4),colorgreen;
MA5:MA(CLOSE,P5),colorf00ff0;
MA6:MA(CLOSE,P6),colorblue;
分型:= chanlun@kxian
笔:= chanlun@bi
bilast:= chanlun@bilast
段:= chanlun@duan
duanlast:= chanlun@duanlast
jxyl:= chanlun@JXYL2
jxzc:= chanlun@JXZC2
DRAWTEXT(笔=1,h, +h+ /T +bilast),colorCyan,align1,valign2;
DRAWTEXT(笔=-1,l, +l+ /T +bilast),colorCyan,align1;
4.上证_开: SH000001$OPEN ,LINETHICK0,colorwhite;
上证_高: SH000001$HIGH ,LINETHICK0,colorwhite;
上证_低: SH000001$LOW ,LINETHICK0,colorwhite;
上证_收: SH000001$CLOSE ,LINETHICK0,colorred;
STICKLINE(上证_收 =上证_开,上证_开,上证_收,7,0),COLORRED;
STICKLINE(上证_收 =上证_开,上证_高,上证_低,0.1,0),COLORRED;
STICKLINE(上证_收 =上证_开,上证_开,上证_收,7,0),COLORGREEN;
STICKLINE(上证_收 =上证_开,上证_高,上证_低,0.1,0),COLORGREEN;
五:MA(上证_收,5),colorwhite;
十:MA(上证_收,10),coloryellow;
三十:MA(上证_收,20),colorred;
六十:MA(上证_收,60),colorgreen;
一百二十:MA(上证_收,120),colorf00ff0;
二百五十:MA(上证_收,250),colorblue;
5、公式：
kx:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
kxfx:= chanlun@kxfx
kxno: chanlun@kxno ,linethick0,coloryellow;
kxnobh: chanlun@kxnobh ,linethick0,coloryellow;
笔:= chanlun@bi
bilast: chanlun@bilast ,linethick0,coloryellow;
段:= chanlun@duan
duanlast: chanlun@duanlast ,linethick0,coloryellow;
bifx:=-REF(笔,bilast);
duanfx:=-REF(段,duanlast);
{笔高低点周期力度提示}
DRAWTEXT(笔=1,h, +h+ /T +bilast+ /+ +(h-REF(l,bilast))),colorgreen,align1,valign2;
DRAWTEXT(笔=-1,l, +l+ /T +bilast+ / +(l-REF(h,bilast))),colorred,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;
主图公式：NPP1
中: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),colorblue;
kx:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
kxfx:= chanlun@kxfx
kxno: chanlun@kxno ,linethick0,coloryellow;
kxnobh: chanlun@kxnobh ,linethick0,coloryellow;
笔:= chanlun@bi
bilast: chanlun@bilast ,linethick0,coloryellow;
段:= chanlun@duan
duanlast: chanlun@duanlast ,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(h,bilast))),colorgreen,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;
主图公式：
kx:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
kxfx:= chanlun@kxfx
kxno: chanlun@kxno ,linethick0,coloryellow;
kxnobh: chanlun@kxnobh ,linethick0,coloryellow;
笔:= chanlun@bi
bilast: chanlun@bilast ,linethick0,coloryellow;
段:= chanlun@duan
duanlast: chanlun@duanlast ,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(h,bilast))),colorgreen,align1;
主图公式：
kxian:= chanlun@kxian {初始化}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
bi:= chanlun@bi
duan:= chanlun@duan
duanfx:= chanlun@duanfx
{当下提示周期}
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;
MA60:MA(CLOSE,60);
partline(MA60,MA60 =ref(MA60,1),rgb(255,0,0),MA60 ref(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(MACD 0,SUM(MACD,BARSLAST(MACD 0))*100,0),linethick0,colorblue;
红面积:IF(MACD 0,SUM(MACD,BARSLAST(MACD 0))*100,0),linethick0,colorred;
红显示:=CROSS(DEA,DIF);
绿显示:=CROSS(DIF,DEA);
DRAWTEXT(红显示,DEA*1.03,NUMTOSTRN(REF(红面积,1),0)),colorgreen,valign2;
DRAWTEXT(绿显示,DEA*0.97,NUMTOSTRN(REF(绿面积,1),0)),colorred;
{当前面积}
DRAWTEXT(BARSTATUS=2andmacd 0,-macd*0.03,NUMTOSTRN(红面积,0)),coloryellow,valign0,
align2;
DRAWTEXT(BARSTATUS=2andmacd =0,-macd*0.03,NUMTOSTRN(绿面积,0)),
COLORFFCC66,valign2,align2;
多空线:0,colorwhite,dotline;
stickline(MACD 0andMACD =REF(MACD,1),0,macd,0,0),COLORFFCC66;
stickline(MACD 0andMACD REF(MACD,1),0,macd,0,0),COLORGREEN;
stickline(MACD =0andMACD REF(MACD,1),0,macd,0,0),COLORRed;
stickline(MACD =0andMACD =REF(MACD,1),0,macd,0,0),COLORYellow;
partline(dif,dif =ref(dif,1),rgb(255,0,0),dif ref(dif,1),rgb(0,255,0)),linethick1;
ｇａｍｏ：
AMOUNT,VOLSTICK;
{
MA1:MA(AMOUNT,N1);
MA2:MA(AMOUNT,N2)
MA3:MA(AMOUNT,N3)
};
DRAWTEXTABS(0,3, ： ),colorgray,LINETHICK1;
当日换手率:=sum(100*v/capital,1);
DRAWTEXTABS(80,3, 今日换手率： +NUMTOSTRN(当日换手
率,2)+ % ),colorgray,LINETHICK1;
五日换手率:=sum(100*v/capital,5);
DRAWTEXTABS(210,3, 5日换手率： +NUMTOSTRN(五日换手
率,2)+ % ),colorgray,LINETHICK1;
十日换手率:=SUM(VOL,10)*100/CAPITAL;
DRAWTEXTABS(330,3, 10日换手率： +NUMTOSTRN(十日换手
率,2)+ % ),colorgray,LINETHICK1;
DRAWTEXTABS(0,20, 所属： + +BKNAME),colorgray,LINETHICK1;
主图公式：
kx:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
kxfx:= chanlun@kxfx
kxno: chanlun@kxno ,linethick0,coloryellow;
kxnobh: chanlun@kxnobh ,linethick0,coloryellow;
笔:= chanlun@bi
bilast: chanlun@bilast ,linethick0,coloryellow;
段:= chanlun@duan
duanlast: chanlun@duanlast ,linethick0,coloryellow;
bifx:=-REF(笔,bilast);
duanfx:=-REF(段,duanlast);
{笔高低点周期力度提示}
DRAWTEXT(笔=1,h, +h+ /T +bilast+ /+ +(h-REF(l,bilast))),colorgreen,align1,valign2;
DRAWTEXT(笔=-1,l, +l+ /T +bilast+ / +(l-REF(h,bilast))),colorred,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;
主图公式：
底分型
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) =5
ANDV03;
V2:=COUNT(V00,7) =3ANDCOUNT(V01ORV02,6)=1ANDLLVBARS(LOW,7)=2ANDHHVBARS(HIGH,7) =6
ANDV04;
V3:=COUNT(V00,7) =3ANDCOUNT(V01ORV02,6)=1ANDLLVBARS(LOW,7)=1ANDHHVBARS(HIGH,7) =6
ANDV03;
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:CURRENTTIME 092530AND(V1ORV2ORV3ORV4ORV5ORV6ORV7ORV8ORV9ORV10)
ANDSTRFIND(stkname, ST ,1)=0ANDSTRFIND(stkname, S ,1)=0ANDDYNAINFO(4) 0;
顶分型
V00:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1);
V01:=HIGH REF(HIGH,1)ANDLOW REF(LOW,1);
V02:=REF(HIGH,2) HIGHANDREF(LOW,2) LOWANDREF(HIGH,2) REF(HIGH,1)ANDREF(LOW,2)
REF(LOW,1);
V1:=COUNT(V00,4) =2ANDHHVBARS(HIGH,4)=1ANDV01;
V2:=COUNT(V00,5) =2ANDHHVBARS(HIGH,5)=2ANDV02;
V3:=COUNT(V00,5) =2ANDHHVBARS(HIGH,5)=1ANDV01;
V4:=COUNT(V00,6) =2ANDHHVBARS(HIGH,6)=2ANDV02;
XG:CURRENTTIME 092530AND(V1ORV2ORV3ORV4)
ANDSTRFIND(stkname, ST ,1)=0ANDSTRFIND(stkname, S ,1)=0ANDDYNAINFO(4) 0;
主图公式：点
REFLINE:0,2;
MA26:=EMA(C,26);
MA13:=EMA(C,13);
var1:= chzhshch@kxian
var2:= chzhshch@bi
分型:=var1;
笔:=var2;
a1:=barslast(var2 0);{上个到现在的时间}
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+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);
{买点}
{主要是从形态考虑TJA，空间做为次要条件KJ提高成功率}
{一买}
{反弹高点站不上26天线就}
{利用形态抓下+盘+下}
一买TJ1:=方向=1ANDL MA13ANDLL1
一五段下跌:=DD1 GG1ANDDD1 DD2ANDDD1 DD3ANDGG1 GG2ANDGG1
一买TJA:=GG1 {存在}
一买A:一买TJ1AND一五段下跌AND一买TJA,linethick0,colorred;{89%}
一买KJA:=GG1-DD1 GG2-DD2ANDGG1-DD1 GG3-DD3ANDGG3-DD3 GG2-DD2ANDGG2-DD2 (GG1-DD1)*1.618;
一买AAA:一买TJ1AND一五段下跌AND一买TJAAND一买KJA,linethick0,colorred;{93%}
一买TJB:=GG1 {不存在缺口}
一买KJB:=GG3-DD3 GG1-DD1ANDGG3-DD3 GG2-DD2ANDGG2-DD2 GG1-DD1;
一买B:一买TJ1AND一五段下跌AND一买TJBAND一买KJB,linethick0,colorred;{85}
{强二买}
{思路是利用形态抓上+盘+(上)}
{注意有这两个条件成功率提高很多GG1 GG2ANDDD1 DD2}
强二买TJ:=方向=1ANDC MA13ANDLL1
强二买TJ2:=DD1 GG1ANDDD3 DD2ANDDD3 DD1ANDDD3
强二买KJ:=GG2-DD3 GG2-DD2ANDGG2-DD3 GG1-DD1;
强二买A:强二买TJAND强二买TJ2AND强二买KJ,linethick0,colorRED;{85}
强二买TJA:=GG1 GG2ANDDD1 DD2ANDGG2-DD3 (GG2-DD2)*1.618;{力度大概影响3个点左右}
强二买AAA:强二买AAND强二买TJA,linethick0,colorRED;{最强买}{90}
{二买1:OK:PASS}
{二买}
买TJ1:=方向=1ANDL MA26ANDLL1
二买TJ:=DD1 GG1ANDDD1 {二买形态}
三段下跌:=GG3 GG2ANDDD3 {三段式下跌}
二买TJA1:=GG1 {第一段上涨至少回到前中枢内}
二买A:买TJ1AND二买TJAND三段下跌AND二买TJA1,linethick0,coloryellow;{77.5}
五段下跌:=GG4 GG3ANDGG4 GG2ANDDD2 DD3ANDDD2 {五段下跌}
二买TJB1:=GG2 DD4ANDGG1 {存在缺口}
二买TJB2:=GG2 {不存在缺口}
二买B1:买TJ1AND二买TJAND五段下跌AND二买TJB1,linethick0,coloryellow;{91.7-3}
二买B2:买TJ1AND二买TJAND五段下跌AND二买TJB2,linethick0,coloryellow;{75.8}
二买AAA:二买B1,linethick0,coloryellow;
{三买}
三买TJ:=DD1 GG1ANDDD1
三买TJA1:=方向=1ANDL MA13ANDLL1
三买TJA2:=DD1 MIN(GG2,GG3)ANDGG3 DD2ANDDD4 MAX(DD2,DD3)ANDDD1 {GG2GG3在同一中枢
内}
三买A:三买TJAND三买TJA1AND三买TJA2,linethick0,colormagenta;{如果DD1 GG4成功率更高}
{卖点}
{主要是从形态考虑买点的逆向思维不考虑空间}
{一卖}
一卖TJ1:=方向=-1ANDH MA13ANDHH1
一五段上涨:=GG1 GG2ANDGG1 GG3ANDDD1 DD2ANDDD1
一卖TJA:=DD1 {缺口}
一卖A:一卖TJ1AND一五段上涨AND一卖TJA,linethick0,colorgreen;
一卖TJB:=DD1 GG3ANDGG1-DD1 GG2-DD2ANDGG3-DD3-GG2-DD2;
一卖B:一卖TJ1AND一五段上涨AND一卖TJB,linethick0,colorgreen;
一卖TJC:=GG1 GG2ANDGG2 GG3ANDGG3 GG4ANDGG4 GG5ANDDD1 DD2ANDDD2 DD3ANDDD3 DD4AND
DD4 {连涨4段}
一卖C:一卖TJ1AND一卖TJC,linethick0,colorgreen;{27-68}
{二卖}
卖TJ1:=方向=-1ANDH MA13ANDHH1
二卖TJ:=GG1 DD1ANDGG1 {二卖形态}
三段上涨:=GG3 GG2ANDDD3 {三段式上涨}
二卖TJA1:=DD1 {第一段下跌至少回到前中枢内}
二卖A:卖TJ1AND二卖TJAND三段上涨AND二卖TJA1,linethick0,colorf0f000;{44-50}
五段上涨:=GG2 GG3ANDGG2 GG4ANDDD4 DD3ANDDD4 {五段上涨}
二卖TJB1:=GG4 DD2ANDDD1 {存在缺口}
二卖TJB2:=GG4 {不存在缺口}
二卖B1:卖TJ1AND二卖TJAND五段上涨AND二卖TJB1,linethick0,colorf0f000;{38-48}
二卖B2:卖TJ1AND二卖TJAND五段上涨AND二卖TJB2,linethick0,colorf0f000;{39-48}
一段上涨:=GG2 GG3ANDGG2 GG4ANDDD1 MIN(GG3,GG4);{在下跌时有点三卖的感觉}
二卖C1:卖TJ1AND二卖TJAND一段上涨,linethick0,colorf0f000;{4147}
{三卖}
三卖TJ:=DD1 GG1ANDGG1
三卖TJA1:=方向=-1ANDH MA13ANDHH1
三卖TJA2:=GG1 MAX(DD2,DD3)ANDGG2 DD3ANDGG4 MIN(GG2,GG3)ANDGG1 {GG2GG3在同一中枢
内}
三卖A:三卖TJAND三卖TJA1AND三卖TJA2,linethick0,colorwhite;{GG1 DD4成功率更高}
{买卖点提示}
一买:一买AOR一买B,colorred;
强二买:强二买A,colorred;
二买:二买AOR二买B1OR二买B2,coloryellow;
三买:三买A,colormagenta;
一卖:一卖AOR一卖BOR一卖C,colorgreen;
二卖:二卖AOR二卖B1OR二卖B2OR二卖C1,colorF0F000;
三卖:三卖A,colorwhite;
二三买合:二买AND三买,linethick0,colormagenta;{85信号量少}
二三卖合:二卖AND三卖,colorF0F000,linethick0;{13-87}
高成功率:一买AAAOR二买AAAOR强二买AAA,linethick0;
次高成功:二三买合,linethick0;
清仓:二三卖合,linethick0;
STICKLINE(高成功率,0,0.7,5,501),colorred;
STICKLINE(次高成功,0,0.7,5,501),colormagenta;
STICKLINE(清仓,0,0.7,5,501),colorgreen,linethick2;
DRAWTEXT(一买ANDFILTER(一买,8),1, 1B ),colorred,valign2,linethick2;
DRAWTEXT(强二买ANDFILTER(强二买,8),1, 2BQ ),colorred,valign2,linethick2;
DRAWTEXT(二买ANDFILTER(二买,8),1, 2B ),coloryellow,valign2,linethick2;
DRAWTEXT(三买ANDFILTER(三买,8),1, 3B ),colormagenta,valign2,linethick2;
DRAWTEXT(一卖ANDFILTER(一卖,8),1, 1S ),colorgreen,valign2;
DRAWTEXT(二卖ANDFILTER(二卖,8),1, 2S ),colorF0F000,valign2;
DRAWTEXT(三卖ANDFILTER(三卖,8),1, 3S ),colorwhite,valign2;
{方向提示}
持股:0,colorgreen;
PARTLINE(持股,方向=1,RGB(255,0,0),方向=-1,RGB(0,255,0)),linethick3;
***主图
kx:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
kxfx:= chanlun@kxfx
kxno: chanlun@kxno ,linethick0,coloryellow;
kxnobh: chanlun@kxnobh ,linethick0,coloryellow;
笔:= chanlun@bi
bilast: chanlun@bilast ,linethick0,coloryellow;
段:= chanlun@duan
duanlast: chanlun@duanlast ,linethick0,coloryellow;
bifx:=-REF(笔,bilast);
duanfx:=-REF(段,duanlast);
{笔高低点周期力度涨幅提示}
上涨幅度:=(kxg-REF(kxd,bilast))*100/REF(kxd,bilast);
下跌幅度:=(kxd-REF(kxg,bilast))*100/REF(kxg,bilast);
DRAWTEXT(笔=1,kxg, +kxg+ /T +bilast+ /+ +(kxg-REF(kxd,bilast))+ (+ +NUMTOSTRN(上涨幅度,
1)+ %) ),colorCyan,align1,valign2;
DRAWTEXT(笔=-1,kxd, +kxd+ /T +bilast+ / +(kxd-REF(kxg,bilast))+ ( +NUMTOSTRN(下跌幅度,
1)+ %) ),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;
*买卖点
REFLINE:-3,-2,-1,0,1,2,3;
kxian:= chanlun@kxian
bi:= chanlun@bi
duan:= chanlun@duan
s_lqs: chanlun@s_lqs ,colorgreen;
b_bi: chanlun@b_bi ,linethick0;
b_duan: chanlun@b_duan ,linethick0;{这个无实用性滞后纯用来验证}
b_pz: chanlun@b_pz ,colorwhite;
b_1b: chanlun@b_1b ,colorred,linethick2;
b_2b: chanlun@b_2b ,coloryellow;
b_3b: chanlun@b_3b ,colormagenta,linethick2;
b_lqs: chanlun@b_lqs ,colorred;
b_l3b: chanlun@b_l3b ,colormagenta;
BB:b_pz 0ORb_1b 0ORb_2b 0ORb_3b 0ORb_lqs 0ORb_l3b 0,linethick0;
底分型:BBANDREF(BB,1) 0,linethick0;
P_PBASE
KX: chanlun@kxian
KXG: chanlun@kxg
KXD: chanlun@kxd
BI: chanlun@bi
中枢
kx:= chanlun@kxian {这个放第一个要不会出问题滴-_-\~~}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
kxfx:= chanlun@kxfx
kxno: chanlun@kxno ,linethick0,coloryellow;
kxnobh: chanlun@kxnobh ,linethick0,coloryellow;
笔:= chanlun@bi
bilast: chanlun@bilast ,linethick0,coloryellow;
段:= chanlun@duan
duanlast: chanlun@duanlast ,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(h,bilast))),colorgreen,align1;
kxian:= chanlun@kxian {初始化}
kxg:= chanlun@kxg
kxd:= chanlun@kxd
bi:= chanlun@bi
duan:= chanlun@duan
duanfx:= chanlun@duanfx
{当下提示周期}
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;
{中枢笔构成的中枢}
zs:= chanlun@zs
zsgg:= chanlun@zsgg
zsdd:= chanlun@zsdd
zszg:= chanlun@zszg
zszd:= chanlun@zszd
zszz:= chanlun@zszz
zskslast:= chanlun@zskslast
zsjslast:= chanlun@zsjslast
{以直线方式画中枢}
{上涨中枢}
DRAWLINE(zskslast=1ANDduanfx=1,zszg,zsjslast=1ANDduanfx=1,zszg,0),colormagenta,
linethick1,dotline;
DRAWLINE(zskslast=1ANDduanfx=1,zszd,zsjslast=1ANDduanfx=1,zszd,0),colormagenta,
linethick1,dotline;
STICKLINE(zskslast=1ANDduanfx=1,zszg,zszd,1,-501),colormagenta,linethick1,dotline;
STICKLINE(zsjslast=1ANDduanfx=1,zszg,zszd,1,501),colormagenta,linethick1,dotline;
{下跌中枢}
DRAWLINE(zskslast=1ANDduanfx=-1,zszg,zsjslast=1ANDduanfx=-1,zszg,0),colorCyan,
linethick1,dotline;
DRAWLINE(zskslast=1ANDduanfx=-1,zszd,zsjslast=1ANDduanfx=-1,zszd,0),colorCyan,
linethick1,dotline;
STICKLINE(zskslast=1ANDduanfx=-1,zszg,zszd,1,-501),colorCyan,linethick1,dotline;
STICKLINE(zsjslast=1ANDduanfx=-1,zszg,zszd,1,501),colorCyan,linethick1,dotline;;
{中枢震荡监视器}
DRAWLINE(zskslast=1,zszz,zsjslast=1,zszz,0),coloryellow,linethick1,dotline;;
{画中枢END}
zslx:= chanlun@zslx (duan);
{走势类型中枢段构成的中枢}
zslxzs:= chanlun@zslxzs
zslxzsgg:= chanlun@zslxzsgg
zslxzsdd:= chanlun@zslxzsdd
zslxzszg:= chanlun@zslxzszg
zslxzszd:= chanlun@zslxzszd
zslxzszz:= chanlun@zslxzszz
zslxzskslast:= chanlun@zslxzskslast
zslxzsjslast:= chanlun@zslxzsjslast
{画中枢Begin}
DRAWLINE(zslxzskslast=1,zslxzszg,zslxzsjslast=1,zslxzszg,0),colorGreen,linethick2;
DRAWLINE(zslxzskslast=1,zslxzszd,zslxzsjslast=1,zslxzszd,0),colorGreen,linethick2;
STICKLINE(zslxzskslast=1,zslxzszg,zslxzszd,1,-501),colorGreen,linethick2;
STICKLINE(zslxzsjslast=1,zslxzszg,zslxzszd,1,501),colorGreen,linethick2;
{中枢震荡监视器}
DRAWLINE(zslxzskslast=1,zslxzszz,zslxzsjslast=1,zslxzszz,0),colorGreen;
{画中枢End}
{高级别走势类型中枢本级别走势构成的中枢}
zslxA:= chanlun@zslx (zslx);
zslxzsA:= chanlun@zslxzs
zslxzsggA:= chanlun@zslxzsgg
zslxzsddA:= chanlun@zslxzsdd
zslxzszgA:= chanlun@zslxzszg
zslxzszdA:= chanlun@zslxzszd
zslxzszzA:= chanlun@zslxzszz
zslxzskslastA:= chanlun@zslxzskslast
zslxzsjslastA:= chanlun@zslxzsjslast
{画中枢Begin}
DRAWLINE(zslxzskslastA=1,zslxzszgA,zslxzsjslastA=1,zslxzszgA,0),colorRed,linethick2;
DRAWLINE(zslxzskslastA=1,zslxzszdA,zslxzsjslastA=1,zslxzszdA,0),colorRed,linethick2;
STICKLINE(zslxzskslastA=1,zslxzszgA,zslxzszdA,1,-501),colorRed,linethick2;
STICKLINE(zslxzsjslastA=1,zslxzszgA,zslxzszdA,1,501),colorRed,linethick2;
{中枢震荡监视器}
DRAWLINE(zslxzskslastA=1,zslxzszzA,zslxzsjslastA=1,zslxzszzA,0),colorRed;
{画中枢End}
{笔段走势类型}
drawline(bi=1,kxg,bi=-1,kxd,0),colorgreen,dotline;
drawline(bi=-1,kxd,bi=1,kxg,0),colorred,dotline;
drawline(duan=1,kxg,duan=-1,kxd,0),colorgreen,dotline;
drawline(duan=-1,kxd,duan=1,kxg,0),colorred,dotline;
drawline(zslx=1,kxg,zslx=-1,kxd,0),colorgreen,dotline;
drawline(zslx=-1,kxd,zslx=1,kxg,0),colorred,dotline;
drawline(zslxA=1,kxg,zslxA=-1,kxd,0),colorgreen,dotline;
drawline(zslxA=-1,kxd,zslxA=1,kxg,0),colorred,dotline;
************************
分型:= chanlun@kxian
笔:= chanlun@bi
bilast:= chanlun@bilast
段:= chanlun@duan
duanlast:= chanlun@duanlast
jxyl:= chanlun@JXYL2
jxzc:= chanlun@JXZC2
MA60:MA(CLOSE,60);
partline(MA60,MA60 =ref(MA60,1),rgb(255,0,0),MA60 ref(MA60,1),rgb(0,250,0)),linethick1;
DRAWTEXT(AB,L*0.9, ██████粉红 ),COLORF00FF0;
DRAWTEXT(AB,L*0.8, ██████综色 ),COLOR0055FF;
DRAWTEXT(AB,L*0.7, ██████紫罗蓝 ),COLORE66878;
DRAWTEXT(AB,L*0.6, ██████紫色 ),COLORFF0099;
DRAWTEXT(AB,L*0.5, ██████深黄色 ),COLOR00CCCC;
DRAWTEXT(AB,L*0.4, ██████天蓝色 ),COLORFF937F;
DRAWTEXT(AB,L*0.3, ██████深草绿 ),COLOR399C7F;
BB:=IF(CURRBARSCOUNT=60,1,0);
DRAWTEXT(BB,H*0.8, ██████白 ),COLORFFFFFF;
DRAWTEXT(BB,H*0.7, ██████红 ),COLOR0000FF;
DRAWTEXT(BB,H*0.6, ██████黄 ),COLOR00FFFF;
DRAWTEXT(BB,H*0.5, ██████绿 ),COLOR00FF00;
DRAWTEXT(BB,H*0.4, ██████青 ),COLORFFFF00;
DRAWTEXT(BB,H*0.3, ██████蓝 ),COLORFF0000;
DRAWTEXT(BB,H*0.2, ██████紫 ),COLORFF00FF;
DRAWTEXT(BB,H*0.1, ██████金黄 ),COLORA0FFFF;
{颜色代码如下：红色colorred、灰色colorgray、绿色colorgreen、黄色coloryellow、蓝
色colorblue、白色colorwhite.另外颜色还有：粉红colorf00ff0、草绿color00ff00、淡
蓝colorf0f000、紫色colorff0099、金黄色color008364、紫红color000999、综色
color0055ff、深黄色color00cccc、紫罗蓝colore66878、天蓝色colorff937f深草绿
color399c7f实际上只要在color后面加上0－9、A-F中任6个数字字母组成，如要其它颜
色，可自己调。}
红色colorred
灰色colorgray
绿色colorgreen
黄色coloryellow
蓝色colorblue
白色colorwhite
粉红colorf00ff0
草绿color00ff00
淡蓝colorf0f000
紫色colorff0099
金黄色color008364
紫红color000999
综色color0055ff
深黄色color00cccc
紫罗蓝colore66878
天蓝色colorff937f
黑色COLORBLACK
青色COLORCYAN
洋红色COLORMAGENTA
棕色COLORBROWN
淡灰色COLORLIGHTGRAY
深灰色COLORGRAY
淡蓝色COLORLIGHTBLUE
淡绿色COLORLIGHTGREEN
淡青色COLORLIGHTCYAN
淡红色COLORLIGHTRED
淡洋红色COLORLIGHTMAGENTA
粉红colorf00ff0
草绿color00ff00
淡蓝colorf0f000
紫色colorff0099
金黄色color008364
紫红color000999
综色color0055ff
深黄色color00cccc
紫罗蓝colore66878
天蓝色colorff937f
深草绿color399c7f
linethick{0--7指标线粗细}
linethick{同时显示柱状线和指标线}
circledot{空心园点}
pointdot{小点}
linethick2{实心方点}
crossdot{X点状线}
cmcledot{0点状线}
stick{显示}
colorstick{显示}
linestick{显示}
风险值赋值:100*(收盘价-34日内最低价的最低值)/(34日内最高价的最高值-34日内最低价的最低值)的3日指数移动平均 =10
机会来临赋值:1日前的如果(收盘价的5日简单移动平均-收盘价)/收盘价 0.04AND(收盘价的10日简单移动平均-收盘价的5日简单移动平均)/收盘价的5日简单移动平均 0.04,返回30,否则返回0
HJ_1赋值:收盘价/收盘价的40日简单移动平均
HJ_2赋值:收盘价/收盘价的60日简单移动平均*100 71
输出XG:HJ_1上穿HJ_2 AND 风险值 AND 机会来临
股票公式编写要求：
昨日收盘价小于布林线上轨的公式。
股票公式编写结果：
REF(C,1) BOLL.UB;
