@20
	RTA
	BSE i	 [MARK STATE
	 1
	ATR
	SET i 12 [GIVE TTY TIME
	 -430
	XSK i 12
	 JMP p-1
	SET i 1	 [TEXT DATA
	 2A-1
	SET i 2	 [TEXT LENGTH
	 2A-2B
#1A	LDA i 1	 [GET NEXT CHARACTER
	STC 1D
	RTA
	SET i 11 [OUTPUT 11 BITS
	 -13	 [1 START, 8 DATA
#1B	BCL i	 [AND 2 STOP
#1C	 1
	SRO i
#1D
	ADD 1C
	ATR	 [OUTPUT BIT TO RELAY
	SET i 12
	 -430    [DELAY FOR 110 BAUD
	XSK i 12
	 JMP p-1
	XSK i 11
	 JMP 1B	 [NEXT BIT
	XSK i 2
	 JMP 1A	 [NEXT CHARACTER
	HLT

	[ASCII TEXT WITH ONE 0 START
	[BIT AND TWO 1 STOP BITS
#2A	3220 [H
	3212 [E
	3230 [L
	3230 [L
	3236 [O
	3100 [ 
	3250 [T
	3212 [E
	3230 [L
	3212 [E
	3250 [T
	3262 [Y
	3240 [P
	3212 [E
	3032 [CR
	3024 [LF
#2B