• اطلاعیه ها

    • H@mid.RS

      جذب نیرو   پنجشنبه, 10 فروردین 1396

      درود به دوستان عزیز به چند نفر مدیر برای بخش های php و گرافیک نیازمندیم درصورت تمایل درخواست خود را در پیام خصوصی بفرستید  
    • H@mid.RS

      تغییر نام کاربری   دوشنبه, 28 فروردین 1396

      درود دوستانی که نام کاربری انها با ایمل شان یکی بود تغییر کرد مثلا نام کاربری sss@tmail.com به sss تغییر کرد دوستانی که مشکل ورود دارند @ به بعد را پاک کنند
    • H@mid.RS

      کسب درآمد   پنجشنبه, 31 فروردین 1396

      دوستانی که میخواهند با انجمن خودشون همکاری کنند و از محیط انجمن درآمد کسب کنند به بنده پیام خصوصی بفرستند
  • 0
H@mid.RS

کتابخانه MFRC522 برای بیسیک فور آردینو

سوال

درود


این کتابخانه برای خواندن و نوشتن بر روی  کارت های RFID می باشد


که شما در عکس زیر نمونه ای از کارت RFID رو مشاهده می کنید


post-1-0-12639900-1464867389_thumb.jpg


 


برای خواندن شناسه کارت از کد زیر :



Sub Process_Globals
Public Serial1 As Serial
Private rfid As MFRC522
Private bc As ByteConverter
End Sub

Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
rfid.Initialize(10, 9, "rfid_CardPresent")
rfid.LogVersion
End Sub

Sub rfid_CardPresent (UID() As Byte, CardType As Byte)
Log("UID: ", bc.HexFromBytes(UID))
End Sub

و برای خواندن و نوشتن بلوک شماره 1 از کد زیر استفاده می شود:



Sub rfid_CardPresent (UID() As Byte, CardType As Byte)
Log("UID: ", bc.HexFromBytes(UID))
Log("Type: ", CardType, ", Is it Mifare: ", rfid.IsMifare)
If rfid.IsMifare Then
If rfid.MifareAuthenticate(1) = False Then
Log("Failed to authenticate")
Return
End If
Dim buffer(18) As Byte
For i = 0 To buffer.Length - 1
buffer(i) = i
Next
'write 16 bytes to block number 1
Log("Write: ", rfid.MifareWrite(1, buffer))
If rfid.MifareRead(1, buffer) > 0 Then 'buffer size must be 18 bytes or more
Log(bc.HexFromBytes(buffer))
Else
Log("Failed to read")
End If
End If
End Sub

کتابخانه پیوست شد.


 


rMFRC522.zip

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

0 پاسخ به این سوال تا کنون داده شده است

هنوز برای این سوال پاسخی ارسال نشده است

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !


ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید


ورود به حساب کاربری

  • مطالب مشابه

    • توسط amir386
      سلام دوستان . خواستم بدونم ادمین کردن یه برنامه چه فوایدی داره و چه دسترسی هایی به برنامه اضافه میکنه... 
      و هر کس راجع به کد ها و سورس های بعد از ادمین شدن برنامه چیزی داره تو این تاپیک قرار بده . با تشکر
    • توسط amir386
      سلام دوستان من با تابع POP3 که در کتابخونه NEt هست تونستم پیام های جیمیل رو بخونم ولی مشکلیل که دارم چطور پیام مورد نظر رو پاک کنم مثلا بعد از این که خوندم بتونم با یه کیلد باتن اون رو پاک کنم(از داخل جیمیلم). سوال دومم اینه با این تابع فقط میشه متن رو خوند یا میشه فایل های پیوست شده در اون پیام جیمیل هم دانلود کرد!؟اگه هست چطوریه؟
      سوال سومم رویداد :
       
      Sub EventName_StatusCompleted (Success As Boolean, NumberOfMessages As Int, TotalSize As Int)
          
      End Sub
      داخل این تابع دقیقا چی میکنه؟؟
      با تشکر از شما دوستان
    • توسط H@mid.RS
      IRHashGirl
      مشاهده فایل
      درود به دوستان


      کتابخانه وارپ شده از این پروژه گیت هاب


      شات :




       

      و همون طور که در تصویر می بینید کارش زیر خط دار و خط زدن و هر رنگی که دوست دارید اون کلمه رو تغییر بدید

       

      IRHashGirl

      Author: Mojtaba Hossin Zadeh (Www.Basic4X.IR)
      Version: 1
      IRHashGirl
      Events:
      onClickHash

      Methods:
      Capture Initialize (eventName AsString, text AsString) IsInitialized AsBoolean alpha (alpha AsInt)AsHashGirl bgcolor (color AsInt)AsHashGirl color (color AsInt)AsHashGirl grab (pattern AsString)AsHashGirl grab2 (pattern AsString, postfixToRemove AsString)AsHashGirl grab3 (pattern AsString, postfixToRemove AsString, prefixToRemove AsString)AsHashGirl into (textView AsTextView) strike (strike AsBoolean)AsHashGirl underline (underline AsBoolean)AsHashGirl


       

      سورس کد همراه با کتابخانه قرار گرفت


      موفق باشید

      ارسال کننده H@mid.RS ارسال ۱۶/۰۸/۱۹ دسته کتابخانه