
REM XARONS PIVOT-TRIGGER
REM **********************
REM FTSE VARIANTE
REM **********************
REM siehe Infodatei if.txt
REM **********************




REM **********************************
REM *** INDIVIDUELLE EINSTELLUNGEN ***
REM **********************************

REM ***Startkapital***

eq = 3000

REM ***Risiko in Prozent vom Startkapital (unverndert)***

riskpercent = 4


REM ***Portfolio Start***
REM 20040102 = 2. Januar 2004

dt = 20000102


REM ***************************************
REM ** AB HIER NICHTS MEHR VERNDERN ! ****
REM ***************************************




REM ***********************
REM PIVOT-TRIGGER ermitteln
REM ***********************

highD = (high+High[1]+High[2])/3
lowD = (low+low[1]+low[2])/3
piv = (high+low+close)/3
longtrigger = ((2*piv)-lowD)
shorttrigger = ((2*piv)-highD)

REM *************************
REM Risikokapital / Kontrakte
REM *************************

if date >= dt then
if eq*(riskpercent/100) >= longtrigger[1]-shorttrigger[1] then
	rk= (eq*(riskpercent/100))
	rz= (longtrigger[1]-shorttrigger[1])
	kontraktzahl = round(rk/rz)
	
else
	
	kontraktzahl = 0
	
endif
endif

return kontraktzahl
