Hallo Yannik,
probier mal folgenden code:
GrußCode:'Software Pwm an Porta.0 'Frequenz = 200Hz $regfile = "m32def.dat" $crystal = 16000000 Config Timer1 = Timer , Prescale = 8 Timer1 = 55536 Enable Timer1 On Timer1 Isr_von_timer1 Dim Soft_pwm As Byte Config Porta.0 = Output Porta.0 = 0 Pwm_1 Alias Porta.0 Enable Interrupts Do !nop Loop End Isr_von_timer1: Timer1 = 55536 Incr Soft_pwm If Soft_pwm = 255 Then Softpwm = 0 If Soft_pwm <= 127 Then Pwm_1 = 1 Else Pwm_1 = 0 End If Return
Chris
Lesezeichen