[سوال] دریافت سیگنال ریموت

[parviz2012]

سلام .
من میخوام بیتهای ارسالی از ریموت رو ببینم.
ببینید به این حالت درسته:

$regfile = "M16def.dat"
$crystal = 4000000

Config Lcdpin = Pin , Db4 = Pinb.0 , Db5 = Pinb.1 , Db6 = Pinb.2 , _
Db7 = Pinb.3 , Rs = Pinb.4 , E = Pinb.5
Config Lcd = 16 * 2
Cursor Off
Cls
Lcd "* ETRmodern *"
Waitms 500
Dim Bb As Bit
Dim I As Integer
Config Debounce = 10
Config Pind.7 = Input

Dim J As String * 37
Enable Interrupts

Config Pind.3 = Input
Set Portd.3
Pin_ir Alias Pind.3

Config Int1 = Falling
On Int1 Isr_int1

Dim Cnt_ir As Integer


Declare Sub Flag


'***************************************************************
Main:

Cnt_ir = 0
Home
Lcd "GET TIME REM COD"

Enable Int1

Do
Debounce Pind.7 , 1 , Flag , Sub
Loop

'isr for infrared sensor
Isr_int1:

Bitwait Pin_ir , Set

Bb = Pin_ir
Incr Cnt_ir
J = J + Str(bb)

Return


End 'end program
'*****************************************************

Sub Flag

Disable Int1
Cls
Lcd "BIT NUMBERS :" ; Cnt_ir ; " "
For I = 0 To Cnt_ir
Locate 2 , 1
Lcd I ; "= " ; Mid(j , I , 1)
Wait 1
Next I
Enable Int1
End Sub Flag

اما هر کاری میکنم گیرنده که hs0038a2 هست همه بیتها رو 1 میگیره و تو ال سی دی 1 نشون میده.
حتی تمام حالات بستن مدار ریسیور رو طبق دیتاشیتش انجام دادم ولی جواب همونه.

[parviz2012]

سلام به همه...
الان خیلی خوشحالم. سر صبحه . بعد از 2 ماه سر وکله زدن با این ریموته موفق شدم کدهاشو بخونم.
حتما اگه چنین مشکلی داشتید پست زیر رو نگاه بندازید که کارهt3r!p3000 هست:
www.iranled.com/forum/thread-19032.html
البته من تو کد دست بردم مخصوصا برای اینکه زمان واقعی رو بدست بیارم تا طول پالسها رو بشمارم.
دست t3r!p3000 درد نکنه همینجا میگه دوست داریم...
فعلا

[Pardazesh-Gar]

خوشحالم که موفق شدید انجام بدید. پیروزی رو تبریک میگم.

[parviz2012]

بابا هندونه زیر بغلمون نذار ما چوب خوردتیم داداش. اگه شماها کمک نمیکردید درست نمیشد.

[Pardazesh-Gar]

چرا اینطوری فکر میکنید؟ چوب خورده من؟! یعنی چی؟!
آخه دیدم مرتب پست های جدید در این باره می فرستادید. حالا که خودتون تونستید پی به ماجرا ببرید خوشحال شدم که اگر یکی دیگه این مسئله براش رخ داد. یک راهنما در میونمون هست.

[parviz2012]

منطورم اینه که من تازه کارم تا به حرفه ای ها برسم حالا حالا ها باید آب بندی بشم. چند وقت بود فقط تمرکز کرده بودم تا بتونم انجامش بدم. و نهایتا جواب داد. البته مشکلات داره که بردمش تو پست کاهش نویز.