ورود به حساب ثبت نام جدید فراموشی کلمه عبور
برای ورود به حساب کاربری خود، نام کاربری و کلمه عبورتان را در زیر وارد کرده و روی «ورود به سایت» کلیک کنید.





اگر فرم ورود برای شما نمایش داده نمیشود، اینجا را کلیک کنید.









اگر فرم ثبت نام برای شما نمایش داده نمی‌شود، اینجا را کلیک کنید.









اگر فرم بازیابی کلمه عبور برای شما نمایش داده نمی‌شود، اینجا را کلیک کنید.






جهت تبلیغ در وب سایت ECA کلیک کنید.

کاربران برچسب زده شده

صفحه 2 از 2 نخست 12
نمایش نتایج: از 11 به 17 از 17
  1. #11
    2009/05/20
    772
    24

    پاسخ : مشکل با وقفه سريال در بسکام

    نقل قول نوشته اصلی توسط M3R-E

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت

    فرمت دستور print به این شکل هست که مقدار رو به صورت اسکی میفرسته
    تو بسکام فک کنم با دستور printbin میشه مقدار رو همون چیزی که هست فرستاد
    فرقی نکرد فقط رقم اولو میخونه
  2. #12
    2008/05/26
    1,044
    529

    پاسخ : مشکل با وقفه سريال در بسکام

    نقل قول نوشته اصلی توسط r-el

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت

    فرقی نکرد فقط رقم اولو میخونه
    با این دستور امتحان کنید ببینید جواب چی میشه:
    PrintChr(akey)
    که akey مقدار عددی هست که میخواید ارسال کنید
  3. #13
    2009/05/20
    772
    24

    پاسخ : مشکل با وقفه سريال در بسکام

    نقل قول نوشته اصلی توسط kargahelec

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت

    سلام. این برنامه تست شده .
    Reshte رشته نهاییتون هست



    $regfile = "m8def.dat"
    $crystal = 8000000


    $baud = 9600
    Enable Urxc
    On Urxc Uart_reciver
    Config Portd.0 = Input


    Dim Buffer As Byte
    Dim Ss As String * 30 , Reshte As String * 30


    Enable Interrupts


    Do


    Loop
    End



    '******************************************************


    Uart_reciver:


    $timeout = 5000000

    Buffer = Udr


    Select Case Buffer


    Case 33 To 126:


    Ss = Ss + Chr(buffer)


    Case 13:


    Reshte = Ss
    Print Reshte


    End Select

    Return


    [FONT=Yekan] [/FONT]
    سلام ممنون میشم اگه درمورد برنامه توضیح بدین
    برنامه درست بود فقط اعدادرو کنار هم مینویسه میره جلو تا از ال سی دی خارج بشه یعنی اول1بعد12بعد123بعد1234و الی اخر
    دارم رو ال سی دی نمایش میدم و هرکاری میکنم درست نمیشه
    cls
    do
    home
    lcd Reshte
    loop
    برنامه اینه
    ویرایش توسط r-el : 2017/11/13 در ساعت 10:09
  4. #14
    2009/05/20
    772
    24

    پاسخ : مشکل با وقفه سريال در بسکام

    نقل قول نوشته اصلی توسط M3R-E

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت

    با این دستور امتحان کنید ببینید جواب چی میشه:
    PrintChr(akey)
    که akey مقدار عددی هست که میخواید ارسال کنید
    ممنون ولی فکر کنم دریافت مشکل داره ن ارسال درست نمیگم؟

    دلیل: ادغام دو پست برای جلوگیری از اسپم

    اقا دمت گرم اقای m3r-eدرست شد واقعا ممنون برنامه گیرنده رو برگردوندم رو حالت اول فرستنده رو اصلاح کردم حل شد متشکرم
  5. #15
    2009/05/20
    772
    24

    پاسخ : مشکل با وقفه سريال در بسکام

    سلام
    مشکل من کامل حل شد حالا یه مستر گذاشتم و دوتا اسلیو و میخوام ادرس دهی کنم برنامه رو هم نوشتم ولی جواب نداد دوستان میتونن بررسی کنن مشکل باز کجاست؟
    این برنامه اسلیو
    $regfile = "m8def.dat"
    $crystal = 11059200
    $baud = 9600

    'Config Portc.5 = Output
    Config Portd.2 = Output
    Config Pinb.0 = Input
    Config Adc = Single , Prescaler = Auto


    Dim A As Word , W As Word , B As Byte , Udr_resive As Byte
    Dim Entekhab_slave As Byte
    Dataselect Alias Portd.2

    B = 0

    Do

    Dataselect = 0
    While B = 0
    Wend
    If Udr_resive = 2 Then
    Dataselect = 1
    Start Adc
    W = Getadc(5)
    Waitms 50
    Stop Adc
    A = W / 2
    'If Pinb.0 = 0 Then Print A

    Print Chr(a)
    'Wait 1
    End If
    Loop

    End
    '******************************* Data_resive ***********************************
    Data_resive:
    '(
    A = Udr
    B = 1
    Ucr.rxen = 0
    ')
    Udr_resive = Udr
    B = 1
    Ucr.rxen = 0
    Return
    چیزی که خودم فکر میکنم و نوشتم اینه که از اولdoابتدا میره رو مد دریافت و منتظر دستور مستر میمونه وقتی که دستور برسه و وقفه ایجاد بشهb=1میشه پس میره چک میکنه که عدد1هست یا دو اگه1بود اسلیو 1 و اگه2بود اسلیو 2میره دمارو میخونه و میفرسته برای مستر ودوباره باloop برمیگرده رو مد دریافت و باز منتظر دستور مستر میمونه
    این مال اسلیو
    حالا برنامه مستره اینه
    $regfile = "m16def.dat"
    $crystal = 11059200
    $baud = 9600

    Config Porta = Output
    Config Portb.1 = Output

    Config Lcdpin = Pin , Db4 = Pinb.5 , Db5 = Pinb.4 , Db6 = Pinb.3 , Db7 = _
    Pinb.2 , Rs = Pinb.7 , E = Pinb.6
    Config Lcd = 16 * 2

    Enable Interrupts
    Enable Urxc
    On Urxc Data_resive

    Dim A As Byte , B As Byte , C As String * 30 , Udr_resive(5) As Byte
    Dim Buffer As Byte , Entekhab_slave As Byte
    Dim Ss As String * 30 , Reshte As String * 30

    Deflcdchar 0 , 30 , 18 , 18 , 30 , 32 , 32 , 32 , 32 ' replace [x] with number (0-7)
    Deflcdchar 1 , 30 , 16 , 16 , 16 , 16 , 30 , 32 , 32 ' replace [x] with number (0-7)

    B = 0
    Do

    For Entekhab_slave = 1 To 2
    Portb.1 = 1
    Print Chr(entekhab_slave)
    Portb.1 = 0
    While B = 0
    Wend
    B = 0
    Ucr.rxen = 1
    Next Entekhab_slave
    Gosub Nemayesh

    Loop

    '********************************* nemayesh ************************************
    Nemayesh:
    Cursor Off

    Home H : Lcd Udr_resive(1) ; Chr(0) ; Chr(1)
    Home L : Lcd Udr_resive(2) ; Chr(0) ; Chr(1)

    Return
    '******************************* Data_resive ***********************************
    Data_resive:
    '(
    A = Udr
    B = 1
    Ucr.rxen = 0
    ')
    Udr_resive(entekhab_slave) = Udr
    B = 1
    Ucr.rxen = 0
    Return
    از اولdo
    اول میادمتغیر رو 1 میکنه و بعد میره رو مد ارسال
    و منتظر میمونه دیتا برسه اگهb=1 بشه دیتا رسیده و دوباره میاد دیتای رسیده رو ذخیره میکنه
    B = 0
    Ucr.rxen = 1 وبرمیگرده متغیر رو 2میکنه و دوباره میره رو مد ارسال و پس از اینکه دیتا دومی رسید از for خارج میشه و میره نمایش میده دمارو روی ال سی دی و برمیگرده از اول
    حالا هیچی نشون نمیده کجای کار ایراد داره؟
  6. #16
    2008/05/26
    1,044
    529

    پاسخ : مشکل با وقفه سريال در بسکام

    سلام
    خوشحالم که مشکلتون حل شد
    یه تحقیقی در مورد دستور config serialin بد نیست انجام بدین
    خیلی از مشکلاتون حل میشه
  7. #17
    2009/05/20
    772
    24

    پاسخ : مشکل با وقفه سريال در بسکام

    سلام ممنون فقط من نفهمیدم مشکل برنامم چی بود
صفحه 2 از 2 نخست 12
نمایش نتایج: از 11 به 17 از 17

موضوعات مشابه

  1. مشکل در وقفه سريال
    توسط mohammadt3000 در انجمن میکروکنترلرهای AVR
    پاسخ: 37
    آخرين نوشته: 2015/11/26, 17:00
  2. مشکل با وقفه سريال atmega64
    توسط ahmadsamiee در انجمن میکروکنترلرهای AVR
    پاسخ: 19
    آخرين نوشته: 2015/01/27, 09:03
  3. مشکل توقف ميکرو در وقفه سريال
    توسط ariaericson در انجمن میکروکنترلرهای AVR
    پاسخ: 7
    آخرين نوشته: 2014/07/22, 02:15
  4. مشکل ورود بيجهت وقفه سريال
    توسط rezash86 در انجمن میکروکنترلرهای AVR
    پاسخ: 3
    آخرين نوشته: 2014/05/06, 22:07
  5. مشکل با وقفه دريافت ارتباط سريال
    توسط naserim در انجمن پروسسورهای ARM
    پاسخ: 16
    آخرين نوشته: 2013/04/13, 20:47

کلمات کلیدی این موضوع

علاقه مندي ها (Bookmarks)

علاقه مندي ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •