PureBytes Links
Trading Reference Links
|
HI Preston,
Can you help with the Metastock equivalent of the following wealthlab code. Thanks Regards
Ajay
The link to page is
http://www.wealth-lab.com/cgi-bin/WealthLab.DLL/editsystem?id=40126
code:
var Bar, i, n: integer;
for Bar := FirstActualBar + 31 to BarCount - 1 do
if Lowest(Bar, ROCSeries(#Close, 1), 2) > 0 then SellAtMarket(Bar + 1, #All, '')
else if (52 * Highest(Bar, ROCSeries(#Close, 1), 3) < 15 + 12 * StdDev(Bar, ROCSeries(#Close, 1), 31))
and (3 * LinearRegSlope(Bar, ROCSeries(#Close, 1), 3) < 19)
and (Highest(Bar - 1, RSISeries(#Close, 31), 31) > 60)
and (46 * StdError(Bar, #Close, 31) > PriceClose(Bar))
and (53 * SMA(Bar, #Volume, 31) > 24 * Volume(Bar))
and (PriceOpen(Bar) > PriceLow(Bar))
and (3 * ATRP(Bar, 31) > 7) then
begin
var Priority: float = TurnUp(Bar, #Close) + TurnDown(Bar, #Close) - ROC(Bar, #Close, 4);
n := 1 + ActivePositionCount; if n > 16 then n := 1;
if n < Priority then n := trunc(Priority);
for i := 1 to n do
if BuyAtMarket(Bar + 1, FloatToStr(Priority - i)) then SetPositionPriority(LastPosition, Priority - i);
end;
Download prohibited? No problem! To chat from any browser without download, Click Here: http://in.messenger.yahoo.com/webmessengerpromo.php
[Non-text portions of this message have been removed]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/equismetastock/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/equismetastock/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:equismetastock-digest@xxxxxxxxxxxxxxx
mailto:equismetastock-fullfeatured@xxxxxxxxxxxxxxx
<*> To unsubscribe from this group, send an email to:
equismetastock-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|