RE: [amibroker] VBScript within AFL Function ?

["Grover Yowell" <gyowell@xxxxxxxxxxxx>]

Fred,
I've just started to look at vbscript, but I tried your program and found
the same results as you.  Also, I noted that when I inserted your program as
an indicator, or in AA, it caused the main chart to disappear and a program
execution error.

At that point I simplified your program and tried the following with the
same result:
EnableScript("VBScript");
y=6;
printf(NumToStr(y) + "\n");
<%
       	 R = AFL.Var("y")
 		MsgBox CStr(R)
		AFL.Var("t")=R+1
%>
printf(NumToStr(t) + " end\n");

Again, the MsgBox popped up with the correct result but program execution
halted and the main chart disappeared.


At that point, I eliminated the MsgBox line and everything worked.  So I
think the problem in the MsgBox statement.  Don't have a clue on what is
causing the problem.  I am running Windows XP Pro.  I have also tried to run
the Jscript for export image within AFL and found a similar problem of
execution halting.

Hope this helps.

Grover

-----Original Message-----
From: amibroker@xxxxxxxxxxxxxxx [mailto:amibroker@xxxxxxxxxxxxxxx] On Behalf
Of Fred
Sent: Monday, October 02, 2006 17:40
To: amibroker@xxxxxxxxxxxxxxx
Subject: [amibroker] VBScript within AFL Function ?

Anyone have a clue why this apparently doesn't work ?

RRR apparently never gets the value of what is in YYY and thus never 
returns it to TTT. The MsgBox also shows RRR to be non existant. 
There are however no problems with SSS which is set in VBS.  It shows 
in the message box and via printf.

EnableScript("VBScript");

function XXX(YYY)
{
    ZZZ = 0;

    printf(NumToStr(YYY) + "\n");

    <%
        RRR = AFL.Var("YYY") 
        SSS = 7

        MsgBox CStr(RRR) + " " + CStr(SSS)

        AFL.Var("TTT") = RRR
        AFL.Var("UUU") = SSS
    %>

    printf(NumToStr(TTT) + "\n");
    printf(NumToStr(UUU) + "\n");

    ZZZ = 0;

    return;
}

XXX(6);





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