.TITLE	TWAIT
	.MCALL	.TWAIT,.PRINT,.EXIT

START:	MOV	#10.,%1
10$:	.PRINT	#TICK
	.TWAIT	#AREA,#S..5
	.PRINT	#TOCK
	.TWAIT	#AREA
	SOB	%1,10$
	.PRINT	#FIVES
	.TWAIT	#AREA,#S.5
	.PRINT	#ONE.5M
	.TWAIT	#AREA,#M.1.5
	.PRINT	#XITING
	.EXIT

AREA:	.BLKW	2
S..5:	.WORD	0,25.		; .5 SEC = 25 TICKS
S.5:	.WORD	0,50.*5		; 5 SEC
M.1.5:	.WORD	0,90.*50.	; 1.5 MIN
TICK:	.ASCII	"TICK"<200>
TOCK:	.ASCIZ	" TOCK"
FIVES:	.ASCIZ	"PAUSING 5 SEC"
ONE.5M:	.ASCIZ	"PAUSING 1.5 MIN"
XITING:	.ASCIZ	"EXITING"

	.END	START