大家好,发一个板块的KDJ ,因各人自设板块不同,名称也会乱的,简单的修改就是把你AA1至AA49的名称修改到 DRAWTEXT(P1,REFX(外贸[SYSPARAM(1)]/k,3),' 在这里对应你的自建板块顺序的板块名子就行了 ' +NUMTOSTR(外贸[p],2)),COLOR773777,SHIFT38; 我建了50个,多了不知道会傻样,改好后请对照一下涨幅是否一样,请自行修改。怕乱的自行取舍。
input:n(60,0,100),m(20,0,100),f(10,0,100),g(1,0,100),k(2,0,100);
DRAWGBK(CLOSE>0,COLORRGB(0,0,0),COLORRGB(0,0,0),1);
VAR1:=("aa22$CLOSE");VAR2:=("aa21$CLOSE");VAR3:=("aa10$CLOSE");VAR4:=("aa34$CLOSE");VAR5:=("aa28$CLOSE");VAR6:=("aa36$CLOSE");VAR7:=("aa33$CLOSE");VAR8:=("aa25$CLOSE");VAR9:=("aa38$CLOSE");
VAR10:=("aa49$CLOSE");VAR11:=("aa07$CLOSE");VAR12:=("aa27$CLOSE");VAR13:=("aa16$CLOSE");VAR14:=("aa03$CLOSE");VAR15:=("aa24$CLOSE");VAR16:=("aa29$CLOSE");VAR17:=("aa19$CLOSE");VAR18:=("aa37$CLOSE");
VAR19:=("aa43$CLOSE");VAR20:=("aa48$CLOSE");VAR21:=("aa05$CLOSE");VAR22:=("aa47$CLOSE");VAR23:=("aa02$CLOSE");VAR24:=("aa39$CLOSE");VAR25:=("aa23$CLOSE");VAR26:=("aa06$CLOSE");VAR27:=("aa17$CLOSE");
VAR28:=("aa13$CLOSE");VAR29:=("aa40$CLOSE");VAR30:=("aa31$CLOSE");VAR31:=("aa26$CLOSE");VAR32:=("aa01$CLOSE");VAR33:=("aa46$CLOSE");VAR34:=("aa32$CLOSE");VAR35:=("aa08$CLOSE");
VAR36:=("aa41$CLOSE");VAR37:=("aa44$CLOSE");VAR38:=("aa14$CLOSE");VAR39:=("aa30$CLOSE");VAR40:=("aa15$CLOSE");VAR41:=("aa18$CLOSE");VAR42:=("aa20$CLOSE");VAR43:=("aa42$CLOSE");
VAR44:=("aa11$CLOSE");VAR45:=("aa04$CLOSE");VAR46:=("aa45$CLOSE");VAR47:=("aa12$CLOSE");VAR48:=("aa09$CLOSE");VAR49:=("aa35$CLOSE");
六外贸:=(VAR1/REF(VAR1,N)-1)*100/n;六医药:=(VAR2/REF(VAR2,N)-1)*100/n;六电器:=(VAR3/REF(VAR3,N)-1)*100/n;六创投:=(VAR4/REF(VAR4,N)-1)*100/n;六券商:=(VAR5/REF(VAR5,N)-1)*100/n;六三G:=(VAR6/REF(VAR6,N)-1)*100/n;
六ST:=(VAR7/REF(VAR7,N)-1)*100/n;六有色:=(VAr8/REF(VAR8,N)-1)*100/n;六新材:=(VAR9/REF(VAR9,N)-1)*100/n;六创业:=(VAR10/REF(VAR10,N)-1)*100/n;六钢铁:=(VAR11/REF(VAR11,N)-1)*100/n;六稀缺:=(VAR12/REF(VAR12,N)-1)*100/n;
六农牧:=(VAR13/REF(VAR13,N)-1)*100/n;六计算机:=(VAR14/REF(VAR14,N)-1)*100/n;六仪电:=(VAR15/REF(VAR15,N)-1)*100/n;六电设:=(VAR16/REF(VAR16,N)-1)*100/n;六基金:=(VAR17/REF(VAR17,N)-1)*100/n;六航天:=(VAR18/REF(VAR18,N)-1)*100/n;
六稀土:=(VAR19/REF(VAR19,N)-1)*100/n;六中小:=(VAR20/REF(VAR20,N)-1)*100/n;六地产:=(VAR21/REF(VAR21,N)-1)*100/n;六小盘:=(VAR22/REF(VAR22,N)-1)*100/n;六电力:=(VAR23/REF(VAR23,N)-1)*100/n;六节能:=(VAR24/REF(VAR24,N)-1)*100/n;
六教育:=(VAR25/REF(VAR25,N)-1)*100/n;六纺织:=(VAR26/REF(VAR26,N)-1)*100/n;六电视:=(VAR27/REF(VAR27,N)-1)*100/n;六旅游:=(VAR28/REF(VAR28,N)-1)*100/n;六新能:=(VAR29/REF(VAR29,N)-1)*100/n;六运输:=(VAR30/REF(VAR30,N)-1)*100/n;
六造纸:=(VAR31/REF(VAR31,N)-1)*100/n;六工程:=(VAR32/REF(VAR32,N)-1)*100/n;六中盘:=(VAR33/REF(VAR33,N)-1)*100/n;六云算:=(VAR34/REF(VAR34,N)-1)*100/n;六供水:=(VAR35/REF(VAR35,N)-1)*100/n;六建材:=(VAR36/REF(VAR36,N)-1)*100/n;
六商业:=(VAR37/REF(VAR37,N)-1)*100/n;六煤油:=(VAR38/REF(VAR38,N)-1)*100/n;六通讯:=(VAR39/REF(VAR39,N)-1)*100/n;六酿酒:=(VAR40/REF(VAR40,N)-1)*100/n;六参银:=(VAR41/REF(VAR41,N)-1)*100/n;六社保:=(VAR42/REF(VAR42,N)-1)*100/n;
六游xi:=(VAR43/REF(VAR43,N)-1)*100/n;六交设:=(VAR44/REF(VAR44,N)-1)*100/n;六铁路:=(VAR45/REF(VAR45,N)-1)*100/n;六大盘:=(VAR46/REF(VAR46,N)-1)*100/n;六银hang:=(VAR47/REF(VAR47,N)-1)*100/n;六化工:=(VAR48/REF(VAR48,N)-1)*100/n;
六机械:=(VAR49/REF(VAR49,N)-1)*100/n;
二外贸:=(VAR1/REF(VAR1,M)-1)*100/m;二医药:=(VAR2/REF(VAR2,M)-1)*100/m;二电器:=(VAR3/REF(VAR3,M)-1)*100/m;二创投:=(VAR4/REF(VAR4,M)-1)*100/m;二券商:=(VAR5/REF(VAR5,M)-1)*100/m;二三G:=(VAR6/REF(VAR6,M)-1)*100/m;
二ST:=(VAR7/REF(VAR7,M)-1)*100/m;二有色:=(VAr8/REF(VAR8,M)-1)*100/m;二新材:=(VAR9/REF(VAR9,M)-1)*100/m;二创业:=(VAR10/REF(VAR10,M)-1)*100/m;二钢铁:=(VAR11/REF(VAR11,M)-1)*100/m;二稀缺:=(VAR12/REF(VAR12,M)-1)*100/m;
二农牧:=(VAR13/REF(VAR13,M)-1)*100/m;二计算机:=(VAR14/REF(VAR14,M)-1)*100/m;二仪电:=(VAR15/REF(VAR15,M)-1)*100/m;二电设:=(VAR16/REF(VAR16,M)-1)*100/m;二基金:=(VAR17/REF(VAR17,M)-1)*100/m;二航天:=(VAR18/REF(VAR18,M)-1)*100/m;
二稀土:=(VAR19/REF(VAR19,M)-1)*100/m;二中小:=(VAR20/REF(VAR20,M)-1)*100/m;二地产:=(VAR21/REF(VAR21,M)-1)*100/m;二小盘:=(VAR22/REF(VAR22,M)-1)*100/m;二电力:=(VAR23/REF(VAR23,M)-1)*100/m;二节能:=(VAR24/REF(VAR24,M)-1)*100/m;
二教育:=(VAR25/REF(VAR25,M)-1)*100/m;二纺织:=(VAR26/REF(VAR26,M)-1)*100/m;二电视:=(VAR27/REF(VAR27,M)-1)*100/m;二旅游:=(VAR28/REF(VAR28,M)-1)*100/m;二新能:=(VAR29/REF(VAR29,M)-1)*100/m;二运输:=(VAR30/REF(VAR30,M)-1)*100/m;
二造纸:=(VAR31/REF(VAR31,M)-1)*100/m;二工程:=(VAR32/REF(VAR32,M)-1)*100/m;二中盘:=(VAR33/REF(VAR33,M)-1)*100/m;二云算:=(VAR34/REF(VAR34,M)-1)*100/m;二供水:=(VAR35/REF(VAR35,M)-1)*100/m;二建材:=(VAR36/REF(VAR36,M)-1)*100/m;
二商业:=(VAR37/REF(VAR37,M)-1)*100/m;二煤油:=(VAR38/REF(VAR38,M)-1)*100/m;二通讯:=(VAR39/REF(VAR39,M)-1)*100/m;二酿酒:=(VAR40/REF(VAR40,M)-1)*100/m;二参银:=(VAR41/REF(VAR41,M)-1)*100/m;二社保:=(VAR42/REF(VAR42,M)-1)*100/m;
二游xi:=(VAR43/REF(VAR43,M)-1)*100/m;二交设:=(VAR44/REF(VAR44,M)-1)*100/m;二铁路:=(VAR45/REF(VAR45,M)-1)*100/m;二大盘:=(VAR46/REF(VAR46,M)-1)*100/m;二银hang:=(VAR47/REF(VAR47,M)-1)*100/m;二化工:=(VAR48/REF(VAR48,M)-1)*100/m;
二机械:=(VAR49/REF(VAR49,M)-1)*100/m;
十外贸:=(VAR1/REF(VAR1,F)-1)*100/f;十医药:=(VAR2/REF(VAR2,F)-1)*100/f;十电器:=(VAR3/REF(VAR3,F)-1)*100/f;十创投:=(VAR4/REF(VAR4,F)-1)*100/f;十券商:=(VAR5/REF(VAR5,F)-1)*100/f;十三G:=(VAR6/REF(VAR6,F)-1)*100/f;十ST:=(VAR7/REF(VAR7,F)-1)*100/f;
十有色:=(VAr8/REF(VAR8,F)-1)*100/f;十新材:=(VAR9/REF(VAR9,F)-1)*100/f;十创业:=(VAR10/REF(VAR10,F)-1)*100/f;十钢铁:=(VAR11/REF(VAR11,F)-1)*100/f;十稀缺:=(VAR12/REF(VAR12,F)-1)*100/f;十农牧:=(VAR13/REF(VAR13,F)-1)*100/f;十计算机:=(VAR14/REF(VAR14,F)-1)*100/f;
十仪电:=(VAR15/REF(VAR15,F)-1)*100/f;十电设:=(VAR16/REF(VAR16,F)-1)*100/f;十基金:=(VAR17/REF(VAR17,F)-1)*100/f;十航天:=(VAR18/REF(VAR18,F)-1)*100/f;十稀土:=(VAR19/REF(VAR19,F)-1)*100/f;十中小:=(VAR20/REF(VAR20,F)-1)*100/f;
十地产:=(VAR21/REF(VAR21,F)-1)*100/f;十小盘:=(VAR22/REF(VAR22,F)-1)*100/f;十电力:=(VAR23/REF(VAR23,F)-1)*100/f;十节能:=(VAR24/REF(VAR24,F)-1)*100/f;十教育:=(VAR25/REF(VAR25,F)-1)*100/f;十纺织:=(VAR26/REF(VAR26,F)-1)*100/f;
十电视:=(VAR27/REF(VAR27,F)-1)*100/f;十旅游:=(VAR28/REF(VAR28,F)-1)*100/f;十新能:=(VAR29/REF(VAR29,F)-1)*100/f;十运输:=(VAR30/REF(VAR30,F)-1)*100/f;十造纸:=(VAR31/REF(VAR31,F)-1)*100/f;十工程:=(VAR32/REF(VAR32,F)-1)*100/f;
十中盘:=(VAR33/REF(VAR33,F)-1)*100/f;十云算:=(VAR34/REF(VAR34,F)-1)*100/f;十供水:=(VAR35/REF(VAR35,F)-1)*100/f;十建材:=(VAR36/REF(VAR36,F)-1)*100/f;十商业:=(VAR37/REF(VAR37,F)-1)*100/f;十煤油:=(VAR38/REF(VAR38,F)-1)*100/f;
十通讯:=(VAR39/REF(VAR39,F)-1)*100/f;十酿酒:=(VAR40/REF(VAR40,F)-1)*100/f;十参银:=(VAR41/REF(VAR41,F)-1)*100/f;十社保:=(VAR42/REF(VAR42,F)-1)*100/f;十游xi:=(VAR43/REF(VAR43,F)-1)*100/f;十交设:=(VAR44/REF(VAR44,F)-1)*100/f;
十铁路:=(VAR45/REF(VAR45,F)-1)*100/f;十大盘:=(VAR46/REF(VAR46,F)-1)*100/f;十银hang:=(VAR47/REF(VAR47,F)-1)*100/f;十化工:=(VAR48/REF(VAR48,F)-1)*100/f;十机械:=(VAR49/REF(VAR49,F)-1)*100/f;
外贸:=(VAR1/REF(VAR1,1)-1)*100/g;医药:=(VAR2/REF(VAR2,1)-1)*100/g;电器:=(VAR3/REF(VAR3,1)-1)*100/g;创投:=(VAR4/REF(VAR4,1)-1)*100/g;券商:=(VAR5/REF(VAR5,1)-1)*100/g;三G:=(VAR6/REF(VAR6,1)-1)*100/g;ST:=(VAR7/REF(VAR7,1)-1)*100/g;
有色:=(VAr8/REF(VAR8,1)-1)*100 |