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

⟦3b52e2931⟧ 

    Length: 1384 (0x568)
    Notes: pts_type(SC)
    Names: »EBCDIC.SC«

Derivation

└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
    └─⟦this⟧ »M:DEMO/EBCDIC.SC« 
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »M:DE10/EBCDIC.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »M:DE10/EBCDIC.SC«

PTS(SC)

	IDENT EBCDIC 	REL 10.0 80-03-14 870105041000 

* 
************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   EBCDIC = EBCDIC/ASCII TABLE 
* 
* 
* 
* 
* 
* 
************************************************* 
* 
	ENTRY	TASCII 
	ENTRY	TEBCDIC
* 
* 
*  CONDITIONAL ASSEMBLY  (SEE ALSO DRDC15)
* 
X:A	EQU	1	CODE , 0=ASCII , 1=EBCDIC   (DRDC15)
CODE	EQU	X:A
X:B	EQU	1	READ COMMAND HANDLING IF = 1  (DRDC15)
RCOM	EQU	X:B
	EJECT
* 
* 
*	TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII
* 
* 
TASCII	EQU	*
	IFT	CODE=1 
	XIF
	EJECT
* 
* 
*	TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC
* 
* 
TEBCDIC	EQU	* 
	IFF	CODE+RCOM=0
	XIF
	END

Full view