Alpha Shark

[Micke008]

Det är väl bara att lägga till en dynamisk Take Profit. Jag har ju publicerat flera varianter, tex i trådarna Studsa och Trendig.
mvh
Bertil

Ja, men vad jag vet så är koden krypterad. Eller den var krypterade tidigare innan den blev en gratis strategi men jag är osäker på om den är tillgänglig nu?

[PerG]

Kikat lite mer på de 4 sidorna och volla.

Har även kollat på hur många vinster i rad de olika sidorna har.
Longsidorna tenderar att ha längre streaks vilket man skulle kunna utnyttja i hedgen med.

[Rikard Autostock]

Ja, men vad jag vet så är koden krypterad. Eller den var krypterade tidigare innan den blev en gratis strategi men jag är osäker på om den är tillgänglig nu?

Koden är helt öppen.

[PerG]

Jag tänkte testa lite med Guld och Silver på Hajjen men får bara Programfel i simulering.

Förutom att justera extra-objekten och Limit-scripten att reflektera korrekt spread. Är det något annat man skall tänka på? och vad kan programfelet kan bero på?

Får nämligen det oavsett tidslängd. (tex om man bara simulerar igår 2019-08-12 ) Är det någon nivå av data som saknas?

[Rikard Autostock]

Det är nog extra objekten som orsakar det, är de ändrade i alla script de förekommer i?

[PerG]

{@A(60,SIX-GOLD )}
{@A(60,SIX-GOLD )}
{@A(60,SIX-GOLD )}
{@A(60,SIX-GOLD )}

{@A(60,SIX-SILV )}
{@A(60,SIX-GOLD )@B(60,SIX-SILV )@C(0,SIX-SILV )}
{@A(60,SIX-SILV )}
{@A(60,SIX-SILV )}

"SIX-SILV " Dubbla mellanslag efter tickern krävs för att inte få syntax-fel i kollen. Verkar som om instrumenten har två mellanslag i slutet när man copy-pastar från instrumentets egenskaper.

EDIT: Har även ändrat Antal-scripten utan framgång.

[Bertil]

Har du testat mitt korrescript för att kolla hur korrelationen är mellan olika instrument? Stor negativ korrelation innebär ju att de går mot varandra och det är ju bra ifall man kör hajen.

mvh
Bertil

[PerG]

Det är nog extra objekten som orsakar det, är de ändrade i alla script de förekommer i?

Kan man debugga Programfel på något annat sätt? tex i log-fil eller annat?

[Rikard Autostock]

IDn är alltid 10 tecken och fylls om nödvändigt ut med Soace.

[PerG]

Tips på fler saker att undersöka när man får WhileAnalysisJobTodo - aborted due to exception! i simulering, och man bytt ut alla externa objekt, och syntax validerar.

Kan det vara att saker analyserar i i60, och i1 ? och Silver och Guld inte klarar de upplösningarna?

[PerG]

Några ideer på vad mer som kan spöka om man vill modda hajen till andra index vid sidan av extra objekt och prisskript?

[Rikard Autostock]

Har för mig att jag själv hade strul med extraobjekt i viss ordning, dvs jag möblerade om ABC för att komma runt det. Annars ska det inte vara något.

[PerG]

Nu har jag tragglat på ett tag men kommer inte framåt mer än att simuleringen failar när OMX long-scriptet.. (Silver Long nedan) ansluts till simuleringen.
Då det ligger mest logik i det scriptet och mkt saker styr de andra modellerna så är det rimligt.

1)

Saknar Guld eller Silver någon typ av data som skapar problemet?
tex att i1, i60, köp, sälj eller annan kurs som kan leda till problemet.

2)
Finns det någon typ av dokumentation på vilka Gvars som används i NAT-milön så att man kan hålla reda på vad som är upptaget när man modiferar script så att de inte krockar eller bygger egna nya script?

{ Alpha Shark Silver Long 2.1 180913 modd }


reset:=0
band1:=0.6 {0.6}
band2:=1.4 {1.4}
band3:=2.5 {2.5}
period:=40 {40}
hävstång:=1 {2.0 i redovisning}
vinstkrav:=0.005
vinst2:=0.02
vap_threshold1:=100 {100}
vap_threshold2:=40 {40}
hedge_offset:=1 {0.75}

i60(
o_low=cmpref(l,0,c)
o_cl=cmpref(c,0,c)
volla=sub(1,div(aref(o_cl,1),o_cl))
ma50=mov(volla,50,s)
bbl1k=sub(ma50,mult(2.5,stdev(volla,250)))
bbl50=sub(ma50,mult(2,stdev(volla,50)))

vd=sub(bbl50,bbl1k)
rating1=sum(gt(vd,aref(vd,1)),50)
rating2=mult(50,sub(1,div(abs(vd),bbl1k)))
rating3=mx(0,mn(100,mult(sub(add(rating1,rating2),80),2)))


depå=sub(add(cash(a),cash(t)),mult(2,abs(cash(s))))
setgvarif(mult(hävstång,div(depå,3)),897,1)
konto=getgvar(897)
dax=cmpref(c,0,a)
diff=div(dax,c)
idag=and(eqv(int(d),int(date())),eqv(getgvar(888),1))
papper=and(eqv(int(cmpref(c,0,b)),int(c)),idag)
ma10=mov(diff,10,s)
ma20=mov(diff,20,s)
bbu20=add(ma20,mult(band1,stdev(diff,period)))
bbl20=sub(ma20,mult(band1,stdev(diff,period)))
bbu25=add(ma20,mult(band2,stdev(diff,period)))
bbl25=sub(ma20,mult(band2,stdev(diff,period)))
bbu30=add(ma20,mult(band3,stdev(diff,period)))
bbl30=sub(ma20,mult(band3,stdev(diff,period)))
mellan_bb=and(lt(diff,bbu20),gt(diff,bbl20))

protect1=and(hhv(lt(diff,llv(aref(diff,1),700)),20),lt(sum(gt(diff,bbu25),110),2))
protect2=and(hhv(gt(diff,hhv(aref(diff,1),1000)),20),lt(sum(lt(diff,bbl25),200),3))

draw(diff,0,dwae)
draw(bbu20,1,dgpew)
draw(bbl20,2,dgpew)
draw(bbu25,3,bpew)
draw(bbl25,4,bpew)
draw(bbu30,5,rpew)
draw(bbl30,6,rpew)
draw(mult(protect1,50),7,ksef)
draw(mult(protect2,50),8,bsef)

vinst_d=getgvar(898)
gav=abs(portfolio(p))
blankad=lt(portfolio(v),0)
vinst_s=div(sub(gav,c),c)
vinst_l=div(sub(c,gav),c)
vinst_o=if(blankad,vinst_s,vinst_l)
vinst_tot=add(vinst_d,vinst_o)
takeprofit1=gt(vinst_tot,vinstkrav)
ta_hem_vinst=and(mellan_bb,gt(vinst_tot,vinst2))

ej_stig=not(and(llv(gt(ma10,aref(ma10,1)),5),llv(gt(ma10,aref(ma10,1)),1)))
ej_fall=not(and(llv(lt(ma10,aref(ma10,1)),5),llv(lt(ma10,aref(ma10,1)),1)))

delayper=or(eqv(yearnumber(),2012),and(eqv(yearnumber(),2013),le(monthnumber(),6)))
öppet=and(ge(mult(1440,sub(market(c),frac(date()))),6),lt(frac(date()),0.725))
inpådagen=gt(frac(date()),if(ge(yearnumber(),2011),if(delayper,0.3875,0.3775),0.42))

long_omx20=and(and(gt(diff,if(protect1,ma20,bbu20)),and(not(protect2),papper)),or(eqv(getgvar(896),7),and(le(getgvar(896),0),or(gt(rating3,vap_threshold1),or(protect1,takeprofit1)))))
long_omx25=and(and(gt(diff,bbu25),and(not(protect2),papper)),or(eqv(getgvar(896),7),and(le(getgvar(896),1),or(eqv(getgvar(896),1),or(and(ej_stig,gt(rating3,vap_threshold2)),takeprofit1)))))
long_omx30=and(and(or(takeprofit1,{ej_stig}1),gt(diff,bbu30)),papper)
sell_omx=and(and(lt(diff,ma20),gt(portfolio(v),0)),papper)
cover_omx=and(and(gt(diff,ma20),lt(portfolio(v),0)),papper)
shrt_omx20=and(and(lt(diff,if(protect2,ma20,bbl20)),and(not(protect1),papper)),or(eqv(getgvar(896),7),and(ge(getgvar(896),0),or(gt(rating3,vap_threshold1),or(protect2,takeprofit1)))))
shrt_omx25=and(and(lt(diff,bbl25),and(not(protect1),papper)),or(eqv(getgvar(896),7),and(ge(getgvar(896),-1),or(eqv(getgvar(896),-1),or(and(ej_fall,gt(rating3,vap_threshold2)),takeprofit1)))))
shrt_omx30=and(and(or(takeprofit1,{ej_fall}1),lt(diff,bbl30)),papper)


FeedSWE=and(papper,not(eqv(c,GetGvar(1003))))
SetGvarIf(date(),1004,and(papper,FeedSWE))
SetGvarIf(c,1003,papper)
synk2=lt(date(),add(mn(getgvar(1002),getgvar(1004)),div(60,86400)))


setgvarif(1,896,and(idag,and(synk2,and(and(öppet,inpådagen),long_omx20))))
setgvarif(2,896,and(idag,and(synk2,and(and(öppet,inpådagen),long_omx25))))
setgvarif(3,896,and(idag,and(synk2,and(and(öppet,inpådagen),long_omx30)))) 
setgvarif(-1,896,and(idag,and(synk2,and(and(öppet,inpådagen),shrt_omx20))))
setgvarif(-2,896,and(idag,and(synk2,and(and(öppet,inpådagen),shrt_omx25))))
setgvarif(-3,896,and(idag,and(synk2,and(and(öppet,inpådagen),shrt_omx30))))

setiniif(7,896,or(ta_hem_vinst,reset))
setgvarif(7,896,or(ta_hem_vinst,reset))
setgvarif(portfolio(v),1006,papper)
setgvarif(hedge_offset,872,1)

latest=getgvar(896,d)
skriv=and({lt(date(),add(latest,div(1,1440)))}1,getgvar(896))
setiniif(getgvar(896),896,and(öppet,and(inpådagen,and(synk2,skriv))))
setgvarif(getini(896),896,and(not(eqv(getgvar(896),getini(896))),getini(896)))
state1=eqv(getgvar(896),1)
state2=eqv(getgvar(896),2)
state3=eqv(getgvar(896),3)

målantal1=mult(int(div(konto,c)),hedge_offset)
målantal2=if(state1,målantal1,if(state2,mult(2,målantal1),if(state3,mult(3,målantal1),0)))
ej_innehav=le(portfolio(v),mult(målantal2,0.9))
long1=and(and(ej_innehav,or(or(state1,state2),state3)),papper)
long2=and(and(long1,and(inpådagen,öppet)),ge(portfolio(v),0))
mult(long2,10)
)
{@A(60,SIX-GOLD  )@B(60,SIX-SILV  )@C(0,SIX-SILV  )}

[Henric]

Det är nog öppettiden 9-22 för instrumenten som spökar i simulatorn. Prova att byt marknad för både guld och silver.

Edit: Fungerade för mig.

[PerG]

Prova att byt marknad för både guld och silver.

Du menar att byta till Stockholmsbörsens normala öppettider här? Har bytt på både guld och silver men fortfarande samma fel.