软件名称:[B]上升通道主图[/B]
软件类型:国产软件
运行环境:Win9X/2000/XP/2003/
软件语言:简体中文
授权方式:解密版
软件大小:7.00 KB
官方主页:Home Page
更新时间:2009-01-04 07:31:27
软件简介:
上升通道主图
DRAWGBKLAST(DATE>900101,STRIP(RGB(0,0,100),RGB(0,0,0),0));
DRAWTEXTABS(20,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF;
STICKLINE(C>=O,C,O,8,0),COLOR0F0FFF;
STICKLINE(C>=O,C,O,7,0),COLOR0F0FFF;
STICKLINE(C>=O,C,O,6,0),COLOR2626FF;
STICKLINE(C>=O,C,O,5,0),COLOR4444FF;
STICKLINE(C>=O,C,O,4,0),COLOR6060FF;
STICKLINE(C>=O,C,O,2,0),COLOR7777FF;
STICKLINE(C>=O,H,L,0,0),COLOR8E8EFF;
STICKLINE(C<O,C,O,8,0),COLOR646400;
STICKLINE(C<O,C,O,7,0),COLOR828200;
STICKLINE(C<O,C,O,6,0),COLOR9B9B00;
STICKLINE(C<O,C,O,5,0),COLORB7B700;
STICKLINE(C<O,C,O,4,0),COLORCECE00;
STICKLINE(C<O,C,O,2,0),COLORFFFF66;
STICKLINE(C<O,H,L,0,0),COLORFFFF6F;
AAA:=(3*C+H+L+O)/6;
VAR1:(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36,COLORFFFFFF;
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
PARTLINE(VAR6,VAR1=VAR6,RGB(0,255,0),VAR1>VAR6,RGB(255,255,0));
PARTLINE(VAR4,VAR4=VAR1,RGB(255,0,255),VAR4>VAR1,RGB(0,255,0)),LINETHICK2;
PARTLINE(VAR5,VAR6=VAR5,RGB(0,255,0),VAR6>VAR5,RGB(255,0,0)),LINETHICK2;
BBB:=VAR1>VAR6 AND REF(VAR1,1)=REF(VAR6,1);
CCC:=VAR1>VAR6 AND VAR6>VAR4 AND REF(VAR1,1)=REF(VAR4,1);
DDD:=VAR1=VAR4 AND VAR4>REF(VAR4,1);
EEE:=VAR1>VAR6 AND VAR1>REF(VAR1,1) AND VAR6>REF(VAR6,1);
FFF:=REF(VAR1,1)=REF(VAR4,1) AND VAR4>VAR1;
GGG:=VAR1=VAR6 AND VAR6<REF(VAR6,1);
HHH:=VAR1<REF(VAR1,1) AND VAR5>VAR1;
III:=(VAR1=VAR6) OR (VAR6=VAR4);
IF BARSTATUS=2 AND BBB THEN BEGIN
DRAWTEXTABS(320,25,'调整结束短线介入'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN
DRAWTEXTABS(320,40,'底部特征建仓时机'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND (DDD OR EEE) THEN BEGIN
DRAWTEXTABS(320,40,'上升通道走势良好'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN
DRAWTEXTABS(320,25,'顶部特征注意风险'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND (GGG OR HHH OR III) THEN BEGIN
DRAWTEXTABS(320,40,'下跌通道回避观望'),COLOR00FFFF;
END;
DRAWTEXTABS(20,10,STKLABEL+' '+STKNAME+' '+BKNAME),COLOR00FFFF;
STICKLINE(C>=O,C,O,8,0),COLOR0F0FFF;
STICKLINE(C>=O,C,O,7,0),COLOR0F0FFF;
STICKLINE(C>=O,C,O,6,0),COLOR2626FF;
STICKLINE(C>=O,C,O,5,0),COLOR4444FF;
STICKLINE(C>=O,C,O,4,0),COLOR6060FF;
STICKLINE(C>=O,C,O,2,0),COLOR7777FF;
STICKLINE(C>=O,H,L,0,0),COLOR8E8EFF;
STICKLINE(C<O,C,O,8,0),COLOR646400;
STICKLINE(C<O,C,O,7,0),COLOR828200;
STICKLINE(C<O,C,O,6,0),COLOR9B9B00;
STICKLINE(C<O,C,O,5,0),COLORB7B700;
STICKLINE(C<O,C,O,4,0),COLORCECE00;
STICKLINE(C<O,C,O,2,0),COLORFFFF66;
STICKLINE(C<O,H,L,0,0),COLORFFFF6F;
AAA:=(3*C+H+L+O)/6;
VAR1:(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36,COLORFFFFFF;
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
PARTLINE(VAR6,VAR1=VAR6,RGB(0,255,0),VAR1>VAR6,RGB(255,255,0));
PARTLINE(VAR4,VAR4=VAR1,RGB(255,0,255),VAR4>VAR1,RGB(0,255,0)),LINETHICK2;
PARTLINE(VAR5,VAR6=VAR5,RGB(0,255,0),VAR6>VAR5,RGB(255,0,0)),LINETHICK2;
BBB:=VAR1>VAR6 AND REF(VAR1,1)=REF(VAR6,1);
CCC:=VAR1>VAR6 AND VAR6>VAR4 AND REF(VAR1,1)=REF(VAR4,1);
DDD:=VAR1=VAR4 AND VAR4>REF(VAR4,1);
EEE:=VAR1>VAR6 AND VAR1>REF(VAR1,1) AND VAR6>REF(VAR6,1);
FFF:=REF(VAR1,1)=REF(VAR4,1) AND VAR4>VAR1;
GGG:=VAR1=VAR6 AND VAR6<REF(VAR6,1);
HHH:=VAR1<REF(VAR1,1) AND VAR5>VAR1;
III:=(VAR1=VAR6) OR (VAR6=VAR4);
IF BARSTATUS=2 AND BBB THEN BEGIN
DRAWTEXTABS(320,25,'调整结束短线介入'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN
DRAWTEXTABS(320,40,'底部特征建仓时机'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND (DDD OR EEE) THEN BEGIN
DRAWTEXTABS(320,40,'上升通道走势良好'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN
DRAWTEXTABS(320,25,'顶部特征注意风险'),COLOR00FFFF;
END
ELSE
IF BARSTATUS=2 AND (GGG OR HHH OR III) THEN BEGIN
DRAWTEXTABS(320,40,'下跌通道回避观望'),COLOR00FFFF;
END;
[url=http://www.70822.com/soft/sort013/sort03/down-5381.html]上升通道主图[/url]