; salvar en binario (BEG>beg ; END>end)

def	MACRO	; label,code,dc
	cnop	0,4
	dc.l	\1,(\@_e-\@)
\@:	dc.b	\2,0
\@_e:
	ENDM

beg:	dc.l	"FORM",(end-ctlg)
ctlg:	dc.l	"CTLG"
	dc.l	"FVER",(fver2-fver)
fver:	dc.b	"$VER: assignwedge.catalog 1.0 (25.11.94)",0
	even
fver2:	
	dc.l	"LANG",(lang2-lang)
lang:	dc.b	"español",0
	even
lang2:	
	dc.l	"CSET",(cset2-cset)
cset:	blk.b	32,0
	cnop	0,4
cset2:
	dc.l	"STRS",(end-strs)

strs:	def	0,"Reintentar|Assignar...|Montar|Denegar|Cancelar"
	def	1,"Asignación para %s:"
	def	2,"Asignar"

	cnop	0,4
end: