Kontrollscript

[jorgeng]

Hej lfm.

Jag har försökt göra om nedanstående script som presenterades under version6-nyheter till kontrollsrtipt, men åker ut på parentesdjup 11, max 10 tillåtet, hur kan man skriva om det så att det går ok?

period:=14
a1:=if(gt(c,ref(c,1)),sub(c,ref(c,1)),0)
d1:=if(lt(c,ref(c,1)),sub(ref(c,1),c),0)
as1:=mov(a1,period,s)
ds1:=mov(d1,period,s)
wrsi:=sub(100,div(100,add(div(as1,ds1),1)))
test:=gt(wrsi,70)
i30(Aref(test,1))

[lfm]

period:=14
a1:=if(gt(c,ref(c,1)),sub(c,ref(c,1)),0)
d1:=if(lt(c,ref(c,1)),sub(ref(c,1),c),0)
as1:=mov(a1,period,s)
ds1:=mov(d1,period,s)
i30(
wrsi=sub(100,div(100,add(div(as1,ds1),1)))
test=gt(wrsi,70)
Aref(test,1)
)

Det borde räcka. Jag brukar separera intradayprefixets delar på enskilda rader så man ser tydligt vad som omsluts.