Re: A86: Re: _exec_basic
[Prev][Next][Index][Thread]
Re: A86: Re: _exec_basic
It's working just fine, though I'm not sure what that extra flag is doing
that isn't handled otherwise.
Also, the _JforceCmdNoChar doesn't seem to be necessary.
In a message dated 3/2/00 8:52:59 AM Eastern Standard Time,
darkclem@wanadoo.fr writes:
>
> Can anyone try this, it should work with nested basic progs....
>
> ld hl,ProgTest-1
> rst rmov10toop1
> call BasicExec
> jp _JforceCmdNoChar
>
> BasicExec: ;OP1=var name
> bit ProgramExecuting,(iy+NewDispf)
> push af
> set ProgramExecuting,(iy+NewDispf)
> call _clrWindow
> call _runIndicOn
> call _PARSEINP
> ld a,$0D
> out (5),a
> pop af
> ret nz
> res ProgramExecuting,(iy+NewDispf)
> ret
>
> ProgTest:
> .db 4,"Test"
>
----
Jonah Cohen
<ComAsYuAre@aol.com>
http://linux.hypnotic.org/~jonah/ (down)