URL
https://opencores.org/ocsvn/z80soc/z80soc/trunk
Subversion Repositories z80soc
[/] [z80soc/] [trunk/] [V0.7.1a/] [rom/] [V0.7-test.z8a] - Rev 45
Go to most recent revision | Compare with Previous | Blame | View Log
ld sp,bffeh
Call clear
; test if stack is set ok
ld hl,4142h
push hl
pop de
ld hl,ffe0h
ld a,d
; write AB to LCD
ld (hl),a
inc hl
ld a,e
ld (hl),a
inc hl
; test VRAM memory
ld a,43h
ld (4000h),a
ld a,20h
ld a,(4000h)
ld (hl),a
inc hl
ld a,44h
ld (4c7fh),a
ld a,20h
ld a,(4c7fh)
ld (hl),a
inc hl
; test charram
; Redefines char for ascci 1 to @
push hl
ld de,4c88h
ld hl,char
ld bc,8
ldir
ld a,1 ; new ascii code of @
ld (4013h),a ; print @ in the first line of video
pop hl
ld (hl),a
inc hl
; test main ram
ld a,45h
ld (6000h),a
ld a,20h
ld a,(6000h)
ld (hl),a
inc hl
ld a,46h
ld (dfffh),a
ld a,20h
ld a,(dfffh)
ld (hl),a
inc hl
ld a,47h
ld (hl),a
inc hl
ld a,4Bh
ld (4016h),a
ld (hl),a
ld a,1
out (01h),a
loop:
jp loop
clear:
ld hl,4000h
ld a,20h
ld (hl),a
ld de,4001h
ld bc,3199
ldir
ret
char: ; @
db 7CH
db C6H
db DEH
db DEH
db DEH
db C0H
db 78H
db 00H
Go to most recent revision | Compare with Previous | Blame | View Log