#include P18F458.INC
MOVLF MACRO K, MYREG
	MOVLW	K
	MOVWF	MYREG
	ENDM
DELAY_1 MACRO V1, TREG
	LOCAL	BACK	
	MOVLW	V1
	MOVWF	TREG
BACK	NOP
	NOP
	NOP
	NOP		
	DECF	TREG,F
	BNZ	BACK
	ENDM
	ORG	0
	CLRF	  TRISB		
OVER	MOVLF	  0x55,PORTB
	DELAY_1 0x200,0x10
	MOVLF	  0xAA,PORTB
	DELAY_1 0x200,0x10
	BRA	  OVER	
	END