ORG		$8000
START:
	 MOVEA.L	#S,A0
	 MOVEA.L	#0,A1
	 MOVE.B		#C,D0
LOOP	 
	 CMP.B		#0,(A0)
	 BEQ		END
	 CMP.B		(A0)+,D0
	 BNE	  	LOOP
	 SUBQ.L  	#1,A0
	 MOVEA.L 	A0,A1
END	 SIMHALT             
	 
	 ORG		$8100
S    DC.B		'QUI QUO:QUA',0
C    EQU		':'
	 
	 END 		START


*~Font name~Courier New~
*~Font size~10~
*~Tab type~1~
*~Tab size~4~