NEW
  AUTO 3,1
				.LIST OFF
				.OP	65c02
				.OR $2000
				.TF BIN/fmt
*--------------------------------------
				.MA	DEBUG
:1				bit $C000
				bpl :1
				sta	$C010
				.EM
*--------------------------------------
				.INB inc/bs.i
				.INB inc/mon.i
*--------------------------------------
HEADER			cld						Allows BRUN at ORG=$2000
				jmp CODE.START			for debugging without relocation
				.DA #CMDBITS0.FNOPT+CMDBITS0.CRFLG
				.DA #CMDBITS1.A+CMDBITS1.B+CMDBITS1.E+CMDBITS1.F+CMDBITS1.SD+CMDBITS1.F
				.DA 0					spare
				.DA CODE.END
				.DA DATA.END
				.DA 0
				.DA 0					spare....16 bytes header
*--------------------------------------
R.MSG.USAGE		.DA MSG.USAGE
				.DA 0
*--------------------------------------
CODE.START		
				
				ldy R.MSG.USAGE
				lda R.MSG.USAGE+1
				ldx #GP.TBOX.PrintF
				jsr GP.TBOX

.8				clc
				rts

CODE.END		.EQ *
*--------------------------------------
MSG.USAGE		.CZ -"\r\rHello from fmt EXT command.\r\r"
				
DATA.END		.EQ *
*--------------------------------------
MAN
SAVE usr/src/basic.fx/fmt.s
ASM