'///////////////////////////////////////////////////////// '/// FastAVR Basic Compiler for AVR by MICRODESIGN /// '/// Name of Your project '///////////////////////////////////////////////////////// $Device= m8 ' used device $Stack = 32 ' stack depth $Clock = 8.000 ' adjust for used crystal $Timer1 = PWM, 8, PwmA= Inverted, PwmB = Normal , Prescale = 1 $Timer2 = PWM, 8, Inverted, Prescale = 1 Dim n As Byte Set DDRB.3 : Set DDRB.1 : Set DDRB.2 Start Timer1 Start Timer2 n = 0 Do Pwm1A = n Pwm2 = n Pwm1B = n Incr n WaitMs 10 Loop