相關標簽:

?

{公式名稱：ZDF}
input:逃減N(6,2,30),龍盤開關(1,1,2),短買漲幅(2,1,11),低吸(2000,500,10000);
YY:=YEAR;
MM:=MONTH;
DDD:=DAY;
到期年:=2009;
到期月:=6;
到期日:=1;
已到期1:=IF(YY>到期年,1,0);
已到期2:=IF(YY=到期年 AND MM=到期月 AND DDD>到期日,1,0);
已到期3:=IF(YY=到期年 AND MM>到期月,1,0);
已過期:=IF(已到期1 OR 已到期2 OR 已到期3,1,0);
DRAWTEXT(已過期,CLOSE,'指標已過期，請購買正式版本 QQ：332146122');
已注冊:=IF("FoxZdf@MyREG"(5)=100,1,0);
注冊驗證:=已注冊 AND NOT(已過期);
DRAWICON(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.998,8);
DRAWICON(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.01,9);
RO:=REF(OPEN,1);
RC:=REF(CLOSE,1);
STICKLINE(OPEN>=MAX(RC,RO)*(1-0.003) AND CLOSE<MIN(RO,RC) AND CLOSE<OPEN AND RC>RO AND HHV(CLOSE,5)=RC,OPEN,CLOSE,7,0),colorFF00;
STICKLINE(RO>=MAX(REF(CLOSE,2),REF(OPEN,2))*(1-0.003) AND CLOSE<MIN(REF(CLOSE,2),REF(OPEN,2)) AND REF(CLOSE,2)>=REF(OPEN,2) AND RO>RC AND CLOSE<OPEN AND HHV(REF(CLOSE,2),5)=RC,OPEN,CLOSE,7,0),colorFF00;
STICKLINE(OPEN<=MIN(RC,RO)*(1+0.003) AND CLOSE>=MAX(RO,RC) AND CLOSE>OPEN AND (LLV(CLOSE,5)=CLOSE OR LLV(CLOSE,5)=RC),OPEN,CLOSE,7,0),colorFF;
MDIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
MDEA:=EMA(MDIF,9);
MMACD:=(MDIF-MDEA)*2;
柱子變長:=IF(MMACD>REF(MMACD,1)+0.01,1,0);
柱子變長2:=IF(MMACD>REF(MMACD,1),1,0);
MACD背離:=IF(MDEA>REF(MDEA,1) AND REF(MDEA,1)>REF(MDEA,2) AND REF(MDEA,2)>REF(MDEA,3) AND REF(MDEA,3)>REF(MDEA,4),1,0);
最小柱子:=IF(LLV(MMACD,5)=MMACD,2,0);
追漲:=IF(柱子變長2 AND (MACD背離 OR REF(MACD背離,1)) AND REF(最小柱子,1),1,0);
DRAWTEXT(NOT(已過期) AND 已注冊 AND 追漲,LOW*0.96,'追'),colorFF;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),12,1))/(SMA(ABS(CLOSE-LC),12,1))*100;
RSI3:=(SMA(MAX(CLOSE-LC,0),24,1))/(SMA(ABS(CLOSE-LC),24,1))*100;
RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
極品短線:=注冊驗證 AND CLOSE>OPEN AND (D-K<3 AND K>REF(K,1) OR K>D) AND RSI1>REF(RSI1,1) AND REF(RSI1,2)>REF(RSI1,1) AND REF(RSI1,3)<REF(RSI1,2) AND REF(RSI1,4)>REF(RSI1,3) AND REF(RSI1,1)>REF(RSI1,3) AND REF(RSI1,2)<REF(RSI2,2) AND RSI1>REF(RSI1,2);
STICKLINE(極品短線,CLOSE,OPEN,7,0),colorFF00FF;
STICKLINE(極品短線,HIGH,LOW,1,0),colorFF00FF;
SELECT:=注冊驗證 AND (D-K<3 AND K>REF(K,1) OR K>D) AND LC*(1+短買漲幅/100)<CLOSE AND CLOSE>OPEN AND RSI2>RSI1 AND RSI3>RSI2 AND CROSS(5,ABS(RSI1-RSI2));
STICKLINE(SELECT,REF(CLOSE,1)*(1+短買漲幅/100),OPEN,7,0),colorFFFF;
STICKLINE(SELECT,REF(CLOSE,1)*(1+短買漲幅/100),LOW,1,0),colorFFFF;
MA3:"Foxzdf@MyMaClose"(3),colorFFFFFF;
MA8:"Foxzdf@MyMaClose"(8),colorFFFF;
MA13:"Foxzdf@MyMaClose"(13),colorFF00FF;
EMA15:=EMA(CLOSE,15);
MA34:"Foxzdf@MyMaClose"(34),colorFF00;
PARTLINE(MA3<REF(MA3,1),MA3),colorFF0000;
PARTLINE(MA8<REF(MA8,1),MA8),color9999;
PARTLINE(MA13<REF(MA13,1),MA13),color6600CC;
PARTLINE(MA34<REF(MA34,1),MA34),color9900;
MA5:="Foxzdf@MyMaClose"(5);
MA10:="Foxzdf@MyMaClose"(10);
MA20:="Foxzdf@MyMaClose"(20);
MA60:="Foxzdf@MyMaClose"(60);
MA120:="Foxzdf@MyMaClose"(120);
WX:=MA(CLOSE,0);
龍盤Ⅰ:MA(CLOSE,250)*(IF(龍盤開關<2,WX,1)),CROSSDOT,LINETHICK1,colorFFFFFF;
龍盤Ⅱ:MA(CLOSE,120)*(IF(龍盤開關<2,WX,1)),CIRCLEDOT,LINETHICK1,colorFF00FF;
一陽穿四線:=CROSS(CLOSE,MA3) AND CROSS(CLOSE,MA8) AND CROSS(CLOSE,MA13) AND CROSS(CLOSE,MA34) OR OPEN<MA3 AND OPEN<MA8 AND OPEN<MA13 AND OPEN<MA34 AND CLOSE>MA3 AND CLOSE>MA8 AND CLOSE>MA13 AND CLOSE>MA34;
一陽穿三線:=CROSS(CLOSE,MA3) AND CROSS(CLOSE,MA8) AND CROSS(CLOSE,MA13) OR OPEN<MA3 AND OPEN<MA8 AND OPEN<MA13 AND CLOSE>MA3 AND CLOSE>MA8 AND CLOSE>MA13;
一陽穿二線:=CROSS(CLOSE,MA3) AND CROSS(CLOSE,MA8) OR OPEN<MA3 AND OPEN<MA8 AND CLOSE>MA3 AND CLOSE>MA8;
三十四線多頭:=NOT(MA34>MA3 AND MA34>MA8 AND MA34>MA13) AND MA34>REF(MA34,1);
DRAWTEXT(一陽穿三線 AND 三十四線多頭 AND 柱子變長,LOW*0.996,'超短5％'),colorFFFF;
DRAWTEXT(CROSS(CLOSE,MA5) AND CROSS(CLOSE,MA10) AND CROSS(CLOSE,MA20) AND CROSS(CLOSE,MA60) AND CROSS(CLOSE,MA120),LOW*0.96,'大黑馬'),colorFF00FF;
DRAWTEXT(一陽穿四線,LOW*0.965,'小黑馬'),color8811FF;
TY:=CLOSE;
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);
A:=REF(HIGH,BARSLAST(HD));
B:=REF(LOW,BARSLAST(LD));
T1:=BARSLAST(HD);
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波谷:IF(T2,B,B),POINTDOT,color80FF00;
STICKLINE(T2,B,B,5,0),color80FF00;
波峰:IF(T1,A,A),POINTDOT,colorFF00FF;
STICKLINE(T1,A,A,9,0),colorFF00FF;
AA:=LLV(LOW,34);
BB:=HHV(HIGH,30);
DD:=EMA((CLOSE-AA)/(BB-AA)*4,4)*25;
絕谷:=(DD-LLV(DD,21))/(HHV(DD,21)-LLV(DD,21))*4*25;
DRAWICON(CROSS(絕谷,90) AND DD<40 AND 注冊驗證,LOW*0.95,1);
MB:="Foxzdf@MyB"(6);
RB:=REF(MB,1);
頂背離:=IF(CLOSE>REF(CLOSE,1) AND MB<RB,-(MB-RB)*0.3*1000,0);
新頂背離:=IF((CLOSE+OPEN)/2>(REF(OPEN,1)+REF(CLOSE,1))/2 AND MB<RB AND RB>0,-(MB-RB)*0.3*1000,0);
DRAWTEXT((頂背離>700 OR 新頂背離>1500) AND 已注冊,HIGH*1.03,'逃'),colorFF00;
DRAWTEXT((新頂背離>300 AND 新頂背離<1501 OR 頂背離>300 AND 頂背離<701) AND 已注冊,HIGH*1.01,'減'),colorFF9933;
底背離:=IF(CLOSE*1.001<REF(CLOSE,1) AND MB>RB,(RB-MB)*1000,0);
DRAWTEXT(底背離<-低吸 AND 已注冊,LOW*0.98,'吸'),color6600CC;
DRAWTEXT(CROSS(MDIF,-0.02) AND 已注冊 AND ANY(CROSS(絕谷,90) AND DD<40,30) AND 新頂背離=0 AND 頂背離=0,LOW*0.97,'拉'),colorFF00FF;
P:=14;
M:=6;
TTR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),P);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=SUM(IF(HD>0 AND HD>LD,HD,0),P);
DMM:=SUM(IF(LD>0 AND LD>HD,LD,0),P);
PDI:=DMP*100/TTR;
MDI:=DMM*100/TTR;
ADX:=MA((ABS(MDI-PDI))/(MDI+PDI)*100,M);
ADXR:=(ADX+REF(ADX,M))/2;
RPDI:=REF(PDI,1);
D底背離:=IF(CLOSE<REF(CLOSE,1) AND PDI>RPDI,-(PDI-RPDI)*100,0);
SELECT加:=ABS(D底背離)>150 AND MA8>REF(MA8,1) AND 頂背離<100 AND 新頂背離<100;
DRAWTEXT(SELECT加 AND 已注冊,LOW*0.97,'補'),colorFF00FF;
ZF:=(CLOSE/REF(CLOSE,1)-1)*100;
量買:=IF(VOL>REF(VOL,1)*1.5 AND ZF>0.01 AND ZF<1.5 OR VOL>REF(VOL,1)*2 AND ZF>0.01 AND ZF<2.5 OR VOL>REF(VOL,1)*3 AND ZF>0.01 AND ZF<4.5,1,0);
DRAWTEXT(量買 AND OPEN/CLOSE<1.01 AND 頂背離<400 AND 新頂背離<200 AND 已注冊,LOW*0.995,'買'),colorFFFF;
半臺階壓力:=波谷*1.0809;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'半臺階壓力'+NUMTOSTR(半臺階壓力[SYSPARAM(1)],2)),ALIGN5,colorFFFF00;
第一臺階壓力:=波谷*1.1618;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 第一臺階壓力'+NUMTOSTR(第一臺階壓力[SYSPARAM(1)],2)),ALIGN5,colorFF00;
一個半臺階壓力:=波谷*1.0809*1.1618;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 一個半臺階壓力'+NUMTOSTR(一個半臺階壓力[SYSPARAM(1)],2)),ALIGN5,colorFFFF00;
半臺階支撐:=波峰/1.0809;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,'半臺階支撐'+NUMTOSTR(半臺階支撐[SYSPARAM(1)],2)),ALIGN4,colorFFFFFF;
第一臺階支撐:=波峰/1.1618;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 第一臺階支撐'+NUMTOSTR(第一臺階支撐[SYSPARAM(1)],2)),ALIGN4,colorFFFF;
一個半臺階支撐:=波峰/1.0809/1.1618;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 一個半臺階支撐'+NUMTOSTR(一個半臺階支撐[SYSPARAM(1)],2)),ALIGN4,colorFFFFFF;【不能顯示，因為缺少FoxZdf動態鏈接庫，猜不出 MB:="Foxzdf@MyB"(6); 的含義】

?

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

?

 

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

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

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

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