Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- org 44000
- DI
- LD HL,$FEFE ; table
- LD DE,$FEFE + 1
- LD BC,257
- LD A,$FE ; IM2 vector
- ld (hl),a
- LDIR
- ld a,$b0
- LD I,A
- IM2
- bong:
- ei
- halt ;wait for vertical retrace
- di
- ld bc,3242
- ldir
- ld sp,renkler
- pop hl
- pop de
- pop af
- pop bc
- ld sp,22536
- push hl
- push de
- push af
- push bc
- ld sp,3000
- pop hl
- pop de
- pop af
- pop bc
- ld sp,22536
- push hl
- push de
- push af
- push bc
- jp bong
- ret
- renkler:
- defb 0,8,16,24,32,40,48,56
- end 44000
Add Comment
Please, Sign In to add comment