通达信板块对比未加密选股指标公式源码

通达信板块对比未加密选股指标公式源码

源码正文：

VAR1:=("880400$C"){XG51};
VAR2:=("880471$C"){XG51};
VAR3:=("880367$C"){XG51};
VAR4:=("880476$C"){XG51};
VAR5:=("880437$C"){XG51};
VAR6:=("880482$C"){XG51};
VAR7:=("880360$C"){XG51};
VAR8:=("880494$C"){XG51};
VAR9:=("880310$C"){XG51};
VAR10:=("880492$C"){XG51};
VAR11:=("880301$C"){XG51};
VAR12:=("999999$C"){XG51};
VAR13:=("880324$C"){XG51};
VAR14:=("880406$C"){XG51};
VAR15:=("880318$C"){XG51};
VAR16:=("880305$C"){XG51};
VAR17:=("880387$C"){XG51};
VAR18:=("880418$C"){XG51};
VAR19:=("880387$C"){XG51};
VAR20:=("880335$C"){XG51};
VAR21:=("880424$C"){XG51};
VAR22:=("880350$C"){XG51};
VAR23:=("880454$C"){XG51};
VAR24:=("880472$C"){XG51};
VAR25:=("880430$C"){XG51};
VAR26:=("880447$C"){XG51};
VAR27:=("880330$C"){XG51};
VAR28:=("880446$C"){XG51};
VAR29:=("880490$C"){XG51};
VAR30:=("880489$C"){XG51};
VAR31:=("880452$C"){XG51};
VAR32:=("880493$C"){XG51};
VAR33:=("880432$C"){XG51};
VAR34:=("880464$C"){XG51};
VAR35:=("880398$C"){XG51};
VAR36:=("880440$C"){XG51};
VAR37:=("880431$C"){XG51};
VAR38:=("880456$C"){XG51};
VAR39:=("880344$C"){XG51};
VAR40:=("880474$C"){XG51};
VAR41:=("880423$C"){XG51};
VAR42:=("880453$C"){XG51};
VAR43:=("880390$C"){XG51};
VAR44:=("880418$C"){XG51};
VAR45:=("880448$C"){XG51};
VAR46:=("880465$C"){XG51};
VAR47:=("880351$C"){XG51};
VAR48:=("880372$C"){XG51};
VAR49:=("880473$C"){XG51};
VAR50:=("880455$C"){XG51};
VAR51:=("880497$C"){XG51};
VAR52:=("880380$C"){XG51};
VAR53:=("880399$C"){XG51};
VAR54:=("880422$C"){XG51};
VAR55:=("880421$C"){XG51};
VAR56:=("880335$C"){XG51};
医药A:SUM((VAR1/REF(VAR1,1)-1)*100,0)*2+100{XG51};
银行A:SUM((VAR2/REF(VAR2,1)-1)*100,0)*2+100{XG51};
纺织服饰A:SUM((VAR3/REF(VAR3,1)-1)*100,0)*2+100{XG51};
建筑A:SUM((VAR4/REF(VAR4,1)-1)*100,0)*2+100{XG51};
通用机械A:SUM((VAR5/REF(VAR5,1)-1)*100,0)*2+100{XG51};
地产A:SUM((VAR6/REF(VAR6,1)-1)*100,0)*2+100{XG51};
农林牧渔A:SUM((VAR7/REF(VAR7,1)-1)*100,0)*2+100{XG51};
互联网A:SUM((VAR8/REF(VAR8,1)-1)*100,0)*2+100{XG51};
石油A:SUM((VAR9/REF(VAR9,1)-1)*100,0)*2+100{XG51};
元器件A:SUM((VAR10/REF(VAR10,1)-1)*100,0)*2+100{XG51};
煤炭A:SUM((VAR11/REF(VAR11,1)-1)*100,0)*2+100{XG51};
上证A:SUM((VAR12/REF(VAR12,1)-1)*100,0)*2+100,COLORWHITE,LINETHICK3{XG51};
有色A:SUM((VAR13/REF(VAR13,1)-1)*100,0)*2+100{XG51};
商业连锁A:SUM((VAR14/REF(VAR14,1)-1)*100,0)*2+100{XG51};
钢铁A:SUM((VAR15/REF(VAR15,1)-1)*100,0)*2+100{XG51};
电力A:SUM((VAR16/REF(VAR16,1)-1)*100,0)*2+100{XG51};
电器A:SUM((VAR17/REF(VAR17,1)-1)*100,0)*2+100{XG51};
传媒A:SUM((VAR18/REF(VAR18,1)-1)*100,0)*2+100{XG51};
家电A:SUM((VAR19/REF(VAR19,1)-1)*100,0)*2+100{XG51};
日用化工A:SUM((VAR20/REF(VAR20,1)-1)*100,0)*2+100{XG51};
旅游A:SUM((VAR21/REF(VAR21,1)-1)*100,0)*2+100{XG51};
造纸A:SUM((VAR22/REF(VAR22,1)-1)*100,0)*2+100{XG51};
水务A:SUM((VAR23/REF(VAR23,1)-1)*100,0)*2+100{XG51};
证券A:SUM((VAR24/REF(VAR24,1)-1)*100,0)*2+100{XG51};
航空A:SUM((VAR25/REF(VAR25,1)-1)*100,0)*2+100{XG51};
工程机械A:SUM((VAR26/REF(VAR26,1)-1)*100,0)*2+100{XG51};
化纤A:SUM((VAR27/REF(VAR27,1)-1)*100,0)*2+100{XG51};
电气设备A:SUM((VAR28/REF(VAR28,1)-1)*100,0)*2+100{XG51};
通信设备A:SUM((VAR29/REF(VAR29,1)-1)*100,0)*2+100{XG51};
电脑设备A:SUM((VAR30/REF(VAR30,1)-1)*100,0)*2+100{XG51};
电信运营A:SUM((VAR31/REF(VAR31,1)-1)*100,0)*2+100{XG51};
软件服务A:SUM((VAR32/REF(VAR32,1)-1)*100,0)*2+100{XG51};
运输服务A:SUM((VAR33/REF(VAR33,1)-1)*100,0)*2+100{XG51};
仓储物流A:SUM((VAR34/REF(VAR34,1)-1)*100,0)*2+100{XG51};
医疗保健A:SUM((VAR35/REF(VAR35,1)-1)*100,0)*2+100{XG51};
工业机械A:SUM((VAR36/REF(VAR36,1)-1)*100,0)*2+100{XG51};
船舶A:SUM((VAR37/REF(VAR37,1)-1)*100,0)*2+100{XG51};
环境保护A:SUM((VAR38/REF(VAR38,1)-1)*100,0)*2+100{XG51};
建材A:SUM((VAR39/REF(VAR39,1)-1)*100,0)*2+100{XG51};
多元金融A:SUM((VAR40/REF(VAR40,1)-1)*100,0)*2+100{XG51};
酒店餐饮A:SUM((VAR41/REF(VAR41,1)-1)*100,0)*2+100{XG51};
公共交通A:SUM((VAR42/REF(VAR42,1)-1)*100,0)*2+100{XG51};
汽车类A:SUM((VAR43/REF(VAR43,1)-1)*100,0)*2+100{XG51};
传媒娱乐A:SUM((VAR44/REF(VAR44,1)-1)*100,0)*2+100{XG51};
电器仪表A:SUM((VAR45/REF(VAR45,1)-1)*100,0)*2+100{XG51};
交通设施A:SUM((VAR46/REF(VAR46,1)-1)*100,0)*2+100{XG51};
矿物制品A:SUM((VAR47/REF(VAR47,1)-1)*100,0)*2+100{XG51};
食品饮料A:SUM((VAR48/REF(VAR48,1)-1)*100,0)*2+100{XG51};
保险A:SUM((VAR49/REF(VAR49,1)-1)*100,0)*2+100{XG51};
供气供热A:SUM((VAR50/REF(VAR50,1)-1)*100,0)*2+100{XG51};
综合类A:SUM((VAR51/REF(VAR51,1)-1)*100,0)*2+100{XG51};
酿酒A:SUM((VAR52/REF(VAR52,1)-1)*100,0)*2+100{XG51};
家居用品A:SUM((VAR53/REF(VAR53,1)-1)*100,0)*2+100{XG51};
文教休闲A:SUM((VAR54/REF(VAR54,1)-1)*100,0)*2+100{XG51};
广告包装A:SUM((VAR55/REF(VAR55,1)-1)*100,0)*2+100{XG51};
化工A:SUM((VAR56/REF(VAR56,1)-1)*100,0)*2+100{XG51};
当前线:SUM((C/REF(C,1)-1)*100,0)*2+100,COLORGREEN,LINETHICK2{XG51};
Q1:=IF(BArslAst(CURRBARSCOUNT=2),10,0){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),医药A,'医药'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),地产A,'地产'){XG51};

DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),石油A,'石油'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),元器件A,'元器件'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),煤炭A,'煤炭'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),有色A,'有色'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),钢铁A,'钢铁'){XG51};

DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),家电A,'家电'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),旅游A,'旅游'){XG51};

DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),证券A,'证券'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),航空A,'航空'){XG51};

DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),通信设备A,'通信设备'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),医疗保健A,'医疗保健'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),船舶A,'船舶'){XG51};
DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),环境保护A,'环境保护'){XG51};


DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),保险A,'保险'){XG51};

DRAWTEXT((Q1>=10 AND REF(Q1,1)<=0),酿酒A,'酿酒'){XG51};

{X*G_5=1*C*N*{};

通达信黄金箱体主图未加密选股指标公式源码

源码正文：

M1:=10{XG51};
M2:=10{XG51};
M3:=20{XG51};
M4:=20{XG51};
ma1:MA(CLOSE,M1){XG51};
MA2:MA(CLOSE,M2){XG51};
MA3:MA(CLOSE,M3){XG51};
MA4:MA(CLOSE,M4){XG51};
AB:=ema(((2*C+H+L)/4-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,8){XG51};
BA:=EMA(AB,5){XG51};
A1:=REFDATE(REF(HHV(H,96),5),DATE){XG51};
B1:=REFDATE(REF(LLV(L,96),5),DATE){XG51};
DY:=((A1)+(B1))/2{XG51};
箱顶:IF(AB>0 AND AB-BA<=0,A1,A1),LINETHICK3,COLOR00FF00{XG51};
箱腰:IF(AB>0 AND AB-BA<=0,DY,DY),LINETHICK3,COLOR00FF00{XG51};
箱低:IF(AB>0 AND AB-BA<=0,B1,B1),LINETHICK3,COLOR00FF00{XG51};
高1:IF(AB>0 AND AB-BA>0,A1,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
中1:IF(AB>0 AND AB-BA>0,DY,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
低1:IF(AB>0 AND AB-BA>0,B1,DRAWNULL),LINETHICK3,COLORWHITE{X^G!5-1^C^N^{};