相關標簽:

?

?

?

原理解析：
V1賦值:(收盤價*2+最高價+最低價)/4*10 V2賦值:V1的13日指數移動平均-V1的34日指數移動平均 V3賦值:V2的5日指數移動平均 V4賦值:2*(V2-V3)*5.5 輸出主力撤: 如果V4<=0,返回V4,否則返回0,畫藍色 輸出主力進: 如果V4>=0,返回V4,否則返回0,COLORFF00FF V5賦值:(8日內大盤的最高價的最高值-大盤的收盤價)/(8日內大盤的最高價的最高值-8日內大盤的最低價的最低值)*8 V6賦值:3*V5-2*V5的18日[1日權重]移動平均的5日指數移動平均 V7賦值:(大盤的收盤價-8日內大盤的最低價的最低值)/(8日內大盤的最高價的最高值-8日內大盤的最低價的最低值)*10 V8賦值:(大盤的收盤價*2+大盤的最高價+大盤的最低價)/4 V9賦值:V8的13日指數移動平均-V8的34日指數移動平均 VA賦值:V9的3日指數移動平均 VB賦值:(V9-VA)/2 輸出大盤資金進場:如果VB>=0,返回VB,否則返回0,畫紅色 輸出大盤資金撤走:如果VB<=0,返回VB,否則返回0,畫綠色 V11賦值:3*(收盤價-55日內最低價的最低值)/(55日內最高價的最高值-55日內最低價的最低值)*100的5日[1日權重]移動平均-2*(收盤價-55日內最低價的最低值)/(55日內最高價的最高值-55日內最低價的最低值)*100的5日[1日權重]移動平均的3日[1日權重]移動平均 趨勢賦值:V3的3日指數移動平均-10 輸出趨勢線: V11的3日指數移動平均 V12賦值:(趨勢線-1日前的趨勢線)/1日前的趨勢線*100 輸出準備現金: 當滿足條件趨勢線<=13時,在0和20位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORCC9900 AA賦值:(趨勢線<=13) AND (趨勢線<=13)的15日過濾 當滿足條件AA時,在30位置書寫文字,COLORCC9900 輸出買入股票: 當滿足條件趨勢線<=13ANDV12>13時,在0和50位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0099FF BB賦值: (趨勢線<=13 AND V12>13) AND (趨勢線<=13ANDV12>13)的10日過濾 當滿足條件BB時,在60位置書寫文字,COLOR0099FF 輸出賣臨界: 當滿足條件趨勢線>90AND趨勢線>1日前的趨勢線時,在100和95位置之間畫柱狀線,寬度為15,1不為0則畫空心柱.,COLORFFFF00 輸出頂:趨勢線>90AND趨勢線<1日前的趨勢線AND主力進<1日前的主力進的8日過濾 當滿足條件頂時,在60位置書寫文字,畫黃色 CC賦值:(趨勢線>=90 AND V12) AND (趨勢線>=90ANDV12)的10日過濾 當滿足條件大盤資金進場AND趨勢線<13時,在0和30位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫紅色 當滿足條件大盤資金撤走AND趨勢線>90時,在0和30位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫綠色 當滿足條件主力進AND趨勢線<13時,在0和40位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF00FF 當滿足條件主力撤AND趨勢線>90時,在0和40位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫藍色 V13賦值:(收盤價的1日簡單移動平均+收盤價的3日簡單移動平均+收盤價的5日簡單移動平均+收盤價的7日簡單移動平均+收盤價的9日簡單移動平均)/5 V14賦值:(收盤價的2日簡單移動平均+收盤價的4日簡單移動平均+收盤價的6日簡單移動平均+收盤價的8日簡單移動平均+收盤價的10日簡單移動平均)/5 V15賦值:V13的2日指數移動平均-V14的5日指數移動平均和0的較大值*200 V16賦值:V15的5日指數移動平均 輸出波浪峰:V16,STICK,COLORFF00FF 當滿足條件V16<1日前的V16時,在0和V16位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00 VAR1賦值:500日內最高價的最高值的21日指數移動平均 VAR2賦值:250日內最高價的最高值的21日指數移動平均 VAR3賦值:90日內最高價的最高值的21日指數移動平均 VAR4賦值:500日內最低價的最低值的21日指數移動平均 VAR5賦值:250日內最低價的最低值的21日指數移動平均 VAR6賦值:90日內最低價的最低值的21日指數移動平均 VAR7賦值:(VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6的21日指數移動平均 VAR8賦值:(VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6的21日指數移動平均 VAR9賦值:(VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6的21日指數移動平均 VAR10賦值:如果收盤價的58日簡單移動平均,返回1,否則返回0 VARA賦值:(VAR7*3+VAR8*2+VAR9)/6*1.738的21日指數移動平均 VARB賦值:1日前的最低價 VARC賦值:最低價-VARB的絕對值的3日[1日權重]移動平均/最低價-VARB和0的較大值的3日[1日權重]移動平均*100 VARD賦值:如果收盤價*1.35<=VARA,返回VARC*10,否則返回VARC/10的3日指數移動平均 VARE賦值:30日內最低價的最低值 VARF賦值:30日內VARD的最高值 輸出火焰山: 如果最低價<=VARE,返回(VARD+VARF*2)/2,否則返回0的3日指數移動平均/618*VAR10,畫紅色 輸出火焰: 當滿足條件火焰山>0時,在0和火焰山位置之間畫柱狀線,寬度為4,1不為0則畫空心柱. 輸出今量:火焰山 當滿足條件火焰山>0時,在0和今量*1.2位置之間畫柱狀線,寬度為8,0不為0則畫空心柱., COLOR0000FF 當滿足條件火焰山>0時,在0和今量*0.8位置之間畫柱狀線,寬度為8,0不為0則畫空心柱., COLOR0066FF 當滿足條件火焰山>0時,在0和今量*0.6位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0099FF 當滿足條件火焰山>0時,在0和今量*0.4位置之間畫柱狀線,寬度為8,0不為0則畫空心柱., COLOR00CCFF 當滿足條件火焰山>0時,在0和今量*0.2位置之間畫柱狀線,寬度為8,0不為0則畫空心柱., COLOR00FFFF VAR28賦值:(收盤價-收盤價的6日簡單移動平均)/收盤價的6日簡單移動平均*100 VAR29賦值:(收盤價-收盤價的12日簡單移動平均)/收盤價的12日簡單移動平均*100 VAR30賦值:(收盤價-收盤價的24日簡單移動平均)/收盤價的24日簡單移動平均*100 VAR31賦值:1日前的收盤價 VAR32賦值:收盤價-VAR31和0的較大值的5日[1日權重]移動平均/收盤價-VAR31的絕對值的5日[1日權重]移動平均*100 VAR33賦值:(最高價+最低價+收盤價)/3 VAR34賦值:(VAR33-VAR33的14日簡單移動平均)/(0.015*VAR33的14日平均絕對偏差) VA1賦值:1日前的收盤價 VA2賦值:收盤價-VA1和0的較大值的7日[1日權重]移動平均/收盤價-VA1的絕對值的7日[1日權重]移動平均*100,畫黃色 輸出地:如果VA2<20,返回40,否則返回20,畫紅色 輸出天:如果VA2>80,返回60,否則返回80,COLORFFFF50 輸出VAR2↑:當滿足條件1日前的VA2<20ANDVA2>1日前的VA2的5日過濾時,在20和-20位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫紅色 輸出VAR2↓:當滿足條件1日前的VA2>80ANDVA2<1日前的VA2的5日過濾時,在60和80位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFFF50 當滿足條件1日前的VA2<20ANDVA2>1日前的VA2的5日過濾時,在-10位置書寫文字,COLORFFFFFF 當滿足條件1日前的VA2>80ANDVA2<1日前的VA2的5日過濾時,在100位置書寫文字,COLORFFFFFF 80,畫綠色 20,畫紅色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

?

V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5); V4:=2*(V2-V3)*5.5;
主力撤: IF(V4<=0,V4,0),colorblue;
主力進: IF(V4>=0,V4,0),colorff00ff;
V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
V6:=EMA(3*V5-2*SMA(V5,18,1),5);
V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
V8:=(INDEXC*2+INDEXH+INDEXL)/4;
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,3);
VB:=(V9-VA)/2;
大盤資金進場:IF(VB>=0,VB,0),colorred;
大盤資金撤走:IF(VB<=0,VB,0),colorgreen;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趨勢:=EMA(V3,3)-10;
趨勢線: EMA(V11,3);
V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100;
準備現金: STICKLINE(趨勢線<=13,0,20,5,0),colorcc9900;
aa:=(趨勢線<=13) AND FILTER((趨勢線<=13),15);
DRAWTEXT (aa,30,'準備現金'),colorcc9900;
買入股票: STICKLINE(趨勢線<=13 AND V12>13,0,50,4,0),color0099ff;
bb:= (趨勢線<=13 AND V12>13) AND FILTER((趨勢線<=13 AND V12>13),10) ;
DRAWTEXT (bb,60,'買入股票'),color0099ff;
賣臨界: STICKLINE(趨勢線>90 AND 趨勢線>REF(趨勢線,1),100,95,15,1),COLORFFFF00;
頂:FILTER(趨勢線>90 AND 趨勢線<REF(趨勢線,1) AND 主力進<REF(主力進,1),8);
DRAWTEXT( 頂,60,'逃頂'),coloryellow;
cc:=(趨勢線>=90 AND V12) AND FILTER((趨勢線>=90 AND V12),10);
STICKLINE(大盤資金進場 AND 趨勢線<13,0,30,4,0),colorred;
STICKLINE(大盤資金撤走 AND 趨勢線>90,0,30,4,0),colorgreen;
STICKLINE(主力進 AND 趨勢線<13,0,40,4,0),colorff00ff;
STICKLINE(主力撤 AND 趨勢線>90,0,40,4,0),colorblue;
V13:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;
V14:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;
V15:=MAX(EMA(V13,2)-EMA(V14,5),0)*200;
V16:=EMA(V15,5);
波浪峰:V16,STICK,colorff00ff;
STICKLINE(V16<REF(V16,1),0,V16,1,0),color00ff00;
Var1:=EMA(HHV(HIGH,500),21);
Var2:=EMA(HHV(HIGH,250),21);
Var3:=EMA(HHV(HIGH,90),21);
Var4:=EMA(LLV(LOW,500),21);
Var5:=EMA(LLV(LOW,250),21);
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
Var10:=IF(MA(CLOSE,58),1,0);
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);
VarB:=REF(LOW,1);
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
VarE:=LLV(LOW,30);
VarF:=HHV(VarD,30);
火焰山: EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10,colorred;
火焰: STICKLINE(火焰山>0,0,火焰山,4,1);
今量:火焰山;
STICKLINE(火焰山>0,0,今量*1.2,8,0), COLOR0000ff;
STICKLINE(火焰山>0,0,今量*0.8,8,0), COLOR0066ff;
STICKLINE(火焰山>0,0,今量*0.6,8,0),COLOR0099ff;
STICKLINE(火焰山>0,0,今量*0.4,8,0), COLOR00ccff;
STICKLINE(火焰山>0,0,今量*0.2,8,0), COLOR00ffff;
VAR28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR29:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
VAR30:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR31:=REF(CLOSE,1);
VAR32:=SMA(MAX(CLOSE-VAR31,0),5,1)/SMA(ABS(CLOSE-VAR31),5,1)*100;
VAR33:=(HIGH+LOW+CLOSE)/3;
VAR34:=(VAR33-MA(VAR33,14))/(0.015*AVEDEV(VAR33,14));
va1:=REF(CLOSE,1);
va2:=SMA(MAX(CLOSE-va1,0),7,1)/SMA(ABS(CLOSE-va1),7,1)*100,coloryellow;
地:IF(va2<20,40,20),colorred;
天:IF(va2>80,60,80),COLORFFFF50;
var2↑:STICKLINE(FILTER(REF(va2,1)<20 AND va2>REF(va2,1),5),20,-20,4,0),colorred;
var2↓:STICKLINE(FILTER(REF(va2,1)>80 AND va2<REF(va2,1),5),60,80,3,0),COLORFFFF50;
DRAWTEXT(FILTER(REF(va2,1)<20 AND va2>REF(va2,1),5),-10 ,'買入' ),COLORFFFFFF;
DRAWTEXT(FILTER(REF(va2,1)>80 AND va2<REF(va2,1),5),100 ,'賣出' ),COLORFFFFFF;
80,colorgreen;
20,colorred;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?