; Set per uscita PWM per 68HC908GP32
; Risoluzione 8 bit, Frequenza fissa circa 500Hz
; La variabile VCTRL contiene il valore del PWM ( $00=0%, $FF=100% )

$include 'gp32regs.inc'
VCTRL          EQU   $50

*             SET PWM OUT TIMER 2

		MOV      #%00110110,T2SC   	;STOP + CLEAR
                MOV      #$00,T2MODH       	;SET BASE FREQ. PWM ( ~2 mS )
                MOV      #$FF,T2MODL
                MOV      #%00011010,T2SC0  	;T2-C0 OUT CMP, TOV ON, OFF SU COMPARE

                MOV      #$00,T2CH0H 		; VALORE INIZIALE
                MOV      VCTRL,T2CH0L

                MOV      #%00000110,T2SC    	;PRESCALER /64  START TIMER2, no INT

MAIN            ;Calcolo del PWM e aggiornamento di VCTRL

	    	MOV      #$00,T2CH0H       	; aggiorna PWM
                MOV      VCTRL,T2CH0L

	    	BRA      MAIN