Re: A83: Can someone tell me how to...

To: assembly-83@lists.ticalc.org
Subject: Re: A83: Can someone tell me how to...
From: Its kavity <Itskavity@aol.com>
Date: Mon, 16 Mar 1998 22:17:29 EST
Delivered-To: assembly-83-outgoing@towerguard.unix.edu.sollentuna.se
Reply-To: assembly-83@lists.ticalc.org


Thanks, I never thought of storing them in Strings, but even if i didnt i
could still protect my program before i sent it to me calculator.  Also I know
the code to turn off the calculator I just dont know how to have an Input in
assembly

; CALCOFF.Z80  v1.0
; Turns your ti-83 calculator off

.NOLIST
#define equ .equ
#define EQU .equ
#define end .end
#include "ti83asm.inc"
#include "tokens.inc"
.LIST

.org 9327h

OFF:
        DI                 ; disable interrupts
        LD A,001H
        OUT (003H),A       ; turn off screen
        LD A,000H
        OUT (004H),A
        EX AF,AF'
        EXX
        EI                 ; enable interrupts
;
;  Put code here that you want to execute when the calculator turns back on
; 
    set textInverse,(iy+textflags)
    CALL _CLRLCDFULL      ;CLEAR SCREEN
    LD HL,0200h
    ld (currow),hl
    LD HL,Madeby
    CALL _PUTS
    res textInverse,(iy+textflags)
    CALL _getk
ret

Madeby .db "Made By Mike Walsh", 0        
.end
END