	list      p=10F206	; list directive to define processor
	#include  ..\m0-4.asm
	config_
 	
#define	OPTIONinit	b'10001000'	; no wakup, pullup, Clock 1:1
#define TRISIOinit 	b'00001001'	; 0 output, 1,2 output	
#define GPIOinit 	b'00000111'	; GPIO  all HI
;****************************************************************************************

	init_			; reasonable initiation of special function registers 


	cblock	_MINRAM			; start of variables
	 SyS1
	endc
#define STACK		_MAXRAM
	delay .5000000
	goto mloop
flflop	

#define	hiSide	SyS1,2
	do_		GPIO,=,GPIO,OR,b'11111111',lit8

	do_		SyS1,=,SyS1,XOR,b'00000100',lit8
	delay .9
    if_m hiSide,is_on,1
	  do_	GPIO,=,GPIO,OR,b'00000010',lit8
	else_m
	  do_	GPIO,=,GPIO,OR,b'00000100',lit8
	end_m
	retlw 0
	
mloop
	call flflop
	delay .10000
	do_		GPIO,=,GPIO,AND,b'11111000',lit8
	delay .100000
	goto mloop

		end