FORMÜL YAZIMI AŞAĞIDAKİ GİBİDİR

gear:=input("Conservative=1 Standard=2 Average=3 Risky=4 Agressive=5",1,5,2);

period:=input("Period",1,500,50);

nATR:=ATRe(Period)/C;

hATR:=HHV(nATR,period);

lATR:=LLV(nATR,period);

nSD:=StDEV(C,Period)/C;

hSD:=HHV(nSD,period);

lSD:=LLV(nSD,period);

MA:=mov(nATR,period,W);

perm:=100*(abs(nATR-MA))/MA;

pers:=100*(nSD-lSD)/(hSD-lSD);

pera:=100*(nATR-lATR)/(hATR-lATR);

perb:=100*(C-BBANDBOT(c,period,s,2))/(BBANDTOP(c,period,s,2)-BBANDBOT(c,period,s,2));

per:=if(gear=5 or gear=4,(perm+pers+pera+perb)/4, if(gear=1,min(100,(pers+pera+perb)/2.5),(pers+pera+perb)/3));

EL:=(100-per)/(6-gear);

ELiS:=max(1,int(EL+.5));

ELiS