Re: A92: TSR Programming

To: assembly-92@lists.ticalc.org
Subject: Re: A92: TSR Programming
From: "kty" <kty@mailcity.com>
Date: Thu, 13 May 1999 07:27:47 -0700
Delivered-To: assembly-92-outgoing@towerguard.unix.edu.sollentuna.se
Delivered-To: assembly-92@lists.ticalc.org
Organization: MailCity (http://www.mailcity.lycos.com:80)
Reply-To: assembly-92@lists.ticalc.org


 
--

On Thu, 13 May 1999 13:17:28   Cyril CATTIAUX wrote:
>
>I've found a method to make programs resident :
>    just write your TSR at address $120 : that's the start of the stack.
>
>So here is an example for the ti-92 : it locks the hand+2nd+on reset.
>Hope it will be useful :o)
>(Programs must be as little as possible -> max 4Ko)
>
>                    reset.asm :
>
> xdef _main
> xdef _comment
>
>UserStack equ $120
>
>_main
> movea.l #UserStack,a1
> move.w #$0700,d0
> trap #1
> move.l $78,fin+2
>
> movea.l #int,a0
>.loop
> move.b (a0)+,(a1)+
> cmpa.l #int_end,a0
> bne .loop
>
> bclr.b #2,$600001
> move.l #UserStack,$78
> bset.b #2,$600001
> trap #1
> rts
>
>int
> move.w #%1111111111111110,$600018
> nop
> nop
> nop
> nop
> nop
> nop
> btst.b #3,$60001B si touche lock enfoncie
> bne fin  alors on sort de l'interruption
>
> rte
>
>fin
> jmp ($0).l
>int_end
>
>_comment dc.b "Reset BloKer (c) LoVePaRaD",0
> END
>
>Cyril CATTIAUX <-> LoVePaRaD.
>
>PS: I'm looking for great fargo 2.x programmers please !!!!
>
>
>
You should install it at the Top_of_heap !
And why are  u looking for fargo2 prgms ?

                 KTy             DBA



Get your FREE Email at http://mailcity.lycos.com
Get your PERSONALIZED START PAGE at http://my.lycos.com

Follow-Ups:

Re: A92: TSR Programming

From: Cyril CATTIAUX <luvparad@club-internet.fr>