B4R Question Need Help For Wemos D1 R1 + RDM6300

Roozbeh

New Member
Hello
i'm new here
how i can use RDM6300 for wemos d1 r1 ?
برد-آردوینو-wemos-d1-wifi.jpg
pin_layout_rdm_630_6300.jpg


i used this code but not working

B4X:
Sub Process_Globals
    Public Serial1 As Serial
    Private RFID As SoftwareSerial
    Private Astream As AsyncStreams
    Private LED As Pin
    Dim D1 as D1Pins

End Sub

Private Sub AppStart
    RFID.Initialize(9600,D1.D2,D1.D3)
    Astream.Initialize(RFID.Stream ,"ReadRFID","RFIDerr")
    Serial1.Initialize(115200)
    LED.Initialize(13, LED.MODE_OUTPUT)
    LED.DigitalWrite(False)
    Log("AppStart")
End Sub

private Sub ReadRFID(Buffer() As Byte)
     LED.DigitalWrite(True)
     Log (Buffer.Length)
     Log(Buffer)
End Sub

private Sub RFIDerr()
    Log("Error")
End Sub

any1 have sample code?
 

Roozbeh

New Member
problem solved after adding C codes.
 
Upvote 0
Top