' Simply flash an LED connected to PORTB pin 1 (RB1)
' On for 1 second, and off for 1 second
' be sure to turn the watch dog timer off!
Sub main()
	PORTB=0			' initialize port b
	TRISB.1 = 0		' make PORTB pin 1 an output
	
	While 1			' endless loop
		PORTB.1=1	' turn LED on
		DelayS(1)	' wait for 1 second
		PORTB.1=0	' turen LED off
		DelayS(1)	' wait for 1 second
	End While		' loop back and do it again
	
End Sub