|
PureBytes Links
Trading Reference Links
|
Do you mean it was extended into the blank
space to the right? Is that now
possible?
Regards,
Peter
-----Original Message-----
From: aff392
[mailto:aff392@xxxxxxxxxxx]
Sent: Friday, July 25, 2003 4:39
PM
To: amibroker@xxxxxxxxxxxxxxx
Subject: [amibroker] Re: Tomasz
Gartley 222 code help-Challenge
Tomasz,
Thank you for your quick response. When I
tried to use Stephane DLL
the line starts at the correct place but extends
all the way to the
right edge.
I will study your third option "AmiBroker's
user-definable function"
and the example that you provided and see if I can
implement.
Thanks Again
Art Fitz
--- In amibroker@xxxxxxxxxxxxxxx, "Tomasz
Janeczko" <amibroker@xxxx>
wrote:
> Hello,
>
> Why don't you want to use Stephane DLL ?
> Also trend line drawing could be implemented
as show in the
newsletter
> <a
href="">http://www.amibroker.com/newsletter/04-2000.html
>
> Third option is to use AmiBroker's
user-definable funcitons,
> an example of DrawLine( startbar, starty,
endbar, endy )
> funciton is given below:
>
> SetBarsRequired( 10000, 10000 );
>
> procedure DrawLine( startbar, starty, endbar,
endy, Color )
> {
> Line = Null; //initialize
>
> for( i = startbar; i <= endbar
&& i < BarCount; i++ )
> {
> Line[ i ] = starty + ( i -
startbar ) * ( endy - starty )/
(endbar - startbar );
> }
>
> Plot( Line, "", Color
);
> }
>
> Plot( Close, "Price", colorBlack,
styleCandle );
> DrawLine( 4, Low[ 4 ], 50, High[ 50 ],
colorBlue ); // plots line
from Low of bar 4 to High of bar 50
>
>
>
> Best regards,
> Tomasz Janeczko
> amibroker.com
> ----- Original Message -----
> From: "aff392" <aff392@xxxx>
> To: <amibroker@xxxxxxxxxxxxxxx>
> Sent: Friday, July 25, 2003 10:05 PM
> Subject: [amibroker] Re: Tomasz Gartley 222
code help-Challenge
>
>
> >
> > Tomasz,
> >
> > Not sure if you read Active Trader or
not but could AmiBroker
> > be coded as discussed in the August
issue article for Gartley 222
> > patterns with charting capability.
Seems that the only feature
> > missing is some kind of Line Drawing
function similar to Stephane
> > scTrendline DLL. Are their any
functions that are available or
> > comming soon that provide a drawline
function that was used in
the
> > Wealth-Lab code as shown at
> > <a
href="">http://www.activetradermag.com/code.htm#aug03
> >
> > I Would like to program the Gartley code
via AmiBroker.
> >
> > Should I Submit suggestion at Amibroker
Home page?
> >
> > Thanks for any consideration or
direction.
> >
> > Art Fitz
> >
> > --- In amibroker@xxxxxxxxxxxxxxx,
"aff392" <aff392@xxxx> wrote:
> > > In the August Issue of Active
Trader (p.38) Arron Behle and
Mark
> > > Conway quantify the makeup of a
Gartley 222 pattern and
provide a
> > > trading system with charting
capability via
> > > Wealth-lab and Tradestation code at
> > > <a
href="">http://www.activetradermag.com/code.htm#aug03
> > >
> > > I've been trying to convert the
wealthlab version into AB code
> > > without much success (I am not a
programmer). I removed or
> > > commented out the buy, sell etc
portions from the code to make
it
> > > easier to convert just the
Indicator portion into AmiBroker
code
> > and
> > > am at a stand still with the
following:
> > >
> > > Has anyone else tried to convert
this code to AB or provide any
> > help
> > > to finish/correct what I've
started/massacred.
> > >
> > > TIA.
> > > Art Fitz
> > >
> > > // conversion TRY starts here
> > > GraphXSpace=5;
> > >
VPFactor=Param("VPFactor",2.0,1,10,1);
> > >
Tolerance=Param("Tolerance",0.1,0.1,2,0.1);
> > >
Lookback=Param("Lookback",20,10,40,1);
> > >
HoldBars=Param("HoldBars",7,1,20,1);
> > > VolMin=Param("VolMin",100000,50000,1000000,25000);
> > >
> > > //Fibonacci Constants
> > > F1= 0.618;
> > > F2= 0.786;
> > > F3= 1.27;
> > > F4= 1.618;
> > >
> > >
Bar=Param("Bar",10,0,1000,1);
> > > ATRValue = ATR(Lookback);
> > > VP = 100 * ATRValue / Ref(C,-Bar);
> > >
> > > //Find peaks AND troughs
> > >
> > > P1=Peak( High,Bar, 1);
> > > P1Bar=PeakBars(High,Bar,1);
> > > P2=Peak( High,Bar, 2);
> > > P2Bar=PeakBars(High,Bar,2);
> > > T1=Trough(Low,5,1);
> > > T1Bar=TroughBars(Close,5,1);
> > > T2=Trough(Low,5,2);
> > > T2Bar=TroughBars(Close,5,2);
> > >
> > > //Test for a bullish 222}
> > > //Trough X is T2}
> > > //Peak A is P2}
> > > //Trough B is T1}
> > > //Peak C is P1}
> > > //D is the Buy zone}
> > > D = Ref(L,-Bar);
> > > PTValid = (P1Bar > T1Bar) AND
(T1Bar > P2Bar) AND (P2Bar >
T2Bar);
> > > HLValid = (P1 < P2) AND (T1 >
T2) AND (P1 > T1);
> > > InZone = (D < T1) AND (D >
T2);
> > >
> > > //if (MarketPosition = 0) AND
> > > //(SMA(Bar, #Volume, Lookback)
>= VolMin) AND
> > > //(PTValid) AND (HLValid) AND (InZone)
then
> > > //begin
> > > XA = P2 - T2;
> > > AB = P2 - T1;
> > > BC = P1 - T1;
> > > XD = P2 - (F2 * XA);
> > > CD = P1 - XD;
> > > AD = P2 - XD;
> > > ABdXA = AB / XA; //AB should be
61.8% of XA}
> > > C1 = (ABdXA > F1 - Tolerance)
AND (ABdXA < F1 + Tolerance);
> > > BCdAB = BC / AB; //BC should be
61.8-78.6% of AB}
> > > C2 = (BCdAB > F1 - Tolerance)
AND (BCdAB < F2 + Tolerance);
> > > CDdBC = CD / BC; //CD should be
127-161.8% of BC}
> > > C3 = (CDdBC > F3 - Tolerance)
AND (CDdBC < F4 + Tolerance);
> > > ADdXA = AD / XA; //AD should be
78.6% of XA}
> > > C4 = (ADdXA > F2 - Tolerance)
AND (ADdXA < F2 + Tolerance);
> > >
> > > Plot(C,"",
colorBlack,styleCandle+styleNoLabel);
> > >
> > > /* HOW TO CONVERT SOMETHING LIKE
THIS:
> > > if C1 and C2 and C3 and C4 then
> > > begin
> > > DrawLine(P2Bar, P2, T2Bar, T2, 0,
#Blue, #Solid);
> > > DrawLine(T1Bar, T1, P2Bar, P2, 0,
#Blue, #Solid);
> > > DrawLine(P1Bar, P1, T1Bar, T1, 0,
#Blue, #Solid);
> > > DrawLine(Bar, D, P1Bar, P1, 0,
#Blue, #Solid);
> > > DrawLine(Bar, D, T1Bar, T1, 0,
#Blue, #Dotted);
> > > DrawLine(Bar, D, T2Bar, T2, 0,
#Blue, #Dotted);
> > >
> > > */
> > > //TO SOMETHING LIKE THIS FOR EACH
LINE OF GARTLEY 222:
> > > IIf((C1 AND C2 AND C3 AND C4 AND
(PTValid) AND (HLValid) AND
> > > (InZone)),Plot(scTrendLine(P2,T2,P2Bar,T2Bar),"",4),0);
> > >
> > >
> > >
> > >
> > > //Test for a bearish 222}
> > > //Peak X is P2}
> > > //Trough A is T2}
> > > //Peak B is P1}
> > > //Trough C is T1}
> > > //D is the Short zone}
> > > D = Ref(H,-Bar);
> > > PTValid = (T1Bar > P1Bar) AND
(P1Bar > T2Bar) AND (T2Bar >
P2Bar);
> > > HLValid = (T1 > T2) AND (P1 <
P2) AND (T1 < P1);
> > > InZone = (D > P1) AND (D <
P2);
> > > //if (MarketPosition = 0) AND
> > > //(PriceClose( Bar ) >= 5) AND
> > > //(SMA(Bar, #Volume, Lookback)
>= VolMin) AND
> > > //(PTValid) AND (HLValid) AND
(InZone) then
> > > //begin
> > > XA = P2 - T2;
> > > AB = P1 - T2;
> > > BC = P1 - T1;
> > > XD = T2 + (F2 * XA);
> > > CD = XD - T1;
> > > AD = XD - T2;
> > > ABdXA = AB / XA; //AB should be
61.8% of XA}
> > > C1 = (ABdXA > F1 - Tolerance)
AND (ABdXA < F1 + Tolerance);
> > > BCdAB = BC / AB; //BC should be
61.8-78.6% of AB}
> > > C2 = (BCdAB > F1 - Tolerance)
AND (BCdAB < F2 + Tolerance);
> > > CDdBC = CD / BC; //CD should be
127-161.8% of BC}
> > > C3 = (CDdBC > F3 - Tolerance)
AND (CDdBC < F4 + Tolerance);
> > > ADdXA = AD / XA; //AD should be
78.6% of XA}
> > > C4 = (ADdXA > F2 - Tolerance)
AND (ADdXA < F2 + Tolerance);
> > >
> > > /* HOW TO CONVERT SOMETHING LIKE
THIS:
> > > if C1 and C2 and C3 and C4 then
> > > begin
> > > DrawLine(T2Bar, T2, P2Bar, P2, 0,
#Red, #Solid);
> > > DrawLine(P1Bar, P1, T2Bar, T2, 0,
#Red, #Solid);
> > > DrawLine(T1Bar, T1, P1Bar, P1, 0,
#Red, #Solid);
> > > DrawLine(Bar, D, T1Bar, T1, 0,
#Red, #Solid);
> > > DrawLine(Bar, D, P1Bar, P1, 0,
#Red, #Dotted);
> > > DrawLine(Bar, D, P2Bar, P2, 0,
#Red, #Dotted);
> > >
> > > */
> > > //TO SOMETHING LIKE THIS FOR EACH
LINE OF GARTLEY 222:
> > > IIf((C1 AND C2 AND C3 AND C4 AND
(PTValid) AND (HLValid) AND
> > > (InZone)),Plot(scTrendLine(T2,P2,T2Bar,P2Bar),"",4),0);
> >
> >
> >
> > Send BUG REPORTS to bugs@xxxx
> > Send SUGGESTIONS to suggest@xxxx
> >
-----------------------------------------
> > Post AmiQuote-related messages ONLY to:
amiquote@xxxxxxxxxxxxxxx
> > (Web page: <a
href="">http://groups.yahoo.com/group/amiquote/messages/)
> >
--------------------------------------------
> > Check group FAQ at:
<a
href="">http://groups.yahoo.com/group/amibroker/files/groupfaq.html
> >
> > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
> >
> >
> >
<font size=2
face="Courier New">Send BUG REPORTS to
bugs@xxxxxxxxxxxxx<span
>
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to:
amiquote@xxxxxxxxxxxxxxx
(Web page: <a
href="">http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: <a
href="">http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Your use of
Yahoo! Groups is subject to the Yahoo!
Terms of Service.
Yahoo! Groups Sponsor
ADVERTISEMENT
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
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
|