通达信王牌柱主源码副图

{用法注释:

参数: BJ(1,4,4): 1=倍量,2=高量,3=跳空,4=全部;

参数: 高量周期(3,50,5): 高量两边的周期,自行调节参数;

公式源码:}

XA_1:=DATE<=1250531;

XA_2:=画底虚实;

XA_3:=IF(XA_2=1,MIN(CLOSE,OPEN),LOW);

XA_4:=CONST(HHV(HIGH,240)-LLV(LOW,240));

XA_5:=LOW-XA_4*0.03;

XA_6:=HIGH+XA_4*0.03;

DRAWTEXT_FIX(显示板块 AND ISLASTBAR,0,0,0,HYBLOCK);

DRAWTEXT_FIX(显示板块 AND ISLASTBAR,0.05,0,0,DYBLOCK);

DRAWTEXT_FIX(显示板块 AND ISLASTBAR,0.1,0,0,GNBLOCK);

STICKLINE(REF(LOW,1)>HIGH,HIGH,REF(LOW,1),5,0),COLORGRAY;

STICKLINE(REF(HIGH,1)<LOW,LOW,REF(HIGH,1),5,0),COLORGRAY;

WEN98编_C:CONST(CLOSE),POINTDOT,COLORLIRED;

XA_7:=1.01;

XA_8:=高量周期;

XA_9:=FILTER(BACKSET(FILTER(REF(VOL,XA_8)=HHV(VOL,2*XA_8+1),XA_8),XA_8+1),XA_8);

XA_10:=XA_9 AND BETWEEN(VOL/REF(VOL,1),1.01,5);

XA_11:=VOL>REF(VOL,1);

XA_12:=CLOSE/REF(CLOSE,1)>=1.03 OR CLOSE/OPEN>=1.03;

XA_13:=CLOSE>OPEN OR CLOSE>REF(CLOSE,1);

XA_14:=CLOSE>REF(MAX(CLOSE,OPEN),1);

XA_15:=XA_12;

XA_16:=RANGE(VOL/REF(VOL,1),0.966,1.034) AND BARSCOUNT(VOL)>=2;

XA_17:=XA_14 AND REFX(XA_16 AND COUNT(CLOSE>OPEN,2)=2,1);

XA_18:=BETWEEN(VOL/REF(VOL,1),1.01,4.99) AND XA_13;

XA_19:=XA_11 AND XA_14;

XA_20:=REFX(COUNT(VOL>=REF(VOL,1) AND XA_13,2)=2,2);

XA_21:=REFX(COUNT(BETWEEN(CLOSE/REF(CLOSE,1),1.001,1.04),2)=2,2);

XA_22:=XA_10 OR XA_15 OR XA_17 OR XA_18 OR XA_19 OR XA_20 OR XA_21;

XA_23:=FILTER(XA_13 AND XA_22,0);

XA_24:=LLV(CLOSE,3)>=REF(MIN(CLOSE,OPEN),3);

XA_25:=1*(XA_23 AND REFX(XA_24,3));

XA_26:=EMA(VOL,3)<=REF(VOL,3)*1.03;

XA_27:=(EMA(VOL,3)-REF(VOL,3))/REF(VOL,3)<=(EMA(CLOSE,3)-REF(CLOSE,3))/REF(CLOSE,3);

XA_28:=XA_26 OR XA_27;

XA_29:=REFX(MIN(EMA(CLOSE,3),CLOSE),3)>=CLOSE;

XA_30:=1*(XA_25 AND REFX(XA_28,3) AND XA_29);

XA_31:=COUNT(VOL<=REF(VOL,1),3)=3;

XA_32:=COUNT(CLOSE>=REF(CLOSE,1),3)=3;

XA_33:=COUNT(CLOSE>OPEN,4)=4;

XA_34:=XA_31 AND XA_32 AND XA_33;

XA_35:=REFX(XA_34,3);

XA_36:=MIN(CLOSE,OPEN)>REF(MAX(CLOSE,OPEN),1);

XA_37:=1*(XA_13 AND REFX(XA_30,1) AND MAX(CLOSE,OPEN)<REFX(OPEN,1));

XA_38:=BARSLAST(XA_25 AND REF(XA_25=0,1));

XA_39:=REF(XA_3,XA_38);

XA_40:=XA_39=REFX(XA_39,1) AND XA_1;

将军白:IF(XA_40,XA_39,DRAWNULL),COLORWHITE;

STICKLINE(REF(XA_25,XA_38),XA_39,XA_39,3,0),COLORWHITE;

XA_41:=BARSLAST(XA_30 AND REF(XA_30=0,1));

XA_42:=REF(XA_3,XA_41);

XA_43:=XA_42=REFX(XA_42,1) AND XA_1;

黄金黄:IF(XA_43,XA_42,DRAWNULL),COLORYELLOW;

STICKLINE(REF(XA_30,XA_41),XA_42,XA_42,3,0),COLORYELLOW;

XA_44:=BARSLAST(XA_37 AND REF(XA_37=0,1));

XA_45:=REF(MAX(CLOSE,OPEN),XA_44);

XA_46:=XA_45=REFX(XA_45,1) AND XA_1;

元帅黄:IF(XA_46,XA_45,DRAWNULL),COLORLIRED;

STICKLINE(REF(XA_37,XA_44),XA_45,XA_45,3,0),COLORLIRED;

XA_47:=MA(CLOSE,5);

MA5角度:ATAN((XA_47/REF(XA_47,1)-1)*100)*180/3.1416,NODRAW;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

XA_48:=REF(CLOSE,1);

XA_49:=IF(CLOSE>=1,10000,100000);

XA_50:=1.1*XA_48-49/XA_49;

XA_51:=1.05*XA_48-49/XA_49;

XA_52:=0.9*XA_48+51/XA_49;

XA_53:=0.95*XA_48+51/XA_49;

XA_54:=NAMELIKE(1) OR NAMELIKE(2);

XA_55:=IF(XA_54,CLOSE>=XA_51,CLOSE>=XA_50);

XA_56:=IF(XA_54,CLOSE<=XA_53,CLOSE<=XA_52);

XA_57:=IF(XA_54,HIGH>=XA_51,HIGH>=XA_50);

XA_58:=IF(XA_54,LOW<=XA_53,LOW<=XA_52);

STICKLINE(XA_57,HIGH,MAX(CLOSE,OPEN),0,0),COLORMAGENTA;

STICKLINE(XA_58,LOW,MIN(CLOSE,OPEN),0,0),COLORLICYAN;

XA_59:=CLOSE>OPEN AND (CLOSE>=XA_51 OR CLOSE>1.05*OPEN-51/XA_49) OR (CLOSE>1000 AND CLOSE>XA_48*1.024);

STICKLINE(XA_59,OPEN,CLOSE,1,0),COLOR0000BB;

XA_60:=CLOSE<OPEN AND (CLOSE<=XA_53 OR CLOSE<0.95*OPEN+49/XA_49) OR (CLOSE>1000 AND CLOSE<XA_48*0.976);

STICKLINE(XA_60,OPEN,CLOSE,1,0),COLORLIGREEN;

STICKLINE(XA_55,OPEN,CLOSE,1,0),COLORMAGENTA;

STICKLINE(XA_56,OPEN,CLOSE,1,0),COLORLICYAN;

XA_61:=CLOSE>OPEN AND CLOSE<XA_48;

STICKLINE(XA_61,OPEN,CLOSE,0,0),COLORGREEN;

XA_62:=CLOSE<OPEN AND CLOSE>XA_48;

STICKLINE(XA_62,OPEN,CLOSE,0,0),COLORRED;

XA_63:=AMOUNT/VOL/100;

XA_64:=CLOSE<OPEN AND XA_63>REF(CLOSE,1) AND CLOSE<=XA_48 AND XA_63<=HIGH;

STICKLINE(XA_64,XA_63,XA_63,1,0),COLORRED;

XA_65:=PERIOD=5 AND NAMELIKE(3) AND (ABS(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>=0.025 OR ABS(CLOSE-OPEN)>=60);

STICKLINE(XA_65,(HIGH+LOW)/2,(HIGH+LOW)/2,2,0),COLORYELLOW;

XA_66:=0.1*ABS(CLOSE-OPEN);

标准金柱:STICKLINE(XA_35 AND XA_1,OPEN+XA_66,CLOSE-XA_66,1,0),COLORBROWN;

XA_67:=VOL>=1.9*REF(VOL,1) AND CLOSE>OPEN;

XA_68:=VOL=HHV(VOL,XA_8) AND REFX(VOL<REF(VOL,1),1);

XA_69:=IF(CURRBARSCOUNT<XA_8,XA_68,XA_9);

XA_70:=CLOSE>500;

XA_71:=IF(XA_70,HIGH,MAX(CLOSE,OPEN));

XA_72:=IF(XA_70,LOW,MIN(CLOSE,OPEN));

XA_73:=IF(CLOSE>OPEN,IF(XA_2=0,LOW,XA_72),IF(XA_2=0,HIGH,XA_71));

XA_74:=XA_71-(XA_71-XA_72)/3;

XA_75:=XA_72+(XA_71-XA_72)/3;

XA_76:=XA_72+(XA_71-XA_72)/2;

XA_77:=1+IF(XA_70,2,4.92)/100;

XA_78:=XA_71/XA_72>=XA_77;

XA_79:=XA_78 OR XA_67 OR XA_69;

XA_80:=BARSLAST(XA_79);

C31:IF(XA_80=0 AND 显3121刻度=1,REF(XA_74,XA_80),DRAWNULL),POINTDOT,COLORLIRED;

C21:IF(XA_80=0 AND 显3121刻度=1,REF(XA_76,XA_80),DRAWNULL),POINTDOT,COLORLIGRAY;

C32:IF(XA_80=0 AND 显3121刻度=1,REF(XA_75,XA_80),DRAWNULL),POINTDOT,COLORLIGREEN;

XA_81:=IF(显3121刻度=1,REF(XA_73,XA_80),DRAWNULL);

XA_82:=FILTER(REF(KDJ.J,1)<=10 AND CROSS(KDJ.J,REF(KDJ.J,1)),3);

XA_83:=FILTER(REF(RSI.RSI1,1)<=20 AND CROSS(RSI.RSI1,REF(RSI.RSI1,1)),3);

DRAWICON(显买卖点=1 AND XA_82 AND CLOSE>REF(CLOSE,1),XA_5-XA_4*0.03,1);

DRAWICON(显买卖点=1 AND XA_83,XA_5,1);

XA_84:=REF(HHV(IF(XA_2=1,MAX(CLOSE,OPEN),HIGH),2),1);

XA_85:=FILTER(CLOSE>XA_84,1);

XA_86:=REF(LLV(IF(XA_2=1,MIN(CLOSE,OPEN),LOW),2),1);

XA_87:=FILTER(CLOSE<XA_86,1);

XA_88:=XA_85 AND COUNT(XA_85,BARSLAST(XA_87))=1 AND 显买卖点=1 AND XA_1;

XA_89:=XA_87 AND COUNT(XA_87,BARSLAST(XA_85))=1 AND 显买卖点=1 AND XA_1;

STICKLINE(XA_89,XA_86,XA_86,18,(-1)),COLORGREEN;

DRAWICON(XA_89,XA_6,39);

STICKLINE(XA_88,XA_84,XA_84,18,(-1)),COLORMAGENTA;

DRAWICON(XA_88,XA_5,38);