:ADDBi`@@@A3)A +@%%6-F:A`,%F:Aa,$AV))6-F:%@,%F:%@,$AV#6-P:H:,$@,$6-P:H:,$@,%6-P:H:,$@,& 0(@6-P:H:,$A8@,@- PICK A RANDOM BYTE IN DISPLAY2E6-P:H:,$AU,E- PICK RANDOM VALUE BETWEEN 0 AND 255<2 %2- POKE RANDOM VALUE INTO RANDOM BYTEF @5 D:P104P2.BAS