Tradestation / Investox: Trading the Equity Code

Ich hätte eine Bitte an euch. Könnte mir einer das System, welches in der Dezember Ausgabe von Traders erschienen ist, in den Tradestationcode umwandeln ?
Wie kann man dies mit Easylanguage realisieren ?

Aus Traders´ Dezember 2003 - Surf The Eqity für Investox

Traders Dezember 2003 –
Surf the equity - Auf der Kapitalkurve reiten (http://www.Investox.de)

GrundSystem:

Enter Long:
ROC(Close, 15, $) > 0
Enter Short:
ROC(Close, 15, $) 0
------------------------------------------------------------------
System „Kapitalanalyse Version 1“:

Enter Long:
KapitalSteigt And Regel
Exit Long:
Not KapitalSteigt
Enter Short:
KapitalSteigt And Not Regel
Exit Short:
Not KapitalSteigt
Definitionen:
calc Regel: ROC(Close, 15, $) > 0; {Das Grundsystem}
{Die Kapitalkurve des Grundsystems}
global calc Kapital: #_Kapital Grundsystem#;
{Die über 60 Perioden geglättete Kapitalkurve steigt im Zeitraum
innerhalb der letzten 10 Perioden:}
global calc KapitalSteigt: ROC(GD(Kapital, 60, s), 10, $) > 0;
------------------------------------------------------------------
Investox-Code für System „Kapitalanalyse 2“:

Enter Long:
{wenn die Kapitalkurve im Grundsystem steigt, verwende Regel 1, ansonsten Regel 2 für Long:}
If(KapitalSteigt, Regel1, Regel2Long)
Enter Short:
{wenn die Kapitalkurve im Grundsystem steigt, verwende die Umkehrung von Regel 1, also Rate-of-Change 0, ansonsten die Regel 2 für Short:}
If(KapitalSteigt, Not Regel1, Regel2Short)
Definitionen:
calc Regel1: ROC(Close, 15, $) > 0; {das Grundsystem:}
{die Kapitalkurve des Grundsystems:}
calc Kapital: #_Kapital Grundsystem#;
{die Alternativ-Strategie, Overbought/-sold:}
calc Regel2Long: RSI(close, 5) 25; {Oversold}
calc Regel2Short: RSI(close, 5) > 55; {Overbought}
{Die über 60 Perioden geglättete Kapitalkurve steigt
im Zeitraum innerhalb der letzten 10 Perioden}
global calc KapitalSteigt: ROC(GD(Kapital, 60, S), 10, $) > 0;