Re: A86: Re: shell.asm

To: assembly-86@lists.ticalc.org
Subject: Re: A86: Re: shell.asm
From: Ben Mickle <bmickle@yahoo.com>
Date: Fri, 12 Mar 1999 14:21:31 -0800 (PST)
Delivered-To: assembly-86-outgoing@towerguard.unix.edu.sollentuna.se
Delivered-To: assembly-86@lists.ticalc.org
Reply-To: assembly-86@lists.ticalc.org



That jp nz,_exec_basic should be call nz,_exec_basic


---Ben Mickle <bmickle@yahoo.com> wrote:
>
> 61 bytes :)
> 
> 
> 
> ---David Phillips <david@acz.org> wrote:
> >
> > Hehe, Dux did it.  64 bytes...anything else?
> > 
> > >I'm new at this shell stuff.  Can it be smaller than 68 bytes? 
It runs
> > both
> > >basic and asm programs.  When running programs and when exiting,
the cursor
> > >starts on the second line (like they ran the program from the
home screen).
> > 
> 
> 
>
> ; shell (for lack of a better name)
> ; by David Phillips <david@acz.org>
> ; http://www.acz.org/
> 
> #include "ti86asm.inc"
> 
> .org _asm_exec_ram
> 
> Top:
>  ld hl,StartingName
>  rst 20h
> 
> Down:
>  sub a
>  call _FindAlphaUp
>  
> DisplayProgram:
>  call _clrLCD
>  call _homeup
>  ld hl,_OP1+2
>  call _puts
>  call _newline
> 
> MainLoop:
>  call _getkey
>  sub kUp
>  jr z,Up
>  dec a		;kDown
>  jr z,Down
>  sub kExit-kDown
>  ret z
>  inc a
>  jr nz,MainLoop
> 
> RunProgram:
>  rst 10h
>  call _check_asm
>  push af
>  call z,_exec_assembly
>  pop af
>  jp nz,_exec_basic
>  jr Top
> 
> Up:				;a is already zero
>  call _FindAlphaDn
>  jr DisplayProgram
>  
> StartingName:
>  .db $12,1,0
> 
> .end
> 

_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com

Prev: Re: A86: *NEW* ticalc.org proposal...
Next: A86: Re: Dear Brian...
Index(es):
- Main
- Thread