Created
April 11, 2012 16:06
-
-
Save johnvilsack/2360269 to your computer and use it in GitHub Desktop.
Intermec Fingerprint Barcode Duplicator
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 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 | |
| 110 RAWSCAN$=INPUT$(12,100) | |
| 115 UPC$=LEFT$(RAWSCAN$,11) | |
| 150 SOUND 100,5 | |
| 155 SOUND 1000,5 | |
| 200 '// KEYPAD ENTRY //' | |
| 205 PRINT# 50, "ENTER QUANTITY" | |
| 210 OPEN "CONSOLE:" FOR INPUT AS 200 LEN=3 | |
| 215 QTY$=INPUT$(3,200) | |
| 220 QTY%=VAL(QTY$) | |
| 230 SOUND 800,5 | |
| 235 SOUND 800,5 | |
| 240 SOUND 1200,10 | |
| 300 '// LABEL GENERATOR //' | |
| 310 BARFONT ON | |
| 320 BARTYPE "UPCA" | |
| 330 BARMAG 4 | |
| 340 BARFONT "SW030RSN.1" | |
| 350 PRPOS 75,10 | |
| 360 PRBAR UPC$ | |
| 500 '// PRINT LABEL //' | |
| 510 PRINTFEED QTY% | |
| 520 CLEAR | |
| 530 CLOSE | |
| 540 CLL | |
| 1000 GOTO 1 |
Any more information on this code? I'm trying to find something that I can scan a barcode with a scanner attached to the printer and it automatically prints the same barcode I scanned. Not super familiar with the Intermec Fingerprint PRG files but I'm guessing that's what this is. I'm reading up on the programming now.
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
This is the version for Keypad Entry