Re: A86: Calc. Start up

To: assembly-86@lists.ticalc.org
Subject: Re: A86: Calc. Start up
From: ComAsYuAre@aol.com
Date: Thu, 24 Dec 1998 17:58:29 EST
Delivered-To: assembly-86-outgoing@towerguard.unix.edu.sollentuna.se
Reply-To: assembly-86@lists.ticalc.org


here is a fixed up version.  it works perfectly

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

#define pushR  in a,(5) \ push af \ ld a,$0d \ out (5),a \ nop \ nop \ nop
#define popR   pop af \ out (5),a

_alt_on_chksum		equ		$D48F

altOn			equ		3
altflags			equ		$23

.org _asm_exec_ram
   res altOn,(iy+altflags)
   
   ld hl,routine
   ld de,_alt_on_chksum+1
   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:
  pushR
  call _clrScrn
  call $4a95		;_homeup
  ld hl,text
  call _puts
  call _newline
  popR
  ret

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

.end
END


In a message dated 12/24/98 4:18:50 PM Eastern Standard Time,
jaymzroo@juno.com writes:

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

alt_slink_chksum	equ		$d3c6
alt_slink_exec		equ		$d3c7
altSlink				equ		4

Prev: A86: Off-topic BASIC question
Next: A86: RE: Assembly-86 Digest V1 #744
Index(es):
- Main
- Thread