|
N:=IF(BARSCOUNT(C)>=48,48,BARSCOUNT(C));
AMOV:=VOL*(C+L+H)/3;
MN:=SUM(AMOV,N)/SUM(VOL,N);
NOTEXT1:IF(C>=MN,MN,DRAWNULL),LINETHICK2,COLORYELLOW;
NOTEXT2:IF(C<MN,MN,DRAWNULL),LINETHICK2,COLORGRAY;
N1:=IF(BARSCOUNT(C)>=8,8,BARSCOUNT(C));
AMOV2:=VOL*(C+L+H)/3;
MN1:=SUM(AMOV,N1)/SUM(VOL,N1);
NOTEXT3:IF(C>=MN1,MN1,DRAWNULL),LINETHICK1,COLORYELLOW;
NOTEXT4:IF(C<MN1,MN1,DRAWNULL),LINETHICK1,COLORGRAY;
{五操盘}
{PMA:MA(C,5),COLORWHITE,LINETHICK2;
IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2;
IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2;}
T:=300;
TT:=13;
{N1:=0;}
高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
{H3:=高1-(高1-低1)*0.5;}
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
HH1:=高1+(高1-低1)*0.382;
HH2:=高1+(高1-低1)*0.618;
顶:REFDATE(高1,DATE),COLOR004080;
一:REFDATE(H1,DATE),POINTDOT,COLOR404080;
二:REFDATE(H2,DATE),DOTLINE,COLOR808080;
{三:REFDATE(H3,DATE),DOTLINE,COLOR00FFFF;}
四:REFDATE(H4,DATE),DOTLINE,COLOR808080;
五:REFDATE(H5,DATE),POINTDOT,COLOR404080;
低:REFDATE(低1,DATE),COLOR004080;
HH:REFDATE(HH1,DATE),DOTLINE,COLOR004080;
HL:REFDATE(HH2,DATE),DOTLINE,COLOR004080;
{TT3:=(CURRBARSCOUNT=5);}
TT4:=(CURRBARSCOUNT=1);
{DRAWNUMBER(TT3 AND 顶,顶,顶),COLOR999900;}
DRAWTEXT(TT4 AND 顶,顶,'顶'),COLOR208FFF;
{DRAWNUMBER(TT3 AND 一,一,一),COLOR999999;}
DRAWTEXT(TT4 AND 一,一,'0.809'),COLORLIGRAY;
{DRAWNUMBER(TT3 AND 二,二,二),COLOR999999;}
DRAWTEXT(TT4 AND 二,二,'0.618'),COLOR208FFF;
{DRAWNUMBER(TT3 AND 三,三,三),COLOR999999;}
{DRAWTEXT(TT4 AND 三,三,'0.5'),COLOR208FFF;}
{DRAWNUMBER(TT3 AND 四,四,四),COLOR999999;}
DRAWTEXT(TT4 AND 四,四,'0.382'),COLOR208FFF;
{DRAWNUMBER(TT3 AND 五,五,五),COLOR999999;}
DRAWTEXT(TT4 AND 五,五,'0.191'),COLORLIGRAY;
{DRAWNUMBER(TT3 AND 低,低*1.01,?),COLOR999900;}
DRAWTEXT(TT4 AND 低,低*1.009,'低'),COLOR208FFF;
|
