量价关系纷繁复杂,可以讲是一门学问。 {量 3 999 10} {价 3 999 10} STICKLINE(C>=REF(C,1) AND V>=REF(V,1),O,C,-1,0),COLOR0000AA; STICKLINE(C>=REF(C,1) AND V>=REF(V,1),O,C,2,0),COLOR0000DD; STICKLINE(C>=REF(C,1) AND V>=REF(V,1),O,C,1,0),COLOR0000FF;{红色量价齐升} STICKLINE(C>=REF(C,1) AND V<REF(V,1),O,C,-1,0),COLOR00AAAA; STICKLINE(C>=REF(C,1) AND V<REF(V,1),O,C,2,0),COLOR00DDDD; STICKLINE(C>=REF(C,1) AND V<REF(V,1),O,C,1,0),COLOR00FFFF;{黄s价升量跌} STICKLINE(C<REF(C,1) AND V>=REF(V,1),O,C,-1,0),COLOR00AA00; STICKLINE(C<REF(C,1) AND V>=REF(V,1),O,C,2,0),COLOR00DD00; STICKLINE(C<REF(C,1) AND V>=REF(V,1),O,C,1,0),COLOR00FF00;{绿色价跌量升} STICKLINE(C<REF(C,1) AND V<REF(V,1),O,C,-1,0),COLORAAAA00; STICKLINE(C<REF(C,1) AND V<REF(V,1),O,C,2,0),COLORDDDD00; STICKLINE(C<REF(C,1) AND V<REF(V,1),O,C,1,0),COLORFFFF00;{淡蓝色量价齐跌}; LZD:=V-REF(V,1); 量幅%:LZD/REF(V,1)*100,COLORYELLOW,NODRAW; JZD:=C-REF(C,1); 价幅%:JZD/REF(C,1)*100,COLORRED,NODRAW; LL:=CROSS(V,REF(HHV(V,量),1)); JJ:=CROSS(C,REF(HHV(H,价),1)); XG:=LL AND JJ; DRAWTEXT(JJ,C,'价'),COLORRED,DRAWABOVE; DRAWTEXT(LL,C,' 量'),COLORLIMAGENTA; DRAWICON(XG,C,11); |
