' Program to show binary count on 3 LEDS


		Include "PROTON_4.INC"

		I       Var     Byte		' Define loop variable
		LEDS    Var     PORTD		' Alias PORTB to LEDS


		TRISD = %11111000			' Set PORTB.0-2 to output

Loop:	For I = 0 To 7				' Go through For..Next loop 7 times
        	LEDS = I				' Show binary value on LEDs
        	Pause 500				' Delay for .5 seconds
        Next

        Goto Loop					' Go back to loop and blink LED forever
        End