اطلاعیه

Collapse
No announcement yet.

ایجاد 4 فرکانس

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

    ایجاد 4 فرکانس

    با سلام

    می خواهم 4 فرکانس PWM با فرکانس 50 هرتز و پریود 20 میلی ثانیه و دیوتی سایکل قابل تنظیم بین 1 تا 2 میلی ثانیه ایجاد کنم
    با ATmega32 و Bascom ، خودم به صورت نرم افزاری ایجاد کردم ولی می خواهم که با واحد PWM میکرو باشه و این 4 فرکانس دائما در حال ایجاد شدن باشه و من هر جای برنامه بتونم فقط مقدار دیوتی سایکل هر کانال رو تغییر بدهم

    با سپاس
    http://vz.iminent.com/vz/39a77668-19...h-fishing.giff

    #2
    پاسخ : ایجاد 4 فرکانس

    سلام

    ببخشید با این برنامه می توان 4 فرکانس با مشخصات مذکور تولید کرد به صورتی که دائما این 4 کانال فرکانس تولید کند و هر جای برنامه بتوانم دیوتی سایکل را تغییر بدهم ؟ :question:
    یه توضیحی بدهید
    اگر روش بهتری هم هست ممنون میشوم ، می خواهم که فرکانس تا حد امکان دقیق باشد

    کد:
    $regfile = "m16def.dat"
    $crystal = 8000000
    
    Config Portb = Output                    'motor1
    Config Timer0 = Timer , Prescale = 1024           '8000000/(1024*156)=50Hz
    Config Timer1 = Timer , Prescale = 8
    
    Dim Motor_time(4) As Word
    
    Motor_time(1) = 1000
    Motor_time(2) = 1200
    Motor_time(3) = 1500
    Motor_time(4) = 2000
    
    Motor1 Alias Portb.0 : Motor2 Alias Portb.1 : Motor3 Alias Portb.2 : Motor4 Alias Portb.3
    Stop Timer1
    
    Enable Ovf0
    Enable Interrupts
    
    Enable Timer0
    On Ovf0 Make_pwm
    
    Timer0 = 178
    
    Do
    Loop
    
    End
    
    Make_pwm:
    
    Timer0 = 178
    Timer1 = 0
    Start Timer1
    
    set motor1
    Do
    Loop Until Timer1 >= Motor_time(1)
    Reset Motor1
    Timer1 = 0
    
    Set Motor2
    Do
    Loop Until Timer1 >= Motor_time(2)
    Reset Motor2
    Timer1 = 0
    
    Set Motor3
    Do
    Loop Until Timer1 >= Motor_time(3)
    Reset Motor3
    Timer1 = 0
    
    Set Motor4
    Do
    Loop Until Timer1 >= Motor_time(4)
    Reset Motor4
    
    Return

    اضافه شده در تاریخ :
    هنوز منتظر هستم !!!!!
    http://vz.iminent.com/vz/39a77668-19...h-fishing.giff

    دیدگاه

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