10 CLEAR 100,&HD000
20 DEFUSR=&HD000
30 BLOAD"program.bin"
40 A=USR(0)
50 END
xxxxxxxxxx
RG0SAV:EQU 0xF3DF