ايران ويج

سلام به همه
کسی برنامه ای برای ارتباط سریال دو میکرو که به یک میکرو صفحه کلید و دیگری ال سی دی وصل باشه هر چی تو صفحه کلید زدیم تو ال سی دی نشون بده با کد ویژن!!!!!!!!!!!!!
عجله ای و حیاتی ککککمممممممممممکککککککککککک

حالا نمیشه با بسکام !!؟؟؟

(۲۱-مرداد-۱۳۸۹, ۰۴:۲۴:۱۴)t3r!p3000 نوشته است: [ -> ]حالا نمیشه با بسکام !!؟؟؟

سلام دوست عزیز
من ی هفته هست ک می خوام بین 2میکرو ارتباط برقرار کنم پروژه ازین قراره که 2تا ال ای دی در گیرنده توسط 2تا کلید در فرستنده روشن میشن . اما من وقتی یکی از کلیدارو میزنم ال ای دی مخصوص ب اون کلید روشن می شه اما دیگه از زیر برنامه وقفه بیرون نمیاد تا بتونم ال ای دی دیگه رو روشن کنم:( من این نتیجه رو از pinc.3 گرفتم اخه قراره اول خاموش باشه اما وقتی میره تو وقفه روشن بشه اما در ادامه که زیربرنامه تمام میشه خاموش نمیشه این یعنی از وقفه بیرون نمیاد

لطفا کمممممک کنید Sad

برنامه گیراندم اینه نمیدونم کجاش مشکل داره Whistle

کد php: 
$regfile = "m16def.dat"
$crystal = 8000000
$baud = 9600
Enable Interrupts
Enable Urxc
On Urxc Resev



Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , _
Db7 = Portb.3 , E = Portb.4 , Rs = Portb.5
Dim H As String * 13
Dim Z As String * 10

Cursor Off
Config Portc = Output
Main:
Do
Reset Portc.3


Loop
End


Resev:
Input H
Set Portc.3
Z = Mid(h , 2 , 3)

If Z = "m21" Then
 Locate 1 , 1
Lcd Z
 Set Portc.0
 Wait 1
 Reset Portc.0
 Wait 1
 Cls
Elseif Z = "m22" Then

 Locate 1 , 1
Lcd Z
 Set Portc.1
 Wait 1
 Reset Portc.1
 Wait 1
 Cls
End If

Return 

fatemeh_avr

t3r!p3000

sadrasadra