Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site mit-eddie.UUCP
Path: utzoo!linus!security!genrad!mit-eddie!gs
From: gs@mit-eddie.UUCP (Gordon Strong)
Newsgroups: net.lang
Subject: Merry Christmas from Macro-10
Message-ID: <945@mit-eddie.UUCP>
Date: Mon, 21-Nov-83 01:24:23 EST
Article-I.D.: mit-eddi.945
Posted: Mon Nov 21 01:24:23 1983
Date-Received: Tue, 22-Nov-83 00:33:30 EST
Organization: MIT, Cambridge, MA
Lines: 29

Here's my submission: Merry Christmas from macro, a PDP-10 
assembler available under Tops-20.

	title MC

	search monsym		;get symbols

	a=1			;accumulator definitions
	t=5			;temporary register

start:	RESET%			;initialize the world
	setz t,			;zero out our counter
loop:	cain t,^d15		;have we printed 15 yet?
	 jrst done		;yes, we're done
	hrroi a,[asciz "Merry Christmas
"]				;pointer to text string
	PSOUT%			;print on primary output
	aoja t,loop		;increment counter and do it again
done:	HALTF%			;stop the program
	jrst .-1		;no need to continue

	end start

Happy holidays...

-- 
Gordon Strong
decvax!genrad!mit-eddie!gs
GS@MIT-XX