HJ_1:=BACKSET(LLV(LOW,5)<REF(LLV(LOW,4),1),4); HJ_2:=BACKSET(HJ_1=0 AND REF(HJ_1,1)=1,2); HJ_3:=IF(HJ_2=1 AND REF(HJ_2,1)=0,(-1),0); HJ_4:=BACKSET(HHV(HIGH,5)>REF(HHV(HIGH,4),1),4); HJ_5:=BACKSET(HJ_4=0 AND REF(HJ_4,1)=1,2); HJ_6:=IF(HJ_5=1 AND REF(HJ_5,1)=0,1,0); HJ_7:=IF(LOW>REF(HIGH,1),1,IF(HIGH<REF(LOW,1),(-1),0)); HJ_8:=BARSLAST(HJ_6=1); HJ_9:=BARSLAST(HJ_3=(-1)); HJ_10:=LOWRANGE(LOW); HJ_11:=TOPRANGE(HIGH); HJ_12:=IF(HJ_3=(-1) AND REF(HJ_8,1)>REF(HJ_9,1) AND LLV(LOW,HJ_8+1)<REF(LLV(LOW,HJ_8+1),1),(-1),0); HJ_13:=IF(HJ_3=(-1) AND REF(HJ_8,1)<=REF(HJ_9,1) AND (HJ_8>=4 OR LLV(HJ_7,HJ_8)=(-1) OR LLV(LOW,HJ_9+2)<REF(LLV(LOW,HJ_9+1),1)),(-1),0); HJ_14:=IF(HJ_12=(-1) OR HJ_13=(-1) AND LOW<REF(HIGH,HJ_8+1),(-1),0); HJ_15:=IF(HJ_9<4 AND HHV(HJ_7,HJ_9)!=1 OR REF(HJ_14,HJ_9)=0,1,0); HJ_16:=IF(HJ_6=1 AND REF(HJ_9,1)<=REF(HJ_8,1) AND HJ_15=1 AND HJ_11>REF(HJ_10,HJ_9+1) AND HJ_11>REF(HJ_10,HJ_9) AND HJ_11>REF(HJ_11,HJ_8),1,0); HJ_17:=IF(HJ_6=1 AND REF(HJ_9,1)>REF(HJ_8,1) AND HHV(HIGH,HJ_9+1)>REF(HHV(HIGH,HJ_9+1),1),1,0); HJ_18:=IF(HJ_6=1 AND REF(HJ_9,1)<=REF(HJ_8,1) AND REF(HJ_14,HJ_9)=(-1) AND (HJ_9>=4 OR HHV(HJ_7,HJ_9)=1),1,0); HJ_19:=IF(HJ_17=1 OR HJ_18=1 OR HJ_16=1 AND HIGH>REF(LOW,HJ_9+1),1,0); HJ_20:=IF(HJ_8<4 AND HHV(HJ_7,HJ_8)!=1 OR REF(HJ_19,HJ_8)=0,1,0); HJ_21:=IF(HJ_3=(-1) AND REF(HJ_8,1)<=REF(HJ_9,1) AND HJ_20=1 AND HJ_10>REF(HJ_11,HJ_8+1) AND HJ_10>REF(HJ_11,HJ_8) AND HJ_10>REF(HJ_10,HJ_9),(-1),0); HJ_22:=IF(HJ_3=(-1) AND REF(HJ_8,1)>REF(HJ_9,1) AND LLV(LOW,HJ_8+1)<REF(LLV(LOW,HJ_8+1),1),(-1),0); HJ_23:=IF(HJ_3=(-1) AND REF(HJ_8,1)<=REF(HJ_9,1) AND (HJ_8>=4 OR LLV(HJ_7,HJ_8)=(-1) OR HJ_21=(-1)),(-1),0); HJ_24:=IF(HJ_22=(-1) OR HJ_23=(-1) AND LOW<REF(HIGH,HJ_8+1),(-1),0); HJ_25:=BARSLAST(HJ_19=1); HJ_26:=BARSLAST(HJ_24=(-1)); HJ_27:=IF(HJ_26<4 AND HHV(HJ_7,HJ_26)!=1 OR REF(HJ_24,HJ_26)=0,1,0); HJ_28:=IF(HJ_6=1 AND REF(HJ_26,1)<=REF(HJ_25,1) AND HJ_27=1 AND HJ_11>REF(HJ_10,HJ_26+1) AND HJ_11>REF(HJ_10,HJ_26) AND HJ_11>REF(HJ_11,HJ_25),1,0); HJ_29:=IF(HJ_6=1 AND REF(HJ_26,1)>REF(HJ_25,1) AND HHV(HIGH,HJ_26+1)>REF(HHV(HIGH,HJ_26+1),1),1,0); HJ_30:=IF(HJ_6=1 AND REF(HJ_26,1)<=REF(HJ_25,1) AND REF(HJ_24,HJ_26)=(-1) AND (HJ_26>=4 OR HHV(HJ_7,HJ_26)=1),1,0); HJ_31:=IF(HJ_29=1 OR HJ_30=1 OR HJ_28=1 AND HIGH>REF(LOW,HJ_26+1),1,0); HJ_32:=IF(HJ_25<4 AND HHV(HJ_7,HJ_25)!=1 OR REF(HJ_29,HJ_25)=0,1,0); HJ_33:=IF(HJ_3=(-1) AND REF(HJ_25,1)<=REF(HJ_26,1) AND HJ_32=1 AND HJ_10>REF(HJ_11,HJ_25+1) AND HJ_10>REF(HJ_11,HJ_25) AND HJ_10>REF(HJ_10,HJ_26),(-1),0); HJ_34:=IF(HJ_3=(-1) AND REF(HJ_25,1)>REF(HJ_26,1) AND LLV(LOW,HJ_25+1)<REF(LLV(LOW,HJ_25+1),1),(-1),0); HJ_35:=IF(HJ_3=(-1) AND REF(HJ_25,1)<=REF(HJ_26,1) AND (HJ_25>=4 OR LLV(HJ_7,HJ_25)=(-1) OR HJ_33=(-1)),(-1),0); HJ_36:=IF(HJ_34=(-1) OR HJ_35=(-1) AND LOW<REF(HIGH,HJ_25+1),(-1),0); HJ_37:=BARSLAST(HJ_31=1); HJ_38:=BARSLAST(HJ_36=(-1)); HJ_39:=IF(HJ_38<4 AND HHV(HJ_7,HJ_38)!=1 OR REF(HJ_36,HJ_38)=0,1,0); HJ_40:=IF(HJ_6=1 AND REF(HJ_38,1)<=REF(HJ_37,1) AND HJ_39=1 AND HJ_11>REF(HJ_10,HJ_38+1) AND HJ_11>REF(HJ_10,HJ_38) AND HJ_11>REF(HJ_11,HJ_37),1,0); HJ_41:=IF(HJ_6=1 AND REF(HJ_38,1)>REF(HJ_37,1) AND HHV(HIGH,HJ_38+1)>REF(HHV(HIGH,HJ_38+1),1),1,0); HJ_42:=IF(HJ_6=1 AND REF(HJ_38,1)<=REF(HJ_37,1) AND REF(HJ_36,HJ_38)=(-1) AND (HJ_38>=4 OR HHV(HJ_7,HJ_38)=1),1,0); HJ_43:=IF(HJ_41=1 OR HJ_42=1 OR HJ_40=1 AND HIGH>REF(LOW,HJ_38+1),1,0); HJ_44:=IF(HJ_37<4 AND HHV(HJ_7,HJ_37)!=1 OR REF(HJ_41,HJ_37)=0,1,0); HJ_45:=IF(HJ_3=(-1) AND REF(HJ_37,1)<=REF(HJ_38,1) AND HJ_44=1 AND HJ_10>REF(HJ_11,HJ_37+1) AND HJ_10>REF(HJ_11,HJ_37) AND HJ_10>REF(HJ_10,HJ_38),(-1),0); HJ_46:=IF(HJ_3=(-1) AND REF(HJ_37,1)>REF(HJ_38,1) AND LLV(LOW,HJ_37+1)<REF(LLV(LOW,HJ_37+1),1),(-1),0); HJ_47:=IF(HJ_3=(-1) AND REF(HJ_37,1)<=REF(HJ_38,1) AND (HJ_37>=4 OR LLV(HJ_7,HJ_37)=(-1) OR HJ_45=(-1)),(-1),0); HJ_48:=IF(HJ_46=(-1) OR HJ_47=(-1) AND LOW<REF(HIGH,HJ_37+1),(-1),0); HJ_49:=IF(HJ_43=1 AND HJ_48=(-1) AND HIGH>REF(HIGH,REF(HJ_37,1)+2),1,IF(HJ_43=1 AND HJ_48=(-1) AND LOW<REF(LOW,REF(HJ_38,1)+2),(-1),0)); HJ_50:=IF(HJ_49=0,HJ_43+HJ_48,HJ_49); HJ_51:=IF(DATE<1161215,1,0); HJ_52:=IF(HJ_50=(-1),LOW,IF(HJ_50=1,HIGH,DRAWNULL)); HJ_53:=DRAWLINE(HJ_50=(-1),HJ_52,HJ_50=1,HJ_52,0); HJ_54:=DRAWLINE(HJ_50=1,HJ_52,HJ_50=(-1),HJ_52,0); HJ_55:=HJ_53=HJ_54 AND HJ_4 AND HJ_50=1; HJ_56:=IF(HJ_55,HIGH*HJ_51,DRAWNULL); HJ_57:=HJ_53=HJ_54 AND HJ_1 AND HJ_50=(-1); HJ_58:=IF(HJ_57,LOW*HJ_51,DRAWNULL); HJ_59:=LLV(LOW,T)=HJ_58*HJ_51; HJ_60:=BARSLAST(HJ_59); HJ_61:=HHV(HIGH,T)=HJ_56*HJ_51; HJ_62:=BARSLAST(HJ_61); HJ_63:=IF(HJ_62>HJ_60,0,1); HJ_64:=BACKSET(ISLASTBAR,HJ_62+1); HJ_65:=BARSLAST(HJ_64=1 AND REF(HJ_64,1)=0); HJ_66:=BACKSET(ISLASTBAR,HJ_60+1); HJ_67:=BARSLAST(HJ_66=1 AND REF(HJ_66,1)=0); HJ_68:=IF(HJ_65>HJ_67,0,1); HJ_69:=IF(HJ_63=0 AND HJ_68=0,REF(HIGH,HJ_62)-REF(LOW,HJ_60),DRAWNULL); STICKLINE(HJ_66=1 AND REF(HJ_66,1)=0 AND HJ_63=0 AND HJ_68=0,REF(LOW,HJ_60),REF(LOW,HJ_60)+HJ_69*1,0.5,(-1)),COLOR0065CA; NOTEXT0:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,LOW,ISLASTBAR,REF(LOW,HJ_60)+HJ_69*0,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT0,REF(LOW,HJ_60)),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT0,0),COLOR0065CA; NOTEXT1:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,LOW+HJ_69*0.191,ISLASTBAR,REF(LOW,HJ_60)+HJ_69*0.191,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT1,REF(LOW,HJ_60)+HJ_69*0.191),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT1,0.191),COLOR0065CA; NOTEXT3:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,LOW+HJ_69*0.382,ISLASTBAR,REF(LOW,HJ_60)+HJ_69*0.382,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT3,REF(LOW,HJ_60)+HJ_69*0.382),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT3,0.382),COLOR0065CA; NOTEXT5:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,LOW+HJ_69*0.5,ISLASTBAR,REF(LOW,HJ_60)+HJ_69*0.5,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT5,REF(LOW,HJ_60)+HJ_69*0.5),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT5,0.5),COLOR0065CA; NOTEXT6:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,LOW+HJ_69*0.618,ISLASTBAR,REF(LOW,HJ_60)+HJ_69*0.618,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT6,REF(LOW,HJ_60)+HJ_69*0.618),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT6,0.618),COLOR0065CA; NOTEXT8:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,LOW+HJ_69*0.809,ISLASTBAR,REF(LOW,HJ_60)+HJ_69*0.809,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT8,REF(LOW,HJ_60)+HJ_69*0.809),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT8,0.809),COLOR0065CA; NOTEXT2:IF(HJ_63=0 AND HJ_68=0,DRAWLINE(HJ_59,REF(HIGH,HJ_62),ISLASTBAR,REF(LOW,HJ_60)+HJ_69*1,(-1)),DRAWNULL),DOTLINE,COLOR0065CA; DRAWNUMBER(ISLASTBAR AND HJ_63=0 AND HJ_68=0,NOTEXT2,REF(LOW,HJ_60)+HJ_69*1),COLOR0065CA; DRAWNUMBER(HJ_59 AND HJ_63=0 AND HJ_68=0,NOTEXT2,1),COLOR0065CA; HJ_70:=IF(HJ_63=1 AND HJ_68=1,REF(HIGH,HJ_62)-REF(LOW,HJ_60),DRAWNULL); STICKLINE(HJ_64=1 AND REF(HJ_64,1)=0 AND HJ_63=1 AND HJ_68=1,REF(HIGH,HJ_62),REF(HIGH,HJ_62)-HJ_70*1,0.5,(-1)),COLORC080FF; NOTEXTH0:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,HIGH,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*0,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH0,REF(HIGH,HJ_62)),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH0,0),COLORC080FF; NOTEXTH1:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,HIGH-HJ_70*0.191,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*0.191,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH1,REF(HIGH,HJ_62)-HJ_70*0.191),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH1,0.191),COLORC080FF; NOTEXTH3:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,HIGH-HJ_70*0.382,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*0.382,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH3,REF(HIGH,HJ_62)-HJ_70*0.382),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH3,0.382),COLORC080FF; NOTEXTH5:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,HIGH-HJ_70*0.5,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*0.5,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH5,REF(HIGH,HJ_62)-HJ_70*0.5),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH5,0.5),COLORC080FF; NOTEXTH6:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,HIGH-HJ_70*0.618,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*0.618,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH6,REF(HIGH,HJ_62)-HJ_70*0.618),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH6,0.618),COLORC080FF; NOTEXTH8:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,HIGH-HJ_70*0.809,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*0.809,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH8,REF(HIGH,HJ_62)-HJ_70*0.809),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH8,0.809),COLORC080FF; NOTEXTH2:IF(HJ_63=1 AND HJ_68=1,DRAWLINE(HJ_61,REF(HIGH,HJ_62)-HJ_70*1,ISLASTBAR,REF(HIGH,HJ_62)-HJ_70*1,(-1)),DRAWNULL),DOTLINE,COLORC080FF; DRAWNUMBER(ISLASTBAR AND HJ_63=1 AND HJ_68=1,NOTEXTH2,REF(HIGH,HJ_62)-HJ_70*1),COLORC080FF; DRAWNUMBER(HJ_61 AND HJ_63=1 AND HJ_68=1,NOTEXTH2,1),COLORC080FF; HJ_71:=3; HJ_72:=3; HJ_73:=5; HJ_74:=IF(CLOSE>500,HJ_71,HJ_72); HJ_75:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100; HJ_76:=IF(HJ_60<=HJ_73,HHV(HJ_75,HJ_60+1),DRAWNULL); HJ_77:=IF(HJ_60<=HJ_73,HHVBARS(HJ_75,HJ_60+1),DRAWNULL); HJ_78:=IF(REF(HJ_75,HJ_77)>=HJ_74,REF(CLOSE,HJ_77)*REF(CLOSE,HJ_77)/REF(CLOSE,HJ_77+1)/0.9,DRAWNULL); HJ_79:=BACKSET(REF(HJ_75,HJ_77)>=HJ_74 AND HJ_60<=HJ_73,HJ_77+1); HJ_80:=BARSLAST(HJ_79=1 AND REF(HJ_79,1)=0); HJ_81:=BACKSET(ISLASTBAR,HJ_80+1); STICKLINE(HJ_81=1 AND REF(HJ_81,1)=0 AND K=1,HIGH,HJ_78,0.5,(-1)),COLORYELLOW; NOTEXT測(cè)頂:IF(K=1,DRAWLINE(HJ_81=1 AND REF(HJ_81,1)=0,HJ_78,ISLASTBAR,REF(CLOSE,HJ_80)*REF(CLOSE,HJ_80)/REF(CLOSE,HJ_80+1)/0.9,(-2)),DRAWNULL),DOTLINE,COLORYELLOW; DRAWNUMBER(HJ_81=1 AND REF(HJ_81,1)=0 AND K=1,HJ_78,HJ_78),COLORYELLOW; HJ_82:=IF(HJ_62<=HJ_73,LLV(HJ_75,HJ_62+1),DRAWNULL); HJ_83:=IF(HJ_62<=HJ_73,LLVBARS(HJ_75,HJ_62+1),DRAWNULL); HJ_84:=IF(REF(HJ_75,HJ_83)<=(-HJ_74),REF(CLOSE,HJ_83)*REF(CLOSE,HJ_83)/REF(CLOSE,HJ_83+1)/1.1,DRAWNULL); HJ_85:=BACKSET(REF(HJ_75,HJ_83)<=(-HJ_74) AND HJ_62<=HJ_73,HJ_83+1); HJ_86:=BARSLAST(HJ_85=1 AND REF(HJ_85,1)=0); HJ_87:=BACKSET(ISLASTBAR,HJ_86+1); STICKLINE(HJ_87=1 AND REF(HJ_87,1)=0 AND K=1,LOW,HJ_84,0.5,(-1)),COLORCYAN; NOTEXT測(cè)底:IF(K=1,DRAWLINE(HJ_87=1 AND REF(HJ_87,1)=0,HJ_84,ISLASTBAR,REF(CLOSE,HJ_86)*REF(CLOSE,HJ_86)/REF(CLOSE,HJ_86+1)/1.1,(-2)),DRAWNULL),DOTLINE,COLORCYAN; DRAWNUMBER(HJ_87=1 AND REF(HJ_87,1)=0 AND K=1,HJ_84,HJ_84),COLORCYAN; HJ_88:=CLOSE>REF(CLOSE,4); HJ_89:=BARSLASTCOUNT(HJ_88); HJ_90:=HJ_89=18; HJ_91:=ISLASTBAR AND BETWEEN(HJ_89,1,17); HJ_92:=(BACKSET(HJ_90>0,18) OR BACKSET(HJ_91>0,HJ_89))*HJ_89; DRAWNUMBER(HJ_92>0,HIGH*1.02,HJ_92),COLORMAGENTA; DRAWNUMBER(HJ_89=9,HIGH*1.02,9),COLORGREEN; DRAWNUMBER(HJ_89=13,HIGH*1.02,13),COLORYELLOW; DRAWNUMBER(HJ_89=18,HIGH*1.02,18),COLORYELLOW; DRAWICON(HJ_89=8,HIGH*1.01,41); HJ_93:=CLOSE<REF(CLOSE,4); HJ_94:=BARSLASTCOUNT(HJ_93); HJ_95:=HJ_94=18; HJ_96:=ISLASTBAR AND BETWEEN(HJ_94,1,17); HJ_97:=(BACKSET(HJ_95>0,18) OR BACKSET(HJ_96>0,HJ_94))*HJ_94; DRAWNUMBER(HJ_97>0,LOW*0.98,HJ_97),COLORMAGENTA; DRAWNUMBER(HJ_94=9,LOW*0.98,9),COLORGREEN; DRAWNUMBER(HJ_94=13,LOW*0.98,13),COLORYELLOW; DRAWNUMBER(HJ_94=18,LOW*0.98,18),COLORYELLOW; DRAWICON(HJ_94=8,LOW*0.99,41); DRAWKLINE(HIGH,OPEN,LOW,CLOSE); |
|