原理解析：
LY賦值:10
BL賦值:40
CJQS賦值:收盤價(jià)的LY日偏移移動(dòng)平均
JBQS賦值:收盤價(jià)的BL日偏移移動(dòng)平均
N賦值:BL/2+1-到最后交易的周期日前的JBQS/BL/2+2-到最后交易的周期日前的JBQS
M賦值:LY/2+1-到最后交易的周期日前的CJQS/LY/2+2-到最后交易的周期日前的CJQS
輸出JB上軌:如果到最后交易的周期>BL/2,返回JBQS*1.1,否則返回BL/2+1-到最后交易的周期日前的JBQS*N的BL/2+1-到最后交易的周期乘冪*1.1
輸出JB下軌:如果到最后交易的周期>BL/2,返回JBQS*0.9,否則返回BL/2+1-到最后交易的周期日前的JBQS*N的BL/2+1-到最后交易的周期乘冪*0.9
輸出CJ上軌:如果到最后交易的周期>LY/2,返回CJQS*1.05,否則返回LY/2+1-到最后交易的周期日前的CJQS*M的LY/2+1-到最后交易的周期乘冪*1.05
輸出CJ下軌:如果到最后交易的周期>LY/2,返回CJQS*0.95,否則返回LY/2+1-到最后交易的周期日前的CJQS*M的LY/2+1-到最后交易的周期乘冪*0.95
當(dāng)滿足條件開盤價(jià)<=CJ下軌時(shí),在(最低價(jià)*0.98)位置書寫文字,畫黃色
當(dāng)滿足條件最高價(jià)上穿CJ上軌時(shí),在(最高價(jià)*1.01)位置書寫文字,畫黃色
TJ賦值:成交量(手)>=1日前的成交量(手)*1.91 AND 收盤價(jià)>1日前的收盤價(jià)*1.01
當(dāng)滿足條件TJ時(shí),在收盤價(jià)和開盤價(jià)+(收盤價(jià)-開盤價(jià))/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FFFF
MA1賦值:收盤價(jià)的5日簡單移動(dòng)平均
MA2賦值:收盤價(jià)的10日簡單移動(dòng)平均
MA3賦值:收盤價(jià)的20日簡單移動(dòng)平均
一穿三賦值:MA1>開盤價(jià) AND MA2>開盤價(jià) AND MA3>開盤價(jià) AND MA1<收盤價(jià) AND MA2<收盤價(jià) AND MA3<收盤價(jià) AND 收陽線
當(dāng)滿足條件一穿三時(shí),在開盤價(jià)和開盤價(jià)+(收盤價(jià)-開盤價(jià))/2位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF00FF
AAA2賦值:如果收盤價(jià)>1日前的收盤價(jià),返回成交量(手)*收盤價(jià),否則返回0的歷史累和
AAA3賦值:如果收盤價(jià)<1日前的收盤價(jià),返回成交量(手)*收盤價(jià),否則返回0的歷史累和
AAA4賦值:如果收盤價(jià)=1日前的收盤價(jià),返回成交量(手)*收盤價(jià),否則返回0的歷史累和
BB1賦值:0
B1萬元賦值:不定周期成交量*不定周期收盤價(jià)/100
B1差賦值:B1萬元-1日前的B1萬元
B2萬元賦值:不定周期成交量*不定周期收盤價(jià)/100
B2比賦值:B2萬元/1日前的B2萬元
凈流入萬元賦值:(AAA2-AAA3-0.5*AAA4)
PM賦值:凈流入萬元的1日簡單移動(dòng)平均
PMA賦值:PM/1日前的PM>1
PMB賦值:1日前的PMA<1 AND PMA
輸出密碼:(B1萬元的2日簡單移動(dòng)平均的2日指數(shù)移動(dòng)平均)/100000,畫黃色,NODRAW
二日比賦值:密碼/1日前的密碼
輸出選股:PMB AND 密碼>1日前的密碼 AND 二日比>1,畫紅色,NODRAW
Y賦值:收盤價(jià)/1日前的收盤價(jià)>1.07
X賦值:成交量(手)>成交量(手)的5日簡單移動(dòng)平均
A1賦值:Y AND X
當(dāng)滿足條件A1時(shí),在收盤價(jià)的5日簡單移動(dòng)平均位置書寫文字,畫洋紅色
當(dāng)滿足條件收陽線時(shí),在橫軸0.01縱軸0.9位置書寫文字,畫紅色
當(dāng)滿足條件收陽線時(shí),在橫軸1縱軸1位置書寫文字,畫紅色
源碼：
LY:=10;
BL:=40;
CJQS:=XMA(CLOSE,LY);
JBQS:=XMA(CLOSE,BL);
N:=REF(JBQS,BL/2+1-CURRBARSCOUNT)/REF(JBQS,BL/2+2-CURRBARSCOUNT);
M:=REF(CJQS,LY/2+1-CURRBARSCOUNT)/REF(CJQS,LY/2+2-CURRBARSCOUNT);
JB上軌:IF(CURRBARSCOUNT>BL/2,JBQS*1.1,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*1.1);
JB下軌:IF(CURRBARSCOUNT>BL/2,JBQS*0.9,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*0.9);
CJ上軌:IF(CURRBARSCOUNT>LY/2,CJQS*1.05,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*1.05);
CJ下軌:IF(CURRBARSCOUNT>LY/2,CJQS*0.95,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*0.95);
DRAWTEXT(O<=CJ下軌,(L * 0.98),'搶'),COLORYELLOW;
DRAWTEXT(CROSS(H,CJ上軌),(H * 1.01),'逃'),COLORYELLOW;
{立樁量}
TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
STICKLINE(TJ,C,O+(C-O)/2,1,0),COLOR00FFFF;
{一穿三：5、10、20}
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;
STICKLINE(一穿三,O,O+(C-O)/2,1,0),COLORFF00FF;
AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);
AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);
AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);
BB1:=0;
B1萬元:=DVOL*DCLOSE/100;
B1差:=B1萬元-REF(B1萬元,1);
B2萬元:=DVOL*DCLOSE/100;
B2比:=B2萬元/REF(B2萬元,1);
凈流入萬元:=(AAA2-AAA3-0.5*AAA4);
PM:=MA(凈流入萬元,1);
PMA:=PM/REF(PM,1)>1;
PMB:=REF(PMA,1)<1 AND PMA;
密碼:(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;
二日比:=密碼/REF(密碼,1);
選股:PMB AND 密碼>REF(密碼,1) AND 二日比>1,COLORRED,NODRAW;
Y:=CLOSE/REF(CLOSE,1)>1.07;
X:=VOL>MA(VOL,5);
A1:=Y AND X;
DRAWTEXT(A1,MA(CLOSE,5),'攻漲停'),COLORMAGENTA;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;
打印本文
關(guān)閉窗口