سلام دوستان واساتید گرامی
ساده ترین روش برای تولید یک موج مربعی 50 هرتز در بسکام را میتوانید به من آموزش دهید ...؟
با تشکر ....
ساده ترین روش برای تولید یک موج مربعی 50 هرتز در بسکام را میتوانید به من آموزش دهید ...؟
با تشکر ....




$regfile = "m8def.dat" $crystal = 8000000 Config Timer1 = Pwm , Pwm = 8 ,, Compare B Pwm = Disconnect , Prescale = 8 Enable Interrupts Dim A As Byte , I As Byte I = 1 Do I Loop End .....
$regfile = "m8def.dat"
$crystal = 8000000
Config Timer1 = Timer , Prescale = 8
Enable Interrupts
Enable Ovf1
On Timer1 _10ms
Timer1 = 55535
Start Timer1
Ddrd.0 = 1 : Portd.0 = 0
Do
Wait 1
Loop
_10ms:
Timer1 = 55535
Toggle Portd.0
Return

:mrgreen:$regfile = "m8def.dat" $crystal = 8000000 Config Pind.0 = Output Config Timer1 = Pwm , Pwm = 8 , , Compare B Pwm = Disconnect , Prescale =8 Enable Interrupts Dim A As Byte Dim I As Byte I = 1 Do Loop End ............. _10ms: Timer1 = 55535 Toggle Portd.0 Return

$regfile = "m8def.dat"
$crystal = 8000000
Config Timer1 = Timer , Prescale = 8
Enable Interrupts
Enable Ovf1
On Timer1 _10ms
Timer1 = 55535
Start Timer1
Ddrd.0 = 1 : Portd.0 = 0
Do
Wait 1
Loop
_10ms:
Timer1 = 55535
Toggle Portd.0
Return
دیدگاه