; MODULE PCPI ; Module use: ; Place parameters on stack. ; Call routine .z80 readbyte equ 0ffe0h writebyte equ 0ffe3h readword equ 0ffe6h writeword equ 0ffe9h ; Peek - Returns 1 Apple byte at ; Parms on stack <2 bytes> Address of memory to peek jr peek ; Poke - Poke memory into apple ; Parms. <2 bytes> <2 bytes> pop hl pop bc pop de push hl ld h,b ld l,c ld c,7 call writebyte call writeword ld c,l call writebyte ret peek: pop hl pop de push hl ld c,6 call writebyte call writeword call readbyte ld l,a ld h,0 ret end