Directory of image this file is from
This file as a plain text file

*0
READ,	0
NKSF,	KSF
	JMP .-1
NKRB,	KRB
	JMP I READ


WRITE,	0
	TSF
	JMP .-1
	TLS
	JMP I WRITE


*14



INPUT,	BCKGOA-1
OUTPUT,	7735
LIM,	BUFF
POI,	BUFF-1


START,	KSF
	SKP CLA
	JMP NEXT
CONTIN,	TAD LIM
	CIA
	TAD POI
	SNA CLA
	JMP NODRIV

	TAD I POI
	CDF 0
	DCA I CHARI
	TAD N5322
	DCA I N7706
	TAD N1313
	DCA I N7716
	CDF 10

	TAD POI
	TAD NM400
	SZA SMA CLA
	JMP .+3
	TAD NBUFM1
	DCA POI

	CIF 0
	JMS I SYSI
	4210
	0
	50
	HLT

OUTLOP,	CDF 10
	TAD I INPUT
	CDF 0
	DCA I OUTPUT
	ISZ COUNT
	JMP OUTLOP
	CDF CIF 0
	JMP I RETURN

BCKGOA,	4207
	1010
	0
	64
	HLT
WAYOUT,	5314

COUNT,	-6
SYSI,	7607
N5322,	5322
N7706,	7706
N1313,	1313
N7716,	7716
NM400,	-400
CHARI,	7713
RETURN,	7736
NM215,	-215
N212,	212
N5306,	5306


NODRIV,	TAD N5306
	DCA WAYOUT
	CDF 0
	TAD NKSF
	DCA I N7706
	TAD N5322
	DCA I CHARI
	TAD NKRB
	DCA I N7716
	JMP OUTLOP



NEXT,	KRS
	TAD NM200
	SZA CLA
	JMP NODRIV+2
	KCC

INLOOP,	TAD LIM
	CMA
	TAD POI
	SNA CLA
	JMP NODRIV
	JMS READ
	JMS WRITE

	DCA TEM
	TAD TEM
	TAD NM215
	SZA CLA
	JMP NOTCRT
	TAD N212
	JMS WRITE
NM200,	7600	/AND CLA

NOTCRT,	TAD TEM
	TAD CONTRR
	SNA CLA
	JMP CONTIN
	TAD TEM
	DCA I LIM
	TAD LIM
	TAD NM400
	SPA CLA
	JMP INLOOP
	TAD NBUFM1
	DCA LIM
	JMP INLOOP



TEM,	0
NBUFM1,	BUFF-1
CONTRR,	-222


BUFF,


"T;"H;"I;"S;" ;"I;"S;" ;"D;"R;"I;"V;"E;" ;"M;"O;"D;"E;