最近又在看灵通信的职业板块代码,学习了下面内容,不错,共享给我们。
看职业板块指数,灵通信中板块指数不是许多也不好找,这些代码按职业别离编成付图目标,剖析股票时在图中调出相应的职业指数和个股比照强弱。
一、A:='金融职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二、A:='首饰加工';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
三、A:='钢铁职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
四、A:='家具职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
五、A:='石油职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
六、A:='公路桥梁';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
七、A:='轿车制作';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
八、A:='交通运输';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
九、A:='医疗器械';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十、A:='酒店旅行';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十一、A:='房地产业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十二、A:='商业百货';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十三、A:='物资外贸';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十四、A:='食品职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十五、A:='纺织职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十六、A:='电力职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十七、A:='农林牧渔';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十八、A:='传媒文娱';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
十九、A:='化工职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十、A:='煤炭职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十一、A:='修建建材';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十二、A:='水泥职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十三、A:='家电职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十四、A:='电子信息';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十五、A:='归纳职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十六、A:='机械职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十七、A:='化纤职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十八、A:='农药化肥';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
二十九、A:='电器职业';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;
三十、A:='摩托车';
HHH:=HORCALC(A,100,0,3);
OOO:=HORCALC(A,101,0,3);
LLL:=HORCALC(A,102,0,3);
CCC:=HORCALC(A,103,0,3);
DRAWKLINE(HHH,OOO,LLL,CCC);
MA5:MA(CCC,5),COLORCDCDCD;
MA10:MA(CCC,10),COLORYELLOW;
MA20:MA(CCC,20),COLORMAGENTA;
MA30:MA(CCC,30),COLOR663636;
MA60:MA(CCC,60),COLORGREEN;