I just learned how to make an interrupt for the Ti-84\83 series. My code, shown below is supposed to make a flickery grayscale line (if you can call it that) on the first line of the screen ($9340\plotsscreen). All it does though, is show a black line and it just sits there for about a minute. Then it turns white and it clears my ram. Can anyone explain? Thanks.
Code: Select all
.NOLIST
#define EQU .equ
#define equ .equ
#define END .end
#define end .end
#include "ti83plus.inc"
.LIST
.org 9D93h
.db $BB,$6D
di
ld hl,$9900
ld de,$9901
ld bc,256
ld (hl),$9a
ldir
ld hl,interrupt_start
ld de,$9a9a
ld bc,interrupt_end-interrupt_start
ldir
ld a,$99
ld i,a
im 2
ei
Loop:
jp Loop
interrupt_start:
exx
ex af,af'
ld a,%11111111
ld ($9340),a
B_CALL(_Grbufcpy)
ld a,%00000000
ld ($9340),a
B_CALL(_Grbufcpy)
ex af,af'
exx
reti
interrupt_end:
.end
end