Kontinuerlig kurva,bugg?

[Bertil]

Ofta öppnar ju kurserna med ett gap jämfört med föregående börsdags stängningskurs. Detta kan ställa till det då man jobbar med medelvärdesbildningar.
Jag har nu tagit fram ett script där jag tar fram en korrigerad kurva som kompenserar för gapet vid öppningen för att få en kontinuerlig kurva men äter upp gapet under dagen så att slutkursen för den korrigerade kurvan är samma som för den riktiga.
Problemet är att jag inte kan medelvärdesbilda den korrigerade kurvan.
Gör jag medelvärdesbildningen med := ovanför periodtiden så bottnar antalet parentesnivåer, gör jag medelvärdesbildningen inom periodiseringen så görs den konstigt nog på ursprungskurvan. Den gröna kurvan skall alltså vara medelvärdebildad 20 perioder runt den svarta kurvan men medelvärdesbildas istället 20 perioder runt den ursprungliga blå kurvan. Är detta en bugg eller har jag överskridit någon begränsning?

perioder01:=Sub(int(mult(frac(d),1440)),540)
diff01:=sub(cmpref(o,0,a),cmpref(c,1,a))
i1(
korr01=sub(c,mult(sub(1,div(perioder01,505)),diff01))
sling02=mov(korr01,20)

draw(korr01,1,kqb0)
draw(sling02,2,dgqb0)
draw(cmpref(c,0,a),3,rqb0)
draw(cmpref(o,0,a),4,mqb0)
Mult(0,1)
)

{@A(0,)}

Med vänlig hälsning
Bertil

[Bertil]

Om jag inte blandar in dagskurserna med cmpref utan istället scriptar:

perioder01:=Sub(int(mult(frac(d),1440)),541)
igårclose01:=aref(c,add(perioder01,6))
idagopen01:=aref(c,add(perioder01,1))
diff01:=sub(idagopen01,igårclose01)

i1(
korr01=sub(c,mult(sub(1,div(perioder01,505)),diff01))
sling02=mov(korr01,20)

draw(korr01,1,kqb0)
draw(sling02,2,dgqb0)
draw(igårclose01,3,rqb0)
draw(idagopen01,4,mqb0)
Mult(0,1)
)

Så fungerar det så när som på att öppningskursen fluktuerar.

Med vänlig hälsning
Bertil

[Bertil]

Om vi nu jämför med samma medelvärdesbildning och HHV på den ursprungliga kurvan (röd) så ser vi att den inte blir rakt stigande som den magentafärgade som bygger på den glappkorrigerade kurvan.

perioder01:=Sub(int(mult(frac(d),1440)),541)
igårclose01:=aref(c,add(perioder01,6))
idagopen01:=aref(c,add(perioder01,1))
diff01:=sub(idagopen01,igårclose01)

i1(
korr01=sub(c,mult(sub(1,div(perioder01,505)),diff01))
sling02=mov(korr01,100)
sling03=HHV(sling02,400)
sling04=HHV(mov(c,100),400)

draw(korr01,1,kqb0)
draw(sling02,2,dgqb0)
draw(sling04,3,rqb0)
draw(sling03,4,mqb0)
Mult(0,1)
)

Med vänlig hälsning
Bertil