INPUT:of(1,0,1),cs(60,1,300);
a:=BARSCOUNT(C);a1:=SYSPARAM(1);a2:=SYSPARAM(2);a3:=SYSPARAM(3);
DRAWGBK(a1<=a ,COLORRGB(255,255,255), COLORRGB(0,0,0) ,0);
DRAWGBK(a1=a, COLORRGB(0,0,0) ,COLORRGB(255,255,255),1);
P:=c;
Y:=P[a1];
N:=a3-a2+1;
zq:=if(of=0 and a1>=a,cs,1);
q:=if(of=1 and a1>=a,n,zq);
盈:sum(if(a1>=a and c<y,v,0),q)/FINANCE( 7),LINETHICK2,color0000FF;
亏:sum(if(a1>=a and c>y,v,0),q)/FINANCE( 7),LINETHICK2,colorff0000;
总筹:盈+亏,LINETHICK,colorffffff;
获利:盈/(总筹)*100,color0000ff,LINETHICK;
STICKLINE(a1>=a and 盈,盈,0,1,0),color0000ff;
STICKLINE(a1>=a and 亏,亏,0,1,0),colorff0000;
STICKLINE(a1>=a and 盈<亏,盈,0,1,0),color0000ff;
yo:=sum(if(a1>=a and o<y,v,0),Q)/CAPITAL*100,LINETHICK;
hlo:=yo/(总筹)*100,LINETHICK;
lc:=盈-REF(盈,1),LINETHICK;
STICKLINE(a1>=a and lc>0,hlo,获利,7,1),colorff00ff;
STICKLINE(a1>=a and lc<0,hlo,获利,7,0),color9cff00;
EXPLAINEX( 总筹,'总 筹 码： ',总筹,2,0),COLOR00FFFF;
EXPLAINEX( 盈,'盈利筹码： ',盈,2,0),COLOR0000FF;
EXPLAINEX( 亏,'套牢筹码： ',亏,2,0),COLOR00FF00;
EXPLAINEX( 获利,'获利比例： ',获利,2,0),COLORFFFFFF;
DRAWTEXT(a1=a ,盈*0.98,'老\n鼠\n先\n知'),COLORbbbbbb,ALIGN4,SHIFT2;
DRAWTEXT(a1=a ,盈*0.98,'天\n知\n地\n知'),COLORbbbbbb,ALIGN4,SHIFT6;
盈2:=LWINNER(if(of=1,n,cs),c)*100;
zy:=ref(盈2,1);
jy:=盈2-zy;
鼠:jy,LINETHICK;
if(a1>=a ,LWINNER(if(of=1,n,cs),c)*100,0),color00ffff;
DRAWTEXT(a1>=a and jy>20 ,0,'▲'),COLOR00FFFF,ALIGN0;
DRAWTEXT(a1>=a and jy<-18,0,'▲'),COLOR0000FF,ALIGN0;
0,colorff0000
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
