|
|
发表于 2009-5-24 10:20
|
威龙黄金线
(威龙金博客发布)通达信版
============
VAR1:=MA(C,13);
VAR2:=MA(C,21);
收盘价:CLOSE,COLORYELLOW;
ML:VAR1,COLORRED;
VAR3:=ZIG(3,26);
VAR4:=MA(VAR3,2);
VAR5:=IF (HHV(HIGH,1597)<=HHV(HIGH,610),HHV(HIGH,610),HHV(HIGH,1597));
VAR6:=IF (LLV(LOW,1597)>=LLV(LOW,610),LLV(LOW,610),LLV(LOW,1597));
VAR7:=VAR5-VAR6;
VAR8:=BARSLAST(HHV(HIGH,610));
VAR9:=BARSLAST(LLV(LOW,610));
VAR10:=IF (VAR8>VAR9,0,1);
VAR11:=CROSS(VAR3,VAR4) OR CROSS(VAR4,VAR3);
P191:VAR6+VAR7*0.191;
P236:VAR6+VAR7*0.236;
P382:VAR6+VAR7*0.382;
P500:VAR6+VAR7*0.5;
P618:VAR6+VAR7*0.618;
P764:VAR6+VAR7*0.764;
DRAWTEXT(VAR11,P191,IF(VAR10<1,'↑19.1%-'+P191,'↓80.9%-'+P191)),COLOREEEEFF;
DRAWTEXT(VAR11,P236,IF(VAR10<1,'↑23.6%-'+P236,'↓76.4%-'+P236)),COLOREEEEFF;
DRAWTEXT(VAR11,P382,IF(VAR10<1,'↑38.2%-'+P382,'↓61.8%-'+P382)),COLOREEEEFF;
DRAWTEXT(VAR11,P500,IF(VAR10<1,'↑50.0%-'+P500,'↓50.0%-'+P500)),COLOREEEEFF;
DRAWTEXT(VAR11,P618,IF(VAR10<1,'↑61.8%-'+P618,'↓38.2%-'+P618)),COLOREEEEFF;
DRAWTEXT(VAR11,P764,IF(VAR10<1,'↑76.4%-'+P764,'↓23.6%-'+P764)),COLOREEEEFF;
DRAWTEXT(VAR11,VAR5,VAR5),COLOREEEEFF;
DRAWTEXT(VAR11,VAR6,VAR6),COLOREEEEFF; |
|
|