                                                   *6555
CNGE,	TABA
M13,	0-13
TCNTI,	TCNT
WBK,	1404
WTP,	1577

TAB,	0
	LAS
	CMA
	AND Z SF2
	SZA CLA
	JMP I WBK
	TAD I WTP
	DCA TAB
	TAD CNGE
	DCA I WTP
	TAD I TCNTI
	TAD M13
	SMA
	JMP .-2
	DCA TTT
TABA,	CLA
	ISZ TCNT
	ISZ TTT
	JMP GO
	TAD I TABI
	DCA I WTPE
GO,	TAD Z C240
	JMP I WBACK

WSTAR,	0
	HLT
	LAS
	AND Z SF2
	SNA CLA
	JMP I WSTAR
	LAS
	AND MASK
	SNA
	JMP WSTAB
	DCA WBLK
	DCA WPCK
	JMS WWRC
	TAD WRD1
	SKP
WSTAB,	TAD WRD2
	DCA I WTPE
	DCA TCNT
	ISZ WSTAR
	JMP I WSTAR

YERR,	HLT
	JMP I Z C200

WFF,	KSF
	JMP WFF
	KRB
	TAD Z M211
	SNA
	JMS I TABI
	TAD Z M1
	SNA
	DCA TCNT
	TAD Z M2
	SNA
	JMP ANNO
	TAD Z C214
	ISZ TCNT
	JMP I WBACK

ANNO,	JMS WSTAR
	JMP I Z C200
	TAD Z C377
	JMP I WBACK

WRDA,	CLA
	ISZ WPCK
	JMP WRDB
	TAD I WCORA
	AND Z SL6
	DCA WTEMP
	ISZ WCORA
	ISZ WCNTR
	SKP
	JMS WWRC
	TAD WTEMP
WRDC,	TAD M33
	SPA
	TAD N100
	SNA
	JMS I TABI
	TAD Z M1
	SNA
	DCA TCNT
	TAD Z M2
	SNA
	JMP ANNO
	TAD Z M1
	SMA SZA
	TAD N22
	TAD Z C215
	ISZ TCNT
	JMP I WBACK
WRDB,	CLA CMA
	DCA WPCK
	TAD I WCORA
	LSR
	5
	JMP WRDC

WWRC,	0
	JMS I WY
WCOR,	7000
	YERR
N100,	100
	1
WBLK,	0
SCAT,	CLA CLL
	TAD I WDONE
	SZA CLA
	JMP GOON
	MMSC
	SKP
	JMP I ERCM
	MMSF
	SKP
	JMP I MCOM
	JMP SCAT
GOON,	ISZ WBLK
	TAD M128
	DCA WCNTR
	TAD WCOR
	DCA WCORA
	JMP I WWRC

TABI,	TAB
TCNT,	0
TTT,	0
WPCK,	0
WCORA,	0
MASK,	1777
WDONE,	DONE
WTEMP,	0
WCNTR,	0
M33,	0-33
M128,	0-177
N22,	22
WBACK,	1404
WRD1,	WRDA
WRD2,	WFF
WTPE,	1577
WY,	R128

C377=71
SL6=123
M1=103
C215=70
C214=67
SF2=124
C200=65
WK=1577
DISM=JMP I Z 3
AUTO=10
M211=105
M2=73
C240=7

MCOM,	0
ERCM,	MERR

*3
	SCAT
*7
	240
*131
	CNGE-106
*200
	CLA CLL
	3111
	1054
	3020
	1131
	3125
	1052
	3021
	SKP
	WSTAR
	JMS I .-1
	JMP 200
	JMP 224
*241
	7000
	5212
*1401
	JMP I WK

*7200
LVSR,	0
	DCA BLKN
	TAD LVSR
	DCA LVSF
	JMP LVSF+3
LVST,	0
	DCA BLKN
	TAD LVST
	DCA LVSF
	CMA
	DCA LVST
	JMP LVSF+2
LVSF,	0
	DCA BLKN
	IAC
	DCA BACO
	CMA
	TAD BACO
	DCA FOCO
	IOF
	PCF
	TCF
	RRB
	DCF
	PLCF
	KCC
	MMCF
	TAD CN9
	DCA I MIN3
	TAD CN1
	MMML
	DCA DONE
	TAD CN2
	DCA DIRC
	TAD BLKN
	SNA
	JMP FERR+1
	CIA
	DCA BLKN
	TAD CN3
	DCA DRC
	TAD I LVSF
	DCA LVSR
	ISZ LVSF
	TAD I LVSF
	DCA BACK
	ISZ LVSF
	TAD I LVSF
	DCA UNIT
	ISZ LVSF
	TAD LVSF
	DCA Z 0
TURN,	ISZ DRC
	SKP
	JMP FERR
	TAD CN6
	TAD DIRC
	SNA CLA
	JMP MREV
	TAD CN7
	DCA DIRC
	TAD SPAC
	DCA SCH2
	TAD BLKN
	TAD FOCO
	DCA DISB
	TAD UNIT
	TAD DIRC
	MMMM
	JMS I MIN0
	DISM
DATA,	MMCF
	TAD TEMN
	TAD DISB
	SZA
	JMP SCH2
	TAD TEMN
	TAD BLKN
	SZA CLA
	JMP TURN
	CMA
	DCA DONE
	ISZ LVST
	JMP I BACK
	MMLM
	JMS I MIN0
	JMP I BACK
SCH2,	SPA CLA
	DISM
	JMP TURN
MREV,	TAD CN2
	DCA DIRC
	TAD DIRC
	MMMF
	JMS I MIN0
	TAD SMAC
	DCA SCH2
	TAD BLKN
	TAD BACO
	DCA DISB
	DISM
ERGO,	JMP I LVSR
FERR,	IAC
	IAC
	JMP I MIN2
CN1,	TEMN
CN2,	31
CN3,	7770
CN6,	7757
CN7,	21
CN9,	DATA
SMAC,	SMA CLA
SPAC,	SPA CLA
MIN0,	WAIT
MIN2,	OOPS
MIN3,	MCOM
BLKN,	0
BACO,	0
FOCO,	0
DIRC,	0
DRC,	0
BACK,	0
UNIT,	0
DISB,	0
DONE,	0
TEMN,	0
*LVSR+200
MERR,	MMRS
	AND CN13
	SZA CLA
	JMP MENZ
	TAD I MIN5
	CIA
	TAD CN20
	SNA CLA
	TAD ERCN
	TAD CN22
OOPS,	DCA HOOP
	MMRS
	DCA MRSA
	TAD HOOP
	MMLM
	JMS WAIT
	JMP I MIN7
MENZ,	JMS WAIT
	JMP I MIN6
W128,	0
	CLA
	TAD W128
	DCA MRDS
	TAD CN23
	JMP MWRS+5
MWRS,	0
	CLA
	TAD MWRS
	DCA MRDS
	TAD CN18
	DCA CHK1+2
	TAD CN10
	DCA PASS+2
	JMP MRD1
R128,	0
	CLA
	TAD R128
	DCA MRDS
	TAD CN23
	JMP MRDS+3
MRDS,	0
	CLA
	TAD CN18
	DCA CHK1+2
	TAD CN12
	DCA PASS+2
	SKP
MRD1,	IAC
	IAC
	DCA ERCN
	TAD I MRDS
	DCA HEER
	TAD MRDS
	JMP CHK
MRD2,	TAD HEER
	TAD CN15
	DCA R128
	TAD I R128
	DCA MWRS
PASS,	TAD HEER
	MMML
	TAD
	MMLF
	TAD CN20
	DCA I MIN5
	DCA I MIN4
	DISM
DROR,	MMSC
	SKP CLA
	JMP MERR
	MMCF
	TAD CHK1+2
	CIA
	TAD CN23
	SZA CLA
	JMP EXNT-2
	TAD MWRS
	DCA I R128
	TAD R128
	MMML
	TAD R128
	TAD CN15
	DCA R128
	TAD I R128
	DCA MWRS
	ISZ HOOP
	DISM
EXNT,	MMLM
	JMS WAIT
	CMA
	JMP DROR-2
CHK,	DCA Z AUTO
	TAD I Z AUTO
	DCA CHK1+1
	TAD I Z AUTO
	DCA CHK1+3
	TAD I Z AUTO
	CIA
	DCA HOOP
	TAD I Z AUTO
CHK1,	JMS I MIN8
	0
	0
	0
	JMP I Z AUTO
WAIT,	0
	MMSF
	JMP .-1
	MMCF
	JMP I WAIT
ERCN,	0
HEER,	0
HOOP,	0
MRSA,	0
CN10,	TAD PASS+3
CN12,	TAD DROR+3
CN13,	1000
CN15,	200
CN18,	PASS
CN20,	DROR
CN22,	3
CN23,	MRD2
MIN4,	DONE
MIN5,	MCOM
MIN6,	TURN
MIN7,	ERGO
MIN8,	LVSF
*MERR+200

                                                        