10 clear 24575
33 load "" code
35 cls:randomize usr 24576