10 CLEAR 5,&HA2F3 20 BLOAD"NYORO1.BIN",-&H1000 30 BLOAD"NYORO2.BIN",-&H2000 40 BLOAD"NYORO3.BIN":FOR I=&HA2F4 TO &HA2FF:READ A$:POKE I,VAL("&H"+A$):NEXT:DEF USR=&HA2F4:I=USR(0):DEF USR=&HC300:I=USR(0):DATA 21,FF,BF,11,FF,EF,01,00,1D,ED,B8,C9