Ok thanks, I had figured the blank line thing out.... Still wondering what to do with this "<<...>>"?
Anyhow in the code I'm not getting a value for "n" or any values for A1 to A9 when scrolling through the chart, also no Red Dots anywhere. Sorry to be such a pain... Again thankyou! I used this extra code to check for values when testing.... Title = Name ( ) + ", " + Date ( ) + " - " + "\n " + "n = " + n + "\n " + "A1 = " + A1 + "\n " + "A2 = " + A2 + "\n " + "A3 = " + A3 + "\n " + "A4 = " + A4 + "\n " + "A5 = " + A5 + "\n " + "A6 = " + A6 + "\n " + "A7 = " + A7 + "\n " + "A8 = " + A8 + "\n " + "A9 = " + A9 + "\n " + "BI = " + BI + "\n " + "LVBI = " + LVBI + "\n " + "TN = " + TN + "\n " + "H = " + H + "\n " + "L = " + L + "\n " + "C = " + C ; --- In [email protected], "Fred" <[EMAIL PROTECTED]> wrote: > > "An Error Message" is not terribly specific ... That's kind of like > me taking my car to the mechanic and saying "I have a problem with my > car, can you fix it ?" ... I suspect the mechanic might want to know > presactly what problem I think I'm having ... > > For starters ... DON'T ALTER THE CODE ... It works as posted ... > > The underscores are continuation characters in VBS indicating that > the next line is part of the preceding one. The problem is that > Yahoo added extra blank lines after code lines ... so ... make sure > the lines that have underscores at the right end of them do NOT have > blank lines following them as this causes a VBS syntax error. > > --- In [email protected], "rlfoxworth2006" > <rlfoxworth2006@> wrote: > > > > I really appreciate your help, again thanks for taking time out and > > helping. The code looks really great! But I've copied and loaded > the > > code and get an error message. I removed the underscore lines after > > the AND and OR to make sure that's not it and also this at end > <<...>> > > with no luck. I've tried it as is and tested with the removement. > > Any idea what I'm doing wrong? > > > > > > > > --- In [email protected], Fred Tonetti <ftonetti@> wrote: > > > > > > Any how . to conclude ( sort of ) . The semi-dumb complete version > > of this > > > would look like the AFL below . and would produce a chart like > that > > attached > > > . > > > > > > It's a little smarter then the previously posted incomplete > version > > in that > > > it reuses arrays when it can but it is still dumb in that it uses > > AFL arrays > > > rather than the Osaka pluggin to handle the tables and as such > requires > > > EVERY array to be defined and plotted . > > > > > > > > > > > > PlotOHLC(O,H,L,C, "Data", colorWhite, styleBar); > > > > > > BI = BarIndex(); > > > > > > LVBI = LastValue(BI); > > > > > > TN = TimeNum(); > > > > > > printf(NumToStr(LVBI)); > > > > > > EnableScript("VBScript"); > > > > > > A1 = A2 = A3 = A4 = A5 = A6 = A7 = A8 = A9 = Cum(0); > > > > > > <% > > > > > > BI = AFL("BI") > > > > > > LVBI = AFL("LVBI") > > > > > > TN = AFL("TN") > > > > > > H = AFL("H") > > > > > > L = AFL("L") > > > > > > C = AFL("C") > > > > > > A1 = AFL("A1") > > > > > > A2 = AFL("A2") > > > > > > A3 = AFL("A3") > > > > > > A4 = AFL("A4") > > > > > > A5 = AFL("A5") > > > > > > A6 = AFL("A6") > > > > > > A7 = AFL("A7") > > > > > > A8 = AFL("A8") > > > > > > A9 = AFL("A9") > > > > > > Dim TBL(10, 500) > > > > > > for i = 1 to LVBI > > > > > > for j = 1 to 9 > > > > > > if TBL(j, 0) = 1 then > > > > > > if TN(i) <> 95500 then > > > > > > if (C(i-1) <= TBL(j, i-1) AND _ > > > > > > H(i) >= TBL(j, i-1)) OR _ > > > > > > (C(i-1) >= TBL(j, i-1) AND _ > > > > > > L(i) <= TBL(j, i-1)) then > > > > > > TBL(j, i) = TBL(j, i-1) > > > > > > TBL(j, 0) = 0 > > > > > > else > > > > > > TBL(j, i) = TBL(j, i-1) > > > > > > end if > > > > > > else > > > > > > TBL(j, i) = TBL(j, i-1) > > > > > > end if > > > > > > end if > > > > > > Next > > > > > > if TN(i) = 95000 then > > > > > > for j = 1 To 10 > > > > > > if TBL(j, 0) = 0 then > > > > > > Exit for > > > > > > End if > > > > > > Next > > > > > > TBL(j, i) = H(i) > > > > > > TBL(j, 0) = 1 > > > > > > for j = 1 To 10 > > > > > > if TBL(j, 0) = 0 then > > > > > > Exit for > > > > > > End if > > > > > > Next > > > > > > TBL(j, i) = L(i) > > > > > > TBL(j, 0) = 1 > > > > > > end if > > > > > > Next > > > > > > for i = 0 to 499 > > > > > > A1(i) = TBL(1, i) > > > > > > A2(i) = TBL(2, i) > > > > > > A3(i) = TBL(3, i) > > > > > > A4(i) = TBL(4, i) > > > > > > A5(i) = TBL(5, i) > > > > > > A6(i) = TBL(6, i) > > > > > > A7(i) = TBL(7, i) > > > > > > A8(i) = TBL(8, i) > > > > > > A9(i) = TBL(9, i) > > > > > > Next > > > > > > AFL("n") = n > > > > > > AFL("A1") = A1 > > > > > > AFL("A2") = A2 > > > > > > AFL("A3") = A3 > > > > > > AFL("A4") = A4 > > > > > > AFL("A5") = A5 > > > > > > AFL("A6") = A6 > > > > > > AFL("A7") = A7 > > > > > > AFL("A8") = A8 > > > > > > AFL("A9") = A9 > > > > > > %> > > > > > > printf(NumToStr(n)); > > > > > > Plot(IIf(A1 > 1, A1, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A2 > 1, A2, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A3 > 1, A3, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A4 > 1, A4, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A5 > 1, A5, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A6 > 1, A6, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A7 > 1, A7, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A8 > 1, A8, -1e10), "", colorRed, styleDots); > > > > > > Plot(IIf(A9 > 1, A9, -1e10), "", colorRed, styleDots); > > > > > > <<...>> > > > > > > > > > > > > _____ > > > > > > I am using the free version of SPAMfighter for private users. > > > It has removed 8649 spam emails to date. > > > Paying users do not have this message in their emails. > > > Try SPAMfighter <http://www.spamfighter.com/go.asp?t=249> for > free now! > > > > > > 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 NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG: http://www.amibroker.com/devlog/ 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/ <*> Your email settings: Individual Email | Traditional <*> To change settings online go to: http://groups.yahoo.com/group/amibroker/join (Yahoo! ID required) <*> To change settings via email: mailto:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED] <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
