2 ; Ullrich von Bassewitz, 29.09.1998
4 ; void pokebsys (unsigned Addr, unsigned char Val);
5 ; void pokewsys (unsigned Addr, unsigned Val);
7 .export _pokebsys, _pokewsys
11 .include "zeropage.inc"
15 jsr popsreg ; Get the address
18 sty IndReg ; Switch to the system bank
25 stx tmp1 ; Save high byte
26 jsr popsreg ; Get the address
29 sty IndReg ; Switch to the system bank