|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00) Names: »freadb«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ. └─⟦4334b4c0b⟧ └─⟦this⟧ »freadb«
0x000…020 (0,) 07 e0 10 01 80 00 00 90 00 05 e0 00 00 d0 00 01 00 00 00 f0 00 00 21 d7 00 60 00 80 00 00 80 00 ┆ ! ` ┆ 0x020…040 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x040…060 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x060…080 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 ┆ ┆ 0x080…0a0 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x0a0…0c0 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x0c0…0e0 00 81 d8 00 02 06 00 00 00 00 00 00 ff df fd ff df fd ff df fd ff df fd 20 00 00 00 00 00 26 b8 ┆ & ┆ 0x0e0…100 00 00 17 ff ff d7 26 56 16 46 36 86 17 20 00 00 00 00 d3 20 00 00 00 02 68 80 00 01 7f ff fd 69 ┆ &V F6 h i┆ 0x100…120 6e 00 00 00 00 00 00 00 00 00 00 38 00 1a 00 00 00 00 0f ff ff ff ff ff ff ff ff ff ff ff ff ff ┆n 8 ┆ 0x120…140 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x140…160 ff ff ff ff ff ff ff ff ff ff 00 00 04 20 20 20 77 72 69 74 65 28 6f 75 74 2c 31 29 20 69 2c 72 ┆ write(out,1) i,r┆ 0x160…180 0a 31 20 20 20 20 20 66 6f 72 6d 61 74 28 78 2c 69 35 2c 66 38 2e 35 29 0a 20 20 20 20 20 20 73 ┆ 1 format(x,i5,f8.5) s┆ 0x180…1a0 74 6f 70 0a 20 20 20 20 20 20 65 6e 64 0a 2f 0a 6d 6f 64 65 20 6c 69 73 74 2e 6e 6f 0a 19 66 72 ┆top end / mode list.no fr┆ 0x1a0…1c0 65 61 64 62 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 64 69 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 65 ┆eadb; end; freadi=algol list.ye┆ 0x1c0…1e0 73 0a 65 78 74 65 72 6e 61 6c 0a 69 6e 74 65 67 65 72 20 70 72 6f 63 65 64 75 72 65 20 66 72 65 ┆s external integer procedure fre┆ 0x1e0…200 61 64 69 28 69 6e 29 3b 0a 7a 6f 6e 65 20 69 6e 3b 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 67 65 ┆adi(in); zone in; begin intege┆ 0x200…220 72 20 69 2c 63 2c 63 68 61 72 3b 0a 20 20 63 3a 3d 72 65 61 64 28 69 6e 2c 69 29 3b 0a 20 20 66 ┆r i,c,char; c:=read(in,i); f┆ 0x220…240 72 65 61 64 69 3a 3d 69 3b 0a 65 6e 64 20 66 72 65 61 64 69 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 ┆readi:=i; end freadi; end; frea┆ 0x240…260 64 72 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 00 10 02 00 00 00 00 01 ac 72 65 61 64 63 68 61 72 ┆dr=algol list.y readchar┆ 0x260…280 00 00 00 00 0d 32 00 00 00 00 2a 76 65 72 73 69 6f 6e 00 00 00 00 00 00 01 00 00 00 0c 60 c9 01 ┆ 2 *version ` ┆ 0x280…2a0 ea 6c 2d 0f f2 37 ce 62 2c 0f fa dd 10 0c 2c 00 00 53 ce 50 dc 10 08 2e 10 0e 2d 0f f2 37 ce 52 ┆ l- 7 b, , S P . - 7 R┆ 0x2a0…2c0 5e 10 00 50 8e bf 53 8e 3c dc 10 05 d8 20 09 dc 10 09 2c 2f f5 2f 00 1a dc 10 0d 53 ce 3c 52 2f ┆^ P S < ,/ / S <R/┆ 0x2c0…2e0 fc 34 30 00 51 ce 34 5d 2f f3 51 2f f5 a9 00 54 24 00 01 2d 0f ff 69 2f f7 5e ce 24 37 ce 20 24 ┆ 40 Q 4Å/ Q/ T$ - i/ ^ $7 $┆ 0x2e0…300 6f fc 51 2f fe 5d ce 18 d9 2f f6 34 ce 12 2c 0f f6 37 ce 0c 00 02 00 00 00 00 00 00 00 00 a1 0d ┆o Q/ Å / 4 , 7 ┆ 0x300…320 07 e0 10 01 80 00 00 90 00 05 e0 00 00 d0 00 01 00 00 00 f0 00 00 21 dd 00 60 00 80 00 00 80 00 ┆ ! ` ┆ 0x320…340 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x340…360 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x360…380 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 ┆ ┆ 0x380…3a0 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x3a0…3c0 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x3c0…3e0 00 81 de 20 60 00 00 00 00 00 0f fd ff df fd ff df fd ff df fd ff d2 00 00 00 00 00 02 6c 80 00 ┆ ` l ┆ 0x3e0…400 01 7f ff fd 72 65 61 64 00 00 00 00 00 00 00 00 0e 72 00 00 00 00 26 88 00 00 17 ff ff d6 96 e0 ┆ read r & ┆ 0x400…420 00 00 00 00 00 00 00 00 00 03 80 01 a0 00 00 00 00 00 0f ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x420…440 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x440…460 ff ff ff ff ff ff ff ff ff ff 00 00 04 20 20 20 77 72 69 74 65 28 6f 75 74 2c 31 29 20 69 2c 72 ┆ write(out,1) i,r┆ 0x460…480 0a 31 20 20 20 20 20 66 6f 72 6d 61 74 28 78 2c 69 35 2c 66 38 2e 35 29 0a 20 20 20 20 20 20 73 ┆ 1 format(x,i5,f8.5) s┆ 0x480…4a0 74 6f 70 0a 20 20 20 20 20 20 65 6e 64 0a 2f 0a 6d 6f 64 65 20 6c 69 73 74 2e 6e 6f 0a 19 66 72 ┆top end / mode list.no fr┆ 0x4a0…4c0 65 61 64 62 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 64 69 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 65 ┆eadb; end; freadi=algol list.ye┆ 0x4c0…4e0 73 0a 65 78 74 65 72 6e 61 6c 0a 69 6e 74 65 67 65 72 20 70 72 6f 63 65 64 75 72 65 20 66 72 65 ┆s external integer procedure fre┆ 0x4e0…500 61 64 69 28 69 6e 29 3b 0a 7a 6f 6e 65 20 69 6e 3b 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 67 65 ┆adi(in); zone in; begin intege┆ 0x500…520 72 20 69 2c 63 2c 63 68 61 72 3b 0a 20 20 63 3a 3d 72 65 61 64 28 69 6e 2c 69 29 3b 0a 20 20 66 ┆r i,c,char; c:=read(in,i); f┆ 0x520…540 72 65 61 64 69 3a 3d 69 3b 0a 65 6e 64 20 66 72 65 61 64 69 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 ┆readi:=i; end freadi; end; frea┆ 0x540…560 64 72 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 65 73 0a 65 78 74 65 72 6e 00 10 02 00 00 00 00 01 ┆dr=algol list.yes extern ┆ 0x560…580 b2 72 65 61 64 00 00 00 00 00 00 00 00 0e 72 00 00 00 00 2a 76 65 72 73 69 6f 6e 00 00 00 00 00 ┆ read r *version ┆ 0x580…5a0 00 01 00 00 00 0c 60 c9 01 ea 71 2d 0f f0 37 ce 5c 2c 0f fa dd 10 0e 2c 00 00 53 ce 4a dc 10 0a ┆ ` q- 7 Ø, , S J ┆ 0x5a0…5c0 2e 10 10 2d 0f f2 37 ce 4c 5e 10 00 50 8e b9 53 8e 36 dc 10 05 d8 20 09 dc 10 09 2c 2f f1 2f 00 ┆. - 7 L^ P S 6 ,/ / ┆ 0x5c0…5e0 1a dc 10 0d 53 ce 36 52 2f fc 34 30 00 51 ce 2e 5d 2f f3 51 2f f1 5d 2f f7 5e ce 24 37 ce 20 24 ┆ S 6R/ 40 Q .Å/ Q/ Å/ ^ $7 $┆ 0x5e0…600 6f fc 51 2f fe 5d ce 18 d9 2f f6 34 ce 12 2c 0f f6 37 ce 0c 00 02 00 00 00 00 00 00 00 00 62 15 ┆o Q/ Å / 4 , 7 b ┆ 0x600…620 07 e0 10 01 80 00 00 90 00 05 e0 00 00 d0 00 01 00 00 00 f0 00 00 21 dd 00 60 00 80 00 00 80 00 ┆ ! ` ┆ 0x620…640 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x640…660 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x660…680 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 ┆ ┆ 0x680…6a0 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x6a0…6c0 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x6c0…6e0 00 81 de 00 00 00 20 60 00 00 00 00 00 0f fd ff df fd ff df fd ff df fd ff d2 00 00 00 00 00 02 ┆ ` ┆ 0x6e0…700 6c 80 00 01 7f ff fd 72 65 61 64 00 00 00 00 00 00 00 00 0e 72 00 00 00 00 26 88 00 00 17 ff ff ┆l read r & ┆ 0x700…720 d6 96 e0 00 00 00 00 00 00 00 00 00 03 80 01 a0 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x720…740 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x740…760 ff ff ff ff ff ff ff ff ff ff 00 00 04 20 20 20 77 72 69 74 65 28 6f 75 74 2c 31 29 20 69 2c 72 ┆ write(out,1) i,r┆ 0x760…780 0a 31 20 20 20 20 20 66 6f 72 6d 61 74 28 78 2c 69 35 2c 66 38 2e 35 29 0a 20 20 20 20 20 20 73 ┆ 1 format(x,i5,f8.5) s┆ 0x780…7a0 74 6f 70 0a 20 20 20 20 20 20 65 6e 64 0a 2f 0a 6d 6f 64 65 20 6c 69 73 74 2e 6e 6f 0a 19 66 72 ┆top end / mode list.no fr┆ 0x7a0…7c0 65 61 64 62 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 64 69 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 65 ┆eadb; end; freadi=algol list.ye┆ 0x7c0…7e0 73 0a 65 78 74 65 72 6e 61 6c 0a 69 6e 74 65 67 65 72 20 70 72 6f 63 65 64 75 72 65 20 66 72 65 ┆s external integer procedure fre┆ 0x7e0…800 61 64 69 28 69 6e 29 3b 0a 7a 6f 6e 65 20 69 6e 3b 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 67 65 ┆adi(in); zone in; begin intege┆ 0x800…820 72 20 69 2c 63 2c 63 68 61 72 3b 0a 20 20 63 3a 3d 72 65 61 64 28 69 6e 2c 69 29 3b 0a 20 20 66 ┆r i,c,char; c:=read(in,i); f┆ 0x820…840 72 65 61 64 69 3a 3d 69 3b 0a 65 6e 64 20 66 72 65 61 64 69 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 ┆readi:=i; end freadi; end; frea┆ 0x840…860 64 72 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 65 73 0a 65 78 74 65 72 6e 00 10 02 00 00 00 00 01 ┆dr=algol list.yes extern ┆ 0x860…880 b2 72 65 61 64 00 00 00 00 00 00 00 00 0e 72 00 00 00 00 2a 76 65 72 73 69 6f 6e 00 00 00 00 00 ┆ read r *version ┆ 0x880…8a0 00 01 00 00 00 0c 60 c9 01 ea 75 2d 0f ec 37 ce 5c 2c 0f fa dd 10 12 2c 00 00 53 ce 4a dc 10 0e ┆ ` u- 7 Ø, , S J ┆ 0x8a0…8c0 2e 10 14 2d 0f f2 37 ce 4c 5e 10 00 50 8e b9 53 8e 36 dc 10 05 d8 20 09 dc 10 09 2c 2f f3 2f 00 ┆. - 7 L^ P S 6 ,/ / ┆ 0x8c0…8e0 1b dc 10 0d 53 ce 36 52 2f fc 34 30 00 51 ce 2e 5d 2f ed d9 2f f3 dd 2f f7 5e ce 24 37 ce 20 24 ┆ S 6R/ 40 Q .Å/ / / ^ $7 $┆ 0x8e0…900 6f fc 51 2f fe 5d ce 18 d9 2f f6 34 ce 12 2c 0f f6 37 ce 0c 00 02 40 00 00 00 00 00 00 00 63 15 ┆o Q/ Å / 4 , 7 @ c ┆ 0x900…920 (1,) 07 e0 12 01 80 00 00 b0 00 05 e0 00 00 d0 00 01 00 00 00 21 e3 01 40 00 00 60 00 00 70 00 80 00 ┆ ! @ ` p ┆ 0x920…940 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x940…960 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 ┆ ┆ 0x960…980 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 ┆ ┆ 0x980…9a0 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 ┆ ┆ 0x9a0…9c0 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 00 00 80 01 d0 ┆ ┆ 0x9c0…9e0 00 81 e4 00 00 00 00 00 00 ff df fd ff df fd ff df fd ff df fd 24 00 00 00 00 00 20 60 00 00 00 ┆ $ ` ┆ 0x9e0…a00 00 00 0f fd ff df fd ff df fd ff df fd ff d2 00 00 00 00 00 02 6c 80 00 01 7f ff fd 72 65 61 64 ┆ l read┆ 0xa00…a20 00 00 00 00 00 00 00 00 0e 72 00 00 00 00 26 88 00 00 17 ff ff d6 96 e0 00 00 00 00 00 00 00 00 ┆ r & ┆ 0xa20…a40 00 03 80 01 a0 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0xa40…a60 ff ff ff ff ff ff ff ff ff ff 00 00 04 20 20 20 77 72 69 74 65 28 6f 75 74 2c 31 29 20 69 2c 72 ┆ write(out,1) i,r┆ 0xa60…a80 0a 31 20 20 20 20 20 66 6f 72 6d 61 74 28 78 2c 69 35 2c 66 38 2e 35 29 0a 20 20 20 20 20 20 73 ┆ 1 format(x,i5,f8.5) s┆ 0xa80…aa0 74 6f 70 0a 20 20 20 20 20 20 65 6e 64 0a 2f 0a 6d 6f 64 65 20 6c 69 73 74 2e 6e 6f 0a 19 66 72 ┆top end / mode list.no fr┆ 0xaa0…ac0 65 61 64 62 3b 0a 65 6e 64 3b 0a 0a 66 72 65 61 64 69 3d 61 6c 67 6f 6c 20 6c 69 73 74 2e 79 65 ┆eadb; end; freadi=algol list.ye┆ 0xac0…ae0 73 0a 65 78 74 65 72 6e 61 6c 0a 69 6e 74 65 67 65 72 20 70 72 6f 63 65 64 75 72 65 20 66 72 65 ┆s external integer procedure fre┆ 0xae0…b00 61 64 69 28 69 6e 29 3b 0a 7a 6f 6e 65 20 69 6e 3b 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 00 10 ┆adi(in); zone in; begin inte ┆ 0xb00…b20 02 00 00 00 00 01 76 72 65 61 64 00 00 00 00 00 00 00 00 0e 72 00 00 00 00 2a 76 65 72 73 69 6f ┆ vread r *versio┆ 0xb20…b40 6e 00 00 00 00 00 00 01 00 00 00 0c 60 c9 01 ea a1 2d 0f ea 37 ce 98 2c 0f fa dd 10 14 2c 00 00 ┆n ` - 7 , , ┆ 0xb40…b60 53 ce 86 dc 10 10 2e 10 16 d9 20 0d 53 10 00 5f 2f f3 49 00 00 d8 10 00 dc 2f f7 d9 20 11 b0 00 ┆S . S _/ I / ┆ 0xb60…b80 10 37 ce 7c d9 10 00 53 20 0f b7 00 01 d5 00 00 5d 20 11 2d 00 01 5d 2f f1 34 80 08 2d 00 01 1d ┆ 7 ø S Å - Å/ 4 - ┆ 0xb80…ba0 2f f1 5d 2f f1 21 20 11 a5 00 01 34 80 36 2d 0f f2 37 ce 5a 5e 10 00 50 8e c7 53 8e 44 dc 10 05 ┆/ Å/ ! 4 6- 7 Z^ P S D ┆ 0xba0…bc0 d8 20 09 dc 10 09 50 8e bb 2f 20 00 9b 00 04 2f 30 0b dc 10 0d 34 80 10 51 2f f1 91 00 02 a1 6f ┆ P / /0 4 Q/ o┆ 0xbc0…be0 f5 a1 6f f7 37 ce 36 1d 2f f3 34 ce 28 53 ce 2e 52 2f fc 34 30 00 34 8f c4 34 2f ed 5e ce 22 37 ┆ o 7 6 / 4 (S .R/ 40 4 4/ ^ "7┆ 0xbe0…c00 ce 1e 24 6f fc 51 2f fe 5d ce 16 34 ce 12 2c 0f f6 37 ce 0c 00 02 40 00 00 00 00 00 02 80 40 0d ┆ $o Q/ Å 4 , 7 @ @ ┆