实战很强指标 公式 源码[大智慧公式]

指标公式源码分析及使用参考说明:

 

源码：

 

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)
+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)
+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)
+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)
+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
马线:MA(牛线,6),COLORGREEN;{http://www.cxh99.com}
cxh0:=SMA(MAX(CLOSE-ref(c,1),0),12,1)/SMA(ABS(CLOSE-ref(c,1)),15,1)*100;
DRAWTEXT(CROSS(82,cxh0),high,'快卖'),colorwhite;
DRAWTEXTABS(10,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF;
s:=C-REF(C,1);
DX:=100*EMA(EMA(s,6),6)/EMA(EMA(ABS(s),6),6);
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);
DRAWTEXT(filter(买=1,5),LOW-0.03,'拉升'),ColorFFDE00;
da:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;
db:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;
DRAWTEXT(CROSS(da-db,0),L*0.95,'B'),COLORRED;
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
DRAWTEXT(CROSS(84,JH),H*1.05,'☆S'),COLORGREEN;{http://www.cxh99.com}
YC:=REF(CLOSE,1);
止损价位:(YC*1.0035*97+0.2)/99.65,COLORRED,LINETHICK0;
DRAWTEXTABS(CLOSE,25,' ======================'),COLORRED;DRAWTEXTABS(CLOSE,57,'盘 '),COLORRED;
DRAWTEXTABS(CLOSE,73,'铁'),COLORRED;
DRAWTEXTABS(CLOSE,89,'律'),COLORRED;
DRAWTEXTABS(CLOSE,105,' ======================'),COLORRED;DRAWTEXTABS(CLOSE,57,' 买入时间 2:30以后'),colorYellow;
DRAWTEXTABS(CLOSE,73,' 止损价位 '+NUMTOSTR(止损价位)+'元'),colorYellow;
DRAWTEXTABS(CLOSE,89,' 线上:工作 线下:休息'),color00FFFF;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
明日阻力:=2*E-LOW;
明日支撑:=2*E-HIGH;
明日突破:=E+(HIGH-LOW);
明日反转:=E-(HIGH-LOW);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
DRAWTEXTABS(200,25,'今日阻力=：'+NUMTOSTR(今日阻力)),ColorFFFF00;
DRAWTEXTABS(200,41,'今日支撑=：'+NUMTOSTR(今日支撑)),Colorred;
DRAWTEXTABS(200,57,'明日突破=：'+NUMTOSTR(明日突破)),ColorFF00FF;
DRAWTEXTABS(200,73,'明日阻力=：'+NUMTOSTR(明日阻力)),ColorFFFF00;
DRAWTEXTABS(200,89,'明日支撑=：'+NUMTOSTR(明日支撑)),COLORRED;
DRAWTEXTABS(200,105,'明日反转=：'+NUMTOSTR(明日反转)),COLORYellow;
A:=HHV(HIGH,13)=HIGH AND HIGH>REF(HIGH,1);A1:=FILTER(A,12);
B:=LLV(LOW,13)=LOW AND LOW<REF(LOW,1);B1:=FILTER(B,12);
TS1:=BARSLAST(A1);
箱顶:REF(HIGH,TS1),COLORFF00FF, LINETHICK0;
STICKLINE(1,箱顶,箱顶,7,0),COLORFF00FF;
TS2:=BARSLAST(B1);
箱底:REF(LOW,TS2),COLORFFbb80, LINETHICK0;
STICKLINE(1,箱底,箱底,7,0),COLORFFbb80;
箱高:100*(箱顶-箱底)/箱底,LINETHICK0;
均价:=(3*C+H+L+O)/6;
cxh1:=(8*均价+7*REF(均价,1)+6*REF(均价,2)+5*REF(均价,3)+
4*REF(均价,4)+3*REF(均价,5)+2*REF(均价,6)+REF(均价,8))/36;
cxh2:=(LLV(cxh1,2)+LLV(cxh1,4)+LLV(cxh1,6))/3;
SZ1:=REF(cxh1,1)=REF(cxh2,1) AND cxh1>cxh2 AND CLOSE>cxh1;
SZ2:=cxh1>cxh2 AND cxh1>REF(cxh1,1) AND cxh2>REF(cxh2,1)
AND H/cxh1<1.1 AND L>cxh2 AND CLOSE>cxh1;
SZ3:=cxh1>cxh2 AND cxh1>REF(cxh1,1) AND cxh2>=REF(cxh2,1) AND H/cxh1>1.1;
SZ4:=cxh1>cxh2 AND cxh1>REF(cxh1,1) AND cxh2>REF(cxh2,1)
AND CLOSE>cxh2 AND CLOSE<cxh1;
SZ5:=(cxh1>cxh2 AND cxh2>REF(cxh2,1) AND cxh1<>REF(cxh1,1)
AND CLOSE<cxh2) OR (cxh1>cxh2 AND cxh1<REF(cxh1,1)
AND cxh2<REF(cxh2,1) AND CLOSE<cxh2);;
SZ6:=REF(cxh1,1)>REF(cxh2,1) AND cxh1=cxh2 AND CLOSE<cxh2;
XD1:=cxh1=cxh2 AND CLOSE<cxh2 OR (cxh1<REF(cxh1,1) AND cxh2<REF(cxh2,1)
AND REF(cxh1,1)=REF(cxh2,1) AND CLOSE<cxh2);
XD2:=cxh1=cxh2 AND CLOSE>cxh1;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和度:=IF(SAT>1,1,SAT)*100;
IF BARSTATUS=2 AND SZ1 THEN BEGIN
DRAWTEXTABS(350,25,'调整结束短线介入'),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ2 THEN BEGIN
DRAWTEXTABS(350,25,'上升通道走势良好'),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ3 THEN BEGIN
DRAWTEXTABS(350,25,'股价偏离注意调整'),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ4 THEN BEGIN
DRAWTEXTABS(350,25,'上升通道调整洗盘'),COLORGREEN;{http://www.cxh99.com}
END
ELSE
IF BARSTATUS=2 AND SZ5 THEN BEGIN
DRAWTEXTABS(350,25,'转向特征注意离场'),COLORGREEN;{http://www.cxh99.com}
END
ELSE
IF BARSTATUS=2 AND SZ6 THEN BEGIN
DRAWTEXTABS(350,25,'通道改变坚决离场'),COLORGREEN;{http://www.cxh99.com}
END
ELSE
IF BARSTATUS=2 AND XD1 THEN BEGIN
DRAWTEXTABS(350,25,'下跌通道只宜观望'),COLORGREEN;{http://www.cxh99.com}
END
ELSE
IF BARSTATUS=2 AND XD2 THEN BEGIN
DRAWTEXTABS(350,25,'短期底部准备进入'),COLORYELLOW;
END;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
cxh9Q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3))
or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4)
and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4)
and c>=ref(c,1) and c>=ref(c,2);
stickline(cxh9Q,c,(o+c)/2,7,0),color000055;
stickline(cxh9Q,c,(o+c)/2,6,0),color000066;
stickline(cxh9Q,c,(o+c)/2,5,0),color000077;
stickline(cxh9Q,c,(o+c)/2,4,0),color000099;
stickline(cxh9Q,c,(o+c)/2,3,0),color0000bb;
stickline(cxh9Q,c,(o+c)/2,2,0),color0000dd;
stickline(cxh9Q,c,(o+c)/2,1,0),color0000ff;
cxhaQ:=c=hhv(c,4) and ref(c,1)=llv(c,4);
stickline(cxhaQ,c,(o+c)/2,7,0),colorff11ff;
stickline(cxhaQ,c,(o+c)/2,6,0),colorff33ff;

{程序化交易 www.cxh99.com }

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】

 

 

有思路，想编写各种指标公式，交易模型，选股公式，还原公式的朋友

可联系技术人员 QQ: 262069696  或微信：cxhjy888 进行 有偿收费 编写！(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

（怎么收费，代编流程等详情请点击查阅！）

(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)