大盘定律源码(大智慧)

{大盘定律}

input:n(5,1,100);

幅度:=Abs((C-REF(C,1))/REF(C,1));

转折:=IF(C>=O,幅度,0-幅度);

变异速度:=转折*1000000/INDEXC;

阴阳线:SUM(变异速度,n);

partline(阴阳线,阴阳线<=-20,rgb(102,255,102),阴阳线<20,rgb(255,136,196),阴阳线>=20,rgb(255,255,74)),linethick3;

阳顶:40 ,LINETHICK1,DOTLINE,precis0,colorwhite;

阳线:15 ,LINETHICK1,DOTLINE,precis0,colorwhite;

阴线:-15 ,LINETHICK1,DOTLINE,precis0,colorwhite;

阴底:-40 ,LINETHICK1,DOTLINE,precis0,colorwhite;