Welcome to بیسیک فور ایکس

Register now to gain access to all of our features. Once registered and logged in, you will be able to contribute to this site by submitting your own content or replying to existing content. You'll be able to customize your profile, receive reputation points as a reward for submitting content, while also communicating with other members via your own private inbox, plus much more! This message will be removed once you have signed in.

  • 0
H@mid.RS

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

سوال

کتابخانه ای برای ارسال سیگنال های ir به یک دریافت کننده سیگنال ir


 


برای دریافت سیگنال کد زیر :



Sub Process_Globals
Public Serial1 As Serial
Private ir As IrReceive
End Sub

Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
ir.Initialize(6, "ir_Decoded") 'receiver is connected to pin 6, GND and 5v (or 3.3v on ESP8266)
ir.Enable
End Sub


Private Sub ir_Decoded (Result As IrResult)
Log("result: ", Result.DecodeType, ", ", Result.Value)
End Sub

و برای ارسال سیگنال :



Sub Process_Globals
Public Serial1 As Serial
Private irsend As IrSend
Private timer1 As Timer
End Sub

Private Sub AppStart
Serial1.Initialize(115200)
Log("AppStart")
irsend.Enable(38) 'frequency = 38khz
timer1.Initialize("timer1_Tick", 500)
timer1.Enabled = True
End Sub

Sub Timer1_Tick
Dim m As UInt = Bit.And(Millis, 0xfff) 'get 12 bits
Log("sending: ", m)
irsend.SendRC5(m, 12)
End Sub

روی اردوینو مگا تست شده


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


rIRremote.zip

پسند شده توسط Sina، مهمان و مهمان

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


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

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

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

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

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

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

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


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

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

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


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

  • مطالب مشابه

    • توسط batman1
      سلام.
      ممنون میشم لینک دانلود کتابخانه wifi connect رو بذارید.
      هرچی گشتم نتونستم پیداش کنم.
      از سایت مرجعش هم نتونستم دانلودش کنم.
      ممنون.
    • توسط H@mid.RS
      سلام و درود خدمت کاربران عزیز
       
       
       
       
      نسخه 3 کتابخانه AppCompat رو براتون قرار دادم
       
       
       
       
       
      می تونید برای حمایت از ما کاربر ویژه بشید و این کتابخانه رو دانلود کنید
       
       
      http://basic4x.ir/store/product/12-خرید-اشتراک-کاربر-ویژه/
       
       
       
       
       
      و بعد از خرید اشتراک شما به راحتی می تونید این کتابخانه رو دانلود کنید البته دسترسی کامل پیدا می کنید به انجمن
       
       
       
       
       
       
       
       
      تغییرات نسخه سه :
       
       
       
       
       
      Requires B4A 6.0 or above References AppCompat from Maven repository Full designer custom properties support for all views Fix: ACRadioButton now supports grouping in a panel Desupport of the Activity Entry animation. New: ACSeekbar Fix: ACSearchview closed() event does not fire (AppCompat bug). Added workaround for this. Fix: Fixed several minor and major bugs New example App which shows main features

         
       
       
      کتابخانه نسخه سه همراه سورس کد جدید پیوست شد.
       
       
      AppCompatBaseExample3_20.zip
       
      AppCompatLib3_20.zip
      AppCompatLib3_42.zip
      AppCompatLib3_52.zip
    • توسط batman1
      با سلام.
      ممنون میشم کسی درمورد کتابخونه wifi manager توضیح بده.
      من کلی سرچ کردم،اما چیزی پیدا نکردم.