01:
02: ; a.z80
03: ;**OK : This code works.**
04:
05: .NOLIST
06: #define equ .equ
07: #define EQU .equ
08: #include "ti83asm.inc"
09: #include "tokens.inc"
10: .LIST
11: .org 9327h
12: call _CLRLCDFULL
13: ld hl,1
14: ret
15: .end
16: .end