> ld bc,768 > ld hl,SafeRam1 > loop1: > ld (hl),255 > inc hl > djnz loop1 ld bc,768-1 ld hl,SafeRam1 ld de,SafeRam1+1 ld (hl),255 ldir > ld bc,768 > ld hl,gbuf > loop2: > ld (hl),0 > inc hl > djnz loop2 ld bc,768-1 ld hl,gbuf ld de,gbuf+1 ld (hl),0 ldir