相關標簽:

?

?

?

原理解析：
輸出獲利%:以收盤價計算的獲利盤比例*100,NODRAW,畫白色 QWX1賦值:30日內收盤價的最高值 QWX2賦值:30日內收盤價的最低值 QWX3賦值:(QWX1+QWX2)/2的最后一日取值設為常數 QWX4賦值:(2*收盤價+最高價+最低價)/4-收盤價的20日簡單移動平均的絕對值/收盤價的20日簡單移動平均 QWX5賦值:(1-7/100)*(以QWX4為權重收盤價的動態移動平均)的最后一日取值設為常數 QWX6賦值:(1+7/100)*(以QWX4為權重收盤價的動態移動平均)的最后一日取值設為常數 RSV賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 KX賦值:RSV的3日[1日權重]移動平均 DX賦值:KX的3日[1日權重]移動平均 JX賦值:3*KX-2*DX 輸出牛熊線:(收盤價的30日指數移動平均+收盤價的72日指數移動平均)/2,線寬為2,畫綠色 輸出M5:收盤價的5日簡單移動平均,畫白色 輸出M10:收盤價的10日簡單移動平均,畫黃色 輸出M20:收盤價的20日簡單移動平均,COLORFF00FF VAR1賦值:如果收陽線,返回收盤價,否則返回開盤價 VAR2賦值:收盤價的5日平滑移動平均 VAR3賦值:(VAR2/1日前的VAR2-1)*100的反正切 VAR4賦值:如果VAR3>0,返回VAR3,否則返回VAR3 VAR5賦值:(收盤價/1日前的收盤價-1)*100 VAR6賦值:VAR5<1.5 AND VAR5>-1.5 輸出今日之升:從前4日到前1日持續VAR6 AND VAR5>2 AND 成交量(手)>1日前的成交量(手),NODRAW,畫黃色 當滿足條件今日之升時,在最低價/1.01位置書寫文字,畫黃色 輸出強勢:如果VAR4>=1日前的VAR4ANDVAR4>=0,返回M10,否則返回無效數,畫紅色,線寬為2 輸出整理:如果VAR4<1日前的VAR4ANDVAR4>0,返回M10,否則返回無效數,畫綠色,線寬為2 輸出支撐:如果周期類型=5,返回如果上次到最后交易的周期=5距今天數,返回QWX5,否則返回無效數,否則返回無效數,畫青色 輸出阻力:如果周期類型=5,返回如果上次到最后交易的周期=5距今天數,返回QWX6,否則返回無效數,否則返回無效數,畫黃色 當滿足條件收盤價>1日前的收盤價*1.0985ANDCLOSE=最高價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,-1不為0則畫空心柱.,COLOR00FFFF 當滿足條件收盤價<1日前的收盤價*0.9015ANDCLOSE=最低價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,-1不為0則畫空心柱.,畫綠色 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF7700 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLORFF9900 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFFBB00 當滿足條件開盤價>=收盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫青色 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR000099 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR0000CC 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收陽線時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORCC66FF 當滿足條件M5上穿收盤價的3日指數移動平均時,在VAR1和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR009900 當滿足條件M5上穿收盤價的3日指數移動平均時,在VAR1和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR00BB00 當滿足條件M5上穿收盤價的3日指數移動平均時,在VAR1和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLOR00DD00 當滿足條件M5上穿收盤價的3日指數移動平均時,在VAR1和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR00FF00 當滿足條件收盤價的3日指數移動平均上穿M5時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR999999 當滿足條件收盤價的3日指數移動平均上穿M5時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLORBBBBBB 當滿足條件收盤價的3日指數移動平均上穿M5時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORDDDDDD 當滿足條件收盤價的3日指數移動平均上穿M5時,在開盤價和(開盤價+收盤價)/2位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFFFFFF 當滿足條件JX上穿DX時,在開盤價和收盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫黃色 當滿足條件DX上穿JX時,在開盤價和收盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLOR000099 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

獲利%:WINNER(CLOSE)*100,NODRAW,COLORWHITE;
QWX1:=HHV(CLOSE,30);
QWX2:=LLV(CLOSE,30);
QWX3:=CONST((QWX1+QWX2)/2);
QWX4:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
QWX5:=CONST((1-7/100)*(DMA(CLOSE,QWX4)));
QWX6:=CONST((1+7/100)*(DMA(CLOSE,QWX4)));
{KDJ}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
KX:=SMA(RSV,3,1);
DX:=SMA(KX,3,1);
JX:=3*KX-2*DX;
牛熊線:(EMA(CLOSE,30)+EMA(CLOSE,72))/2,LINETHICK2,COLORGREEN;
M5:MA(CLOSE,5),COLORWHITE;
M10:MA(CLOSE,10),COLORYELLOW;
M20:MA(CLOSE,20),COLORFF00FF;
VAR1:=IF(CLOSE>OPEN,CLOSE,OPEN);
VAR2:=MEMA(CLOSE,5);
VAR3:=ATAN((VAR2/REF(VAR2,1)-1)*100);
VAR4:=IF(VAR3>0,VAR3,VAR3);
VAR5:=(CLOSE/REF(CLOSE,1)-1)*100;
VAR6:=VAR5<1.5 AND VAR5>-1.5;
今日之升:LAST(VAR6,4,1) AND VAR5>2 AND VOL>REF(VOL,1),NODRAW,COLORYELLOW;
DRAWTEXT(今日之升,L/1.01,''),COLORYELLOW;
強勢:IF(VAR4>=REF(VAR4,1) AND VAR4>=0,M10,DRAWNULL),COLORRED,LINETHICK2;
整理:IF(VAR4<REF(VAR4,1) AND VAR4>0,M10,DRAWNULL),COLORGREEN,LINETHICK2;
支撐:IF(PERIOD=5,IF(BARSLAST(CURRBARSCOUNT=5),QWX5,DRAWNULL),DRAWNULL),COLORCYAN;
阻力:IF(PERIOD=5,IF(BARSLAST(CURRBARSCOUNT=5),QWX6,DRAWNULL),DRAWNULL),COLORYELLOW;
{柱型顯示}
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
{藍}
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
{紅}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
{綠}
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,3,0),COLOR009900;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
{灰}
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
STICKLINE(CROSS(JX,DX),OPEN,CLOSE,0.5,0),COLORYELLOW;
STICKLINE(CROSS(DX,JX),OPEN,CLOSE,0.5,0),COLOR000099;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?