; CALCOFF.ASM  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
        RET                

.end