相關標簽:

?

原理解析：
JJJ賦值:如果總量>0.01,返回0.01*總金額/總量,否則返回前收盤價 輸出分時均價:0.01*總金額/總量 DDD賦值:(最高價<0.01 或者 最低價<0.01) JJJT賦值:如果DDD,返回1,否則返回(JJJ<(最高價+0.01)并且JJJ>(最低價-0.01)) 輸出M5:收盤價的5日簡單移動平均, 輸出CYC5:如果JJJT,返回0.01*成交額(元)的5日指數移動平均/成交量(手)的5日指數移動平均,否則返回(最高價+最低價+收盤價)/3的5日指數移動平均,線寬為1 輸出CYC∞:如果JJJT,返回以100*成交量(手)/流通股本(股)為權重成交額(元)/(100*成交量(手))的動態移動平均,否則返回(最高價+最低價+收盤價)/3的120日指數移動平均 AA賦值:CYC5 當滿足條件收盤價>AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色 當滿足條件收盤價<AA時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫綠色 當滿足條件收盤價上穿AA時,在收盤價和AA位置之間畫柱狀線,寬度為3,5不為0則畫空心柱.,畫黃色 當滿足條件收盤價上穿AA時,在開盤價和AA位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色 DIF賦值:收盤價的12日指數移動平均 - 收盤價的26日指數移動平均 DEA賦值:DIF的9日指數移動平均,畫黃色 MACD賦值:2*(DIF-DEA),NODRAW,畫洋紅色 HO賦值:最高價>1日前的最高價 AND 最高價>2日前的最高價 AND 最高價>=1日后的最高價 AND 如果最高價=2日后的最高價,返回最高價>3日后的最高價,否則返回最高價>2日后的最高價 FXH賦值:HO上穿0.9 HH賦值:上次FXH距今天數日前的最高價 LO賦值:最低價<1日前的最低價 AND 最低價<2日前的最低價 AND 最低價<=1日后的最低價 AND 如果最低價=2日后的最低價,返回最低價<3日后的最低價,否則返回最低價<2日后的最低價 FXL賦值:LO上穿0.9 LL賦值:上次FXL距今天數日前的最低價 輸出頂分形: HH,, POINTDOT,畫洋紅色 當滿足條件收盤價時,在HH和HH位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,線寬為1,畫洋紅色 輸出底分形: LL, POINTDOT,畫綠色 當滿足條件收盤價時,在LL和LL位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,線寬為1,畫綠色 折線賦值:最高價5%的之字轉向 即時虛擬量賦值:如果到最后交易的周期=1ANDPERIOD=5,返回成交量(手)*240/當前離開盤分鐘數,否則返回無效數 虛擬量1賦值:如果到最后交易的周期>1,返回成交量(手),否則返回即時虛擬量,NODRAW 十日低量賦值:(虛擬量1=10日內成交量(手)的最低值) 百日低量賦值:(虛擬量1=100日內成交量(手)的最低值) 當滿足條件十日低量時,在最高價*1.02位置書寫文字 當滿足條件百日低量時,在最高價位置書寫文字 異向并肩精準賦值: 開盤價和收盤價的較小值=1日前的開盤價和收盤價的較大值 當滿足條件異向并肩精準時,在最低價*0.95位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
分時均價:0.01*DYNAINFO(10)/DYNAINFO(8);
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
M5:MA(C,5),;
CYC5:IF(JJJT,0.01*EXPMA(AMOUNT,5)/EXPMA(VOL,5),EMA((HIGH+LOW+CLOSE)/3,5)),LINETHICK1;
CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));
AA:=CYC5;
STICKLINE(CLOSE>AA,CLOSE,OPEN,3,0),COLORRED;
STICKLINE(CLOSE<AA,CLOSE,OPEN,3,0),COLORGREEN;
STICKLINE(CROSS(CLOSE,AA),CLOSE,AA,3,5),COLORYELLOW;
STICKLINE(CROSS(CLOSE,AA),O,AA,3,0),COLORYELLOW;
DIF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIF,9),COLORYELLOW;
MACD:=2*(DIF-DEA),NODRAW,COLORMAGENTA;
HO:=H>REF(H,1) AND H>REF(H,2) AND H>=REFX(H,1) AND IF(H=REFX(H,2),H>REFX(H,3),H>REFX(H,2));
FXH:=CROSS(HO,0.9);
HH:=REF(H,BARSLAST(FXH));
LO:=L<REF(L,1) AND L<REF(L,2) AND L<=REFX(L,1) AND IF(L=REFX(L,2),L<REFX(L,3),L<REFX(L,2));
FXL:=CROSS(LO,0.9);
LL:=REF(L,BARSLAST(FXL));
頂分形: HH,, POINTDOT,COLORMAGENTA;
STICKLINE(CLOSE,HH,HH,3,0),LINETHICK1,COLORMAGENTA;
底分形: LL, POINTDOT,COLORGREEN;
STICKLINE(CLOSE,LL,LL,3,0),LINETHICK1,COLORGREEN;
折線:=ZIG(1,5);
即時虛擬量:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);
虛擬量1:=IF(CURRBARSCOUNT>1,VOL,即時虛擬量),NODRAW;
十日低量:=(虛擬量1=LLV(VOL,10));
百日低量:=(虛擬量1=LLV(VOL,100));
DRAWTEXT(十日低量,H*1.02,'十低量');
DRAWTEXT(百日低量,H,'百低量');
異向并肩精準:= MIN(O,C)=REF(MAX(O,C),1) ;
DRAWTEXT(異向并肩精準,L*0.95,'異向精準'),COLORRED;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?