A92: TSR Programming
[Prev][Next][Index][Thread]
A92: TSR Programming
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 enfoncée
 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 !!!!
Follow-Ups: