This is a ruffy had to tryout the new forum,recently my car immobilizer packed up
so it was time to look for a picaxe replacement which one lol 8m2 14m2 18m2 20m2 lol !
The RDM630 has a uart output of 9600 bps TTL so we should interface it using T9600
Used on my picaxe 20x2 driving a blueled and 5v latch relay with set and reset coil.
Led will flash whenever card data is read.
Scan your Tag - 12 decimal numbers should be displayed
You can copy the 12 byte code from the Serial Terminal
than just paste over the existing eeprom statement.
When Tag is scanned and matches the eeprom statement VERIFY OK will be seen in the Terminal.
Relay output and led remains on for a short period ( enough to start the car hopefully)
could be used to arm and disarm an alarm system or unlock a door.
then can just use the same keytag for everything lol!
so it was time to look for a picaxe replacement which one lol 8m2 14m2 18m2 20m2 lol !
The RDM630 has a uart output of 9600 bps TTL so we should interface it using T9600
Code:
#picaxe 20X2 'version C.0 marks
#Terminal 38400
EEPROM 0,(50,66,48,48,66,48,48,55,50,51,66,55) 'RFID TAG1
EEPROM 12,(50,66,48,48,66,48,67,55,52,56,57,55) 'RFID TAG2
SETFREQ M32
SYMBOL RDM630 = B.4 'TTL use T9600
SYMBOL BlueLED = C.4
SYMBOL LatchRelay = C.0
SYMBOL ResetRelay = C.1
SYMBOL data1 = B1 'ManufacturersCode
SYMBOL data2 = B2 'ManufacturersCode
SYMBOL data3 = B3 'Byte 1 TAG number
SYMBOL data4 = B4 'Byte 2 TAG number
SYMBOL data5 = B5 'Byte 3 TAG number
SYMBOL data6 = B6 'Byte 4 TAG number
SYMBOL data7 = B7 'Byte 5 TAG number
SYMBOL data8 = B8 'Byte 6 TAG number
SYMBOL data9 = B9 'Byte 7 TAG number
SYMBOL data10 = B10 'Byte 8 TAG number
SYMBOL checksum1 = B11 'CheckSum
SYMBOL checksum2 = B12 'CheckSum
SYMBOL Verify = b13
SYMBOL Decimal = b14
SYMBOL checkedData= b15
SYMBOL tagData = b16
SYMBOL RFIDtag = b17
PAUSE 2000
ScanTag:
SerTxd(CR,LF,"ScanTag")
RFIDtag = 0 'Start check from first Tag in EEprom
SerIn RDM630,T9600_32,(2), data1 , data2 , data3 , data4 , data5 , data6 , data7 , data8 , data9 , data10 ,checksum1,checksum2
SerTxd(CR,LF," RFID TAG " ,#b1,",",#b2,",",#b3,",",#b4,",",#b5,",",#b6,",",#b7,",",#b8,",",#b9,",",#b10,",",#b11 ,",",#b12,CR,LF)
pulsout BlueLED,60000
CheckTag:
FOR Verify = 12 TO 1 STEP -1 'checking in reverse order usually meens less processing
tagData = Verify + RFIDtag -1
READ tagData,Decimal
SELECT CASE Verify
case 1 :checkedData = data1
case 2 :checkedData = data2
case 3 :checkedData = data3
case 4 :checkedData = data4
case 5 :checkedData = data5
case 6 :checkedData = data6
case 7 :checkedData = data7
case 8 :checkedData = data8
case 9 :checkedData = data9
case 10 :checkedData = data10
case 11 :checkedData = checksum1
case 12 :checkedData = checksum2
END SELECT
IF Decimal <> checkedData AND RFIDtag = 12 THEN scantag ' Last RFID Tag in EEprom checked no match(if we add another Tag it would become 24)
IF Decimal <> checkedData THEN : RFIDtag = RFIDtag + 12 : GOTO checktag : ENDIF ' Check next RFID Tag in EEprom for a match
NEXT Verify
pulsout BlueLED,20000
SerTxd(CR,LF,"VERIFY OK",CR,LF) 'Once tag has been verified, because of the 20 secs delay below, you must wait before you can scan another tag
pulsout BlueLED,20000
pulsout LatchRelay,3000 ' latch relay on so I can start my car
SwitchOn BlueLED
pause 60000 pause 60000 ' 20 second delay approx
pulsout ResetRelay,3000 ' reset dissable crank
SwitchOff BlueLED:
GOTO ScanTag ' probaly remove this line so process will only repeat when powered ON again from ignition.
Led will flash whenever card data is read.
Scan your Tag - 12 decimal numbers should be displayed
You can copy the 12 byte code from the Serial Terminal
than just paste over the existing eeprom statement.
When Tag is scanned and matches the eeprom statement VERIFY OK will be seen in the Terminal.
Relay output and led remains on for a short period ( enough to start the car hopefully)
could be used to arm and disarm an alarm system or unlock a door.
then can just use the same keytag for everything lol!
Last edited: