|
PureBytes Links
Trading Reference Links
|
If you want a hand from others here your best bet is to explain the
original problem/goal in words ...
--- In amibroker@xxxxxxxxxxxxxxx, "coba702002" <coba702002@xxx> wrote:
>
> Tomasz
> With all due respect I wasn't asking for anyone to 'debug' the
code,
> I was just looking for ideas from more skilled code writers then I,
> on what might be wrong with the code. I thought thats what this
rooms
> purpose was?
>
> What I was trying to acheive was to calculate the square or nine
and
> display or plot that value as a line but only close to the
> current 'c' price as to not mess up autoscaling. The numbers it
> calculates are correct... but I guess its not a efficient or even
> correct way to show it.?
>
> And yes from my understanding in order to calc the sq of 9 #'s, in
> the YM, for example, there are sq9 numbers from 0 to the current
> close price (ie 10900ish) I thought by limiting the plot portion
(as
> shown below) would cut down on the lines being plotting (for
> autoscale issues AND to do less work in the program????
>
> if (roundedValue[LastBar]< (HHVBarsSince[Lastbar])
> > >> >> > AND roundedValue[LastBar]>(LLVBarsSince[Lastbar]) ){
> > >> >> > Plot(Prec(roundedValue,2), "",
> > >> >> > colorGrey40|styleLine, -(LLVBarsSince[Lastbar]),
> (HHVBarsSince
> > >> >> > [Lastbar]));
>
> Thanks again
> brian
>
> --- In amibroker@xxxxxxxxxxxxxxx, "Tomasz Janeczko" <amibroker@>
> wrote:
> >
> > Hello,
> >
> > Debugging your code is YOUR task, not ours.
> >
> > From what I can see your code calls Plot hundreds (or even
> thousands) of times
> > inside the loop. If this is the case it is not suprising it works
> slow.
> >
> > Use _TRACE function and DebugView to find out.
> > http://www.amibroker.com/guide/afl/afl_view.php?name=_TRACE
> >
> > BTW: you don't even say what this code is supposed to do, from
> > the code it looks like it plots thousands of horizontal lines
(what
> for?).
> >
> > Again: learn to debug your own code.
> >
> > Best regards,
> > Tomasz Janeczko
> > amibroker.com
> > ----- Original Message -----
> > From: "coba702002" <coba702002@>
> > To: <amibroker@xxxxxxxxxxxxxxx>
> > Sent: Sunday, February 05, 2006 9:51 PM
> > Subject: [amibroker] Re: Help with code bringing Ami to a
grinding
> halt
> >
> >
> > > HI Tomasz
> > >
> > > Ok I have revised my incorrect code and removed other code to
try
> > > and pinpoint the problem, but I still get weird things
happening
> > > even without datafeed, which Im sure tomorrow when I have data
> will
> > > make the AMI unusable. Right now when I insert that code below
> into
> > > a new window switching between that window and others is ALOT
> slower
> > > ALSO when I select>>view and open say charts it will not open
the
> > > pane until I minimize ami and restore ami then it shows up...
If
> I
> > > try and close that pane it will not close until I Minimize ami
> and
> > > then restore , then its gone. This Problem Does not show up
> without
> > > this code in any windows???
> > >
> > > Thanks for any thoughts or ideas to fix this
> > >
> > > Brian
> > >
> > > range2=95;
> > > LastBar = BarCount-1;
> > > HiVal2 = HHV(H,range2);
> > > LoVal2 = LLV(L,range2);
> > >
> > > step = 8;
> > > for( i = 0; i < BarCount; i++ )
> > > {
> > > if(HiVal2[i] >1.0 AND HiVal2[i]<=25 )
> > > set = 30;
> > > else if (HiVal2[i]>25 AND HiVal2[i]<=50 )
> > > set = 55;
> > > else if (HiVal2[i]>50 AND HiVal2[i]<=100 )
> > > set = 120;
> > > else if (HiVal2[i]>100 AND HiVal2[i]<=200 )
> > > set = 220;
> > > else if (HiVal2[i]>200 AND HiVal2[i]<=500 )
> > > set = 510;
> > > else if (HiVal2[i]>500 AND HiVal2[i]<=900 )
> > > set = 920;
> > > else if (HiVal2[i]>9000 AND HiVal2[i]<=13000 )
> > > set = 13000;
> > > else set = 13000;
> > >
> > > }
> > >
> > > maxDegreesZero = set;
> > > degreesZero = 1;
> > > increment = 1;
> > > degreesValueInt = 0;
> > > angleFactor = 0;
> > > sqrtDegreesZero = 0;
> > > degreesValue = 0;
> > >
> > >
> > >
> > > // Iterate through the set of squares
> > > while (degreesZero < maxDegreesZero)
> > > {
> > > sqrtDegreesZero = sqrt(degreesZero);
> > >
> > > // Iterate through the circle for this square, in
> 11.25
> > > degree increments
> > > for (angle = 0; angle < 360; angle = angle + 11.25)
> > > {
> > > angleFactor = (angle / 360.0) * 2.0;
> > > degreesValue = (sqrtDegreesZero +
> > > angleFactor) ^ 2;
> > >
> > > roundedValue = round(degreesValue);
> > >
> > >
> > > HHVBarsSince = HHV(H, 30) ;
> > > LLVBarsSince = LLV(L, 30) ;
> > >
> > >
> > > if (roundedValue[LastBar]< (HHVBarsSince[Lastbar])
> > > AND roundedValue[LastBar]>(LLVBarsSince[Lastbar]) ){
> > > Plot(Prec(roundedValue,2), "",
> > > colorGrey40|styleLine, -(LLVBarsSince[Lastbar]),(HHVBarsSince
> > > [Lastbar]));
> > >
> > > }
> > >
> > > }
> > >
> > > // Find the next 0 degree value
> > > degreesZero = degreesZero + increment;
> > > increment = increment + step;
> > > }
> > >
> > > // End Square Of Nine ************
> > >
> > > PlotOHLC(Open,High,Low,Close,"",colorBlack, styleCandle);
> > >
> > > TitleStr= Interval(2) ;
> > >
> > >
> > > Title = TitleStr;
> > >
> > > --- In amibroker@xxxxxxxxxxxxxxx, "Tomasz Janeczko"
<amibroker@>
> > > wrote:
> > >>
> > >> Hello,
> > >>
> > >> No, I am referring to IIFs at the beginning that are written
> > > incorrectly. I did not even
> > >> check further since the beginning of the code is wrong.
> > >> You are mixing up if (statement) with iif (function)
> > >>
> > >> Best regards,
> > >> Tomasz Janeczko
> > >> amibroker.com
> > >> ----- Original Message -----
> > >> From: "coba702002" <coba702002@>
> > >> To: <amibroker@xxxxxxxxxxxxxxx>
> > >> Sent: Saturday, February 04, 2006 9:05 PM
> > >> Subject: [amibroker] Re: Help with code bringing Ami to a
> grinding
> > > halt
> > >>
> > >>
> > >> > Thanks for your fast response... I can't test it today, no
> > > datafeed
> > >> > But just glancing at it, are you referring to the rounding
> > > section
> > >> > of the code? If so Im pretty sure that didn't make any
> > > difference
> > >> > when it wasn't in there.
> > >> >
> > >> > So what your saying is this code once correct shouldn't be a
> > > problem
> > >> > working in an indicator VS a plain jane price chart in real
> > > time?
> > >> > My test comparison of the two was a MAJOR slowdown with my
> code
> > >> > added.
> > >> >
> > >> > Thanks again for any thoughts
> > >> > Brian
> > >> >
> > >> > --- In amibroker@xxxxxxxxxxxxxxx, "Tomasz Janeczko"
> <amibroker@>
> > >> > wrote:
> > >> >>
> > >> >> The code contains numerous errors listed in "common coding
> > >> > mistakes" in the User's Guide:
> > >> >>
> > >> >> http://www.amibroker.com/guide/a_mistakes.html
> > >> >>
> > >> >> Best regards,
> > >> >> Tomasz Janeczko
> > >> >> amibroker.com
> > >> >> ----- Original Message -----
> > >> >> From: "coba702002" <coba702002@>
> > >> >> To: <amibroker@xxxxxxxxxxxxxxx>
> > >> >> Sent: Saturday, February 04, 2006 8:10 PM
> > >> >> Subject: [amibroker] Help with code bringing Ami to a
> grinding
> > > halt
> > >> >>
> > >> >>
> > >> >> > Can anyone help me figure out why when I add a window
with
> > > this
> > >> > code
> > >> >> > in it.. Ami (ver-4.76, windows xp, Ib tws 1.51) slows
down
> to
> > >> >> > unusable levels. ie switching windows takes forever...
> > > candles
> > >> > seem
> > >> >> > stuck then suddenly change price.
> > >> >> >
> > >> >> > Is there a way to make this code work???
> > >> >> >
> > >> >> > any help or ideas would be greatly appreciated
> > >> >> >
> > >> >> > Thanks
> > >> >> > Brian
> > >> >> >
> > >> >> > // Begin Square Of Nine ************
> > >> >> >
> > >> >> > range2=95;
> > >> >> > LastBar = BarCount-1;
> > >> >> > HiVal2 = HHV(H,range2);
> > >> >> > LoVal2 = LLV(L,range2);
> > >> >> >
> > >> >> > step = 8;
> > >> >> > IIf(HiVal2>1.0 AND HiVal2<=25 ,set = 30,0);
> > >> >> > IIf(HiVal2>25 AND HiVal2<=50 ,set = 55,0);
> > >> >> > IIf( (HiVal2>50 AND HiVal2<=100 ),set = 120,0);
> > >> >> > IIf( (HiVal2>100 AND HiVal2<=200 ),set = 220,0);
> > >> >> > IIf( (HiVal2>200 AND HiVal2<=500 ),set = 510,0);
> > >> >> > IIf( (HiVal2>500 AND HiVal2<=900 ),set = 920,0);
> > >> >> > IIf( (HiVal2>9000 ),set = 13000,0);
> > >> >> > maxDegreesZero = set;
> > >> >> > degreesZero = 1;
> > >> >> > increment = 1;
> > >> >> > degreesValueInt = 0;
> > >> >> > angleFactor = 0;
> > >> >> > sqrtDegreesZero = 0;
> > >> >> > degreesValue = 0;
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> > // Iterate through the set of squares
> > >> >> > while (degreesZero < maxDegreesZero)
> > >> >> > {
> > >> >> > sqrtDegreesZero = sqrt(degreesZero);
> > >> >> >
> > >> >> > // Iterate through the circle for this square,
> in
> > >> > 11.25
> > >> >> > degree increments
> > >> >> > for (angle = 0; angle < 360; angle = angle +
> 11.25)
> > >> >> > {
> > >> >> > angleFactor = (angle / 360.0) * 2.0;
> > >> >> > degreesValue = (sqrtDegreesZero +
> > >> >> > angleFactor) ^ 2;
> > >> >> >
> > >> >> > // round either to tenths, quarters, OR wholes
> > >> >> > if (degreesValue <= 450)
> > >> >> > {
> > >> >> > degreesValue = degreesValue
> > >> >> > * 10;
> > >> >> > roundedValue = Prec
> > >> >> > (degreesValue,2) / 10;
> > >> >> > }
> > >> >> > else if (degreesValue > 450 AND degreesValue
> > >> >> > < 5000)
> > >> >> > {
> > >> >> > remainder = frac(degreesValue);
> > >> >> > intValue = degreesValue - remainder;
> > >> >> > if (remainder > 0 AND remainder
> > >> >> > <= .25)
> > >> >> > remainder = .25;
> > >> >> > else if (remainder > .25 AND
> > >> >> > remainder <= .5)
> > >> >> > remainder = .5;
> > >> >> > else if (remainder > .5 AND
> > >> >> > remainder <= .75)
> > >> >> > remainder = .75;
> > >> >> > else
> > >> >> > remainder = 1;
> > >> >> > roundedValue = intValue +
> > >> >> > remainder;
> > >> >> > }
> > >> >> > else
> > >> >> > {
> > >> >> > roundedValue = round(degreesValue);
> > >> >> >
> > >> >> > }
> > >> >> >
> > >> >> >
> > >> >> > HHVBarsSince = HHV(H, 30) ;
> > >> >> > LLVBarsSince = LLV(L, 30) ;
> > >> >> >
> > >> >> >
> > >> >> > //if (roundedValue[LastBar]<(45) AND roundedValue
> > >> >> > [LastBar]>(30) ){
> > >> >> > if (roundedValue[LastBar]< (HHVBarsSince[Lastbar])
> > >> >> > AND roundedValue[LastBar]>(LLVBarsSince[Lastbar]) ){
> > >> >> > Plot(Prec(roundedValue,2), "",
> > >> >> > colorGrey40|styleLine, -(LLVBarsSince[Lastbar]),
> (HHVBarsSince
> > >> >> > [Lastbar]));
> > >> >> >
> > >> >> > }
> > >> >> >
> > >> >> > }
> > >> >> >
> > >> >> > // Find the next 0 degree value
> > >> >> > degreesZero = degreesZero + increment;
> > >> >> > increment = increment + step;
> > >> >> > }
> > >> >> >
> > >> >> > // End Square Of Nine ************
> > >> >> >
> > >> >> > PlotOHLC(Open,High,Low,Close,"",colorBlack, styleCandle);
> > >> >> >
> > >> >> > TitleStr= Interval(2) ;
> > >> >> >
> > >> >> >
> > >> >> > Title = TitleStr;
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> > Please note that this group is for discussion between
users
> > > only.
> > >> >> >
> > >> >> > To get support from AmiBroker please send an e-mail
> directly
> > > to
> > >> >> > SUPPORT {at} amibroker.com
> > >> >> >
> > >> >> > For other support material please check also:
> > >> >> > http://www.amibroker.com/support.html
> > >> >> >
> > >> >> >
> > >> >> > Yahoo! Groups Links
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >> >
> > >> >>
> > >> >
> > >> >
> > >> >
> > >> >
> > >> >
> > >> >
> > >> >
> > >> > Please note that this group is for discussion between users
> only.
> > >> >
> > >> > To get support from AmiBroker please send an e-mail directly
> to
> > >> > SUPPORT {at} amibroker.com
> > >> >
> > >> > For other support material please check also:
> > >> > http://www.amibroker.com/support.html
> > >> >
> > >> >
> > >> > Yahoo! Groups Links
> > >> >
> > >> >
> > >> >
> > >> >
> > >> >
> > >> >
> > >> >
> > >>
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > > Please note that this group is for discussion between users
only.
> > >
> > > To get support from AmiBroker please send an e-mail directly to
> > > SUPPORT {at} amibroker.com
> > >
> > > For other support material please check also:
> > > http://www.amibroker.com/support.html
> > >
> > >
> > > Yahoo! Groups Links
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> >
>
------------------------ Yahoo! Groups Sponsor --------------------~-->
Try Online Currency Trading with GFT. Free 50K Demo. Trade
24 Hours. Commission-Free.
http://us.click.yahoo.com/RvFikB/9M2KAA/U1CZAA/GHeqlB/TM
--------------------------------------------------------------------~->
Please note that this group is for discussion between users only.
To get support from AmiBroker please send an e-mail directly to
SUPPORT {at} amibroker.com
For other support material please check also:
http://www.amibroker.com/support.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/
|