; This is a very simple testfile
; with two comments in a row here!

$processor	71		; processor configuration
$watchdog	on
$pwrup		on
$protect	off
$clock		hs, 4000000
$idwords	0,0x000e,0,0b0000000010001101

	org 0x0000

	w	=	1		; note either equ or =
	same	=	0

	reg	equ	0x25
	bit0	equ	0
	bit1	equ	1
	bit2	equ	2
	bit3	equ	3
	bit4	equ	4
	bit5	equ	5
	bit6	equ	6
	bit7	equ	7

; bit functions

	bcf	reg, bit0
	bcf	reg, bit4
	bcf	reg, bit7

	bsf	reg, bit0
	bsf	reg, bit5
	bsf	reg, bit7

	btfsc	reg, bit0
	btfsc	reg, bit3
	btfsc	reg, bit7

	btfss	reg, bit0
	btfss	reg, bit6
	btfss	reg, bit7

	end

; ... The End ...


