|
PureBytes Links
Trading Reference Links
|
If this example of TC2000 code doesn't make you appreciate how beautiful AFL
is, I don't know what it will take:
>From a TC2000 group:
Does this look like the exponential 10 day ATR?
((((((((((((((L.10 >= C1.10) * C1 + (L.10 < C1.10) * L.10 - (H.10 <
C1.10) * C1.10 - (H.10 >= C1.10) * H.10 + (L1.10 >= C2.10) * C2.10 +
(L1.10 < C2.10) * L1.10 - (H1.10 < C2.10) * C2.10 - (H1.10 >= C2.10) *
H1.10 + (L2.10 >= C3.10) * C3.10 + (L2.10 < C3.10) * L2.10 - (H2.10 <
C3.10) * C3.10 - (H2.10 >= C3.10) * H2.10 + (L3.10 >= C4.10) * C4.10 +
(L3.10 < C4.10) * L3.10 - (H3.10 < C4.10) * C4.10 - (H3.10 >= C4.10) *
H3.10 + (L4.10 >= C5.10) * C5.10 + (L4.10 < C5.10) * L4.10 - (H4.10 <
C5.10) * C5.10 - (H4.10 >= C5.10) * H4.10 + (L5.10 >= C6.10) * C6.10 +
(L5.10 < C6.10) * L5.10 - (H5.10 < C6.10) * C6.10 - (H5.10 >= C6.10) *
H5.10 + (L6.10 >= C7.10) * C7.10 + (L6.10 < C7.10) * L6.10 - (H6.10 <
C7.10) * C7.10 - (H6.10 >= C7.10) * H6.10 + (L7.10 >= C8.10) * C8.10 +
(L7.10 < C8.10) * L7.10 - (H7.10 < C8.10) * C8.10 - (H7.10 >= C8.10) *
H7.10 + (L8.10 >= C9.10) * C9.10 + (L8.10 < C9.10) * L8.10 - (H8.10 <
C9.10) * C9.10 - (H8.10 >= C9.10) * H8.10 + (L9.10 >= C10.10) * C10.10 +
(L9.10 < C10.10) * L9.10 - (H9.10 < C10.10) * C10.10 - (H9.10 >= C10.10)
* H9.10) / 10) * .818 + ((L9 >= C10) * C10 + (L9 < C10) * L9 - (H9 <
C10) * C10 - (H9 >= C10) * H9)) * .182) * .818 + ((L8 >= C9) * C9 + (L8
< C9) * L8 - (H8 < C9) * C9 - (H8 >= C9) * H8) * .182) * .818 + ((L7 >=
C8) * C8 + (L7 < C8) * L7 - (H7 < C8) * C8 - (H7 >= C8) * H7) * .182) *
.818 + ((L6 >= C7) * C7 + (L6 < C7) * L6 - (H6 < C7) * C7 - (H6 >= C7) *
H6) * .182) * .818 + ((L5 >= C6) * C6 + (L5 < C6) * L5 - (H5 < C6) * C6
- (H5 >= C6) * H5) * .182) * .818 + ((L4 >= C5) * C5 + (L4 < C5) * L4 -
(H4 < C5) * C5 - (H4 >= C5) * H4) * .182) * .818 + ((L3 >= C4) * C4 +
(L3 < C4) * L3 - (H3 < C4) * C4 - (H3 >= C4) * H3) * .182) * .818 + ((L2
>= C3) * C3 + (L2 < C3) * L2 - (H2 < C3) * C3 - (H2 >= C3) * H2) * .182)
* .818 + ((L1 >= C2) * C2 + (L1 < C2) * L1 - (H1 < C2) * C2 - (H1 >= C2)
* H1) * .182) * .818 + ((L >= C1) * C1 + (L < C1) * L - (H < C1) * C1 -
(H >= C1) * H ) * .182)
Rik Rasmussen
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/GHeqlB/TM
---------------------------------------------------------------------~->
Send BUG REPORTS to bugs@xxxxxxxxxxxxx
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
(Web page: http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|