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





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









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









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





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

نمایش نتایج: از 1 به 4 از 4
  1. #1
    2012/09/16
    boushehr
    109
    13

    مشکل با ماژول های hmt , hmr

    سلام . من چند وقت پیش چند تا ماژول اچ ام تی و اچ ام آر رو گرفتم. اما حالا که میخوام باهاش دیتا رو از یه میکرو به میکروی دیگه بفرستم نمیشه. با سیم درس میفرسته اما بدون اون نه..من با بسکام برنامه می نویسم و اینم برنامه هام هستن.
    کد:
    $regfile = "m32def.dat"
    $crystal = 8000000
    $baud = 9600
    Config Lcdpin = Pin , Rs = Pina.0 , E = Pina.1 , Db4 = Pina.2 , Db5 = Pina.3_
     , Db6 = Pina.4 , Db7 = Pina.5
    'Config Portd.0 = Output
    'Config Portd.1 = Output
    Config Portb.0 = input
    Portb.0 = 1
    Dim A As String * 1
    Dim B As Byte
    B = 1
    A = "a"
     Do
     Cls
     Lcd "hamed"
     'Portd.0 = 1
     'Portd.1 = 1
     Wait 1
    ' Portd.0 = 0
     'Portd.1 = 0
     Locate 2 , 1
     Lcd "tahamtan"
     Wait 1
     If Pinb.0 = 0 Then Exit Do
    
     Loop
    
    Do
    Wait 1
    Lcd "1"
    Printbin 2
    Wait 1
    Lcd "2 "
    
    Loop
    
    
    
     End
    این هم گیرنده

    کد:
    $regfile = "m32def.dat"
    $crystal = 8000000
    $baud = 9600
    Config Lcdpin = Pin , Rs = Pina.0 , E = Pina.1 , Db4 = Pina.2 , Db5 = Pina.3_
     , Db6 = Pina.4 , Db7 = Pina.5
    'Config Portd.0 = Output
    'Config Portd.1 = Output
    Config Portb.0 = input
    Portb.0 = 1
    Dim A As String * 1
    Dim B As Byte
    B = 1
    A = "a"
     Do
     Cls
     Lcd "hamed"
     'Portd.0 = 1
     'Portd.1 = 1
     Wait 1
    ' Portd.0 = 0
     'Portd.1 = 0
     Locate 2 , 1
     Lcd "tahamtan"
     Wait 1
     If Pinb.0 = 0 Then Exit Do
    
     Loop
    
    Do
    Wait 1
    Lcd "1"
    Printbin 2
    Wait 1
    Lcd "2 "
    
    Loop
    
    
    
     End
    آیا کسی میدونه چرا کار نمیکنه؟

    وقتی فرستنده و گیرنده رو راه می اندازم هیچ دیتایی نمیاد اما وقتی انیبیل گیرنده رو در میارم و دوباره به vcc وصل میکنم یه مشت دیتای بی ربط میفرسته که اصلا اون دیتای من توش نیست.
    راهی هست که فهمید فرستنده و گیرنده کار میکنند یا نه؟
    آیا ممکنه که سوخته باشند؟ آیا این دو فرستنده و گیرنده رو میشه بدون نصب آنتن راه انداخت؟
    آیا طول سیم آنتن مهم نیست؟من یه سیم استخونی 10 سانتی بهش زدم و وصلش کردم به آنتن
  2. #2
    2014/05/22
    200
    5

    پاسخ : مشکل با ماژول هاي hmt , hmr

    $regfile = "m16def.dat"
    $crystal = 8000000
    Config Com1 = 9600 , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
    Config Serialin = Buffered , Size = 20 , Bytematch = All
    Config Serialout = Normal
    '############################################ ##################################
    Config Timer1 = Pwm , Pwm = 10 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down , Prescale = 8
    '############################################ ##################################
    Config Lcd = 16 * 2
    Config Lcdpin = Pin , Db4 = Pinb.3 , Db5 = Pinb.2 , Db6 = Pinb.1 , Db7 = Pinb.0 , E = Pinb.4 , Rs = Pinb.5
    '############################################ ##################################
    Config Servos = 1 , Servo1 = Portc.0 , Reload = 10
    Config Portc.0 = Output

    Config Watchdog = 1024
    Dim I As Byte

    Config Portd.2 = Output
    Config Portd.3 = Output
    Config Portd.6 = Output
    Config Portd.7 = Output
    Dim S1 As String * 10
    Config Porta = Output
    Servo(1) = 90
    Enable Interrupts
    '"""""""&q uot;"""""""&quo t;"""""""" ""

    Do


    Loop

    Serial0bytereceived:
    S1 = Inkey()


    Return
    -----------------------------------------------

    سلام
    اين برنامه 100% جواب ميده من هميشه با اين قالب الگوريتممو مينويسم ، شما برنامتونو در حلقه اصلي بنويسيد ، قسمت ليبل اينتراپت سريال Serial0bytereceived: هر داده اي از پورت سريال دريافت ميکنه داخل S1 ميريزه و مي تونيد با اون دستوراتونو انجام بديد .
    اين برنامه هم براي SEND و RECEIVE هستش .
    داده هاي که مي خوايد بفرستيد حتما از نور رشته باشن مثل S1
    کريستال خارجي فراموش نکنيد .
  3. #3
    2013/07/03
    129
    2

    پاسخ : مشکل با ماژول هاي hmt , hmr

    دوست عزيز بارها روي اين موضوع بحث شده :agree:.براي نومونه لينک زير:

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

    عضویت

    [glow=red,2,300]بياييد با كمك هم الكترونيك را گسترش دهيم[/glow]
    [glow=yellow,2,300]AVR & ARM[/glow]
    [glow=green,2,300]عشق است و برنامه نويسي [/glow]
  4. #4
    2012/12/19
    35
    0

    پاسخ : مشکل با ماژول هاي hmt , hmr

    سلام
    دوست عزيز اين ماژول در زماني كه ديتا توسط فرستنده فرستاده نميشه به شدت نويزي ميشه
    بايد نرم افزار رو طوري بنويسي كه هميشه ديتا بفرسته يعني اينكه ماژول بيكار نمونه تا مشكل حل بشه
    استفاده از كريستال خارجي هم يادت نره
    بزرگي سراسر به گفتار نيست

    دو صد گفته چون نيم کردار نيست
نمایش نتایج: از 1 به 4 از 4

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

  1. مشکل با ماژول pir
    توسط احسان رضابخش در انجمن سایر ماژول ها
    پاسخ: 1
    آخرين نوشته: 2014/07/23, 12:02
  2. مشکل با ماژول usb به serial
    توسط hamedspartacus در انجمن میکروکنترلرهای AVR
    پاسخ: 1
    آخرين نوشته: 2014/07/02, 22:24
  3. مشکل با ماژول HMT-HMR
    توسط rezasede در انجمن میکروکنترلرهای AVR
    پاسخ: 44
    آخرين نوشته: 2012/12/27, 11:32
  4. مشکل در ماژول hm-r
    توسط hamid11300 در انجمن ماژول های RF - ISM Band و بلوتوث
    پاسخ: 48
    آخرين نوشته: 2012/07/25, 13:41
  5. مشکل با ماژول LCD N96
    توسط mohammad_6910 در انجمن پروسسورهای ARM
    پاسخ: 7
    آخرين نوشته: 2011/11/01, 21:19

کاربرانی که این تاپیک را مشاهده کرده اند: 0

هیچ عضوی در لیست وجود ندارد.

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

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

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

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

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