اطلاعیه

Collapse
No announcement yet.

پاسخ : مشکل در اجرای برنامه {حل شد}

Collapse
X
 
  • فیلتر
  • زمان
  • Show
Clear All
new posts

    پاسخ : مشکل در اجرای برنامه {حل شد}

    سلام به دوستان :smile:
    آقا یکی بگه مشکل این برنامه چیه
    کد:
    $regfile = "M8DEF.DAT"
    $crystal = 8000000
    '________________________________PWM Config____________________________________
    
    Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Prescale = 1
    
    Config Timer2 = Pwm , Pwm = On , Compare Pwm = Clear Up , Prescale = 1
    '________________________________Variables______________________________________
    Dim R As Word
    Dim G As Word
    Dim B As Word
    
    Pwm1a = R
    Pwm1b = G
    Ocr2 = B
    
    R = 0
    G = 0
    B = 0
    '__________________________________-RGB-________________________________________
    R:
    Do
    Pwm1a = R
    B = 0
    Ocr2 = B
    Waitms 5
    Incr R
    If R = 50 Then Goto G
    Loop
    
    G:
    Do
    Pwm1b = G
    Pwm1a = R
    R = 0
    Waitms 5
    Incr G
    If G = 50 Then Goto B
    Loop
    
    B:
    Do
    Ocr2 = B
    G = 0
    Pwm1b = G
    Waitms 5
    Incr B
    If B = 50 Then Goto R
    Loop
    میخوام با سه تا pwm سه تا led رو نورشونو به نوبت از کم به زیاد برسونم اما led که به ocr2 وصله روشنه میمونه و اصلا خاموش نمیشه(عین قورباغه نگات میکنه :eek: )
    نمیدونم اشکال کار چیه :NO:
    ممممممنون :applause:

    #2
    پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

    سلام
    من بیسیک بلد نیستم اما این ببین شاید مشکلتو حل کنه

    http://avrhelp.mcselec.com/index.html?config_timer2.htm

    :NO:
    http://www.eca.ir/forum2/index.php?topic=88852.0
    دکتر چمران در 1311 در تهران متولد شد
    وي در زمان اقامت در آمريکا انجمن اسلامي آمريکا را تأسيس کرد که منجر به قطع بورسيه وي توسط شاه شد.
    او با اينکه يکي از دانشمندان مطرح آمريکا به حساب مي آمد بدون توجه به مدرک به مصر رفت و آموزش نظامي ديد.

    دیدگاه


      #3
      پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

      نوشته اصلی توسط 011
      سلام
      من بیسیک بلد نیستم اما این ببین شاید مشکلتو حل کنه

      http://avrhelp.mcselec.com/index.html?config_timer2.htm

      :NO:
      http://www.eca.ir/forum2/index.php?topic=88852.0
      ممنونم ولی من میخوام بدونم اشکال کار چیه که اینطوری میشه تا دیگه به مشکل برنخورم

      دیدگاه


        #4
        پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

        برنامه را توی اون تاپیک براتون گذاشتم ...
        بدون مشکل داره کار میکنه ...
        [b]چگونه همه پایه های میکروکنترلر AVR را PWM کنیم؟
        معرفی نرم افزارEasy 7segment (برای راه اندازی آسانتر 7segment )
        معرفی نرم افزار Codewizard PWM
        با من بیشتر آشنا شوید

        دیدگاه


          #5
          پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

          نوشته اصلی توسط سامان اسدی
          برنامه را توی اون تاپیک براتون گذاشتم ...
          بدون مشکل داره کار میکنه ...
          ممنون آقا سامان برنامه خودم درست شد :wow: :applause:
          مشکلشم این بود که باید Compare Pwm روی Clear Down میبود نه روی clear up
          اگه روی clear up باشه دستور بر عکس میشه یعنی led از روشن به خاموش میره :eek:
          اما تایمر یک اینطوری نیست :agree:
          شما میدونی چرا؟؟؟

          اضافه شده در تاریخ :
          نوشته اصلی توسط zoheyr79
          سلام به دوستان :smile:
          آقا یکی بگه مشکل این برنامه چیه
          کد:
          $regfile = "M8DEF.DAT"
          $crystal = 8000000
          '________________________________PWM Config____________________________________
          
          Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Up , Prescale = 1
          
          Config Timer2 = Pwm , Pwm = On , Compare Pwm = Clear Up , Prescale = 1
          '________________________________Variables______________________________________
          Dim R As Word
          Dim G As Word
          Dim B As Word
          
          Pwm1a = R
          Pwm1b = G
          Ocr2 = B
          
          R = 0
          G = 0
          B = 0
          '__________________________________-RGB-________________________________________
          R:
          Do
          Pwm1a = R
          B = 0
          Ocr2 = B
          Waitms 5
          Incr R
          If R = 50 Then Goto G
          Loop
          
          G:
          Do
          Pwm1b = G
          Pwm1a = R
          R = 0
          Waitms 5
          Incr G
          If G = 50 Then Goto B
          Loop
          
          B:
          Do
          Ocr2 = B
          G = 0
          Pwm1b = G
          Waitms 5
          Incr B
          If B = 50 Then Goto R
          Loop
          میخوام با سه تا pwm سه تا led رو نورشونو به نوبت از کم به زیاد برسونم اما led که به ocr2 وصله روشنه میمونه و اصلا خاموش نمیشه(عین قورباغه نگات میکنه :eek: )
          نمیدونم اشکال کار چیه :NO:
          ممممممنون :applause:

          دیدگاه


            #6
            پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

            نوشته اصلی توسط zoheyr79
            ممنون آقا سامان برنامه خودم درست شد :wow: :applause:
            مشکلشم این بود که باید Compare Pwm روی Clear Down میبود نه روی clear up
            اگه روی clear up باشه دستور بر عکس میشه یعنی led از روشن به خاموش میره :eek:
            اما تایمر یک اینطوری نیست :agree:
            شما میدونی چرا؟؟؟
            خواهش میکنم
            ببین من حقیقتش بسکام رو خوب بلد نیستم ...
            میرم توی محیطش نمیدونم چرا هیچی یادم نمیاد ...
            ولی میتونم یه کدی براتون بنویسم که به راحتی میتونید با تایمر یک و دو سه تا PWM بگیرید ...
            قبوله ؟؟
            کنترل کردنش هم خیلی راحته ...
            [b]چگونه همه پایه های میکروکنترلر AVR را PWM کنیم؟
            معرفی نرم افزارEasy 7segment (برای راه اندازی آسانتر 7segment )
            معرفی نرم افزار Codewizard PWM
            با من بیشتر آشنا شوید

            دیدگاه


              #7
              پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

              نوشته اصلی توسط سامان اسدی
              خواهش میکنم
              ببین من حقیقتش بسکام رو خوب بلد نیستم ...
              میرم توی محیطش نمیدونم چرا هیچی یادم نمیاد ...
              ولی میتونم یه کدی براتون بنویسم که به راحتی میتونید با تایمر یک و دو سه تا PWM بگیرید ...
              قبوله ؟؟
              کنترل کردنش هم خیلی راحته ...
              نه آقا سامان الان همه مشکلم حل شد
              از هر سه تا pwm هم دارم استفاده می کنم

              دیدگاه


                #8
                پاسخ : مشکل در اجرای برنامه (تایمر2 pwm درست کار نمیکن&#

                نوشته اصلی توسط zoheyr79
                نه آقا سامان الان همه مشکلم حل شد
                از هر سه تا pwm هم دارم استفاده می کنم
                به هر صورت
                این برنامه پیشنهادی منه ...
                خیلی راحت میشه سه تا PWM را کنترل کنید ...
                کد:
                $regfile = "m8def.dat"
                $crystal = 8000000
                $hwstack = 20
                $swstack = 20
                $framesize = 20
                
                Config Portb.1 = Output
                Config Portb.2 = Output
                Config Portb.3 = Output
                
                
                Pwm_1 Alias Ocr1al
                Pwm_2 Alias Ocr1bl
                Pwm_3 Alias Ocr2
                
                ' Timer/Counter 1 initialization
                ' Clock source: System Clock
                ' Clock value: 31.250 kHz
                ' Mode: Fast PWM top=&H00FF
                ' OC1A output: Non-Inv.
                ' OC1B output: Non-Inv.
                ' Input Capture on Falling Edge
                Tccr1a = &HA1
                Tccr1b = &H0C
                ' Timer/Counter 2 initialization
                ' Clock source: System Clock
                ' Clock value: 31.250 kHz
                ' Mode: Fast PWM top=&HFF
                ' OC2 output: Non-Inverted PWM
                Tccr2 = &H6E
                
                
                
                Pwm_1 = 0
                Pwm_2 = 85
                Pwm_3 = 170
                
                Do
                  Incr Pwm_1
                  Incr Pwm_2
                  Incr Pwm_3
                  Waitms 10
                Loop
                End
                موفق باشید
                [b]چگونه همه پایه های میکروکنترلر AVR را PWM کنیم؟
                معرفی نرم افزارEasy 7segment (برای راه اندازی آسانتر 7segment )
                معرفی نرم افزار Codewizard PWM
                با من بیشتر آشنا شوید

                دیدگاه

                لطفا صبر کنید...
                X