;Expt5.asm
        ;Project: Creating a tone
	;List P = 16F84
	;#include <p16F84.inc>
	;__CONFIG 1Bh    ;_CP_OFF & _PWRTE_ON & _WDT_OFF & _RC_OSC


	ORG 0		;This is the start of memory for the program.
SetUp	BSF 03,5	;Go to Bank 1
	CLRF 06		;Make all port B output		
	BCF 03,5	;Go to Bank 0 - the program memory area.	
	CLRF 06		;Clear outputs of junk 	
	GOTO Main


Delay	NOP		;Create 1mS delay
	DECFSZ 1A,1
	GOTO Delay
	RETURN

Main	BSF 06,7	;Turn on driver transistor
	CALL Delay	;Create ON time
	BCF 06,7	;Turn off driver transistor
	CALL Delay	;Create OFF time
	GOTO Main	;Loop

	END		;Tells assembler end of program