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

⟦5509a2d88⟧

    Length: 3214 (0xc8e)
    Notes: pts_type(SC)
    Names: »EBCDIC.SC«

Derivation

└─⟦4358b8014⟧ Bits:30009669 Philips computer tape "600124"
    └─⟦this⟧ »MON10/EBCDIC.SC« 
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
    └─⟦this⟧ »M:DECE/EBCDIC.SC« 
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
    └─⟦this⟧ »MON10/EBCDIC.SC« 

PTS(SC)

	IDENT EBCDIC 	REL 10.0 80-03-14 SHB

* 
************************************************
* 
*   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 
* SHB 
	DATA	/7F01,/0203,/0009,/0000	00-07 
* 
	DATA	/0000,/0000,/0C00,/0000	08-0F 
	DATA	/1011,/1213,/000A,/0000	10-17 
	DATA	/0019,/0000,/1C1D,/1E1F	18-1F 
	DATA	/0000,/0000,/0000,/171B	20-27 
	DATA	/0000,/0000,/0005,/0000	28-2F 
	DATA	/0000,/1600,/0000,/0004	30-37 
	DATA	/0000,/0000,/1415,/001A	38-3F 
	DATA	/2041,/4243,/4445,/4647	40-47 
	DATA	/4849,/5B2E,/3C28,/2B21	48-4F 
	DATA	/264A,/4B4C,/4D4E,/4F50	50-57 
	DATA	/5152,/5D24,/2A29,/3B5E	58-5F 
	DATA	/2D2F,/5354,/5556,/5758	60-67 
	DATA	/595A,/7C2C,/255F,/3E3F	68-6F 
	DATA	/1831,/3233,/3435,/3637	70-77 
	DATA	/3839,/3A23,/4027,/3D22	78-7F 
	DATA	/2061,/6263,/6465,/6667	80-87 
	DATA	/6869,/5B2E,/3C28,/2B21	88-8F 
	DATA	/266A,/6B6C,/6D6E,/6F70	90-97 
	DATA	/7172,/5D24,/2A29,/3B5E	98-9F 
	DATA	/2D2F,/7374,/7576,/7778	A0-A7 
	DATA	/797A,/7C2C,/255F,/3E3F	A8-AF 
	DATA	/3031,/3233,/3435,/3637	B0-B7 
	DATA	/3839,/3A23,/4027,/3D22	B8-BF 
	DATA	/2041,/4243,/4445,/4647	C0-C7 
	DATA	/4849,/5B2E,/3C28,/2B21	C8-CF 
	DATA	/264A,/4B4C,/4D4E,/4F50	D0-D7 
	DATA	/5152,/5D24,/2A29,/3B5E	D8-DF 
	DATA	/2D2F,/5354,/5556,/5758	E0-E7 
	DATA	/595A,/7C2C,/255F,/3E3F	E8-EF 
	DATA	/3031,/3233,/3435,/3637	F0-F7 
	DATA	/3839,/3A23,/4027,/3DFF	F8-FF 
	XIF
	EJECT
* 
* 
*	TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC
* 
* 
TEBCDIC	EQU	* 
	IFF	CODE+RCOM=0
	DATA	/0001,/0203,/372D,/0000	00-07 
	DATA	/0005,/1500,/0C00,/0000	08-0F 
	DATA	/1011,/1213,/3C3D,/3226	10-17 
	DATA	/7019,/3F27,/1C1D,/1E1F	18-1F 
* SHB 
	DATA	/405A,/7F7B,/5B6C,/507D	20-27 
* 
	DATA	/4D5D,/5C4E,/6B60,/4B61	28-2F 
	DATA	/F0F1,/F2F3,/F4F5,/F6F7	30-37 
	DATA	/F8F9,/7A5E,/4C7E,/6E6F	38-3F 
	DATA	/7CC1,/C2C3,/C4C5,/C6C7	40-47 
	DATA	/C8C9,/D1D2,/D3D4,/D5D6	48-4F 
	DATA	/D7D8,/D9E2,/E3E4,/E5E6	50-57 
* SHB 
	DATA	/E7E8,/E97B,/7C5B,/5F6D	58-5F 
* 
	DATA	/0081,/8283,/8485,/8687	60-67 
	DATA	/8889,/9192,/9394,/9596	68-6F 
	DATA	/9798,/99A2,/A3A4,/A5A6	70-77 
	DATA	/A7A8,/A91C,/6A00,/0000	78-7F 
	DATA	/544F,/5353	SPEC. FLEX CHAR. 'TOSS'  80-84
	XIF
	END

HexDump

0x000…02c (0, 0, 400) Head {h00=0x0028, h01=0x0050, text=» IDENT EBCDIC  REL 10.0 80-03-14 SHB«, t00=0x0000, t01=0x0004}
0x02c…034             Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0030}
0x034…03e             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0038}
0x03e…076             Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0000, t01=0x0042}
0x076…080             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007a}
0x080…0a8             Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0084}
0x0a8…0b2             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ac}
0x0b2…0da             Head {h00=0x0024, h01=0x0050, text=»*   EBCDIC = EBCDIC/ASCII TABLE «, t00=0x0000, t01=0x00b6}
0x0da…0e4             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00de}
0x0e4…0ee             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x0ee…0f8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x0f8…102             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x102…10c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x10c…116             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x116…150             Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x011a}
0x150…15a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0154}
0x15a…170             Head {h00=0x0012, h01=0x0050, text=» ENTRY TASCII «, t00=0x0000, t01=0x015e}
0x170…186             Head {h00=0x0012, h01=0x0050, text=» ENTRY TEBCDIC«, t00=0x0000, t01=0x0174}
0x186…190             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018a}
0x190…19a (1, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0004}
0x19a…1cc             Head {h00=0x002e, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY  (SEE ALSO DRDC15)«, t00=0x0001, t01=0x000e}
0x1cc…1d6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0040}
0x1d6…20c             Head {h00=0x0032, h01=0x0050, text=»X:A EQU 1 CODE , 0=ASCII , 1=EBCDIC   (DRDC15)«, t00=0x0001, t01=0x004a}
0x20c…220             Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:A«, t00=0x0001, t01=0x0080}
0x220…258             Head {h00=0x0034, h01=0x0050, text=»X:B EQU 1 READ COMMAND HANDLING IF = 1  (DRDC15)«, t00=0x0001, t01=0x0094}
0x258…26c             Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:B«, t00=0x0001, t01=0x00cc}
0x26c…27a             Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00e0}
0x27a…284             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ee}
0x284…28e             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f8}
0x28e…2c4             Head {h00=0x0032, h01=0x0050, text=»* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII«, t00=0x0001, t01=0x0102}
0x2c4…2ce             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0138}
0x2ce…2d8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0142}
0x2d8…2ec             Head {h00=0x0010, h01=0x0050, text=»TASCII EQU *«, t00=0x0001, t01=0x014c}
0x2ec…300             Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0001, t01=0x0160}
0x300…30e             Head {h00=0x000a, h01=0x0050, text=»* SHB «, t00=0x0001, t01=0x0174}
0x30e…33a             Head {h00=0x0028, h01=0x0050, text=» DATA /7F01,/0203,/0009,/0000 00-07 «, t00=0x0001, t01=0x0182}
0x33a…344             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x344…370             Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0C00,/0000 08-0F «, t00=0x0002, t01=0x0028}
0x370…39c             Head {h00=0x0028, h01=0x0050, text=» DATA /1011,/1213,/000A,/0000 10-17 «, t00=0x0002, t01=0x0054}
0x39c…3c8             Head {h00=0x0028, h01=0x0050, text=» DATA /0019,/0000,/1C1D,/1E1F 18-1F «, t00=0x0002, t01=0x0080}
0x3c8…3f4             Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0000,/171B 20-27 «, t00=0x0002, t01=0x00ac}
0x3f4…420             Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0005,/0000 28-2F «, t00=0x0002, t01=0x00d8}
0x420…44c             Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/1600,/0000,/0004 30-37 «, t00=0x0002, t01=0x0104}
0x44c…478             Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/1415,/001A 38-3F «, t00=0x0002, t01=0x0130}
0x478…4a4             Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 40-47 «, t00=0x0002, t01=0x015c}
0x4a4…4d0             Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 48-4F «, t00=0x0002, t01=0x0188}
0x4d0…4fc             Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 50-57 «, t00=0x0003, t01=0x0024}
0x4fc…528             Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E 58-5F «, t00=0x0003, t01=0x0050}
0x528…554             Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 60-67 «, t00=0x0003, t01=0x007c}
0x554…580             Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F 68-6F «, t00=0x0003, t01=0x00a8}
0x580…5ac             Head {h00=0x0028, h01=0x0050, text=» DATA /1831,/3233,/3435,/3637 70-77 «, t00=0x0003, t01=0x00d4}
0x5ac…5d8             Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 78-7F «, t00=0x0003, t01=0x0100}
0x5d8…604             Head {h00=0x0028, h01=0x0050, text=» DATA /2061,/6263,/6465,/6667 80-87 «, t00=0x0003, t01=0x012c}
0x604…630             Head {h00=0x0028, h01=0x0050, text=» DATA /6869,/5B2E,/3C28,/2B21 88-8F «, t00=0x0003, t01=0x0158}
0x630…65c             Head {h00=0x0028, h01=0x0050, text=» DATA /266A,/6B6C,/6D6E,/6F70 90-97 «, t00=0x0003, t01=0x0184}
0x65c…688             Head {h00=0x0028, h01=0x0050, text=» DATA /7172,/5D24,/2A29,/3B5E 98-9F «, t00=0x0004, t01=0x0020}
0x688…6b4             Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/7374,/7576,/7778 A0-A7 «, t00=0x0004, t01=0x004c}
0x6b4…6e0             Head {h00=0x0028, h01=0x0050, text=» DATA /797A,/7C2C,/255F,/3E3F A8-AF «, t00=0x0004, t01=0x0078}
0x6e0…70c             Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 B0-B7 «, t00=0x0004, t01=0x00a4}
0x70c…738             Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 B8-BF «, t00=0x0004, t01=0x00d0}
0x738…764             Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 C0-C7 «, t00=0x0004, t01=0x00fc}
0x764…790             Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 C8-CF «, t00=0x0004, t01=0x0128}
0x790…7bc             Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 «, t00=0x0004, t01=0x0154}
0x7bc…7e8             Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E D8-DF «, t00=0x0004, t01=0x0180}
0x7e8…814             Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 E0-E7 «, t00=0x0005, t01=0x001c}
0x814…840             Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F E8-EF «, t00=0x0005, t01=0x0048}
0x840…86c             Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 F0-F7 «, t00=0x0005, t01=0x0074}
0x86c…898             Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3DFF F8-FF «, t00=0x0005, t01=0x00a0}
0x898…8a4             Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0005, t01=0x00cc}
0x8a4…8b2             Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x00d8}
0x8b2…8bc             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e6}
0x8bc…8c6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f0}
0x8c6…8fc             Head {h00=0x0032, h01=0x0050, text=»* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC«, t00=0x0005, t01=0x00fa}
0x8fc…906             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0130}
0x906…910             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013a}
0x910…926             Head {h00=0x0012, h01=0x0050, text=»TEBCDIC EQU * «, t00=0x0005, t01=0x0144}
0x926…93e             Head {h00=0x0014, h01=0x0050, text=» IFF CODE+RCOM=0«, t00=0x0005, t01=0x015a}
0x93e…96a             Head {h00=0x0028, h01=0x0050, text=» DATA /0001,/0203,/372D,/0000 00-07 «, t00=0x0005, t01=0x0172}
0x96a…996             Head {h00=0x0028, h01=0x0050, text=» DATA /0005,/1500,/0C00,/0000 08-0F «, t00=0x0006, t01=0x000e}
0x996…9c2             Head {h00=0x0028, h01=0x0050, text=» DATA /1011,/1213,/3C3D,/3226 10-17 «, t00=0x0006, t01=0x003a}
0x9c2…9ee             Head {h00=0x0028, h01=0x0050, text=» DATA /7019,/3F27,/1C1D,/1E1F 18-1F «, t00=0x0006, t01=0x0066}
0x9ee…9fc             Head {h00=0x000a, h01=0x0050, text=»* SHB «, t00=0x0006, t01=0x0092}
0x9fc…a28             Head {h00=0x0028, h01=0x0050, text=» DATA /405A,/7F7B,/5B6C,/507D 20-27 «, t00=0x0006, t01=0x00a0}
0xa28…a32             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00cc}
0xa32…a5e             Head {h00=0x0028, h01=0x0050, text=» DATA /4D5D,/5C4E,/6B60,/4B61 28-2F «, t00=0x0006, t01=0x00d6}
0xa5e…a8a             Head {h00=0x0028, h01=0x0050, text=» DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 «, t00=0x0006, t01=0x0102}
0xa8a…ab6             Head {h00=0x0028, h01=0x0050, text=» DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F «, t00=0x0006, t01=0x012e}
0xab6…ae2             Head {h00=0x0028, h01=0x0050, text=» DATA /7CC1,/C2C3,/C4C5,/C6C7 40-47 «, t00=0x0006, t01=0x015a}
0xae2…b0e             Head {h00=0x0028, h01=0x0050, text=» DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F «, t00=0x0006, t01=0x0186}
0xb0e…b3a             Head {h00=0x0028, h01=0x0050, text=» DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57 «, t00=0x0007, t01=0x0022}
0xb3a…b48             Head {h00=0x000a, h01=0x0050, text=»* SHB «, t00=0x0007, t01=0x004e}
0xb48…b74             Head {h00=0x0028, h01=0x0050, text=» DATA /E7E8,/E97B,/7C5B,/5F6D 58-5F «, t00=0x0007, t01=0x005c}
0xb74…b7e             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0088}
0xb7e…baa             Head {h00=0x0028, h01=0x0050, text=» DATA /0081,/8283,/8485,/8687 60-67 «, t00=0x0007, t01=0x0092}
0xbaa…bd6             Head {h00=0x0028, h01=0x0050, text=» DATA /8889,/9192,/9394,/9596 68-6F «, t00=0x0007, t01=0x00be}
0xbd6…c02             Head {h00=0x0028, h01=0x0050, text=» DATA /9798,/99A2,/A3A4,/A5A6 70-77 «, t00=0x0007, t01=0x00ea}
0xc02…c2e             Head {h00=0x0028, h01=0x0050, text=» DATA /A7A8,/A91C,/6A00,/0000 78-7F «, t00=0x0007, t01=0x0116}
0xc2e…c66             Head {h00=0x0034, h01=0x0050, text=» DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS'  80-84«, t00=0x0007, t01=0x0142}
0xc66…c72             Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x017a}
0xc72…c7e             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0007, t01=0x0186}
0xc7e…c82 (8, 2, 8)   Head {h00=0x4004, h01=0x0000}
0xc82…c86             00 08 00 04                                                                                                                                                                                                                                       ┆    ┆
0xc86…c8e (9, 1, 8)   20 04 00 00 00 09 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view