Re: A86: unlock
[Prev][Next][Index][Thread]
Re: A86: unlock
At 18:12 13/03/98 -0500, you wrote:
could you send me the source for that? im
working on a small program
using the ?key progams and i would like to be able to uninstall
it.
I have made such a prog, it also check if (sqr)KEY exist
here it is:
#include "asm86.h"
#include "ti86asm.inc"
.org _asm_exec_ram
res 6,(iy+$24)
ld hl, progname-1
rst 20h
call _FINDSYM
jr c,skip
call _delvar
ret
progname:
.db $04,$10,"KEY"
sorry:
.db 10h,"KEY not found",0
skip:
call _clrLCD
call _homeup
ld hl,sorry
call _puts
call _newline
jp $409c
.end
References: