                                                                
            
            *7400
7400  6032  BEGRIM,	KCC		/RIM-LOADER
7401  4216  	JMS READIN
7402  7106  	CLL RTL
7403  7006  	RTL
7404  7510  	SPA
7405  5201  	JMP BEGRIM+1
7406  7006  	RTL
7407  6031  	KSF
7410  5207  	JMP .-1
7411  6034  	KRS
7412  7420  	SNL
7413  3754  	DCA I KOBUS
7414  3354  	DCA KOBUS
7415  5600  	JMP I BEGRIM
7416  0000  READIN,	0		/READ-ROUTINE
7417  6031  	KSF
7420  5217  	JMP .-1
7421  6036  	KRB
7422  3347  	DCA CHAR
7423  1347  	TAD CHAR
7424  5616  	JMP I READIN
7425  7240  BEGN,	CLA CMA		/(AL)BIN-LOADER
7426  3345  	DCA INDIC		/SET BIN-MODE
7427  3346  	DCA CHKSM
7430  3353  	DCA FIRST
7431  4320  	JMS BEGG
7432  5231  	JMP .-1
7433  1347  GO,	TAD CHAR
7434  3350  	DCA CKT
7435  1347  	TAD CHAR
7436  7106  	CLL RTL
7437  7006  	RTL
7440  7006  	RTL
7441  3351  	DCA WORD
7442  4216  	JMS READIN
7443  1351  	TAD WORD
7444  3351  	DCA WORD
7445  7430  	SZL
7446  7240  	CLA CMA
7447  3352  	DCA MEM
7450  1347  	TAD CHAR
7451  1350  	TAD CKT
7452  3350  	DCA CKT
7453  4320  	JMS BEGG
7454  5360  	JMP BEND
7455  2352  	ISZ MEM
7456  5302  	JMP STORE
7457  1345  	TAD INDIC
7460  7640  	SZA CLA
7461  5306  	JMP B1
7462  1353  	TAD FIRST
7463  7650  	SNA CLA
7464  5311  	JMP B2
7465  1351  B4,	TAD WORD
            
7466  1273  	TAD M200
7467  7510  	SPA
7470  5273  	JMP B3
7471  1354  	TAD KOBUS
7472  3351  	DCA WORD
7473  7600  B3,	M200,7600		/CLA
7474  1355  	TAD ORIGIN
7475  3751  	DCA I WORD
7476  1350  CHEX,	TAD CKT
7477  1346  	TAD CHKSM
7500  3346  	DCA CHKSM
7501  5233  	JMP GO
7502  1351  STORE,	TAD WORD
7503  3755  	DCA I ORIGIN
7504  2355  	ISZ ORIGIN
7505  5276  	JMP CHEX
7506  1351  B1,	TAD WORD
7507  3355  	DCA ORIGIN
7510  5276  	JMP CHEX
7511  2353  B2,	ISZ FIRST
7512  7402  	HLT
7513  7604  	CLA OSR
7514  3354  	DCA KOBUS
7515  1354  	TAD KOBUS
7516  3355  	DCA ORIGIN
7517  5265  	JMP B4
7520  0000  BEGG,	0
7521  3356  	DCA SWITCH
7522  4216  	JMS READIN
7523  1357  	TAD M377
7524  7640  	SZA CLA
7525  5331  	JMP .+4
7526  2356  	ISZ SWITCH
7527  7240  	CLA CMA
7530  5321  	JMP BEGG+1
7531  1356  	TAD SWITCH
7532  7640  	SZA CLA
7533  5322  	JMP BEGG+2
7534  1347  	TAD CHAR
7535  0341  	AND MASK
7536  1273  	TAD M200
7537  7450  	SNA
7540  5720  	JMP I BEGG
7541  7700  MASK,	SMA CLA
7542  5322  	JMP BEGG+2
7543  2320  	ISZ BEGG
7544  5720  	JMP I BEGG
7545  0000  INDIC,	0
7546  0000  CHKSM,	0
7547  0000  CHAR,	0
7550  0000  CKT,	0
7551  0000  WORD,	0
            
7552  0000  MEM,	0
7553  0000  FIRST,	0
7554  0000  KOBUS,	0
7555  0000  ORIGIN,	0
7556  0000  SWITCH,	0
7557  7401  M377,	-377
7560  1351  BEND,	TAD WORD
7561  7041  	CMA IAC
7562  1346  	TAD CHKSM
7563  7402  	HLT
7564  5225  	JMP BEGN
                                                                
BEGG    7520
BEGN    7425
BEGRIM  7400
BEND    7560
B1      7506
B2      7511
B3      7473
B4      7465
CHAR    7547
CHEX    7476
CHKSM   7546
CKT     7550
FIRST   7553
GO      7433
INDIC   7545
KOBUS   7554
MASK    7541
MEM     7552
M200    7473
M377    7557
ORIGIN  7555
READIN  7416
STORE   7502
SWITCH  7556
WORD    7551

                                                             