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

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;