CPU = 16F876

MHZ = 10

CONFIG 16254



;***********************************************

; http://www.basicmicro.com                    

; Title : asm.bas                             

; Author : Dale Kubin                          

; Date : 04/29/02                              

; Inline ASM command. Insert assembly directly

; into a MBasic program.                       

;***********************************************



Temp VAR byte

LongTemp VAR word



main



ASM

{	

	clrf	LONGTEMP & 0x7F

	movlw	10						;load W with 10

	movwf	TEMP & 0x7F				;store 10 in Temp

	movlw	50

asmloop

	addwf	LONGTEMP & 0x7F,f		; Add 25 to LongTemp

	skpnc							; If Low byte of longtemp carries 

	incf	(LONGTEMP+1) & 0x7F,F	; Increment Long Temp+1

	decfsz	TEMP & 0x7F,f			; Loop 10 times

	goto	asmloop

}

	debug [DEC longtemp,13]			;longtemp will increnment each loop

	goto main