大盘定律源码(大智慧)

{大盘定律}
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;