Halva innehavet

[ali]

Den långa modellen fungerar ju så jag fattar inte att ett negativt värde på innehav gör att den korta inte fungerar ?????

stoppgräns1:=Abs(If(SupRes(U),SupRes(U),3))
larmkod:=If(Abs(Cash(M)),Abs(Cash(M)),0)
lastbuy:=LastTrade(B,P)
innehav:=Gt(Portfolio(v),2)
mv1:=Mov(b,3,s)
fastmfi:=Mov(LinReg(Mfi(3),4),6,e)
mfiner:=Lt(LlvBars(fastmfi,2),1)
i3(
serverok=Gt(GetGVar(999),0)
triggnivå=Sub(lastbuy,stoppgräns1)
stoploss=And(Lt(mv1,triggnivå),Lt(b,triggnivå))
start=if(ge(d,LastTrade(b,d)),b,0)
maxhittills=Mov(hhv(start,5000),4,s)
högstav=Sub(maxhittills,lastbuy)
level1=Sub(maxhittills,stoppgräns1)
flytstopp=And(Lt(b,level1),Lt(mv1,level1))
antalnu=Retval(Portfolio(v),4)
Draw(If(And(Gt(larmkod,0),Gt(innehav,0)),level1,0),9,rqb)
signal1=And(And(And(mfiner,flytstopp),Gt(innehav,0)),Gt(larmkod,0))
signal2=And(serverok,signal1)
Mult(signal2,10)
)

[Rikard Nilsson]

Jag hittade felet! På raden

innehav:=Gt(Portfolio(v),2)

testar du om innehavet är större än 2. Eller mindre än -2 på blanksidan. Samma test görs igen senare, nästan längst ner i scriptet:

signal1=And(And(And(mfiner,flytstopp),Gt(innehav,0)),Gt(larmkod,0))

Det blir konflikt eftersom du definierat om variablen "innehav" så att den returnerar svaret från testet snarare än det aktuella innehavet. Därför blir det aldrig sant om man testar för negativa innehav.

Återställ raden till:

innehav:=Portfolio(v)


och ändra längst ner istället för det antal du vill ha som gräns så funkar det.

[ali]

Ändra så här, den långa behövs inte ändras ???

innehav:=Portfolio(v)


Draw(If(And(Gt(larmkod,0),Gt(innehav,-2)),level1,0),9,rqb)
signal1=And(And(And(mfiner,flytstopp),Gt(innehav,-2)),Gt(larmkod,0))