PureBytes Links
Trading Reference Links
|
Thanks for the help!!!
<BLOCKQUOTE
style="BORDER-LEFT: #006666 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px; PADDING-LEFT: 5px">
<FONT
face=Tahoma>-----Original Message-----From:
owner-metastock@xxxxxxxxxxxxx [mailto:owner-metastock@xxxxxxxxxxxxx]On
Behalf Of Michel AmelinckxSent: donderdag 23 november 2000
0:50To: Metastock User List (E-mail)Subject: Easy
language to MS translation HELP
Hello,
Is there someone who is willing to help me
to translate this system coded in easy language to MS. Many THANKS
in advance
}<FONT
color=#0000ff>inputs:BBLength(38),BBStdDev(3),BBHPrice(ADAPTIVE(H,10)),BBLPrice(ADAPTIVE(L,10));<FONT
color=#0000ff>vars:BBH(0),BBL(0);BBH=BollingerBand(BBHPrice,BBLength,BBStdDev);BBL=BollingerBand(BBLPrice,BBLength,-BBStdDev);<FONT
color=#0000ff>if c >bbh <FONT
color=#0000ff>then buy;<FONT
color=#0000ff>if c<bbl <FONT
color=#0000ff>then sell;<FONT
color=#006400>{P.S. The adaptive function part is Perry Kaufmans:}<FONT
color=#0000ff>inputs:price(<FONT
color=#0000ff>numericseries),period(<FONT
color=#0000ff>numericsimple);<FONT
color=#0000ff>vars: noise(0),signal(0),dif(0),efratio(0), smooth(1),fastend(.666),slowend(.0645),am(0);<FONT
color=#006400>{CALCULATE EFFICIENCY RATIO}dif=@<FONT
color=#8000ff>AbsValue(price - price[1]);<FONT
color=#0000ff>if(<FONT
color=#0000ff>currentbar <= period) <FONT
color=#0000ff>then am =price;<FONT
color=#0000ff>if(<FONT
color=#0000ff>currentbar > period)<FONT
color=#0000ff>then <FONT
color=#0000ff>begin signal = @<FONT
color=#8000ff>AbsValue(price - price[period]); noise = @<FONT
color=#8000ff>summation(dif,period); efratio = signal/noise; smooth = @<FONT
color=#8000ff>Power(efratio*(fastend - slowend) + slowend,2);<FONT
color=#006400>{ADAPTIVE MOVING AVERAGE} am = am[1] + smooth*(price - am[1]); Adaptive=am; <FONT
color=#0000ff>end;
Greeting
Attachment:
Description: " "
Attachment:
Description: " Mickey"
|