| XG:OPEN=HIGH; XG12:CLOSE=LOW; HJ_1:=IF(CLOSE>=XG AND REF(CLOSE,1)>XG,1,0); HJ_2:=IF(CLOSE>=XG AND BETWEEN(XG,CLOSE,OPEN)=0 AND REF(CLOSE,1)>XG,1,0); DRAWICON(FILTER(XG=1,1),LOW*0.988,2); DRAWICON(FILTER(XG12=1,1),LOW*0.988,3); HJ_3:=COST(50.099998); HJ_4:=COST(30.1); {www.tzj123.com} HJ_5:=LLVBARS(LOW,60); HJ_6:=BARSLAST(CURRBARSCOUNT=CONST(HJ_5)+1); HJ_7:=FINDHIGHBARS(OPEN,HJ_5+1,60,1); 压力A:DRAWLINE(CURRBARSCOUNT=CONST(HJ_7)+1,OPEN,ISLASTBAR,REF(OPEN,HJ_7),0),COLORRED; HJ_8:=LLVBARS(LOW,30);{www.tzj123.com} HJ_9:=BARSLAST(CURRBARSCOUNT=CONST(HJ_8)+1); HJ_10:=FINDHIGHBARS(OPEN,HJ_8+1,30,1); 压力B:DRAWLINE(CURRBARSCOUNT=CONST(HJ_10)+1,OPEN,ISLASTBAR,REF(OPEN,HJ_10),0),COLORYELLOW; HJ_11:=LLVBARS(LOW,10); HJ_12:=BARSLAST(CURRBARSCOUNT=CONST(HJ_11)+1); HJ_13:=FINDHIGHBARS(OPEN,HJ_11+1,10,1); 压力C:DRAWLINE(CURRBARSCOUNT=CONST(HJ_13)+1,OPEN,ISLASTBAR,REF(OPEN,HJ_13),0),COLORGREEN; HJ_14:=LLVBARS(LOW,5); HJ_15:=BARSLAST(CURRBARSCOUNT=CONST(HJ_14)+1); HJ_16:=FINDHIGHBARS(OPEN,HJ_14+1,5,1); 压力D:DRAWLINE(CURRBARSCOUNT=CONST(HJ_16)+1,OPEN,ISLASTBAR,REF(OPEN,HJ_16),0),COLORWHITE; HJ_17:=CURRBARSCOUNT=5-4; {www.tzj123.com} DRAWNUMBER(HJ_17 AND 压力D,压力D,压力D),COLORYELLOW; HJ_18:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); HJ_19:=IF(DATE<1170111 AND DATE>900101,1,0); DRAWTEXT_FIX(ISLASTBAR,0.5,0.05,0,CODE),COLORYELLOW; HJ_20:=STRCAT(HYBLOCK,1); HJ_21:=STRCAT(HJ_20,FGBLOCK); HJ_22:=STRCAT(HJ_21,DYBLOCK); HJ_23:=STRCAT(HJ_22,1); DRAWTEXT_FIX(1,0,0,0,STRCAT(HJ_23,GNBLOCK)),COLORYELLOW; HJ_24:=10; HJ_25:=10; HJ_26:=0; HJ_27:=0; HJ_28:=0; HJ_29:=0; HJ_30:=REF(HIGH,HJ_24)=HHV(HIGH,2*HJ_24+1)*HJ_19; HJ_31:=BACKSET(HJ_30,HJ_24+1); HJ_32:=FILTER(HJ_31,HJ_24) AND HIGH=HHV(HIGH,HJ_24+1); DRAWICON(HJ_32,HIGH*1.02,2); HJ_33:=BARSLAST(HJ_32); HJ_34:=IF(HJ_32,CURRBARSCOUNT,0); HJ_35:=IF(HJ_33,REF(HIGH,HJ_33),HIGH); HJ_36:=IF(HJ_33,REF(HJ_34,HJ_33),HJ_34); HJ_37:=REF(HJ_35,HJ_33+1); HJ_38:=CONST(HJ_36); HJ_39:=REF(HJ_36,HJ_33+1); HJ_40:=CONST(HJ_39); HJ_41:=REF(HJ_37,HJ_33+1); HJ_42:=IF(CURRBARSCOUNT>HJ_40,0,1); 高点压力:DRAWLINE(CURRBARSCOUNT=HJ_40,HIGH,CURRBARSCOUNT=HJ_38,HIGH,1)*HJ_19,DOTLINE,COLORGREEN; A:DRAWLINE(CURRBARSCOUNT=HJ_40,HIGH,ISLASTBAR,REF(HIGH,HJ_40-1),1),POINTDOT,COLOR0055FF; B:DRAWLINE(CURRBARSCOUNT=HJ_38,HIGH,ISLASTBAR,REF(HIGH,HJ_38-1),1),POINTDOT,COLORYELLOW; HJ_43:=CURRBARSCOUNT=5-4; DRAWNUMBER(HJ_43 AND A,A,A),COLORYELLOW; HJ_44:=CURRBARSCOUNT=5-4; DRAWNUMBER(HJ_44 AND 高点压力,高点压力,高点压力),COLORYELLOW; DRAWNUMBER(HJ_44 AND B,B,B),COLORYELLOW; HJ_45:=REF(LOW,HJ_25)=LLV(LOW,2*HJ_25+1)*HJ_19; HJ_46:=BACKSET(HJ_45,HJ_25+1); HJ_47:=FILTER(HJ_46,HJ_25) AND LOW=LLV(LOW,HJ_25+1)*HJ_19; DRAWICON(HJ_47,LOW*0.98,1); HJ_48:=BARSLAST(HJ_47); HJ_49:=IF(HJ_47,CURRBARSCOUNT,0); HJ_50:=IF(HJ_48,REF(LOW,HJ_48),LOW); HJ_51:=IF(HJ_48,REF(HJ_49,HJ_48),HJ_49); HJ_52:=CONST(HJ_51); HJ_53:=REF(HJ_50,HJ_48+1); HJ_54:=REF(HJ_51,HJ_48+1); HJ_55:=CONST(HJ_54); 低点支撑:DRAWLINE(CURRBARSCOUNT=HJ_55,LOW,CURRBARSCOUNT=HJ_52,LOW,1)*HJ_19,DOTLINE,COLORRED; HJ_56:=CURRBARSCOUNT=5-4; DRAWNUMBER(HJ_56 AND 低点支撑,低点支撑,低点支撑)*HJ_19,COLORYELLOW; HJ_57:=(高点压力+低点支撑)/2; HJ_58:=CONST((高点压力+低点支撑)/2); HJ_59:=IF(HJ_55<HJ_40,HJ_55,HJ_40); 中轨:DRAWLINE(CURRBARSCOUNT=HJ_59,HJ_57,ISLASTBAR,HJ_58,1),DOTLINE,COLORFF55BB; DRAWLINE(CURRBARSCOUNT=HJ_52,LOW,ISLASTBAR,REF(LOW,HJ_52-1),1),POINTDOT,COLORMAGENTA; DRAWLINE(CURRBARSCOUNT=HJ_55,LOW,ISLASTBAR,REF(LOW,HJ_55-1),1),POINTDOT,COLORCYAN; HJ_60:=BACKSET(REF(HIGH,2)=HHV(HIGH,3),3); HJ_61:=CROSS(HJ_60,0.9); HJ_62:=BACKSET(REF(LOW,2)=LLV(LOW,3),3); HJ_63:=CROSS(HJ_62,0.9); HJ_64:=REF(HIGH,BARSLAST(HJ_61))*HJ_19; HJ_65:=REF(LOW,BARSLAST(HJ_63)); HJ_66:=REF(LOW,1)=LLV(LOW,2*1+1); HJ_67:=BACKSET(HJ_66,1+1); HJ_68:=FILTER(HJ_67,1) AND LOW=LLV(LOW,1+1); HJ_69:=BARSLAST(HJ_68); HJ_70:=IF(HJ_68,CURRBARSCOUNT,0); HJ_71:=IF(HJ_69,REF(HJ_70,HJ_69),HJ_70); HJ_72:=CONST(HJ_71); HJ_73:=CONST(REF(HIGH,HJ_72-1)); HJ_74:=BACKSET(ISLASTBAR,HJ_72); HJ_74; HJ_73; C111:HJ_73*HJ_19,NODRAW,COLORRED; STICKLINE(HJ_74,HJ_73,HJ_73,4,0)*HJ_19,COLORWHITE,LINETHICK2; HJ_75:=REF(LOW,2)=LLV(LOW,2*2+1); HJ_76:=FILTER(HJ_75,2); HJ_77:=BACKSET(HJ_76,2+1); HJ_78:=FILTER(HJ_77,2); HJ_79:=BACKSET(ISLASTBAR,BARSLAST(HJ_78)+2); HJ_80:=HJ_79>REF(HJ_79,2); ZC:DRAWLINE(HJ_78,LOW,HJ_80,LOW,2),DOTLINE,COLORWHITE; HJ_81:=CURRBARSCOUNT=5-4; DRAWNUMBER(HJ_81 AND ZC,ZC,ZC),COLORYELLOW; STICKLINE(CLOSE/REF(CLOSE,1)>=1.09,OPEN,CLOSE,0.5,0),COLORYELLOW; STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100<(-9.8),CLOSE,OPEN,0.8,0),COLORLICYAN; HJ_82:=(CLOSE/REF(CLOSE,1)-1)*100>9.5; HJ_83:=BARSLAST((CLOSE/REF(CLOSE,1)-1)*100>9.5); 最后涨停距今数:HJ_83,NODRAW,COLORWHITE; HJ_84:=BARSLAST(HJ_82); HJ_85:=REF(HIGH,HJ_84)-REF(LOW,HJ_84); STICKLINE(CLOSE,REF(LOW,HJ_84)+HJ_85*0.5,REF(LOW,HJ_84)+HJ_85*0.5,7,0),COLORLIGRAY; HJ_86:=REF(HIGH,5)=HHV(HIGH,2*5+1); HJ_87:=BARSLAST(HJ_47); HJ_88:=IF(HJ_47,CURRBARSCOUNT,0); HJ_89:=CONST(HJ_39); HJ_90:=CONST(REF(HIGH,HJ_89-1)); HJ_91:=BACKSET(ISLASTBAR,HJ_89); HJ_91; HJ_90; C11:HJ_90,NODRAW,COLORRED; STICKLINE(HJ_91,HJ_90,HJ_90,2,0),COLORYELLOW; HJ_92:=DRAWLINE(CURRBARSCOUNT=CONST(HJ_89)+1,OPEN,ISLASTBAR,REF(OPEN,HJ_90),0); HJ_93:=MA(CLOSE,5); HJ_94:=STICKLINE(ISLASTBAR,HHV(CLOSE,5)*0.95,HHV(CLOSE,5)*0.95,20,2); HJ_95:=HIGH*0.95; HJ_96:=HHV(HIGH,19); HJ_97:=CLOSE/REF(CLOSE,1); HJ_98:=BARSLAST(HJ_97); HJ_99:=REF(HIGH,HJ_98)-REF(LOW,HJ_98); STICKLINE(CLOSE,REF(LOW,HJ_98)+HJ_99*0.5,REF(LOW,HJ_98)+HJ_99*0.5,3,0),COLORGRAY; HJ_100:=FILTER(BACKSET(REF(HIGH,2)=HHV(HIGH,5),3),2); HJ_101:=FILTER(BACKSET(REF(LOW,2)=LLV(LOW,5),3),2); STICKLINE(HJ_101,LOW,LOW,1,0),COLORYELLOW; HJ_102:=FILTER(BACKSET(REF(HIGH,2)=HHV(HIGH,5),3),2); HJ_103:=FILTER(BACKSET(REF(LOW,2)=LLV(LOW,5),3),2); HJ_104:=SIGNALS_USER(92,0)+SIGNALS_USER(93,0); HJ_105:=SIGNALS_USER(93,0)/10000; DRAWTEXT(HJ_105>0 AND HJ_105<10000,HIGH*0.95,VARCAT(VARCAT(2,VAR2STR(HJ_105,0)),3)),COLORGREEN; DRAWTEXT(HJ_105>10000,HIGH*0.95,VARCAT(VARCAT(2,VAR2STR(HJ_105/10000,2)),4)),COLORGREEN; DRAWTEXT(HJ_105<0 AND HJ_105>(-10000),HIGH*0.95,VARCAT(VARCAT(2,VAR2STR(HJ_105,0)),3)),COLORGREEN; DRAWTEXT(HJ_105<(-10000),HIGH*0.95,VARCAT(VARCAT(2,VAR2STR(HJ_105/10000,2)),4)),COLORGREEN; {-----------------------------------}
|