相關(guān)標(biāo)簽:

?

?

原理解析：
JJZ賦值:(最高價(jià)+最低價(jià)+收盤價(jià))/3 QJ0Z賦值:成交額(元)/如果最高價(jià)=最低價(jià),返回4,否則返回最高價(jià)-最低價(jià) 買1賦值:QJ0Z*(開(kāi)盤價(jià)和收盤價(jià)的較小值-最低價(jià)) 買2賦值:QJ0Z*(JJZ-收盤價(jià)和開(kāi)盤價(jià)的較小值) 賣1賦值:QJ0Z*(收盤價(jià)和開(kāi)盤價(jià)的較大值-JJZ) 賣2賦值:QJ0Z*(最高價(jià)-開(kāi)盤價(jià)和收盤價(jià)的較大值) DTZ賦值:((買1+買2)-(賣1+賣2))/10000 輸出主力持倉(cāng):DTZ的66日累和,畫白色,線寬為1 當(dāng)滿足條件DTZ>0時(shí),在主力持倉(cāng)和主力持倉(cāng)+DTZ位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000FF 當(dāng)滿足條件DTZ<0時(shí),在主力持倉(cāng)+DTZ和主力持倉(cāng)位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00 JJ賦值:(最高價(jià)+最低價(jià)+收盤價(jià))/3 QJ0賦值:成交額(元)/如果最高價(jià)=最低價(jià),返回4,否則返回最高價(jià)-最低價(jià) TD1賦值:QJ0*(開(kāi)盤價(jià)和收盤價(jià)的較小值-最低價(jià)) DD1賦值:QJ0*(JJ-收盤價(jià)和開(kāi)盤價(jià)的較小值) DD2賦值:QJ0*(最高價(jià)-開(kāi)盤價(jià)和收盤價(jià)的較大值) TD2賦值:QJ0*(收盤價(jià)和開(kāi)盤價(jià)的較大值-JJ) TD賦值:TD1-TD2 DA賦值:DD1-DD2 XD1賦值:1-(TD1+DD1) XD2賦值:1-(TD2+DD2) TZ賦值:成交量(手)/成交量(手)的60日累和*100 DT賦值:((XD1-XD2)/10000)/TZ 輸出散戶持倉(cāng):DT的22日累和,COLOR888888,線寬為1 當(dāng)滿足條件DT>0時(shí),在散戶持倉(cāng)和散戶持倉(cāng)+DT位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF00FF 當(dāng)滿足條件DT<0時(shí),在散戶持倉(cāng)+DT和散戶持倉(cāng)位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF8800 當(dāng)滿足條件收陽(yáng)線時(shí),在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當(dāng)滿足條件收陽(yáng)線時(shí),在橫軸1縱軸1位置書寫文字,畫紅色

?

?來(lái)源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

JJZ:=(HIGH+LOW+CLOSE)/3;QJ0Z:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
買1:=QJ0Z*(MIN(OPEN,CLOSE)-LOW);
買2:=QJ0Z*(JJZ-MIN(CLOSE,OPEN));
賣1:=QJ0Z*(MAX(CLOSE,OPEN)-JJZ);
賣2:=QJ0Z*(HIGH-MAX(OPEN,CLOSE));
DTZ:=((買1+買2)-(賣1+賣2))/10000;
主力持倉(cāng):SUM(DTZ,66),COLORWHITE,LINETHICK1;
STICKLINE(DTZ>0,主力持倉(cāng),主力持倉(cāng)+DTZ,1,0),COLOR0000FF;
STICKLINE(DTZ<0,主力持倉(cāng)+DTZ,主力持倉(cāng),1,0),COLOR00FF00;
JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);
TD1:=QJ0*(MIN(OPEN,CLOSE)-LOW);
DD1:=QJ0*(JJ-MIN(CLOSE,OPEN));
DD2:=QJ0*(HIGH-MAX(OPEN,CLOSE));
TD2:=QJ0*(MAX(CLOSE,OPEN)-JJ);
TD:=TD1-TD2;DA:=DD1-DD2;
XD1:=1-(TD1+DD1);XD2:=1-(TD2+DD2);
TZ:=V/SUM(V,60)*100;
DT:=((XD1-XD2)/10000)/TZ;
散戶持倉(cāng):SUM(DT,22),COLOR888888,LINETHICK1;
STICKLINE(DT>0,散戶持倉(cāng),散戶持倉(cāng)+DT,1,0),COLORFF00FF;
STICKLINE(DT<0,散戶持倉(cāng)+DT,散戶持倉(cāng),1,0),COLORFF8800;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?