相關標簽:通達信四量圖指標源碼 、 戰無不勝指標公式 、 通達信圈叉圖指標源碼 、 通達信主圖指標源碼 、 通達信kdj副圖源碼 、 通達信主升源碼副圖 、 通達信魚身副圖源碼 、 通達信高低點源碼副圖 、 通達信ox主圖公式源碼 、 通達信kd指標公式源碼 、 戰無不勝選股指標源碼 、 戰無不勝波段指標公式 、

?

?

原理解析：
VAR2賦值:(2*收盤價+最高價+最低價)/4 VAR3賦值:如果年份>=2099ANDMONTH>2,返回0,否則返回1 VAR4賦值:5日內最低價的最低值 VAR5賦值:4日內最高價的最高值 莊家賦值: (VAR2-VAR4)/(VAR5-VAR4)*100的4日指數移動平均*VAR3 散戶賦值: 0.667*1日前的莊家+0.333*莊家的2日指數移動平均*VAR3 VAR6賦值:(4日內最高價的最高值-VAR2)/(4日內最高價的最高值-4日內最低價的最低值)*100-72 VAR7賦值:(VAR2-4日內最低價的最低值)/(4日內最高價的最高值-4日內最低價的最低值)*100 VAR8賦值:VAR7的2日[1日權重]移動平均 輸出減磅:如果散戶上穿莊家AND莊家>70,返回89,否則返回76,STICK,線寬為2,畫紅色 76,STICK,線寬為2,COLOR000000 輸出短出:如果散戶上穿莊家AND莊家>40AND71>莊家,返回75,否則返回62,STICK,線寬為2,COLOR00FF00 62,STICK,線寬為2,COLOR000000 輸出短進:如果莊家上穿散戶AND莊家<50AND29<莊家,返回61,否則返回49,STICK,線寬為2,COLORF000FF 49,STICK,線寬為2,COLOR000000 輸出低吸:如果莊家上穿散戶AND莊家<30,返回48,否則返回35,STICK,線寬為2,畫黃色 35,STICK,線寬為2,COLOR000000 80, ,POINTDOT,COLORFFFF00 20, ,POINTDOT ,COLOR9933FF 12, ,POINTDOT,COLORFF3399 輸出莊家線:莊家,,畫白色 輸出散戶線:散戶,,COLORFFF000 VAR9賦值:收盤價-5日前的收盤價 VARA賦值:VAR9的5日指數移動平均的5日指數移動平均/VAR9的絕對值的5日指數移動平均的5日指數移動平均*100 VARB賦值:VAR9的10日指數移動平均的10日指數移動平均/VAR9的絕對值的10日指數移動平均的10日指數移動平均*100 VARC賦值:VAR9的20日指數移動平均的20日指數移動平均/VAR9的絕對值的20日指數移動平均的20日指數移動平均*100 輸出警戒: 如果VARA>0ANDCROSS(VARC,VARA),返回10,否則返回0,線寬為1,畫紅色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
莊家:= EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3{, ,COLORFF9933};
散戶:= EMA(0.667*REF(莊家,1)+0.333*莊家,2)*VAR3{, ,COLORWHITE};
VAR6:=(HHV(HIGH,4)-VAR2)/(HHV(HIGH,4)-LLV(LOW,4))*100-72;
VAR7:=(VAR2-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
VAR8:=SMA(VAR7,2,1);
減磅:IF(CROSS(散戶,莊家) AND 莊家>70,89,76),STICK,LINETHICK2,COLORRED; 76,STICK,LINETHICK2,COLOR000000;
短出:IF(CROSS(散戶,莊家) AND 莊家>40 AND 71>莊家,75,62),STICK,LINETHICK2,COLOR00FF00;62,STICK,LINETHICK2,COLOR000000;
短進:IF(CROSS(莊家,散戶) AND 莊家<50 AND 29<莊家,61,49),STICK,LINETHICK2,COLORF000FF;49,STICK,LINETHICK2,COLOR000000;
低吸:IF(CROSS(莊家,散戶) AND 莊家<30,48,35),STICK,LINETHICK2,COLORYELLOW;35,STICK,LINETHICK2,COLOR000000;
80, ,POINTDOT,COLORFFFF00;
20, ,POINTDOT ,COLOR9933FF;
12, ,POINTDOT,COLORFF3399;
莊家線:莊家,,COLORWHITE;
散戶線:散戶,,COLORFFF000;
{DRAWICON(CROSS(莊家,散戶) AND 莊家<30,20,1);
DRAWICON(CROSS(散戶,莊家) AND 莊家>70,80,2); }
VAR9:=CLOSE-REF(CLOSE,5);
VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(ABS(VAR9),5),5)*100;
VARB:=EMA(EMA(VAR9,10),10)/EMA(EMA(ABS(VAR9),10),10)*100;
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20)*100;
警戒: IF(VARA>0 AND CROSS(VARC,VARA),10,0),LINETHICK1,COLORRED;
{DRAWTEXT(警戒,6,'！'),LINETHICK1,COLORRED;
DRAWICON(警戒<0,25,2); };DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?