DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦30c72479c⟧ 

    Length: 7424 (0x1d00)
    Notes: pts_type(SC)
    Names: »LOGAR.SC«

Derivation

└─⟦8ac270cab⟧ Bits:30009705 Philips computer tape "LINSIM8-2"
    └─⟦this⟧ »LINSIM82/LOGAR.SC« 
└─⟦fce1dcf99⟧ Bits:30009704 Philips computer tape "KMD15"
    └─⟦this⟧ »LINSIM/LOGAR.SC«

PTS(SC)

	IDENT LOGAR  	REL 1.1 78-04-21  870150040110 
			UPDATE #0 77.01.26 JES 
* 
* 
*	CENTRAL COMPUTER SIMULATION 
* 
*	COMMON WORK AREAS 
* 
* 
* 
*	ENTRY POINTS
* 
* 
	ENTRY	MOL	OWN LINE MESSAGES
	ENTRY	MBL	BEGIN OF LINE MESSAGES 
	ENTRY	TAB1	CHAR TABLE 1
	ENTRY	TAB2	CHAR TABLE 2
	ENTRY	TAB3 
	ENTRY	TAB4 
	ENTRY	AREA	TRANSMIT AREAS
	ENTRY	LENGTH	INDIVIDUAL AREA LENGTH
	ENTRY	TRQ	TRANSMIT QUEUE 
	ENTRY	TRQE	END OF TRANSMIT QUEUE 
	ENTRY	PRPOOL	PRINTER OCCUPIED BUFFER POOL
	ENTRY	TEXT1
	ENTRY	TEXT2	***CASSETTE ERROR*** 
	ENTRY	TEXT3	***BUFFERS DUMPED ON CASSETTE*** 
	ENTRY	TEXT4	***BUFFERS LOADED*** 
* 
* 
*	AREA LENGTH 
* 
* 
AREAL	EQU	256	1 WORD + 128 CHARACTERS 
LENGTH	EQU	AREAL+AREAL	TOTAL CHARACTER NUMBER 
	EJECT
* 
* 
*	TABLE 1 
* 
*	TABLE OF VALID CHARACTERS TO BE TRANSLATED TO ONE CHARACTER 
* 
* 
TAB1	DATA	TAB1E-*	LENGTH
	DATA	/2020	SPACE 
	DATA	/21A1	! 
	DATA	/22A2	" 
	DATA	/2323	# 
	DATA	/24A4	$ 
	DATA	/2525	% 
	DATA	/2626	& 
	DATA	/28A8	( 
	DATA	/2929	VERTICAL ARROW, DOWN
	DATA	/2A2A	* 
	DATA	/2BAB	+ 
	DATA	/2C2C	, 
	DATA	/2DAD	- 
	DATA	/2EAE	. 
	DATA	/3ABA	: 
	DATA	/3B3B	; 
	DATA	/3D3D	= 
	DATA	/3FBF	? 
	DATA	/30B0	0 
	DATA	/3131	1 
	DATA	/3232	2 
	DATA	/33B3	3 
	DATA	/3434	4 
	DATA	/35B5	5 
	DATA	/36B6	6 
	DATA	/3737	7 
	DATA	/3838	8 
	DATA	/39B9	9 
	DATA	/4040	@ 
	DATA	/41C1	A 
	DATA	/42C2	B 
	DATA	/4343	C 
	DATA	/44C4	D 
	DATA	/4545	E 
	DATA	/4646	F 
	DATA	/47C7	G 
	DATA	/48C8	H 
	DATA	/4949	I 
	DATA	/4A4A	J 
	DATA	/4BCB	K 
	DATA	/4C4C	L 
	DATA	/4DCD	M 
	DATA	/4ECE	N 
	DATA	/4F4F	O 
	DATA	/50D0	P 
	DATA	/5151	Q 
	DATA	/5252	R 
	DATA	/53D3	S 
	DATA	/5454	T 
	DATA	/55D5	U 
	DATA	/56D6	V 
	DATA	/5757	W 
	DATA	/5858	X 
	DATA	/59D9	Y 
	DATA	/5ADA	Z 
	DATA	/5B5B 
	DATA	/5CDC 
	DATA	/5D5D	AA
	DATA	/5E5E 
TAB1E	EQU	* 
	EJECT
* 
* 
*	TABLE 2 
* 
*	TABLE OF VALID CHARACTERS TO BE TRANSLATED BY TEXTS 
* 
* 
TAB2	DATA	TAB2E-*	LENGTH
	DATA	/8A,TLF 
	DATA	/0D,TCR 
	DATA	/01,TSOH
	DATA	/02,TSTX
	DATA	/83,TETX
	DATA	/04,TEOT
	DATA	/85,TENQ
	DATA	/86,TACK
	DATA	/10,TDLE
	DATA	/91,TX0 
	DATA	/15,TNAK
	DATA	/16,TSYN
	DATA	/97,TETB
TAB2E	EQU	* 
	EJECT
* 
*	TABLE 3 
*	EBCDIC
* 
TAB3	DATA	TAB3E-*	LENGTH
	DATA	/2040	SPACE 
	DATA	/215A	! 
	DATA	/227F	" 
	DATA	/237B	# 
	DATA	/245B	$ 
	DATA	/256C	% 
	DATA	/2650	& 
	DATA	/284D	( 
	DATA	/295D	VERTICAL ARROW DOWN 
	DATA	/2A5C	* 
	DATA	/2B4E	+ 
	DATA	/2C7D	, 
	DATA	/2D6D	- 
	DATA	/2E4B	. 
	DATA	/3A7A	: 
	DATA	/3B5E	; 
	DATA	/3D7E	= 
	DATA	/3F6F	? 
	DATA	/30F0	0 
	DATA	/31F1	1 
	DATA	/32F2	2 
	DATA	/33F3	3 
	DATA	/34F4	4 
	DATA	/35F5	5 
	DATA	/36F6	6 
	DATA	/37F7	7 
	DATA	/38F8	8 
	DATA	/39F9	9 
	DATA	/407C	@ 
	DATA	/41C1	A 
	DATA	/42C2	B 
	DATA	/43C3	C 
	DATA	/44C4	D 
	DATA	/45C5	E 
	DATA	/46C6	F 
	DATA	/47C7	G 
	DATA	/48C8	H 
	DATA	/49C9	I 
	DATA	/4AD1	J 
	DATA	/4BD2	K 
	DATA	/4CD3	L 
	DATA	/4DD4	M 
	DATA	/4ED5	N 
	DATA	/4FD6	O 
	DATA	/50D7	P 
	DATA	/51D8	Q 
	DATA	/52D9	R 
	DATA	/53E2	S 
	DATA	/54E3	T 
	DATA	/55E4	U 
	DATA	/56E5	V 
	DATA	/57E6	W 
	DATA	/58E7	X 
	DATA	/59E8	Y 
	DATA	/5AE9	Z 
TAB3E	EQU	* 
	EJECT
* 
*	TABLE 4 
*	EBCDIC
* 
TAB4	DATA	TAB4E-*	LENGTH
	DATA	/25,TLF 
	DATA	/0D,TCR 
	DATA	/01,TSOH
	DATA	/02,TSTX
	DATA	/03,TETX
	DATA	/37,TEOT
	DATA	/2D,TENQ
	DATA	/2E,TACK
	DATA	/10,TDLE
	DATA	/3D,TNAK
	DATA	/32,TSYN
	DATA	/26,TETB
TAB4E	EQU	* 
	EJECT
* 
* 
*	BUFFER POOL FOR OCCUPATION OF PRINTER 
* 
* 
PRPOOL	DATA	*+4,2 
	DATA	*+4,/B,0,/B,0 
	EJECT
* 
* 
*	TEXTS CORRESPONDING TO TABLE 2
* 
* 
TLF	DATA	2,'LF' 
TCR	DATA	2,'CR' 
TSOH	DATA	3,'SOH' 
TSTX	DATA	3,'STX' 
TETX	DATA	3,'ETX' 
TEOT	DATA	3,'EOT' 
TENQ	DATA	3,'ENQ' 
TACK	DATA	3,'ACK' 
TDLE	DATA	3,'DLE' 
TX0	DATA	2,'X0' 
TNAK	DATA	3,'NAK' 
TSYN	DATA	3,'SYN' 
TETB	DATA	3,'ETB' 
TEXT1	DATA	35,'ENTER A FOR ASCII OR'
	DATA	' E FOR EBCDIC :' 
TEXT2	DATA	20,'***CASSETTE ERROR***'
TEXT3	DATA	32,'***BUFFERS DUMPED ON'
	DATA	' CASSETTE***'
TEXT4	DATA	20,'***BUFFERS LOADED***'
	EJECT
* 
* 
*	MESSAGES TO BE PRINTED ON OWN LINE
* 
* 
MOL	DATA	MOL0,MOL1,MOL2,MOL3,MOL4,MOL5,MOL6,MOL7
MOL0	DATA	19,'*** BUFFER FULL ***'
MOL1	DATA	20,'*** BUFFER RESET ***' 
MOL2	DATA	22,'*** RESYNCHRONIZED ***' 
MOL3	DATA	19,'*** CARRIER OFF ***'
MOL4	DATA	23,'*** MODEM NOT READY ***'
MOL5	DATA	16,'*** TIME OUT ***' 
MOL6	DATA	33,'***TRANSMIT IDLE - CARRIER OFF' 
	DATA	'***' 
MOL7	DATA	32,'***TRANSMIT IDLE - CARRIER ON*' 
	DATA	'**'
	EJECT
* 
* 
*	MESSAGES TO BE IN BEGINNING OF LINE 
* 
* 
MBL	DATA	MBL0,MBL1,MBL2 
MBL0	DATA	2,'C:'
MBL1	DATA	2,'T:'
MBL2	DATA	2,'L:'
	EJECT
* 
* 
*	TRANSMIT BUFFERS
* 
* 
AREA	RES	AREAL	AREA 0 
	RES	AREAL	AREA 1 
	RES	AREAL	AREA 2 
	RES	AREAL	AREA 3 
	RES	AREAL	AREA 4 
	RES	AREAL	AREA 5 
	RES	AREAL	AREA 6 
	RES	AREAL	AREA 7 
	RES	AREAL	AREA 8 
	RES	AREAL	AREA 9 
	RES	AREAL	AREA A 
	RES 	AREAL	AREA B
	RES	AREAL	AREA C 
	RES	AREAL	AREA D 
	RES	AREAL	AREA E 
	RES	AREAL	AREA F 
* 
* 
*	TRANSMIT QUEUE
* 
* 
TRQ	RES	100	TRANSMIT QUEUE
TRQE	EQU	*	END OF TRANSMIT QUEUE
* 
* 
	END

Full view