CPU = 16F876
MHZ = 10
CONFIG 16254

;***********************************************
; http://www.basicmicro.com                    
; Title : whilewend.bas                             
; Author : Dale Kubin                          
; Date : 04/29/02                              
; While..Wend command. Repeat a group of statements
; until something is not True.                        
;***********************************************

Temp var Byte
Check var PortB.bit0

Clear

	While temp < 20	; repeat the following commands.
		if check = 1 then JumpOut
		Temp = Temp +1
	Wend	; repeating until temp is not less than100
	
JumpOut
	End