|
PureBytes Links
Trading Reference Links
|
Perhaps this is a good time to offer PO and Volker my first rate
'mediation' service @ 50,000 euros per hour, billed via Brussels.
>>
>>
>> Now that's good Marketing, Volker!
>>
PO> Not so bad, but I believed that it was an Omega List, not a WealthLab list.
PO> Not enough room on your own list or should I advertise there too?
PO> Looking at the active trader web, I saw this Jewel using WS scipt language.
PO> It'a a moving average crossover system.
PO> Wow! I'm able to write the same using 50% less typing in easy language.
PO> May I understand that WS scipt is good to self teach fast typing ?
PO> Sincerely (humm...),
PO> Pierre Orphelin
PO> www.sirtrade.com
PO> TradeStation Technologies representative in France
PO> Safir-X neurofuzzy logic trading system builder
PO> To subscribe to our FREE trading system newsletter:
PO> http://www.sirtrade.com/newsletter.htm
PO> Description: From the article "Moving Average Crossover" in the Trading System
PO> Lab section of the July 2002 issue.
PO> This script implements the moving average crossover system described in the
PO> article, including the additional ATR based exit condition.
PO> WealthScript code: The following WealthScript code can also be used at the
PO> Wealth-Lab.com Web site, or in the Wealth-Lab Developer 2.1 desktop software
PO> product.
PO> var Bar, SMALong, SMAShort: integer;
PO> SMAShort := SMASeries( #Close, 9 );
PO> SMALong := SMASeries( #Close, 36 );
PO> PlotSeries( SMAShort, 0, #Red, #Thin );
PO> PlotSeries( SMALong, 0, #Blue, #Thin );
PO> for Bar := 36 to BarCount - 1 do
PO> begin
PO> if LastPositionActive then
PO> begin
PO> if CrossUnder( Bar, SMAShort, SMALong ) then
PO> SellAtMarket( Bar + 1, LastPosition, 'SMA' )
PO> else if
PO> PriceClose( Bar ) < PositionEntryPrice( LastPosition ) - ATR( Bar, 10 ) * 4
PO> then
PO> SellAtMarket( Bar + 1, LastPosition, 'ATR' );
PO> end
PO> else if CrossOver( Bar, SMAShort, SMALong ) then
PO> BuyAtMarket( Bar + 1, 'SMA' );
PO> end;
--
Best regards,
Michael mailto:michaelstewart@xxxxxxxxxxxxx
|