johnvilsack

1 '// Beep to confirm active //'
5 SOUND 500,10
6 SOUND 500,10

50 '// Open Console Screen //'
55 OPEN "CONSOLE:" FOR OUTPUT AS 50
60 PRINT# 50, "SCAN UPC NOW"

100 '// USB SCANNER //'
105 OPEN "USBHOST:" FOR INPUT AS 100