相關標簽:

?

測試了這個指標，很準現共享給大家

DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'11',0);MA10:MA(C,10);MA60:MA(C,60);cxh6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);cxh7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);cxh8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);cxh9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));加倉:cxh6>=cxh7 AND cxh6>=cxh8 AND CLOSE>OPEN,NODRAW,COLORRED;減倉:cxh6>=cxh7 AND cxh6>=cxh8 AND CLOSE<OPEN,NODRAW,COLORGREEN;洗盤:cxh8>cxh6 AND cxh8>cxh7,NODRAW,COLORWHITE;高拋:cxh7>cxh6 AND cxh7>cxh8,NODRAW,COLORGREEN;地量:cxh9>2 AND VOL<MA(VOL,5)/2,NODRAW,COLORCYAN;DRAWKLINE(H,O,L,C);TY:=C;A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);前期高位:REF(H,BARSLAST(HD)), COLORFF00FF,POINTDOT,LINETHICK3;前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK3;STICKLINE(洗盤,O,C,1,0),COLORWHITE;STICKLINE(減倉,O,C,1,0),COLORGREEN;STICKLINE(加倉,O,C,1,0),COLORRED;STICKLINE(地量,O,C,1,0),COLORCYAN;STICKLINE(高拋,O,C,1,0),COLORGREEN;JJ:=(3*C+H+L+O)/6;cxh1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>cxh1 AND C>REF(C,1);LJL:=FILTER(TJ1,5);STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORCYAN;STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORCYAN;STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;DRAWTEXT_FIX(1,0.00,0.0,0,'白芯：主力輕度洗盤'),COLORWHITE,LINETHICK2;DRAWTEXT_FIX(1,0.0,0.06,0,'綠芯：主力重洗盤或高位賣出'),COLORGREEN,LINETHICK2;DRAWTEXT_FIX(1,0.00,0.12,0,'青芯：近期相對地量'),COLORCYAN,LINETHICK2;DRAWTEXT_FIX(1,0.00,0.18,0,'紅芯：主力吸籌買入積極主動'),COLORRED,LINETHICK2;DRAWTEXT_FIX(1,0.00,0.24,0,'粉芯：主力高拋低吸或低吸高拋'),COLORFF00FF,LINETHICK2;DRAWTEXT_FIX(1,0.00,0.3,0,'黃芯：主力進貨強且成交量出現黃金柱'),COLORYELLOW,LINETHICK2;DRAWTEXT_FIX(C>0,0.10,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);PL10:=ZIG(3,10);走強2:=BARSLAST(PL10<REF(PL10,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強2),0);追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3;DRAWTEXT(追2 OR 追4,LOW*0.95,'←追'),COLORYELLOW;PL5:=ZIG(3,5);EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);PL20:=ZIG(3,20);EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);PL40:=ZIG(3,40);走強1:=BARSLAST(PL5<REF(PL5,1));走弱1:=BARSLAST(PL5>REF(PL5,1));走弱2:=BARSLAST(PL10>REF(PL10,1));走強3:=BARSLAST(PL20<REF(PL20,1));走弱3:=BARSLAST(PL20>REF(PL20,1));{ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強2),0);}ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走強2),0);DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強3),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走強3),0);DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'←反彈低點'),COLORCYAN;DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'←反彈高點'),COLORWHITE;DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'←底'),COLORYELLOW;DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'←減倉'),COLORWHITE;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'←買'),COLORRED;DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'←短賣'),COLORGREEN;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'←短買'),COLORRED;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'←短賣'),COLORGREEN;DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'Ⅰ'),COLORYELLOW;DRAWTEXT(EX2 AND DTJD10=2,H*1.03,'Ⅱ'),COLORYELLOW;DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORYELLOW;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLORYELLOW;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORYELLOW;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,'←清倉'),LINETHICK3,COLORWHITE;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORYELLOW;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,'⑷'),COLORYELLOW;EMA13:=EMA(C,13);EMA34:=EMA(C,34);EMA55:=EMA(C,55);EMA120:=EMA(C,120);CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;CR2:=V>MA(V,5)*0.6;CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;CR4:=ABS(EMA34-EMA55)/EMA55<0.03;CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);DRAWTEXT(CR6,C*0.98,'←風險'),COLORWHITE;{程序化久久公式網}LC:=REF(CLOSE,1);WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;獲利籌碼:=CONST(WINNER(C)*100);SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));量能飽和:=(IF(SAT>1,1,SAT)*100);WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;活躍:=(WRSI-WR10);活躍度比:=IF(活躍>=0,(活躍+100)/2,100-ABS((活躍-100)/2));DRAWTEXT_FIX(1,0.23,1.15,1,STRCAT(STRCAT('量能飽和： ',CON2STR(量能飽和,2)),'％')),COLORYELLOW;DRAWTEXT_FIX(1,0.33,1.35,1,STRCAT(STRCAT('活躍度比： ',CON2STR(活躍度比,2)),'％')),COLORYELLOW;DRAWTEXT_FIX(1,0.43,1.55,1,STRCAT(STRCAT('獲利籌碼： ',CON2STR(獲利籌碼,2)),'％')),COLORYELLOW;上漲家數:=STRCAT('滬深總上漲家數：',CON2STR(DYNAINFO(60),0));下跌家數:=STRCAT('滬深總下跌家數：',CON2STR(DYNAINFO(61),0));DRAWTEXT_FIX(ISLASTBAR,0.46,5,0,上漲家數),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0.58,5,0,下跌家數),COLORYELLOW;{程序化交易 m.kzuj.com.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?

 

有思路，想編寫各種指標公式，交易模型，選股公式，還原公式的朋友

可聯系技術人員 QQ: 262069696  或微信：cxhjy888 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)

（怎么收費，代編流程等詳情請點擊查閱！）

(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，加好友時請簡單備注下您的需求，否則無法通過。謝謝您！)