nimrar
08-08-2013, 17:04
سلام
من از دو ماژول HMTR استفاده میکنم که قراره دو سنسور آنالوگ با ADC بخواند و به یک میکرو
دیگر ارسال و در ال سی دی نمایش دهد من با دستور زیر اطلاعات فرستادم
If Pinb.0 = 0 Then
Gosub Read_ldr
Waitms 300
End If
If Pinb.1 = 0 Then
Gosub Read_setpoint
Waitms 300
End If
Loop
End
Read_ldr:
Ldr = Getadc(0) : Ldr = Ldr * 4.8828125
Printbin Ldr
Return
Read_setpoint:
Setpoint = Getadc(2) : Setpoint = Setpoint * 4.8828125
Printbin Setpoint
Return
و با دستور زیر اطلاعات میگیرم
Do
LDR = Waitkey()
Locate 1 , 1
Lcd "LDR:" ; LDR
Setpoint = Waitkey()
Locate 2 , 1
Lcd "POT:" ; Setpoint
Loop
End
اما مشکل من اینجاست که چون فقط یک بار دستور waitkey فهمیده میشود پس در ال سی دی من در همان قسمت که دیتا LDR دارم دیتا setpoint هم درج میشه و در خط دوم ال سی دی جای مقدار setpoint خالی میماند
برای حل مشکلم یه کاراکتر را شرط قرار دادم اما نشد کسی میتونه راهنمایی کنه مرسی
من از دو ماژول HMTR استفاده میکنم که قراره دو سنسور آنالوگ با ADC بخواند و به یک میکرو
دیگر ارسال و در ال سی دی نمایش دهد من با دستور زیر اطلاعات فرستادم
If Pinb.0 = 0 Then
Gosub Read_ldr
Waitms 300
End If
If Pinb.1 = 0 Then
Gosub Read_setpoint
Waitms 300
End If
Loop
End
Read_ldr:
Ldr = Getadc(0) : Ldr = Ldr * 4.8828125
Printbin Ldr
Return
Read_setpoint:
Setpoint = Getadc(2) : Setpoint = Setpoint * 4.8828125
Printbin Setpoint
Return
و با دستور زیر اطلاعات میگیرم
Do
LDR = Waitkey()
Locate 1 , 1
Lcd "LDR:" ; LDR
Setpoint = Waitkey()
Locate 2 , 1
Lcd "POT:" ; Setpoint
Loop
End
اما مشکل من اینجاست که چون فقط یک بار دستور waitkey فهمیده میشود پس در ال سی دی من در همان قسمت که دیتا LDR دارم دیتا setpoint هم درج میشه و در خط دوم ال سی دی جای مقدار setpoint خالی میماند
برای حل مشکلم یه کاراکتر را شرط قرار دادم اما نشد کسی میتونه راهنمایی کنه مرسی