RFID reader documentation

Parallax, Inc. • RFID Reader Module (#28140) •Updated 09/2005 v1.1 Page 7
' -----[ EEPROM Data ]-----------------------------------------------------
Tags:
EEPROM ("0F0184F20B") ' valid tags
EEPROM ("0F01D9D263")
EEPROM ("04129C1B43")
EEPROM ("0000000000") ' space for other tags
EEPROM ("0000000000")
' -----[ Initialization ]--------------------------------------------------
Reset:
HIGH Enable ' turn of RFID reader
LOW Latch ' lock the door!
' -----[ Program Code ]----------------------------------------------------
Main:
LOW Enable ' activate the reader
SERIN RX, T2400, ($0A) ' wait for header
SERIN RX, T2400, tag0, tag1, tag2, tag3, tag4 ' get tag bytes
SERIN RX, T2400, tag5, tag6, tag7, tag8, tag9
HIGH Enable ' deactivate reader
Check_List:
FOR tagNum = 0 TO LastTag ' scan through known tags
pntr = tagNum * 10 + 0 : READ pntr, char ' read char from DB
IF char <> tag0 THEN Bad_Char ' compare with tag data
pntr = tagNum * 10 + 1 : READ pntr, char
IF char <> tag1 THEN Bad_Char
pntr = tagNum * 10 + 2 : READ pntr, char
IF char <> tag2 THEN Bad_Char
pntr = tagNum * 10 + 3 : READ pntr, char
IF char <> tag3 THEN Bad_Char
pntr = tagNum * 10 + 4 : READ pntr, char
IF char <> tag4 THEN Bad_Char
pntr = tagNum * 10 + 5 : READ pntr, char
IF char <> tag5 THEN Bad_Char
pntr = tagNum * 10 + 6 : READ pntr, char
IF char <> tag6 THEN Bad_Char
pntr = tagNum * 10 + 7 : READ pntr, char
IF char <> tag7 THEN Bad_Char
pntr = tagNum * 10 + 8 : READ pntr, char
IF char <> tag8 THEN Bad_Char
pntr = tagNum * 10 + 9 : READ pntr, char
IF char <> tag9 THEN Bad_Char
GOTO Tag_Found ' all match -- good tag
Bad_Char:
NEXT
Bad_Tag:
SOUND Spkr, (25, 80) ' groan
PAUSE 1000
GOTO Main
Tag_Found:
DEBUG #tagNum, CR ' for testing
HIGH Latch ' remove latch
SOUND Spkr, (114, 165) ' beep
LOW Latch ' restore latch