大家热情蛮高，周末亦实在无事，喝了点酒就来劲了，还是给大家多点周末礼物吧。这个礼物是仪表图，可以告诉你你的股票的大致位置和阶段的，原先的程序几乎错误百出哈，俺用俺的均线原理修改了一下，另外增加了基本信息。希望可以帮到你看盘。源码送上，爱怎么改就怎么改。注意图片文件夹里面的文件一定要放到通达信的安装目录下的T0002子目录的子目录signals下面（如下图的位置）然后导入公式就显示图标了。这图标蛮可爱的。希望帮到您。
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
M5:MA(C,7),COLORCCCCCC;
M10:MA(C,13),COLOR00CCCC;
M20:MA(C,23),COLORCC00CC;
M30:MA(C,45),COLORCC00CC;
M60:IF(PERIOD>4,MA(C,90),DRAWNULL),COLOR00CC00;
M120:MA(C,180),COLORCCCC00;
LC:=REF(C,1);
主升浪:=ISLASTBAR AND M5>M20 AND M20>M60 AND M60>M120 AND M20>=REF(M20,1) AND M60>=REF(M60,1) AND M120>=REF(M120,1);
主浪回调:=ISLASTBAR AND C<LC AND (C<M5 OR M5<REF(M5,1)) AND M5>M20 AND M20>M60 AND M20>=REF(M20,1) AND M60>=REF(M60,1);
主浪深调:=ISLASTBAR AND C<LC AND C<M5 AND M5<REF(M5,1) AND M5<M60 AND M5<M20 AND M10>M20 AND M20>M60 AND M20>=REF(M20,1) AND M60>=REF(M60,1);
初升浪:=ISLASTBAR AND C>LC AND C>(M5 OR M10) AND M5>(M20 OR M10) AND M5>=REF(M5,1) AND C>M20 AND (M5 OR M10)>M20 AND M20>=REF(M20,1) AND M60<(C OR M5 OR M10);
底部反弹:=ISLASTBAR AND C>LC AND M120>M60 AND M60>M20 AND M5>M20;
探底阶段:=ISLASTBAR AND C<LC AND C<M5 AND M5<M10 AND M10<M20 AND M20<M60;
观望:=ISLASTBAR AND C<LC AND C<M10 AND M10<M20 AND M10<REF(M10,1) AND M20>REF(M20,1);
有牛:=ISLASTBAR AND C>LC AND M20>=REF(M20,1) AND C>=M60 AND M60<(C OR M5 OR M10) AND C>=M120;
放弃:=ISLASTBAR AND C<LC AND C<M10 AND C<M20 AND M20<M60 AND M20<REF(M20,1);
DRAWGBK(主升浪=0 AND 主浪回调=0 AND 主浪深调=0 AND 初升浪=0 AND 底部反弹=0 AND 探底阶段=0 AND 观望=0 AND 有牛=0 AND
放弃=0,0,0,0,'观望',0),COLOR00BF00;
DRAWGBK(主升浪,0,0,0,'主升浪',0),COLORFF00FF;
DRAWGBK(主浪回调,0,0,0,'主浪回调',0),COLORFF8080;
DRAWGBK(主浪深调,0,0,0,'主浪深调',0),COLOR009500;
DRAWGBK(初升浪,0,0,0,'初升浪',0),COLOR00FFFF;
DRAWGBK(底部反弹,0,0,0,'底部反弹',0),COLORFFFF00;
DRAWGBK(探底阶段,0,0,0,'探底阶段',0);
DRAWGBK(观望,0,0,0,'观望',0),COLORFFFF00;
DRAWGBK(有牛,0,0,0,'有牛',0),COLOR00FFFF;
DRAWGBK(放弃,0,0,0,'放弃',0),COLOR00BF00;
|
