相關標簽:通達信主力吸籌源碼 、 通達信主力真壞源碼 、 通達信主力持倉量源碼 、 通達信主力影子源碼 、 通達信底部主力源碼 、 通達信l2主力控籌源碼 、 通達信主力買賣源碼 、 通達信主力被套源碼 、 通達信最火的指標源碼 、 通達信期貨指標源碼 、 通達信kd指標公式源碼 、 通達信主力資金源碼 、 通達信主力王指標公式 、 主力控盤指標公式源碼 、

?

?

原理解析：
HJ_1賦值:收盤價的240日簡單移動平均 HJ_2賦值:如果統計50日中滿足HJ_1<=1日前的HJ_1的天數=50,返回1,否則返回0 HJ_3賦值:如果1日前的HJ_2=1ANDHJ_1>=1日前的HJ_1,返回1,否則返回0 HJ_4賦值:上次HJ_3距今天數 HJ_5賦值:是否最后一個周期 HJ_6賦值:若HJ_5=1則將最近HJ_4周期置為1 HJ_7賦值:如果HJ_6>1日前的HJ_6,返回1,否則返回0 HJ_8賦值:上次HJ_7=1距今天數 HJ_9賦值:如果HJ_8=0,返回240日內最低價的最低值,否則返回0 HJ_10賦值:上次HJ_9>0距今天數 HJ_11賦值:HJ_10日前的HJ_9的最后一日取值設為常數 輸出箱底:當滿足條件最低價=HJ_11時,在HJ_11位置畫直線起點，當滿足條件HJ_8=0時,在HJ_11位置畫直線終點,1表示是否延長.,COLOR00D9D9 HJ_12賦值:如果HJ_8=0,返回240日內最高價的最高值,否則返回0 HJ_13賦值:HJ_10日前的HJ_12的最后一日取值設為常數 輸出箱頂:當滿足條件最低價=HJ_11時,在HJ_13位置畫直線起點，當滿足條件HJ_8=0時,在HJ_13位置畫直線終點,1表示是否延長.,COLOR00D9D9 HJ_14賦值:在HJ_8周期內首次收盤價上穿箱頂距今天數 HJ_15賦值:HJ_14日內收盤價的最高值 當滿足條件HJ_14=0時,在HJ_11位置畫直線起點，當滿足條件收盤價時,在HJ_11位置畫直線終點,0表示是否延長.,畫紅色 當滿足條件HJ_14=0時,在HJ_13位置畫直線起點，當滿足條件收盤價時,在HJ_13位置畫直線終點,0表示是否延長.,畫紅色 HJ_16賦值:HJ_11+(HJ_13-HJ_11)/2的最后一日取值設為常數 當滿足條件HJ_8=0時,在HJ_16位置畫直線起點，當滿足條件收盤價時,在HJ_16位置畫直線終點,0表示是否延長.,畫青色 當滿足條件HJ_14=0時,在箱頂和箱底位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫洋紅色 輸出MA5:收盤價的5日簡單移動平均,畫白色 輸出MA10:收盤價的10日簡單移動平均,畫黃色 輸出MA30:收盤價的30日簡單移動平均,畫紅色 輸出MA60:收盤價的60日簡單移動平均,畫綠色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

HJ_1:=MA(CLOSE,240);
HJ_2:=IF(COUNT(HJ_1<=REF(HJ_1,1),50)=50,1,0);
HJ_3:=IF(REF(HJ_2,1)=1 AND HJ_1>=REF(HJ_1,1),1,0);
HJ_4:=BARSLAST(HJ_3);
HJ_5:=ISLASTBAR;
HJ_6:=BACKSET(HJ_5=1,HJ_4);
HJ_7:=IF(HJ_6>REF(HJ_6,1),1,0);
HJ_8:=BARSLAST(HJ_7=1);
HJ_9:=IF(HJ_8=0,LLV(LOW,240),0);
HJ_10:=BARSLAST(HJ_9>0);
HJ_11:=CONST(REF(HJ_9,HJ_10));
箱底:DRAWLINE(LOW=HJ_11,HJ_11,HJ_8=0,HJ_11,1),COLOR00D9D9;
HJ_12:=IF(HJ_8=0,HHV(HIGH,240),0);
HJ_13:=CONST(REF(HJ_12,HJ_10));
箱頂:DRAWLINE(LOW=HJ_11,HJ_13,HJ_8=0,HJ_13,1),COLOR00D9D9;
HJ_14:=BARSSINCEN(CROSS(CLOSE,箱頂),HJ_8);
HJ_15:=HHV(CLOSE,HJ_14);
DRAWLINE(HJ_14=0,HJ_11,CLOSE,HJ_11,0),COLORRED;
DRAWLINE(HJ_14=0,HJ_13,CLOSE,HJ_13,0),COLORRED;
HJ_16:=CONST(HJ_11+(HJ_13-HJ_11)/2);
DRAWLINE(HJ_8=0,HJ_16,CLOSE,HJ_16,0),COLORCYAN;
STICKLINE(HJ_14=0,箱頂,箱底,0,0),COLORMAGENTA;
MA5:MA(CLOSE,5),COLORWHITE;
MA10:MA(CLOSE,10),COLORYELLOW;
MA30:MA(CLOSE,30),COLORRED;
MA60:MA(CLOSE,60),COLORGREEN;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' m.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?