Re: A86: Calc. Start up


[Prev][Next][Index][Thread]

Re: A86: Calc. Start up




#include "asm86.h"
#include "ti86asm.inc"
.include ti86un.inc


.org _asm_exec_ram
   res altOn,(iy+altflags)
   
   ld hl,routine
   ld de,_alt_on_exec
   ld bc,rout_end-routine
   ldir
   
   ld a,(_alt_on_chksum+1)
   ld hl,_alt_on_chksum+40
   add a,(hl)
   ld hl,_alt_on_chksum+80
   add a,(hl)
   ld hl,_alt_on_chksum+120
   add a,(hl)
   ld hl,_alt_on_chksum+160
   add a,(hl)
   ld hl,_alt_on_chksum+200
   add a,(hl)
   ld (_alt_on_chksum),a

   set altOn,(iy+altflags)    ;turn it on
   ret

routine:
  call _clrScrn
  ld hl,0   
  ld (_curRow),hl
  ld hl,text
  call _puts
  call _newline
  ret

text equ $-routine+_alt_on_chksum+1
   .db "Calculator Online",0
rout_end:

.end

does anyone know off hand when the user link routine is executed? i dont
feel like researching into it right now...


-=-=-=-=-=-=-=-=-=-=-=-=
James Rubingh
86guy@usa.net
http://members.tripod.com/~jaymzroo
ACZ member
-=-=-=-=-=-=-=-=-=-=-=-=


>>  can someone show me how to load the instructions into the right 
>spot (
>>  _alt_on_exec  ???) the right way?

___________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com/getjuno.html
or call Juno at (800) 654-JUNO [654-5866]