通达信〖全景筹码〗波段指标公式源码

X_1:=VALUEWHEN(LOW=LLV(LOW,0),LLV(LOW,0));
X_2:=BARSLAST(LOW=X_1);
X_3:=X_2+1;
X_4:=CEILING(SQRT(X_2));
X_5:=VALUEWHEN(HIGH=HHV(HIGH,X_4),HHV(HIGH,X_3));
X_6:=VALUEWHEN(LOW=HHV(LOW,X_4),HHV(LOW,X_3));
X_7:=VALUEWHEN(HIGH=LLV(HIGH,X_4),LLV(HIGH,X_3));
X_8:=VALUEWHEN(LOW=LLV(LOW,X_4),LLV(LOW,X_3));
X_9:=COST(1/64*100);
X_10:=COST(1/32*100);
X_11:=COST(1/16*100);
X_12:=COST(1/2*100);
X_13:=COST(2/3*100);
X_14:=COST(3/4*100);
X_15:=COST(4/5*100);
X_16:=COST(5/6*100);
X_17:=COST(6/7*100);
X_18:=COST(7/8*100);
X_19:=COST(8/9*100);
X_20:=COST(9/10*100);
X_21:=COST(100);
DRAWBAND(MIN(X_5,X_9),RGB(20,40,65),MIN(X_5,X_10),RGB(10,20,40));
DRAWBAND(MIN(X_5,X_10),RGB(25,45,70),MIN(X_5,X_11),RGB(15,25,45));
DRAWBAND(MIN(X_5,X_11),RGB(110,230,230),MIN(X_5,X_12),RGB(110,230,230));
DRAWBAND(MIN(X_5,X_12),RGB(160,220,220),MIN(X_5,X_13),RGB(160,220,220));
DRAWBAND(MIN(X_5,X_13),RGB(140,200,200),MIN(X_5,X_14),RGB(140,200,200));
DRAWBAND(MIN(X_5,X_14),RGB(110,170,180),MIN(X_5,X_15),RGB(110,170,180));
DRAWBAND(MIN(X_5,X_15),RGB(80,140,165),MIN(X_5,X_16),RGB(80,140,165));
DRAWBAND(MIN(X_5,X_16),RGB(50,110,150),MIN(X_5,X_17),RGB(50,110,150));
DRAWBAND(MIN(X_5,X_17),RGB(35,80,130),MIN(X_5,X_18),RGB(35,80,130));
DRAWBAND(MIN(X_5,X_18),RGB(20,50,100),MIN(X_5,X_19),RGB(20,50,100));
DRAWBAND(MIN(X_5,X_19),RGB(15,45,85),MIN(X_5,X_20),RGB(5,20,45));
DRAWBAND(MIN(X_5,X_20),RGB(10,35,70),MIN(X_5,X_21),RGB(0,10,25));
X_22:=crOSS(X_7,X_6);
X_23:=CROSS(X_6,X_7);
X_24:=X_22 OR X_23;
STICKLINE(X_24,HIGH,LOW,0,1),COLORFF0080;
STICKLINE(X_24,OPEN,CLOSE,3,0),COLORFF0080;
X_25:=X_6-X_7;
AA236:IF(NOT(X_24),X_6-X_25*0.236,DRAWNULL),COLORWHITE;
AA382:IF(NOT(X_24),X_6-X_25*0.382,DRAWNULL),COLORYELLOW;
AA500:IF(NOT(X_24),X_6-X_25*0.5,DRAWNULL),DOTLINE,COLORRED;
AA618:IF(NOT(X_24),X_6-X_25*0.618,DRAWNULL),COLORMAGENTA;
AA786:IF(NOT(X_24),X_6-X_25*0.786,DRAWNULL),COLORCYAN;
X_26:=(9*HIGH+6*CLOSE+3*LOW)/18;
X_27:=(3*HIGH+6*CLOSE+9*LOW)/18;
X_28:=(X_26+X_27)/2;
X_29:=FINANCE(3);
X_30:=X_29=0 OR X_29=6 OR X_29>7;
X_31:=IF(X_30,X_3,(COST(92.5)-COST(7.5))/COST(99.25)*100);
X_32:=DMA(X_28,2/X_31);
X_33:=3;
X_34:=0.001;
X_35:=(X_28-X_32)/X_32;
X_36:=EMA(X_35,X_33);
X_37:=X_28>REF(X_28,1);
X_38:=X_36>X_34;
X_39:=CLOSE>REF(CLOSE,1);
X_40:=X_35>REF(X_35,1) AND X_35>X_36;
X_41:=CLOSE>X_32 AND X_32>REF(X_32,1);
X_42:=X_35>X_36 AND X_35>X_34;
X_43:=CLOSE<OPEN AND MIN(OPEN,CLOSE)-LOW>Abs(OPEN-CLOSE)*2 AND HIGH-MAX(OPEN,CLOSE)<ABS(OPEN-CLOSE)*0.5;
X_44:=X_28<REF(X_28,1);
X_45:=X_36<(-X_34);
X_46:=CLOSE<REF(CLOSE,1);
X_47:=X_35<REF(X_35,1) AND X_35<X_36;
X_48:=CLOSE<X_32 AND X_32<REF(X_32,1);
X_49:=X_35<X_36 AND X_35<(-X_34);
X_50:=CLOSE>OPEN AND HIGH-MAX(OPEN,CLOSE)>ABS(OPEN-CLOSE)*2 AND MIN(OPEN,CLOSE)-LOW<ABS(OPEN-CLOSE)*0.5;
X_51:=X_37+X_38+X_39+X_40+X_41+X_42+X_43;
X_52:=X_44+X_45+X_46+X_47+X_48+X_49+X_50;
X_53:=IF(X_51>X_52,1,IF(X_52>X_51,(-1),0));
X_54:=IF(X_53=1,X_51,IF(X_53=(-1),X_52,0));
STICKLINE(X_53=1 AND X_54=1,HIGH,LOW,1,0),COLORCC99FF,LINETHICK2;
STICKLINE(X_53=1 AND X_54=2,HIGH,LOW,1,0),COLOR66AAFF,LINETHICK2;
STICKLINE(X_53=1 AND X_54=3,HIGH,LOW,1,0),COLOR3399FF,LINETHICK2;
STICKLINE(X_53=1 AND X_54=4,HIGH,LOW,1,0),COLOR0080FF,LINETHICK2;
STICKLINE(X_53=1 AND X_54=5,HIGH,LOW,1,0),COLOR0050FF,LINETHICK2;
STICKLINE(X_53=1 AND X_54=6,HIGH,LOW,1,0),COLOR0028FF,LINETHICK2;
STICKLINE(X_53=1 AND X_54=7,HIGH,LOW,1,0),COLOR0018FF,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=1,HIGH,LOW,1,0),COLOR99CC99,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=2,HIGH,LOW,1,0),COLOR66B266,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=3,HIGH,LOW,1,0),COLOR339933,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=4,HIGH,LOW,1,0),COLOR008000,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=5,HIGH,LOW,1,0),COLOR006400,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=6,HIGH,LOW,1,0),COLOR004600,LINETHICK2;
STICKLINE(X_53=(-1) AND X_54=7,HIGH,LOW,1,0),COLOR003300,LINETHICK2;
STICKLINE(X_53=0,HIGH,LOW,1,0),COLORLIGRAY,LINETHICK2;
X_55:=HIGH=HHV(HIGH,X_4);
X_56:=LOW=LLV(LOW,X_4);
X_57:=VALUEWHEN(X_55,HIGH);
X_58:=VALUEWHEN(X_56,LOW);
X_59:=DRAWLINE(X_55,X_57,X_56,X_58,0);
X_60:=DRAWLINE(X_56,X_58,X_55,X_57,0);
STICKLINE(X_6>REF(X_6,1) AND X_54>=4,LOW,X_7,0,(-1)),COLORFF3366;
STICKLINE(X_6>REF(X_6,1) AND X_54<4,LOW,X_7,0,(-1)),COLORFF9966;
AARY:IF(X_32>REF(X_32,1),X_32,DRAWNULL),COLORMAGENTA;
AAYY:IF(X_32=REF(X_32,1),X_32,DRAWNULL),COLOR0080FF;
AAGY:IF(X_32<REF(X_32,1),X_32,DRAWNULL),CROSSDOT,COLORCYAN;
AA上轨:X_5,POINTDOT,COLORCYAN;
AA下轨:X_8,POINTDOT,COLORFF80FF;
阻力:X_6,COLORGREEN;
支撑:X_7,COLORYELLOW;
ΔSR:阻力-支撑,NODRAW,COLORWHITE;
R顶:阻力+ΔSR,NODRAW,COLORRED;
S底:支撑-ΔSR,NODRAW,COLORGREEN;
TESTSKIP(PERIOD>0);
AA收盘:CLOSE,COLORLIGRAY,LINETHICK2;
AA涨1:IF(X_53=1 OR CLOSE>REF(CLOSE,1),CLOSE,DRAWNULL),COLORCC99FF,LINETHICK2;
AA涨2:IF(X_53=1 OR CLOSE>REF(CLOSE,2) AND X_54>=1,CLOSE,DRAWNULL),COLOR66AAFF,LINETHICK2;
AA涨3:IF(X_53=1 OR CLOSE>REF(CLOSE,3) AND X_54>=2,CLOSE,DRAWNULL),COLOR3399FF,LINETHICK2;
AA涨4:IF(X_53=1 OR CLOSE>REF(CLOSE,3) AND X_54>=3,CLOSE,DRAWNULL),COLOR0080FF,LINETHICK2;
AA涨5:IF(X_53=1 OR CLOSE>REF(CLOSE,3) AND X_54>=4,CLOSE,DRAWNULL),COLOR0050FF,LINETHICK2;
AA涨6:IF(X_53=1 OR CLOSE>REF(CLOSE,3) AND X_54>=5,CLOSE,DRAWNULL),COLOR0028FF,LINETHICK2;
AA涨7:IF(X_53=1 OR CLOSE>REF(CLOSE,3) AND X_54>=6,CLOSE,DRAWNULL),COLOR0018FF,LINETHICK2;
AA跌1:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,1),CLOSE,DRAWNULL),COLOR99CC99,LINETHICK2;
AA跌2:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,2) AND X_54>=1,CLOSE,DRAWNULL),COLOR66B266,LINETHICK2;
AA跌3:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,3) AND X_54>=2,CLOSE,DRAWNULL),COLOR339933,LINETHICK2;
AA跌4:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,3) AND X_54>=3,CLOSE,DRAWNULL),COLOR008000,LINETHICK2;
AA跌5:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,3) AND X_54>=4,CLOSE,DRAWNULL),COLOR006400,LINETHICK2;
AA跌6:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,3) AND X_54>=5,CLOSE,DRAWNULL),COLOR004600,LINETHICK2;
AA跌7:IF(X_53=(-1) OR CLOSE<=REF(CLOSE,3) AND X_54>=6,CLOSE,DRAWNULL),COLOR003300,LINETHICK2;
AA中性:IF(X_53=0,CLOSE,DRAWNULL),COLORYELLOW,LINETHICK2;