|
PureBytes Links
Trading Reference Links
|
Pretty cool DT ! Looks like we can throw out CorelDraw also : - )
Steve
----- Original Message -----
From: "DIMITRIS TSOKAKIS" <TSOKAKIS@xxxxxxxxx>
To: <amibroker@xxxxxxxxxxxxxxx>
Sent: Wednesday, December 24, 2003 12:59 AM
Subject: [amibroker] 2004
> I hope there will be no questions for the following Indicator Builder
> AFL code. Paste it carefully and...
>
> x=Cum(1);L1=LastValue(x);
> F=StochD()+30*sin(Cum(1/5))+20*sin(10*Cum(1/10));
> Plot(F,"",1,styleNoLine+styleNoLabel);
> PlotShapes(shapeStar*(F>95)*(X>L1-180),1+(X%25));
> PlotShapes(shapeHollowStar*(F<30 AND F>10)*(X>L1-180),colorWhite);
> y0=20;y1=60;y=0.5*(y0+y1);Plot(0,"",1,styleNoLine+styleNoLabel);
> Plot(y0+y1,"",1,styleNoLine+styleNoLabel);
> n=4;d0=140;dd=10;
>
> d=d0;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",1,1);
>
> d=d0-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+1],y1[d1],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+1],y1[d1],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+3],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d],y1[d],x[L1-d+1],y[d],0),"",1,1);
>
> d=d-2*dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",1,1);
> Plot(LineArray(x[L1-d+1],y1[d],x[L1-d+4],y0[d],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y0[L1-d-1],x[L1-d-1+5+1],y0[L1-d-
> 1+4],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d],y0[L1-d-1],x[L1-d-1+4],y[L1-d-1+3],0),"",1,1);
> d1=d-n+1;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+2],y0
> [d1],0),"",1,1);d=d-5;
> Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+3],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d],y1[d],x[L1-d+1],y[d],0),"",1,1);
>
> d=d-7;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y0[L1-d-1],x[L1-d-1+5+1],y0[L1-d-
> 1+4],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",1,1);
>
> d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",1,1);
> Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",1,1);
> Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d-
> 1+4],0),"",1,1);
> d1=d-n;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+1],y1[d1],0),"",1,1);
> Plot(LineArray(x[L1-d],y[d],x[L1-d+5],y0[d],0),"",1,1);
> Title="";
>
> Dimitris Tsokakis
>
>
>
>
> 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/
>
>
>
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/
|