10 clear 24570
11 border 7:poke 23693,56
20 load "Blo" code 24576
30 cls:randomize usr 24576
