|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC3600/RC7000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC3600/RC7000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2560 (0xa00)
Types: TextFile
Notes: RCSL-43-GL-8284, RCSL-43-GL-8285, RCSL-43-GL-8286
Names: »S1060«
└─⟦a59f0a452⟧ Bits:30000472 DOMUS disk image
└─⟦this⟧ »/S1060«
S1060
! RCSL: 43-GL8285
AUTHOR: PBP
EDITED: 78.12.15
PROGRAM RC36-01060.00
CHARSET E27
KEYWORDS: MUSIL,CONVERSION,TABLE,LISTING
ABSTRACT: THIS TABLE IS USED WHEN CONVERSION FROM EBCDIC TO
64 CHARACTER ASCII DRUM IS WANTED.
SPECIAL TABLE POST & TELEGRAFVAESNET.
RCSL: 43-GL8284: ASCII SOURCE TAPE.
RCSL: 43-GL8286: REL.BIN.
!
«ff»
!
ABSTRACT: THIS TABLE IS USED WHEN CONVERSION FROM EBCDIC TO
64 CHARACTER ASCII DRUM IS WANTED.
SPECIAL TABLE POST & TELEGRAFVAESNET.
DATE: 78.12.15
!
CONST
IBMLP= !
0 1 2 3 4 5 6 7 !
#
! 0 ! 32 32 32 32 32 32 32 32
! 8 ! 32 32 32 32 32 32 32 32
! 16 ! 32 32 32 32 32 32 32 32
! 24 ! 32 32 32 32 32 32 32 32
! 32 ! 32 32 32 32 32 32 32 32
! 40 ! 32 32 32 32 32 32 32 32
! 48 ! 32 32 32 32 32 32 32 32
! 56 ! 32 32 32 32 32 32 32 32
! 64 ! 32 32 32 32 32 32 32 32
! 72 ! 32 32 32 46 60 40 43 85
! 80 ! 38 32 32 32 32 32 32 32
! 88 ! 32 32 33 93 42 41 59 32
! 96 ! 45 47 32 32 32 32 32 32
! 104 ! 32 32 32 44 37 95 62 63
! 112 ! 32 32 32 32 32 32 32 32
! 120 ! 32 32 58 91 92 39 61 34
! 128 ! 32 65 66 67 68 69 70 71
! 136 ! 72 73 32 32 32 32 32 32
! 144 ! 32 74 75 76 77 78 79 80
! 152 ! 81 82 32 32 32 32 32 32
! 160 ! 32 32 83 84 85 86 87 88
! 168 ! 89 90 32 32 32 32 32 32
! 176 ! 32 32 32 32 32 32 32 32
! 184 ! 32 32 32 32 32 32 32 32
! 192 ! 32 65 66 67 68 69 70 71
! 200 ! 72 73 32 32 32 32 32 32
! 208 ! 32 74 75 76 77 78 79 80
! 216 ! 81 82 32 32 32 32 32 32
! 224 ! 32 32 83 84 85 86 87 88
! 232 ! 89 90 32 32 32 32 32 32
! 240 ! 48 49 50 51 52 53 54 55
! 248 ! 56 57 94 32 32 32 32 32
#;
PROCEDURE P0048;
CODEBODY;
BEGIN
P0048; ! THE PROCESS IS STOPPED !
END;
«ff»
«nul»