Så här ser scriptet ut nu med färger och jag har kommit fram genom att laborera med färgerna att det är cell 23 som ej fungerar.
Klistra in scriptet hos dig Rikard så kan vi jämföra, R3 ska vara blue, nu visar
jag den som red och den skrivs ej ut.
close:=Ref(c,1)
high:=Ref(h,1)
low:=Ref(l,1)
tidnu:=Frac(DATE())
totalt:=Mult(tidnu,1440)
skriv:=And(Gt(totalt,541),Lt(totalt,545))
{}
p1:=Div(Add(Add(low,high),close),3)
{}
SetGVarIf(p1,21,skriv)
{}
SetGVarIf(Sub(Mult(p1,2),high),20,skriv)
SetGVarIf(Sub(p1,Sub(high,low)),22,skriv)
SetGVarIf(Sub(Mult(p1,2),low),23,skriv)
SetGVarIf(Add(p1,Sub(high,low)),24,skriv)
SetGVarIf(Sub(Low,Mult(2,Sub(high,p1))),25,skriv)
SetGvarIf(Sub(Mult(2,p1),low),26,skriv)
{}
output=Add(0,p1)
{}
Draw(GetGVar(21),1,cqb)
{}
Draw(GetGVar(20),2,yqb)
Draw(GetGVar(22),3,wqb)
Draw(GetGVar(23),4,rqb)
Draw(GetGVar(24),5,wqb)
Draw(GetGVar(25),6,bqb)
Draw(GetGVar(26),7,yqb)
Klistra in scriptet hos dig Rikard så kan vi jämföra, R3 ska vara blue, nu visar
jag den som red och den skrivs ej ut.
close:=Ref(c,1)
high:=Ref(h,1)
low:=Ref(l,1)
tidnu:=Frac(DATE())
totalt:=Mult(tidnu,1440)
skriv:=And(Gt(totalt,541),Lt(totalt,545))
{}
p1:=Div(Add(Add(low,high),close),3)
{}
SetGVarIf(p1,21,skriv)
{}
SetGVarIf(Sub(Mult(p1,2),high),20,skriv)
SetGVarIf(Sub(p1,Sub(high,low)),22,skriv)
SetGVarIf(Sub(Mult(p1,2),low),23,skriv)
SetGVarIf(Add(p1,Sub(high,low)),24,skriv)
SetGVarIf(Sub(Low,Mult(2,Sub(high,p1))),25,skriv)
SetGvarIf(Sub(Mult(2,p1),low),26,skriv)
{}
output=Add(0,p1)
{}
Draw(GetGVar(21),1,cqb)
{}
Draw(GetGVar(20),2,yqb)
Draw(GetGVar(22),3,wqb)
Draw(GetGVar(23),4,rqb)
Draw(GetGVar(24),5,wqb)
Draw(GetGVar(25),6,bqb)
Draw(GetGVar(26),7,yqb)
Comment