10 clear 36863
20 load "" code
30 border not pi
40 randomize usr 36864

