	move.l	$4.w,a6
	lea 	libname,a1	; Pekar på dos.library
	moveq	#$00,d0
	jsr	-552(a6)	; OpenLibrary
	move.l	d0,a6
	jsr	-60(a6)		;Output
	move.l	d0,d6
	move.l	d6,d1
	move.l	#text,d2	; Pekar på texten
	move.l	#(end-text),d3
	jsr	-48(a6)		;Write (file, buffer, length)
loop:	btst	#2,$dff016
	bne	loop

	move.l	d6,d1
	move.l	#10,d2
	move.l	#1,d3
	jsr	-48(a6)
	move.l	a6,a1
	move.l	$4.w,a6
	jsr	-414(a6)
	rts


text:
	dc.b	"Press right mousebutton to continue...",0  ;10
end:
libbase:	dc.l	0
libname:	dc.b	'dos.library',0
