10 FOR I=&H7D3 TO &H7DC:POKE I,0:NEXT 20 POKE &H7FF,&HA5 30 INPUT "WORLD=";A 40 POKE &H7FD,A+255AND255