相關標簽:

?

同花順遍地黃金副圖指標源碼

?

原理解析：
VAR1賦值:以收盤價計算的獲利盤比例的9日簡單移動平均*100 輸出賣！: VAR1上穿2*30,COLOR0000FF ,線寬為3 VAR2賦值:(1-(15日內(nèi)最高價的最高值-收盤價)/(15日內(nèi)最高價的最高值-15日內(nèi)最低價的最低值)的15日指數(shù)移動平均)*100 VAR3賦值:(收盤價-21日內(nèi)最低價的最低值)/(21日內(nèi)最高價的最高值-21日內(nèi)最低價的最低值)*100 VAR4賦值:VAR3的9日[1日權重]移動平均 VAR5賦值:VAR4的9日[1日權重]移動平均 VAR6賦值:(收盤價-收盤價的13日[1日權重]移動平均)/收盤價的13日[1日權重]移動平均*(-100) VAR7賦值:1日前的VAR6>13 AND 1日前的VAR6/VAR6>1.23 AND 收盤價/1日前的收盤價>1.03 輸出春筍: 如果VAR7ANDREF(收盤價,1)<=獲利盤為5%的成本分布,返回20,否則返回0,LINESTICK ,COLOR00FF00,線寬為2 VAR8賦值:收盤價的27日簡單移動平均 VAR9賦值:(收盤價-VAR8)/VAR8*100 VARA賦值:VAR9的2日簡單移動平均 VARB賦值:上次-10上穿VARA=1距今天數(shù) VARC賦值:上次VARA上穿10=1距今天數(shù) VARD賦值:VARA<-10 AND VARB>3 VARE賦值:VARA>10 AND VARC>3 輸出黃金坑: 如果VARD,返回VARA,否則返回0,LINESTICK ,線寬為2, 畫黃色 輸出財神到: 如果VARE,返回VARA,否則返回0,LINESTICK , 畫綠色 輸出貪嘴樂: 如果VARA>1日前的VARAANDVARDANDVARA<-15,返回30,否則返回0,線寬為2,LINESTICK,COLORFFA2AF 當滿足條件貪嘴樂>0時,在40位置畫1號圖標 VARF賦值:1日前的最低價*0.9 VAR10賦值:最低價*0.9 VAR11賦值:(VAR10*成交量(手)+VARF*(當前流通股本(手)-成交量(手)))/當前流通股本(手) VAR12賦值:VAR11的30日指數(shù)移動平均 VAR13賦值:收盤價-1日前的收盤價 VAR14賦值:VAR13和0的較大值 VAR15賦值:VAR13的絕對值 VAR16賦值:VAR14的7日[1日權重]移動平均/VAR15的7日[1日權重]移動平均*100 VAR17賦值:VAR14的13日[1日權重]移動平均/VAR15的13日[1日權重]移動平均*100 VAR18賦值:收盤價的有效數(shù)據(jù)周期數(shù) VAR19賦值:VAR13和0的較大值的6日[1日權重]移動平均/VAR13的絕對值的6日[1日權重]移動平均*100 VAR1A賦值:(-200)*(60日內(nèi)最高價的最高值-收盤價)/(60日內(nèi)最高價的最高值-60日內(nèi)最低價的最低值)+100 VAR1B賦值:(收盤價-15日內(nèi)最低價的最低值)/(15日內(nèi)最高價的最高值-15日內(nèi)最低價的最低值)*100 VAR1C賦值:(VAR1B的4日[1日權重]移動平均-50)*2的3日[1日權重]移動平均 VAR1D賦值:(大盤的收盤價-14日內(nèi)大盤的最低價的最低值)/(14日內(nèi)大盤的最高價的最高值-14日內(nèi)大盤的最低價的最低值)*100 VAR1E賦值:VAR1D的4日[1日權重]移動平均 VAR1F賦值:VAR1E的3日[1日權重]移動平均 VAR20賦值:(30日內(nèi)最高價的最高值-收盤價)/收盤價*100 VAR21賦值:VAR19<=25 AND VAR1A<-95 AND VAR20>20 AND VAR1C<-30 AND VAR1F<30 AND VAR12-收盤價>=-0.25 AND VAR16<22 AND VAR17<28 AND VAR18>50 輸出血戰(zhàn)超跌: 如果VAR21,返回60,否則返回0,STICK,線寬為2 0,STICK,線寬為2

?

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

源碼：

?

Var1:=MA(WINNER(CLOSE),9)*100;
賣！: CROSS(Var1,2)*30,COLOR0000FF ,LINETHICK3 ;
Var2:=(1-EMA((HHV(HIGH,15)-CLOSE)/(HHV(HIGH,15)-LLV(LOW,15)),15))*100;
Var3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Var4:=SMA(Var3,9,1);
Var5:=SMA(Var4,9,1);
Var6:=(CLOSE-SMA(CLOSE,13,1))/SMA(CLOSE,13,1)*(-100);
Var7:=REF(Var6,1)>13 AND REF(Var6,1)/Var6>1.23 AND CLOSE/REF(CLOSE,1)>1.03;
春筍: IF(Var7 AND REF(CLOSE,1)<=COST(5),20,0),LINESTICK ,COLOR00FF00,LINETHICK2;
Var8:=MA(CLOSE,27);
Var9:=(CLOSE-Var8)/Var8*100;
VarA:=MA(Var9,2);
VarB:=BARSLAST(CROSS(-10,VarA)=1);
VarC:=BARSLAST(CROSS(VarA,10)=1);
VarD:=VarA<-10 AND VarB>3;
VarE:=VarA>10 AND VarC>3;
黃金坑: IF(VarD,VarA,0),LINESTICK ,LINETHICK2, coloryellow;
財神到: IF(VarE,VarA,0),LINESTICK , colorgreen;
貪嘴樂: IF(VarA>REF(VarA,1) AND VarD AND VarA<-15,30,0),LINETHICK2,LINESTICK,COLORFFA2AF;
DRAWICON(貪嘴樂>0,40,1);
VarF:=REF(LOW,1)*0.9;
Var10:=LOW*0.9;
Var11:=(Var10*VOL+VarF*(CAPITAL-VOL))/CAPITAL;
Var12:=EMA(Var11,30);
Var13:=CLOSE-REF(CLOSE,1);
Var14:=MAX(Var13,0);
Var15:=ABS(Var13);
Var16:=SMA(Var14,7,1)/SMA(Var15,7,1)*100;
Var17:=SMA(Var14,13,1)/SMA(Var15,13,1)*100;
Var18:=BARSCOUNT(CLOSE);
Var19:=SMA(MAX(Var13,0),6,1)/SMA(ABS(Var13),6,1)*100;
Var1A:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
Var1B:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var1C:=SMA((SMA(Var1B,4,1)-50)*2,3,1);
Var1D:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
Var1E:=SMA(Var1D,4,1);
Var1F:=SMA(Var1E,3,1);
Var20:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
Var21:=Var19<=25 AND Var1A<-95 AND Var20>20 AND Var1C<-30 AND Var1F<30 AND Var12-CLOSE>=-0.25 AND Var16<22 AND Var17<28 AND Var18>50;
血戰(zhàn)超跌: IF(Var21,60,0),STICK,linethick2;0,STICK,linethick2;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?