10 clear 24575
20 load "prep256.co" code 32768
30 cls:randomize usr 32768