|
N8:=STRCAT(CON2STR(YEAR,0), '年' );
Y8:=STRCAT(CON2STR(MONTH,0), '月' );
R8:=STRCAT(CON2STR(DAY,0), '日' );
N:=120;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));{高点}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));{低点}
KJ:=GD-DD;
GD4:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL);
低:IF(CURRBARSCOUNT<=N/30,DD,DRAWNULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL),COLOR00FFFF;
支撑:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;
强势: IF(CURRBARSCOUNT<=N/30,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/30,DD+KJ/2,DRAWNULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
压力:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.809,DRAWNULL),COLOR00FF00;
低涨:IF(CURRBARSCOUNT<=N/30,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天数:BARSLAST(L=DD),COLORCYAN,NODRAW;
今日保护价:(REF(C,2)+REF(C,1)+O)/3 ,COLORCC3299,NODRAW;
顶点:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE;
低点:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,DOTLINE;
STICKLINE(CCI>=200 AND H>=顶点,O,C,3,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低点,O,C,3,0),COLORYELLOW;
SJ8:=STRCAT(STRCAT(N8,Y8), R8);
DRAWTEXT(ISLASTBAR,顶点,顶点),COLORRED;
DRAWTEXT(ISLASTBAR,低点,低点),COLORMAGENTA;
DRAWBAND(高,RGB(200,200,0),压力,RGB(0,0,0));
DRAWBAND(压力,RGB(0,190,0),警示,RGB(0,0,0));
DRAWBAND(警示,RGB(220,120,0),突破,RGB(0,0,0));
DRAWBAND(突破,RGB(120,0,120),强势,RGB(0,0,0));
DRAWBAND(强势,RGB(120, 0,0),支撑,RGB(0,0,0));
DRAWBAND(支撑,RGB(80,80,80),低,RGB(0,0,0));
DRAWTEXT_FIX(C>0,0.88,0,0,SJ8),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT=N/30,GD,DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT<=N/30,支撑,支撑,4,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,强势,强势,4,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,突破,突破,4,0),COLORABABAB;
STICKLINE(CURRBARSCOUNT<=N/30,警示,警示,4,0),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT<=N/30,压力,压力,4,0),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,压力,压力),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,警示,警示),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,突破,突破),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=1,强势,强势),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,支撑,支撑),COLOR00FFFF;
{顶尖财经网WWW.58188.COM}
AMV0:=VOL*(O+C+H+L)/4;
ZS:WMA(AMV0,21)/WMA(VOL,21);
IL:6*HHV(ZS,2)-5*ZS;
DRAWBAND(IL,RGB(0,150,170),ZS,RGB(0,0,0));
ZC:2*ZS-IL;
DRAWBAND(ZS,RGB(160,100,0),ZC,RGB(0,0,0));
STICKLINE(CLOSE>=ZS AND C>=O,OPEN,CLOSE,2,0),COLOR0000FF;
STICKLINE(CLOSE>=ZS AND C>=O,LOW,H,0,0),COLORRED;
STICKLINE(CLOSE>=ZS AND C<O,OPEN,CLOSE,2,0),COLOR00FFFF;
STICKLINE(CLOSE>=ZS AND C<O,LOW,H,0,0),COLOR00FFFF;
STICKLINE(CLOSE<ZS AND C>=O,OPEN,CLOSE,2,0),COLORFF00FF;
STICKLINE(CLOSE<ZS AND C>=O,LOW,H,0,0),COLORFF00FF;
STICKLINE(CLOSE<ZS AND C<O,OPEN,CLOSE,2,0),COLORFFFF00;
STICKLINE(CLOSE<ZS AND C<O,LOW,H,0,0),COLORFFFF00;
14Q251034W0-1I39.jpg
|
