10 clear 24575
20 load "" code 32768
30 border 0
50 randomize usr 32768

