相關標簽:

?

大智慧莊家抄底王源碼分享

?

?

原理解析：
輸出INPUT:周期(15,1,100), 過濾(8,1,100),選股(-26, -30,-20),抄底(-40,-50,-25) 輸出售價一萬五千元:0,COLORFF00FF,POINTDOT VAR2賦值:收盤價的5日簡單移動平均 VAR3賦值:收盤價的10日簡單移動平均 VAR4賦值:收盤價的20日簡單移動平均 VAR5賦值:收盤價的30日簡單移動平均 VAR6賦值:(VAR2+VAR3+VAR4+VAR5)/(4) VAR7賦值:((VAR6-周期日前的VAR6)/(周期日前的VAR6))*(100) VAR8賦值:((VAR6-周期日前的VAR6)/(周期日前的VAR6))*(100) VAR9賦值:VAR7的過濾日指數移動平均 輸出紅包:如果(收盤價15%之字轉向的前1個波谷位置=0)AND(最高價>最低價+0.01),返回10,否則返回(-5),COLOR00FF00 輸出反轉:當滿足條件VAR9>1*1日前的VAR9時,在VAR7和0位置之間畫柱狀線,寬度為5,0不為0則畫空心柱., COLOREE00EE 輸出持股:當滿足條件VAR7>1*1日前的VAR7時,在VAR7和VAR9位置之間畫柱狀線,寬度為5,0不為0則畫空心柱., 畫紅色 輸出持幣:當滿足條件VAR7<1*1日前的VAR7時,在VAR7和VAR9位置之間畫柱狀線,寬度為5,1不為0則畫空心柱., 畫綠色 輸出洗盤:當滿足條件VAR7<1*1日前的VAR7ANDVAR9>1*1日前的VAR9時,在VAR7和VAR9位置之間畫柱狀線,寬度為10,0不為0則畫空心柱., COLOR00EEFF VAR10賦值:((收盤價-收盤價的58日簡單移動平均)/(收盤價的58日簡單移動平均))*(100) VAR11賦值:((VAR10>(1)*(1日前的VAR10)) AND (VAR10<選股) AND (VAR10>抄底))*(1.5) VAR12賦值:((成交量(手))/(當前流通股本(手)))*(100) VAR13賦值:50日內最低價距今天數 VAR14賦值:成交量(手)的VAR13日累和 VAR15賦值:50日內最高價距今天數 VAR16賦值:成交量(手)的VAR15日累和 VAR17賦值:((收盤價-VAR15日前的開盤價)/(VAR15日前的開盤價))*(100) VAR18賦值:((VAR16)/(當前流通股本(手)))*(100) VAR19賦值:((收盤價-VAR13日前的開盤價)/(VAR13日前的開盤價))*(100) VAR20賦值:((VAR14)/(當前流通股本(手)))*(100) VAR21賦值:收盤價的3日簡單移動平均 VAR22賦值:(2日前的收盤價)*(0.86500001) VAR23賦值:(13日前的收盤價)*(0.77200001) VAR24賦值:VAR22和VAR23的較小值 VAR25賦值:收盤價的13日簡單移動平均 輸出抄底王:(如果((收盤價-VAR24)/(收盤價)<0.02999999)AND(VAR17<(-35))AND((VAR12的5日累和)/(5)<1.8),返回1,否則返回0)*(10),COLORFFFFFF 當滿足條件抄底王時,在抄底王位置書寫文字, COLORFFAA00 VAR26賦值:((收盤價-1日前的收盤價)/(1日前的收盤價))*(100) VAR27賦值:(收盤價的12日指數移動平均-收盤價的26日指數移動平均)*(100) VAR28賦值:VAR27的9日指數移動平均 VAR29賦值:(2)*(VAR27-VAR28) 當滿足條件VAR27<(-50)ANDVAR26>7ANDVAR27<VAR28時,在(-10)位置書寫文字, 畫白色 當滿足條件VAR27<(-50)ANDVAR26>7ANDVAR27>=VAR28時,在5位置書寫文字, 畫白色 CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 輸出WARNING('HTTP://www.kzuj.com.cn',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指標公式')

?

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

源碼：

?

?

INPUT:周期(15,1,100), 過濾(8,1,100),選股(-26, -30,-20),抄底(-40,-50,-25);
售價一萬五千元:0,ColorFF00FF,POINTDOT;
VAR2:=MA(CLOSE,5);
VAR3:=MA(CLOSE,10);
VAR4:=MA(CLOSE,20);
VAR5:=MA(CLOSE,30);
VAR6:=(VAR2+VAR3+VAR4+VAR5)/(4);
VAR7:=((VAR6-REF(VAR6,周期))/(REF(VAR6,周期)))*(100);
VAR8:=((VAR6-REF(VAR6,周期))/(REF(VAR6,周期)))*(100);
VAR9:=EMA(VAR7,過濾);
紅包:IF((TROUGHBARS(3,15,1)=0) AND (HIGH>LOW+0.01),10,(-5)),Color00FF00;
反轉:STICKLINE(Var9>1*REF(Var9, 1), Var7, 0, 5, 0), COLOREE00EE;
持股:STICKLINE(Var7>1*REF(Var7, 1), Var7, Var9, 5, 0), COLORRED;
持幣:STICKLINE(Var7<1*REF(Var7, 1), Var7, Var9, 5, 1), COLORGREEN;
洗盤:STICKLINE(Var7<1*REF(Var7, 1) AND Var9>1*REF(Var9, 1), Var7, Var9, 10, 0), COLOR00EEFF;
VAR10:=((CLOSE-MA(CLOSE,58))/(MA(CLOSE,58)))*(100);
VAR11:=((VAR10>(1)*(REF(VAR10,1))) AND (VAR10<選股) AND (VAR10>抄底))*(1.5);
VAR12:=((VOL)/(CAPITAL))*(100);
VAR13:=LLVBARS(LOW,50);
VAR14:=SUM(VOL,VAR13);
VAR15:=HHVBARS(HIGH,50);
VAR16:=SUM(VOL,VAR15);
VAR17:=((CLOSE-REF(OPEN,VAR15))/(REF(OPEN,VAR15)))*(100);
VAR18:=((VAR16)/(CAPITAL))*(100);
VAR19:=((CLOSE-REF(OPEN,VAR13))/(REF(OPEN,VAR13)))*(100);
VAR20:=((VAR14)/(CAPITAL))*(100);
VAR21:=MA(CLOSE,3);
VAR22:=(REF(CLOSE,2))*(0.86500001);
VAR23:=(REF(CLOSE,13))*(0.77200001);
VAR24:=MIN(VAR22,VAR23);
VAR25:=MA(CLOSE,13);
抄底王:(IF(((CLOSE-VAR24)/(CLOSE)<0.02999999) AND (VAR17<(-35)) AND ((SUM(VAR12,5))/(5)<1.8),1,0))*(10),ColorFFFFFF;
DRAWTEXT(抄底王, 抄底王, ' 成功率90追 '), COLORFFAA00;
VAR26:=((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100);
VAR27:=(EMA(CLOSE,12)-EMA(CLOSE,26))*(100);
VAR28:=EMA(VAR27,9);
VAR29:=(2)*(VAR27-VAR28);
DRAWTEXT(Var27<(-50) AND Var26>7 AND Var27<Var28, (-10), '底'), COLORWHITE;
DRAWTEXT(Var27<(-50) AND Var26>7 AND Var27>=Var28, 5, '追'), COLORWHITE;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');

?

?

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

?