; WAVEFORM.ASM
; CREATE A WAVEFORM BY SWITCHING IO8 ON AND OFF WITH DELAYS IN BETWEEN
	ORG	8000H		;MUST ALWAYS BE ORG'ED AT 8000H FOR SBC-1
WAVE:	CLR	C		;(C3 HEX) NEEDED ONLY IF USING AUTOBOOT
REPEAT:	MOV	24H,#80H	;24H IS IO1-8, 80H IS BIT 7 ONLY ON
	CALL	4BH		;IOSCAN ROUTINE IN JUMP TABLE
	MOV	A,#1		;NUMBER OF SECONDS IN ACCUMULATOR
	CALL	45H		;DELAY IN MILLISECONDS ROUTINE IN JUMP TABLE
	MOV	24H,#0		;24H IS IO1-8, 0 IS ALL BITS OFF
	CALL	4BH		;IOSCAN ROUTINE IN JUMP TABLE
	MOV	A,#1		;NUMBER OF SECONDS IN ACCUMULATOR
	CALL	45H		;DELAY IN MILLISECONDS ROUTINE IN JUMP TABLE
	JMP	REPEAT		;DO NEXT CYCLE
	END			;NEEDED BY MANY ASSEMBLER PROGRAMS