相關標簽:通達信四量圖指標源碼 、 通達信畫線源碼 、 通達信自動畫線公式 、 通達信kdj副圖源碼 、 通達信魚身副圖源碼 、 通達信主升源碼副圖 、 通達信高低點源碼副圖 、 通達信ox主圖公式源碼 、 通達信精絕花副圖源碼 、 通達信2560主副圖源碼 、 通達信版aaa副圖源碼 、 通達信kd指標公式源碼 、 通達信頂底畫線源碼 、

?

原理解析：
輸出下降壓力線:當滿足條件最高價>=10日內最高價的最高值時,在最高價位置畫直線起點，當滿足條件最低價<=3日內最低價的最低值時,在3日內最高價的最高值位置畫直線終點,1表示是否延長.,畫白色,線寬為2 HJ_1賦值:20 HJ_2賦值:10 HJ_3賦值:5 HJ_4賦值:(收盤價+最高價+最低價+開盤價)/4 HJ_5賦值:最低價+(HJ_4-最低價)+(收盤價-最低價) HJ_6賦值:最低價+(收盤價-HJ_4) HJ_7賦值:1日前的HJ_5 HJ_8賦值:1日前的HJ_6 輸出支:當滿足條件ISLASTBARANDCLOSE>=HJ_7時,在HJ_7和HJ_7位置之間畫柱狀線,寬度為30,1不為0則畫空心柱.,畫紅色 輸出壓:當滿足條件ISLASTBARANDCLOSE<HJ_7時,在HJ_7和HJ_7位置之間畫柱狀線,寬度為30,1不為0則畫空心柱.,畫綠色 輸出支1:當滿足條件ISLASTBARANDCLOSE>=HJ_8時,在HJ_8和HJ_8位置之間畫柱狀線,寬度為30,1不為0則畫空心柱.,畫洋紅色 輸出壓1:當滿足條件ISLASTBARANDCLOSE<HJ_8時,在HJ_8和HJ_8位置之間畫柱狀線,寬度為30,1不為0則畫空心柱.,COLORFF8800 HJ_9賦值:HJ_1日前的最高價=2*HJ_1+1日內最高價的最高值 HJ_10賦值:若HJ_9則將最近HJ_1+1周期置為1 HJ_11賦值:HJ_10的HJ_1日過濾 AND 最高價=HJ_1+1日內最高價的最高值 HJ_12賦值:上次HJ_11距今天數 HJ_13賦值:如果HJ_11,返回到最后交易的周期,否則返回0 HJ_14賦值:如果HJ_12,返回HJ_12日前的最高價,否則返回最高價 HJ_15賦值:如果HJ_12,返回HJ_12日前的HJ_13,否則返回HJ_13 HJ_16賦值:HJ_12+1日前的HJ_14 HJ_17賦值:HJ_15的最后一日取值設為常數 HJ_18賦值:HJ_12+1日前的HJ_15 HJ_19賦值:HJ_18的最后一日取值設為常數 HJ_20賦值:HJ_12+1日前的HJ_16 HJ_21賦值:如果到最后交易的周期>HJ_19,返回0,否則返回1 HJ_22賦值:當滿足條件到最后交易的周期=HJ_19時,在最高價位置畫直線起點，當滿足條件到最后交易的周期=HJ_17時,在最高價位置畫直線終點,1表示是否延長. HJ_23賦值:HJ_1日前的最低價=2*HJ_1+1日內最低價的最低值 HJ_24賦值:若HJ_23則將最近HJ_1+1周期置為1 HJ_25賦值:HJ_24的HJ_1日過濾 AND 最低價=HJ_1+1日內最低價的最低值 HJ_26賦值:上次HJ_25距今天數 HJ_27賦值:如果HJ_25,返回到最后交易的周期,否則返回0 HJ_28賦值:如果HJ_26,返回HJ_26日前的最低價,否則返回最低價 HJ_29賦值:如果HJ_26,返回HJ_26日前的HJ_27,否則返回HJ_27 HJ_30賦值:HJ_29的最后一日取值設為常數 HJ_31賦值:HJ_26+1日前的HJ_28 HJ_32賦值:HJ_26+1日前的HJ_29 HJ_33賦值:HJ_32的最后一日取值設為常數 輸出低點支撐:當滿足條件到最后交易的周期=HJ_33時,在最低價位置畫直線起點，當滿足條件到最后交易的周期=HJ_30時,在最低價位置畫直線終點,1表示是否延長.,畫黃色 當滿足條件到最后交易的周期=HJ_33時,在最低價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_33-1日前的最低價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色,線寬為2 當滿足條件到最后交易的周期=HJ_30時,在最低價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_30-1日前的最低價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色,線寬為2 HJ_34賦值:HJ_2日前的最高價=2*HJ_2+1日內最高價的最高值 HJ_35賦值:若HJ_34則將最近HJ_2+1周期置為1 HJ_36賦值:HJ_35的HJ_2日過濾 AND 最高價=HJ_2+1日內最高價的最高值 HJ_37賦值:上次HJ_36距今天數 HJ_38賦值:如果HJ_36,返回到最后交易的周期,否則返回0 HJ_39賦值:如果HJ_37,返回HJ_37日前的最高價,否則返回最高價 HJ_40賦值:如果HJ_37,返回HJ_37日前的HJ_38,否則返回HJ_38 HJ_41賦值:HJ_37+1日前的HJ_39 HJ_42賦值:HJ_40的最后一日取值設為常數 HJ_43賦值:HJ_37+1日前的HJ_40 HJ_44賦值:HJ_43的最后一日取值設為常數 HJ_45賦值:HJ_37+1日前的HJ_41 HJ_46賦值:如果到最后交易的周期>HJ_44,返回0,否則返回1 輸出壓力:當滿足條件到最后交易的周期=HJ_44時,在最高價位置畫直線起點，當滿足條件到最后交易的周期=HJ_42時,在最高價位置畫直線終點,1表示是否延長.,畫黃色 當滿足條件到最后交易的周期=HJ_44時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_44-1日前的最高價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 當滿足條件到最后交易的周期=HJ_42時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_42-1日前的最高價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 HJ_47賦值:HJ_2日前的最低價=2*HJ_2+1日內最低價的最低值 HJ_48賦值:若HJ_47則將最近HJ_2+1周期置為1 HJ_49賦值:HJ_48的HJ_2日過濾 AND 最低價=HJ_2+1日內最低價的最低值 HJ_50賦值:上次HJ_49距今天數 HJ_51賦值:如果HJ_49,返回到最后交易的周期,否則返回0 HJ_52賦值:如果HJ_50,返回HJ_50日前的最低價,否則返回最低價 HJ_53賦值:如果HJ_50,返回HJ_50日前的HJ_51,否則返回HJ_51 HJ_54賦值:HJ_53的最后一日取值設為常數 HJ_55賦值:HJ_50+1日前的HJ_52 HJ_56賦值:HJ_26+1日前的HJ_53 HJ_57賦值:HJ_56的最后一日取值設為常數 輸出支撐:當滿足條件到最后交易的周期=HJ_57時,在最低價位置畫直線起點，當滿足條件到最后交易的周期=HJ_54時,在最低價位置畫直線終點,1表示是否延長. HJ_58賦值:(壓力+支撐)/2 HJ_59賦值:(壓力+支撐)/2的最后一日取值設為常數 HJ_60賦值:如果HJ_33<HJ_19,返回HJ_33,否則返回HJ_19 輸出中軌:當滿足條件到最后交易的周期=HJ_60時,在HJ_58位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_59位置畫直線終點,1表示是否延長.,畫黃色 HJ_61賦值:HJ_3日前的最高價=2*HJ_3+1日內最高價的最高值 HJ_62賦值:若HJ_61則將最近HJ_3+1周期置為1 HJ_63賦值:HJ_62的HJ_3日過濾 AND 最高價=HJ_3+1日內最高價的最高值 HJ_64賦值:上次HJ_63距今天數 HJ_65賦值:如果HJ_63,返回到最后交易的周期,否則返回0 HJ_66賦值:如果HJ_64,返回HJ_64日前的最高價,否則返回最高價 HJ_67賦值:如果HJ_64,返回HJ_64日前的HJ_65,否則返回HJ_65 HJ_68賦值:HJ_64+1日前的HJ_66 HJ_69賦值:HJ_67的最后一日取值設為常數 HJ_70賦值:HJ_64+1日前的HJ_67 HJ_71賦值:HJ_70的最后一日取值設為常數 HJ_72賦值:HJ_64+1日前的HJ_68 HJ_73賦值:如果到最后交易的周期>HJ_44,返回0,否則返回1 輸出L壓力:當滿足條件到最后交易的周期=HJ_71時,在最高價位置畫直線起點，當滿足條件到最后交易的周期=HJ_69時,在最高價位置畫直線終點,1表示是否延長.,畫黃色 當滿足條件到最后交易的周期=HJ_71時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_71-1日前的最高價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 當滿足條件到最后交易的周期=HJ_69時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_69-1日前的最高價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 HJ_74賦值:HJ_3日前的最低價=2*HJ_3+1日內最低價的最低值 HJ_75賦值:若HJ_74則將最近HJ_3+1周期置為1 HJ_76賦值:HJ_75的HJ_3日過濾 AND 最低價=HJ_3+1日內最低價的最低值 HJ_77賦值:上次HJ_49距今天數 HJ_78賦值:如果HJ_76,返回到最后交易的周期,否則返回0 HJ_79賦值:如果HJ_77,返回HJ_77日前的最低價,否則返回最低價 HJ_80賦值:如果HJ_77,返回HJ_77日前的HJ_78,否則返回HJ_51 HJ_81賦值:HJ_80的最后一日取值設為常數 HJ_82賦值:HJ_77+1日前的HJ_79 HJ_83賦值:HJ_26+1日前的HJ_80 HJ_84賦值:HJ_83的最后一日取值設為常數 輸出L支撐:當滿足條件到最后交易的周期=HJ_84時,在最低價位置畫直線起點，當滿足條件到最后交易的周期=HJ_81時,在最低價位置畫直線終點,1表示是否延長.,畫黃色 HJ_85賦值:(L壓力+L支撐)/2 HJ_86賦值:(L壓力+L支撐)/2的最后一日取值設為常數 HJ_87賦值:如果HJ_84<HJ_71,返回HJ_84,否則返回HJ_71 HJ_88賦值:當滿足條件到最后交易的周期=HJ_87時,在HJ_85位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_86位置畫直線終點,1表示是否延長. 輸出MA0:收盤價的歷史簡單移動平均,畫黃色 HJ_89賦值:3*8/5的整數部分 HJ_90賦值:HJ_89日前的最高價=2*HJ_89+1日內最高價的最高值 HJ_91賦值:HJ_90的HJ_89日過濾 HJ_92賦值:若HJ_91則將最近HJ_89+1周期置為1 HJ_93賦值:HJ_92的HJ_89日過濾 HJ_94賦值:若是否最后一個周期則將最近上次HJ_93距今天數+1周期置為1 HJ_95賦值:HJ_94>1日前的HJ_94 當滿足條件HJ_93時,在最高價位置畫直線起點，當滿足條件HJ_95時,在最高價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 HJ_96賦值:3*5/5的整數部分 HJ_97賦值:HJ_96日前的最高價=2*HJ_96+1日內最高價的最高值 HJ_98賦值:若HJ_97則將最近HJ_96+1周期置為1 HJ_99賦值:HJ_98的HJ_96日過濾 AND 最高價=HJ_96+1日內最高價的最高值 HJ_100賦值:上次HJ_99距今天數 HJ_101賦值:如果HJ_99,返回到最后交易的周期,否則返回0 HJ_102賦值:如果HJ_100,返回HJ_100日前的HJ_101,否則返回HJ_101 HJ_103賦值:HJ_102的最后一日取值設為常數 輸出DINGBUTS11:HJ_100+1日前的HJ_102,NODRAW HJ_104賦值:DINGBUTS11的最后一日取值設為常數 輸出高點壓力M:當滿足條件到最后交易的周期=HJ_104時,在最高價位置畫直線起點，當滿足條件到最后交易的周期=HJ_103時,在最高價位置畫直線終點,1表示是否延長.,畫黃色 HJ_105賦值:HJ_96日前的最低價=2*HJ_96+1日內最低價的最低值 HJ_106賦值:若HJ_105則將最近HJ_96+1周期置為1 HJ_107賦值:HJ_106的HJ_96日過濾 AND 最低價=HJ_96+1日內最低價的最低值 HJ_108賦值:上次HJ_107距今天數 HJ_109賦值:如果HJ_107,返回到最后交易的周期,否則返回0 HJ_110賦值:如果HJ_108,返回HJ_108日前的HJ_109,否則返回HJ_109 HJ_111賦值:HJ_110的最后一日取值設為常數 HJ_112賦值:HJ_108+1日前的HJ_110 HJ_113賦值:HJ_112的最后一日取值設為常數 輸出低點支撐M:當滿足條件到最后交易的周期=HJ_113時,在最低價位置畫直線起點，當滿足條件到最后交易的周期=HJ_111時,在最低價位置畫直線終點,1表示是否延長.,畫黃色 HJ_114賦值:10 HJ_115賦值:10 HJ_116賦值:0 HJ_117賦值:0 HJ_118賦值:0 HJ_119賦值:0 HJ_120賦值:HJ_114日前的最高價=2*HJ_114+1日內最高價的最高值 HJ_121賦值:若HJ_120則將最近HJ_114+1周期置為1 HJ_122賦值:HJ_121的HJ_114日過濾 AND 最高價=HJ_114+1日內最高價的最高值 HJ_123賦值:上次HJ_122距今天數 HJ_124賦值:如果HJ_122,返回到最后交易的周期,否則返回0 HJ_125賦值:如果HJ_123,返回HJ_123日前的最高價,否則返回最高價 HJ_126賦值:如果HJ_123,返回HJ_123日前的HJ_124,否則返回HJ_124 HJ_127賦值:HJ_123+1日前的HJ_125 HJ_128賦值:HJ_126的最后一日取值設為常數 HJ_129賦值:HJ_123+1日前的HJ_126 HJ_130賦值:HJ_129的最后一日取值設為常數 HJ_131賦值:HJ_123+1日前的HJ_127 輸出高點壓力1:當滿足條件到最后交易的周期=HJ_130時,在最高價位置畫直線起點，當滿足條件到最后交易的周期=HJ_128時,在最高價位置畫直線終點,1表示是否延長.,畫黃色 當滿足條件到最后交易的周期=HJ_130時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_130-1日前的最高價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 HJ_132賦值:HJ_115日前的最低價=2*HJ_115+1日內最低價的最低值 HJ_133賦值:若HJ_132則將最近HJ_115+1周期置為1 HJ_134賦值:HJ_133的HJ_115日過濾 AND 最低價=HJ_115+1日內最低價的最低值 HJ_135賦值:上次HJ_134距今天數 HJ_136賦值:如果HJ_134,返回到最后交易的周期,否則返回0 HJ_137賦值:如果HJ_135,返回HJ_135日前的最低價,否則返回最低價 HJ_138賦值:如果HJ_135,返回HJ_135日前的HJ_136,否則返回HJ_136 HJ_139賦值:HJ_138的最后一日取值設為常數 HJ_140賦值:HJ_135+1日前的HJ_137 HJ_141賦值:HJ_135+1日前的HJ_138 HJ_142賦值:HJ_141的最后一日取值設為常數 輸出低點支撐1:當滿足條件到最后交易的周期=HJ_142時,在最低價位置畫直線起點，當滿足條件到最后交易的周期=HJ_139時,在最低價位置畫直線終點,1表示是否延長.,畫黃色 HJ_143賦值:(高點壓力1+低點支撐1)/2 HJ_144賦值:(高點壓力1+低點支撐1)/2的最后一日取值設為常數 HJ_145賦值:如果HJ_142<HJ_130,返回HJ_142,否則返回HJ_130 當滿足條件到最后交易的周期=HJ_142時,在最低價位置畫直線起點，當滿足條件是否最后一個周期時,在HJ_142-1日前的最低價位置畫直線終點,1表示是否延長.,POINTDOT,畫黃色 HJ_146賦值:字符串相加 HJ_147賦值:字符串相加 HJ_148賦值:字符串相加 HJ_149賦值:字符串相加 當滿足條件是否最后一個周期時,在橫軸0.03縱軸0.99位置書寫文字,畫青色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

?

下降壓力線:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORWHITE,LINETHICK2;
HJ_1:=20;
HJ_2:=10;
HJ_3:=5;
HJ_4:=(CLOSE+HIGH+LOW+OPEN)/4;
HJ_5:=LOW+(HJ_4-LOW)+(CLOSE-LOW);
HJ_6:=LOW+(CLOSE-HJ_4);
HJ_7:=REF(HJ_5,1);
HJ_8:=REF(HJ_6,1);

支:STICKLINE(ISLASTBAR AND CLOSE>=HJ_7,HJ_7,HJ_7,30,1),COLORRED;
壓:STICKLINE(ISLASTBAR AND CLOSE<HJ_7,HJ_7,HJ_7,30,1),COLORGREEN;
支1:STICKLINE(ISLASTBAR AND CLOSE>=HJ_8,HJ_8,HJ_8,30,1),COLORMAGENTA;
壓1:STICKLINE(ISLASTBAR AND CLOSE<HJ_8,HJ_8,HJ_8,30,1),COLORFF8800;
HJ_9:=REF(HIGH,HJ_1)=HHV(HIGH,2*HJ_1+1);
HJ_10:=BACKSET(HJ_9,HJ_1+1);
HJ_11:=FILTER(HJ_10,HJ_1) AND HIGH=HHV(HIGH,HJ_1+1);
HJ_12:=BARSLAST(HJ_11);
HJ_13:=IF(HJ_11,CURRBARSCOUNT,0);
HJ_14:=IF(HJ_12,REF(HIGH,HJ_12),HIGH);
HJ_15:=IF(HJ_12,REF(HJ_13,HJ_12),HJ_13);
HJ_16:=REF(HJ_14,HJ_12+1);
HJ_17:=CONST(HJ_15);
HJ_18:=REF(HJ_15,HJ_12+1);
HJ_19:=CONST(HJ_18);
HJ_20:=REF(HJ_16,HJ_12+1);
HJ_21:=IF(CURRBARSCOUNT>HJ_19,0,1);
HJ_22:=DRAWLINE(CURRBARSCOUNT=HJ_19,HIGH,CURRBARSCOUNT=HJ_17,HIGH,1);
HJ_23:=REF(LOW,HJ_1)=LLV(LOW,2*HJ_1+1);
HJ_24:=BACKSET(HJ_23,HJ_1+1);
HJ_25:=FILTER(HJ_24,HJ_1) AND LOW=LLV(LOW,HJ_1+1);
HJ_26:=BARSLAST(HJ_25);
HJ_27:=IF(HJ_25,CURRBARSCOUNT,0);
HJ_28:=IF(HJ_26,REF(LOW,HJ_26),LOW);
HJ_29:=IF(HJ_26,REF(HJ_27,HJ_26),HJ_27);
HJ_30:=CONST(HJ_29);
HJ_31:=REF(HJ_28,HJ_26+1);
HJ_32:=REF(HJ_29,HJ_26+1);
HJ_33:=CONST(HJ_32);
低點支撐:DRAWLINE(CURRBARSCOUNT=HJ_33,LOW,CURRBARSCOUNT=HJ_30,LOW,1),COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=HJ_33,LOW,ISLASTBAR,REF(LOW,HJ_33-1),1),POINTDOT,COLORYELLOW,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=HJ_30,LOW,ISLASTBAR,REF(LOW,HJ_30-1),1),POINTDOT,COLORYELLOW,LINETHICK2;
HJ_34:=REF(HIGH,HJ_2)=HHV(HIGH,2*HJ_2+1);
HJ_35:=BACKSET(HJ_34,HJ_2+1);
HJ_36:=FILTER(HJ_35,HJ_2) AND HIGH=HHV(HIGH,HJ_2+1);
HJ_37:=BARSLAST(HJ_36);
HJ_38:=IF(HJ_36,CURRBARSCOUNT,0);
HJ_39:=IF(HJ_37,REF(HIGH,HJ_37),HIGH);
HJ_40:=IF(HJ_37,REF(HJ_38,HJ_37),HJ_38);
HJ_41:=REF(HJ_39,HJ_37+1);
HJ_42:=CONST(HJ_40);
HJ_43:=REF(HJ_40,HJ_37+1);
HJ_44:=CONST(HJ_43);
HJ_45:=REF(HJ_41,HJ_37+1);
HJ_46:=IF(CURRBARSCOUNT>HJ_44,0,1);
壓力:DRAWLINE(CURRBARSCOUNT=HJ_44,HIGH,CURRBARSCOUNT=HJ_42,HIGH,1),COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=HJ_44,HIGH,ISLASTBAR,REF(HIGH,HJ_44-1),1),POINTDOT,COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=HJ_42,HIGH,ISLASTBAR,REF(HIGH,HJ_42-1),1),POINTDOT,COLORYELLOW;
HJ_47:=REF(LOW,HJ_2)=LLV(LOW,2*HJ_2+1);
HJ_48:=BACKSET(HJ_47,HJ_2+1);
HJ_49:=FILTER(HJ_48,HJ_2) AND LOW=LLV(LOW,HJ_2+1);
HJ_50:=BARSLAST(HJ_49);
HJ_51:=IF(HJ_49,CURRBARSCOUNT,0);
HJ_52:=IF(HJ_50,REF(LOW,HJ_50),LOW);
HJ_53:=IF(HJ_50,REF(HJ_51,HJ_50),HJ_51);
HJ_54:=CONST(HJ_53);
HJ_55:=REF(HJ_52,HJ_50+1);
HJ_56:=REF(HJ_53,HJ_26+1);
HJ_57:=CONST(HJ_56);
支撐:DRAWLINE(CURRBARSCOUNT=HJ_57,LOW,CURRBARSCOUNT=HJ_54,LOW,1);
HJ_58:=(壓力+支撐)/2;
HJ_59:=CONST((壓力+支撐)/2);
HJ_60:=IF(HJ_33<HJ_19,HJ_33,HJ_19);
中軌:DRAWLINE(CURRBARSCOUNT=HJ_60,HJ_58,ISLASTBAR,HJ_59,1),COLORYELLOW;
HJ_61:=REF(HIGH,HJ_3)=HHV(HIGH,2*HJ_3+1);
HJ_62:=BACKSET(HJ_61,HJ_3+1);
HJ_63:=FILTER(HJ_62,HJ_3) AND HIGH=HHV(HIGH,HJ_3+1);
HJ_64:=BARSLAST(HJ_63);
HJ_65:=IF(HJ_63,CURRBARSCOUNT,0);
HJ_66:=IF(HJ_64,REF(HIGH,HJ_64),HIGH);
HJ_67:=IF(HJ_64,REF(HJ_65,HJ_64),HJ_65);
HJ_68:=REF(HJ_66,HJ_64+1);
HJ_69:=CONST(HJ_67);
HJ_70:=REF(HJ_67,HJ_64+1);
HJ_71:=CONST(HJ_70);
HJ_72:=REF(HJ_68,HJ_64+1);
HJ_73:=IF(CURRBARSCOUNT>HJ_44,0,1);
L壓力:DRAWLINE(CURRBARSCOUNT=HJ_71,HIGH,CURRBARSCOUNT=HJ_69,HIGH,1),COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=HJ_71,HIGH,ISLASTBAR,REF(HIGH,HJ_71-1),1),POINTDOT,COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=HJ_69,HIGH,ISLASTBAR,REF(HIGH,HJ_69-1),1),POINTDOT,COLORYELLOW;
HJ_74:=REF(LOW,HJ_3)=LLV(LOW,2*HJ_3+1);
HJ_75:=BACKSET(HJ_74,HJ_3+1);
HJ_76:=FILTER(HJ_75,HJ_3) AND LOW=LLV(LOW,HJ_3+1);
HJ_77:=BARSLAST(HJ_49);
HJ_78:=IF(HJ_76,CURRBARSCOUNT,0);
HJ_79:=IF(HJ_77,REF(LOW,HJ_77),LOW);
HJ_80:=IF(HJ_77,REF(HJ_78,HJ_77),HJ_51);
HJ_81:=CONST(HJ_80);
HJ_82:=REF(HJ_79,HJ_77+1);
HJ_83:=REF(HJ_80,HJ_26+1);
HJ_84:=CONST(HJ_83);
L支撐:DRAWLINE(CURRBARSCOUNT=HJ_84,LOW,CURRBARSCOUNT=HJ_81,LOW,1),COLORYELLOW;
HJ_85:=(L壓力+L支撐)/2;
HJ_86:=CONST((L壓力+L支撐)/2);
HJ_87:=IF(HJ_84<HJ_71,HJ_84,HJ_71);
HJ_88:=DRAWLINE(CURRBARSCOUNT=HJ_87,HJ_85,ISLASTBAR,HJ_86,1);
MA0:MA(CLOSE,0),COLORYELLOW;
HJ_89:=INTPART(3*8/5);
HJ_90:=REF(HIGH,HJ_89)=HHV(HIGH,2*HJ_89+1);
HJ_91:=FILTER(HJ_90,HJ_89);
HJ_92:=BACKSET(HJ_91,HJ_89+1);
HJ_93:=FILTER(HJ_92,HJ_89);
HJ_94:=BACKSET(ISLASTBAR,BARSLAST(HJ_93)+1);
HJ_95:=HJ_94>REF(HJ_94,1);
DRAWLINE(HJ_93,HIGH,HJ_95,HIGH,1),POINTDOT,COLORYELLOW;
HJ_96:=INTPART(3*5/5);
HJ_97:=REF(HIGH,HJ_96)=HHV(HIGH,2*HJ_96+1);
HJ_98:=BACKSET(HJ_97,HJ_96+1);
HJ_99:=FILTER(HJ_98,HJ_96) AND HIGH=HHV(HIGH,HJ_96+1);
HJ_100:=BARSLAST(HJ_99);
HJ_101:=IF(HJ_99,CURRBARSCOUNT,0);
HJ_102:=IF(HJ_100,REF(HJ_101,HJ_100),HJ_101);
HJ_103:=CONST(HJ_102);
DINGBUTS11:REF(HJ_102,HJ_100+1),NODRAW;
HJ_104:=CONST(DINGBUTS11);
高點壓力M:DRAWLINE(CURRBARSCOUNT=HJ_104,HIGH,CURRBARSCOUNT=HJ_103,HIGH,1),COLORYELLOW;
HJ_105:=REF(LOW,HJ_96)=LLV(LOW,2*HJ_96+1);
HJ_106:=BACKSET(HJ_105,HJ_96+1);
HJ_107:=FILTER(HJ_106,HJ_96) AND LOW=LLV(LOW,HJ_96+1);
HJ_108:=BARSLAST(HJ_107);
HJ_109:=IF(HJ_107,CURRBARSCOUNT,0);
HJ_110:=IF(HJ_108,REF(HJ_109,HJ_108),HJ_109);
HJ_111:=CONST(HJ_110);
HJ_112:=REF(HJ_110,HJ_108+1);
HJ_113:=CONST(HJ_112);
低點支撐M:DRAWLINE(CURRBARSCOUNT=HJ_113,LOW,CURRBARSCOUNT=HJ_111,LOW,1),COLORYELLOW;
HJ_114:=10;
HJ_115:=10;
HJ_116:=0;
HJ_117:=0;
HJ_118:=0;
HJ_119:=0;
HJ_120:=REF(HIGH,HJ_114)=HHV(HIGH,2*HJ_114+1);
HJ_121:=BACKSET(HJ_120,HJ_114+1);
HJ_122:=FILTER(HJ_121,HJ_114) AND HIGH=HHV(HIGH,HJ_114+1);
HJ_123:=BARSLAST(HJ_122);
HJ_124:=IF(HJ_122,CURRBARSCOUNT,0);
HJ_125:=IF(HJ_123,REF(HIGH,HJ_123),HIGH);
HJ_126:=IF(HJ_123,REF(HJ_124,HJ_123),HJ_124);
HJ_127:=REF(HJ_125,HJ_123+1);
HJ_128:=CONST(HJ_126);
HJ_129:=REF(HJ_126,HJ_123+1);
HJ_130:=CONST(HJ_129);
HJ_131:=REF(HJ_127,HJ_123+1);
高點壓力1:DRAWLINE(CURRBARSCOUNT=HJ_130,HIGH,CURRBARSCOUNT=HJ_128,HIGH,1),COLORYELLOW;
DRAWLINE(CURRBARSCOUNT=HJ_130,HIGH,ISLASTBAR,REF(HIGH,HJ_130-1),1),POINTDOT,COLORYELLOW;
HJ_132:=REF(LOW,HJ_115)=LLV(LOW,2*HJ_115+1);
HJ_133:=BACKSET(HJ_132,HJ_115+1);
HJ_134:=FILTER(HJ_133,HJ_115) AND LOW=LLV(LOW,HJ_115+1);
HJ_135:=BARSLAST(HJ_134);
HJ_136:=IF(HJ_134,CURRBARSCOUNT,0);
HJ_137:=IF(HJ_135,REF(LOW,HJ_135),LOW);
HJ_138:=IF(HJ_135,REF(HJ_136,HJ_135),HJ_136);
HJ_139:=CONST(HJ_138);
HJ_140:=REF(HJ_137,HJ_135+1);
HJ_141:=REF(HJ_138,HJ_135+1);
HJ_142:=CONST(HJ_141);
低點支撐1:DRAWLINE(CURRBARSCOUNT=HJ_142,LOW,CURRBARSCOUNT=HJ_139,LOW,1),COLORYELLOW;
HJ_143:=(高點壓力1+低點支撐1)/2;
HJ_144:=CONST((高點壓力1+低點支撐1)/2);
HJ_145:=IF(HJ_142<HJ_130,HJ_142,HJ_130);
DRAWLINE(CURRBARSCOUNT=HJ_142,LOW,ISLASTBAR,REF(LOW,HJ_142-1),1),POINTDOT,COLORYELLOW;
HJ_146:=STRCAT(HYBLOCK,1);
HJ_147:=STRCAT(HJ_146,FGBLOCK);
HJ_148:=STRCAT(HJ_147,DYBLOCK);
HJ_149:=STRCAT(HJ_148,1);
DRAWTEXT_FIX(ISLASTBAR,0.03,0.99,0,STRCAT(HJ_149,GNBLOCK)),COLORCYAN;{-----------------------------------}DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.weiqiv.net.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?