RFID Voter please help!

[philosofa]

This is quite urgent,
i have a project that i will be defending on Friday (5th December ), I am new to programming and have really done some work coding in PICBasic.

I have to code a PIC18F4550 micro controller for ELECTRONIC VOTING SYSTEM using RFID Identification system, but i need the code to accept four (4) digit verification code before allowing voting to continue but i don't know how to go about it...
The code can only ID the tags but I cannot take it further than than due to my limited knowledge of PICBasic programming.Ii need the code to request for a four-digit pin that will be assigned to each tag number in order to verify after system ID tags. please I need urgent help as the defense date is so close. below is the code so far.......




'@ DEVICE PIC16F628A
INCLUDE "modedefs.bas"
CMCON = 7
DEFINE OSC 4 'Set oscillator in MHz
TRISA=%11100
TRISB=%00000010

DEFINE LCD_DREG PORTB 'define port to LCD
DEFINE LCD_DBIT 4 'RB4 RB5 RB6 RB7 to D4 D5 D6 D7 display
DEFINE LCD_RSREG PORTA 'RS on porta
DEFINE LCD_RSBIT 0 'RS on porta.0
DEFINE LCD_EREG PORTA 'Enable on porta
DEFINE LCD_EBIT 1 'Numero Enable porta.1
DEFINE LCD_BITS 4 '
DEFINE LCD_LINES 2 'lines 2
PAUSE 200 ' Stop 200ms
LCDOUT $FE,1 ' power lcd
'Lcdout $FE,1,4
lcdout $FE, 1," Copyright 2014"
lcdout $FE, $C0," ELECTRONIC "
lcdout $FE, $90," VOTING SYSTEM "
lcdout $FE, $D0," TECHNOLOGIES "
pause 5000
lcdout $FE,1
' -----[ Variables ]-------------------------------------------------------
buf VAR byte [10]' RFID bytes buffer
tagNum VAR Byte ' from EEPROM table
idx VAR Byte ' tag byte index
char VAR Byte ' character from table
MEK VAR BYTE
IFE VAR BYTE
' -----[ EEPROM Data ]-----------------------------------------------------
Tag1 DATA "0002864330"
Tag2 DATA "450052F2EB"

' -----[ Initialization ]--------------------------------------------------
'high portb.1 ' turn off RFID reader portb.1 is the reciever port
LOW portb.2 ' lock the door! Low portb.3 ' Turn off LED
' -----[ Program Code ]----------------------------------------------------
MEK=0
IFE=0

Main:
lcdout $FE,1," PLEASE USE YOUR"
lcdout $FE, $C0," TAG FOR ID "
pause 500
high portb.3
low portb.1 ' activate the reader
pause 500
SERIN2 portb.1,84,[WAIT($02),STR buf\10]
pause 500
high portb.1 ' deactivate reader


Check_List:
FOR tagNum = 1 to 2 ' scan through known tags
FOR idx = 0 TO 9 ' scan bytes in tag
READ (((tagNum-1)*10) + idx), char ' get tag data from table
IF (char <> buf(idx)) THEN Tag_Found'Bad_Char ' compare tag to table
NEXT
'GOTO Tag_Found ' all bytes match!

Bad_Char: ' try next tag
NEXT

Bad_Tag:
tagNum = 0
FREQOUT porta.3, 1000 */ $100, 115 */ $100 ' groan
lcdout $FE, 1," invalid TAG"
lcdout $FE, $C0," try again"
pause 1000
lcdout $FE,1
GOTO Main

Tag_Found:

'IF tagNum = 1 then displayName1
'IF tagNum = 2 then displayName2
lcdout $FE, 1,"WELCOME YOU CAN "
LCDout $FE, $C0," NOW VOTE "
pause 4000 'Pause ,5 sec then clear display
lcdout $FE, 1,"PRESS A FOR PDP "
LCDout $FE, $C0,"PRESS B FOR ACN "
lcdout $FE, $90,"PRESS C FOR APGA "
lcdout $FE, $D0,"PRESS D FOR APP "
pause 4000 'Pause ,5 sec then clear display


GOSUB VOTE

GOTO Main

VOTE:
IF PORTA.2=0 THEN CAND1
PAUSE 10
IF PORTA.3=0 THEN CAND2
PAUSE 10
GOTO VOTE


CAND1:
IF PORTA.2=0 THEN CAND1
MEK=MEK+1
lcdout $FE, 1,"PDP =",#MEK
LCDout $FE, $C0," ACCESS GRANTED"
pause 4000
GOTO Main

CAND2:
IF PORTA.3=0 THEN CAND2
IFE=IFE+1
lcdout $FE, 1,"ACN =",#IFE
LCDout $FE, $C0," ACCESS GRANDED"
pause 4000
GOTO Main
'displayName2:
'lcdout $FE, 1," UGOCHUKWU "
'LCDout $FE, $C0," ACCESS GRANDED"
'pause 3000 'Pause ,5 sec then clear display
'goto open_door

'displayName1:
'lcdout $FE, 1," EMEKA "
'lcdout $FE, $C0, "ACCESS GRANDED"
'pause 3000 'Pause ,5 sec then clear display
'goto open_door



'open_door:
'HIGH portb.2 ' remove latch
'pause 500
'LOW portb.2 ' restore latch
'Low portb.3 ' LED OFF GOTO Main
goto Main
End

please house , I need this, and will appreciate your your assistance
thank you!

[Demon]

Looks like you used code from another PIC but didn't change the settings. You only have CMCOM, are you sure about this?

I'm not sure about how you use port A for the LCD. Does it work right?

Robert

[philosofa]

yes, i was testing code on PIC16F628A mostly for hardware "handshaking" , worked on it, so i think it'll work on the PIC18F4550. i just want the code modified to "ask" for a (4-digit ) pin number for every tag that will be registered. before voting continues

[philosofa]

ok, can anyone help on how to input value (for comparison) in EEPROM table

[richard]

how many rfid tags do you expect to process ,you realise of couse that that chip has only 256 bytes of eprom (ie 25 tags)
where does the pin value come from and how is linked to the rfid tag?
and surely once a tag has "voted" it needs to be removed from the active list ?????
for 25 tags its hardly worth the effort except maybe as an educational exercise


LABOR RATES
Normal………………………………$12.50
If you wait…………………………..$15.00 per hour
If you watch………………………..$20.00 per hour
If you help………………………….$30.00 per hour
If you worked on it first………..$50.00 per hour

Deposit $1 x 2^(32-days to deadline)

[Demon]

ok, can anyone help on how to input value (for comparison) in EEPROM table

DATA to store, READ to retrieve.

Robert

[Archangel]

. . . and surely once a tag has "voted" it needs to be removed from the active list ?????

WHAT ? ? ? No Vote for me, and vote often?

[richard]

No Vote for me, and vote often

the special tag costs extra

[philosofa]

how many rfid tags do you expect to process ,you realise of couse that that chip has only 256 bytes of eprom (ie 25 tags)
where does the pin value come from and how is linked to the rfid tag?
and surely once a tag has "voted" it needs to be removed from the active list ?????
for 25 tags its hardly worth the effort except maybe as an educational exercise

Just for educational purpose, it's a mini school project.......the pin value is randomly selected for each tag and must not be changeable.