[飞狐公式] 桃花岛碧波白云

today

DRAWGBK(c, colorRGB(00,255,255) ,colorRGB(00,00,28),1);{}
g120:=hhv(h,120);
d120:=llv(l,120);

d1:ma(c,144)-3*std(c,89),colorffff00,LINETHICK0;
d2:ma(c,144)-2*std(c,89),colorffff00,LINETHICK0;
d3:ma(c,144)-1.5*std(c,89),colorffff00,LINETHICK0;
d4:ma(c,144)-std(c,89),colorffff00,LINETHICK0;
g1:ma(c,144)+3*std(c,89),colorffff00,LINETHICK0;
g2:ma(c,144)+2*std(c,89),colorffff00,LINETHICK0;
g3:ma(c,144)+1.5*std(c,89),colorffff00,LINETHICK0;
g4:ma(c,144)+std(c,89),colorffff00,LINETHICK0;
z:ema(c,144);
ts:=BARSLAST(CROSS(ema(c,5),z));
ts2:=BARSLAST(CROSS(z,ema(c,5)));
FILLRGN( c,d1,d2),Color430000;
FILLRGN( c,d2,d3),Color7F0000;
FILLRGN( c,d3,d4),ColorAF0000;

FILLRGN(c, g1,g2),Colorffffff;
FILLRGN( c,g2,g3),Coloreeeeee;
FILLRGN( c,g3,g4),Colordddddd;
PARTLINE( z>ref(z,1),z),colorred,LINETHICK2;
PARTLINE( z<ref(z,1),z),colorgreen,LINETHICK2;
一重天:ref(z+(z-REF(d120,ts)),ts),colorffff00,LINETHICK2;
二重天:ref(z+1.5*(z-REF(d120,ts)),ts),colorffff00,LINETHICK2;
三重天:ref(z+2*(z-REF(d120,ts)),ts),colorffff00,LINETHICK2;
一重海:ref(z-(REF(g120,ts2)-z),ts2),color111111,LINETHICK2;
二重海:ref(z-1.5*(REF(g120,ts2)-z),ts2),color111111,LINETHICK2;
三重海:ref(z-2*(REF(g120,ts2)-z),ts2),color111111,LINETHICK2;


{FILLRGN( g4,d4),Colorffcc00,LAYER7;}
AaaC:=C;
AaaH:=H;
AaaL:=L;
AaaO:=O;

STICKLINE(AaaC>=AaaO,AaaH,AaaC,1,0),color0000cc;
STICKLINE(AaaC>=AaaO,AaaH,AaaC,0,0),color6633ff;
STICKLINE(AaaC>=AaaO,AaaO,AaaL,1,0),color0000cc;
STICKLINE(AaaC>=AaaO,AaaO,AaaL,0,0),color6633ff;

STICKLINE(AaaC>AaaO,AaaC,AaaO,8,0),COLOR0000cc;
STICKLINE(AaaC>AaaO,AaaC,AaaO,7,0),COLOR3300cc;
STICKLINE(AaaC>AaaO,AaaC,AaaO,6,0),COLOR0033cc;
STICKLINE(AaaC>AaaO,AaaC,AaaO,5,0),COLOR3333cc;
STICKLINE(AaaC>AaaO,AaaC,AaaO,4,0),COLOR0000ff;
STICKLINE(AaaC>AaaO,AaaC,AaaO,3,0),COLOR3300ff;
STICKLINE(AaaC>AaaO,AaaC,AaaO,2,0),COLOR6600ff;
STICKLINE(AaaC>AaaO,AaaC,AaaO,1,0),COLOR6633ff;

STICKLINE(AaaC<=AaaO,AaaH,AaaC,1,0),color888800;
STICKLINE(AaaC<=AaaO,AaaH,AaaC,0,0),colorffff00;
STICKLINE(AaaC<=AaaO,AaaO,AaaL,1,0),color888800;
STICKLINE(AaaC<=AaaO,AaaO,AaaL,0,0),colorffff00;

STICKLINE(AaaC<=AaaO,AaaC,AaaO,8,0),COLOR888800;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,7,0),COLOR999900;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,6,0),COLORaaaa00;
STICKLINE(AaaC<=aaAO,AaaC,AaaO,5,0),COLORbbbb00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,4,0),COLORcccc00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,3,0),COLORdddd00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,2,0),COLOReeee00;
STICKLINE(AaaC<=AaaO,AaaC,AaaO,1,0),COLORffff00;;