	.TITLE DSIGN
	.GLOBL DSIGN,.DA,.AO,.FS,.ZS,.HS
DSIGN	0
	JMS*	.DA
	JMP	.+3
S1	0
S2	0
	JMS*	.AO
		S2+400000
	JMS*	.AO
		S1+400000
	LAC*	.HS	/HAC SIGN TO FAC
	DAC*	.FS
	JMS*	.ZS	/SIGN TO .AB
	JMP*	DSIGN
	.END
