|
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: 9216 (0x2400)
Types: TextFile
Names: »monopt«
└─⟦00964e8f7⟧ Bits:30007478 RC8000 Dump tape fra HCØ.
└─⟦b2ec5d50f⟧
└─⟦this⟧ »monopt«
(
o lplp
head 1 cpu
deviceinit=set 42 disc
linkinit= set 42 disc
linkparam=edit link8000
linkinit=algol linkparam
linkinit
o c
lp=copy mess.no lplp
o lp
mon8000=slang type.yes,
mdef mcentral mprocs mdisc mfpaline mhost mfpasub,
mtabinit mprocfnc1 mprocfnc2 ms1 ms2 mcatinit
if ok.yes
c=message slang ok
if ok.no
c=message slang sorry
clear temp lplp linkinit linkparam deviceinit
correct mon8000.0 address.2 bits.11.11 if 0 then 1
mon8000=changeentry mon8000 mon8000 mon8000 mon8000 mon8000 2.6 mon8000
lookup mon8000
head 1 cpu
o c
)
l./comment: part 3./,l1,i/
host(17,2,0,0);
name(<:console1:>);
tw(2,<:terminal1:>);
lpt(5,<:printer:>);
lpt(4,<:printer1:>);
fdbufs:=2;
fd(6,<:fd0:>);
mtbufs:=2;
mt(10,<:mt0:>);
/,f
\f
; monitor options.
m. nye mon options (mnext, b78) - 79.04.26 12.00.00
a130= 79 03 27 ; date
a131= 19 00 00 ; time
a400=1<22+0<18
a1= 133 ; areas
a3= 11 ; internals
a5= 157 ; message buffers
a80= -1-1<14-1<11 ; - included excl. rc8601, subdisc
; a82= 0 ; statistics off
; a84= 0 ; testoutput off
a113= 1 ; number of drums
a114=1004 ; max number of slices in drum slice table
a115= 3 ; number of discs
a116=2006 ; max number of slices in disc slice tabel
a117= 18 ; number of mess buffers reserved for subprocesses
a125= 1 ; jobhost identification
n.
m. name table
g0 , g1 , g2 , g3 , g4 , g5 , g6 , g7 , g8 , g9
g10 , g11 , g12 , g13 , g14 , g15 , g16 , g17 , g18 , g19
g20 , g21 , g22 , g23 , g24 , g25 , g26 , g27 , g28 , g29
g30 , g31 , g32 , g33 , g34 , g35 , g36 , g37 , g38 , g39
; g40 , g41 , g42 , g43 , g44 , g45 , g46 , g47 , g48 , g49
; g50 , g51 , g52 , g53 , g54 , g55 , g56 , g57 , g58 , g59
; g60 , g61 , g62 , g63 , g64 , g65 , g66 , g67 , g68 , g69
; g70 , g71 , g72 , g73 , g74 , g75 , g76 , g77 , g78 , g79
; g80 , g81 , g82 , g83 , g84 , g85 , g86 , g87 , g88 , g89
; g90 , g91 , g92 , g93 , g94 , g95 , g96 , g97 , g98 , g99
n.
m. process descriptions
b.j1 w.
m. start of testbuffer
j0=k, 0, r.512, j1=k
m. top of testbuffer
0, a107, a108-1
m. main1
g14: 80, <:main1:> , 0, 0, g14, 0, 1<22, k, k-2, 0
j0, j1, j0, j1
8.7777 7777, 8.7376 7777, 8.7777 7777, 8.7777 7777
0, k, k-2, 0, 0, a124<16+a125
0, r.56
e.
b.j1 w.
000, 000, 0, j0, j1, 0, r.4, 1<23+2<3
jl w2 c51, k, k-2, 0, c43, jl w1 c30
0, a107, a108-1
m. fparec1
g15: 86, <:fparec1:> , 0, g14, 0, 1<22, k, k-2, 0
0, r.15, 500
0, r.5
j0=k-g15, 0, r.21, j1=k-g15
e.
b.j1 w.
000, 000, 0, j0, j1, 0, r.4, 1<23+3<3
jl w2 c51, k, k-2, 0, c44, jl w1 c30
0, a107, a108-1
m. fpatrm1
g16: 88, <:fpatrm1:> , 0, g14, 0, 1<22, k, k-2, 0
0, r.14, 100 000, 1000
0, r.13
j0=k-g16, 0, r.21, j1=k-g16
e.
0, a107, a108-1
m. host1
g17: 82, 0, r.4, g14, 0, 1<23+1<22, k, k-2, 0
0, r.6
0<12+17, -2<12+0, 0, k, k-2, 16<12+0, 24, a123<12+a124, a125, 0, 0, r.16
0, r.20
g18=h4, g19=h4
0, a107, a108-1
m. device 20, disc (unit0, 0 , 4 )
g20: 62, 0, r.4, g28, 0, 1<22, k, k-2, 0
0, r.3, 0, 4
0, a107, a108-1
m. device 21, disc (unit0, 1008, 1050)
g21: 62, 0, r.4, g28, 0, 1<22, k, k-2, 0
0, r.3, 1008, 1050
g22=h4, g23=h4
0, a107, a108-1
m. device 24, disc (unit0, 4 , 1004)
g24: 62, 0, r.4, g28, 0, 1<22, k, k-2, 0
0, r.3, 4, 1004
0, a107, a108-1
m. device 25, disc (unit0, 2058, 25830)
g25: 62, 0, r.4, g28, 0, 1<22, k, k-2, 0
0, r.3, 2058, 25830
0, a107, a108-1
m. device 26, disc (unit1, 1050, 8 000 000)
g26: 62, 0, r.4, g29, 0, 1<22, k, k-2, 0
0, r.3, 1050, 8 000 000
0, a107, a108-1
m. device 27, disc (unit0, 27888, 8 000 000)
g27: 62, 0, r.4, g28, 0, 1<22, k, k-2, 0
0, r.3, 27888, 8 000 000
b.j2 w.
j0, j1, 0, j1, j2, 0, r.4, 1<23+4<3
jl w2 c51, k, k-2, 0, c34, jl w1 c30
0, a107, a108-1
m. discunit0
g28: 62, <:discunit0:>, 0, 000, 0, 1<22, k, k-2, 0
j0=k-g28
0, r.4, 8 000 000, 21, 0, r.5, 1<23, 0, r.32
0, r.41
-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0
-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0
j1=k-g28, 0, r.30, j2=k-g28
e.
b.j2 w.
j0, j1, 0, j1, j2, 0, r.4, 1<23+5<3
jl w2 c51, k, k-2, 0, c34, jl w1 c30
0, a107, a108-1
m. discunit1
g29: 62, <:discunit1:>, 0, 000, 0, 1<22, k, k-2, 0
j0=k-g29
0, r.4, 8 000 000, 21, 0, r.5, 1<23, 0, r.32
0, r.41
-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0
-1,0,0,-1,0,0,-1,0,0,-1,0,0,-1,0,0
j1=k-g29, 0, r.30, j2=k-g29
e.
0,0,0
m. device 0
g0: 85,0,r.34
0,0,0
m. device 1
g1: 85,0,r.34
0,0,0
m. device 2
g2: 85,0,r.34
0,0,0
m. device 3
g3: 85,0,r.34
0,0,0
m. device 4
g4: 85,0,r.34
0,0,0
m. device 5
g5: 85,0,r.34
0,0,0
m. device 6
g6: 85,0,r.34
0,0,0
m. device 7
g7: 85,0,r.34
0,0,0
m. device 8
g8: 85,0,r.34
0,0,0
m. device 9
g9: 85,0,r.34
0,0,0
m. device 10
g10: 85,0,r.34
0,0,0
m. device 11
g11: 85,0,r.34
0,0,0
m. device 12
g12: 85,0,r.34
0,0,0
m. device 13
g13: 85,0,r.34
0,0,0
m. device 30
g30: 85,0,r.34
0,0,0
m. device 31
g31: 85,0,r.34
0,0,0
m. device 32
g32: 85,0,r.34
0,0,0
m. device 33
g33: 85,0,r.34
0,0,0
m. device 34
g34: 85,0,r.34
0,0,0
m. device 35
g35: 85,0,r.34
0,0,0
m. device 36
g36: 85,0,r.34
0,0,0
m. device 37
g37: 85,0,r.34
0,0,0
m. device 38
g38: 85,0,r.34
0,0,0
m. device 39
g39: 85,0,r.34
c.-1
0,0,0
m. device40
g40: 85,0,r.34
0,0,0
m. device41
g41: 85,0,r.34
0,0,0
m. device42
g42: 85,0,r.34
0,0,0
m. device43
g43: 85,0,r.34
0,0,0
m. device44
g44: 85,0,r.34
0,0,0
m. device45
g45: 85,0,r.34
0,0,0
m. device46
g46: 85,0,r.34
0,0,0
m. device 47
g47: 85,0,r.34
0,0,0
m. device 48
g48: 85,0,r.34
0,0,0
m. device 49
g49: 85,0,r.34
0,0,0
m. device50
g50: 85,0,r.34
0,0,0
m. device51
g51: 85,0,r.34
0,0,0
m. device52
g52: 85,0,r.34
0,0,0
m. device53
g53: 85,0,r.34
0,0,0
m. device54
g54: 85,0,r.34
0,0,0
m. device55
g55: 85,0,r.34
0,0,0
m. device56
g56: 85,0,r.34
0,0,0
m. device 57
g57: 85,0,r.34
0,0,0
m. device 58
g58: 85,0,r.34
0,0,0
m. device 59
g59: 85,0,r.34
0,0,0
m. device60
g60: 85,0,r.34
0,0,0
m. device61
g61: 85,0,r.34
0,0,0
m. device62
g62: 85,0,r.34
0,0,0
m. device63
g63: 85,0,r.34
0,0,0
m. device64
g64: 85,0,r.34
0,0,0
m. device65
g65: 85,0,r.34
0,0,0
m. device66
g66: 85,0,r.34
0,0,0
m. device 67
g67: 85,0,r.34
0,0,0
m. device 68
g68: 85,0,r.34
0,0,0
m. device 69
g69: 85,0,r.34
0,0,0
m. device70
g70: 85,0,r.34
0,0,0
m. device71
g71: 85,0,r.34
0,0,0
m. device72
g72: 85,0,r.34
0,0,0
m. device73
g73: 85,0,r.34
0,0,0
m. device74
g74: 85,0,r.34
0,0,0
m. device75
g75: 85,0,r.34
0,0,0
m. device76
g76: 85,0,r.34
0,0,0
m. device 77
g77: 85,0,r.34
0,0,0
m. device 78
g78: 85,0,r.34
0,0,0
m. device 79
g79: 85,0,r.34
0,0,0
m. device80
g80: 85,0,r.34
0,0,0
m. device81
g81: 85,0,r.34
0,0,0
m. device82
g82: 85,0,r.34
0,0,0
m. device83
g83: 85,0,r.34
0,0,0
m. device84
g84: 85,0,r.34
0,0,0
m. device85
g85: 85,0,r.34
0,0,0
m. device86
g86: 85,0,r.34
0,0,0
m. device 87
g87: 85,0,r.34
0,0,0
m. device 88
g88: 85,0,r.34
0,0,0
m. device 89
g89: 85,0,r.34
0,0,0
m. device90
g90: 85,0,r.34
0,0,0
m. device91
g91: 85,0,r.34
0,0,0
m. device92
g92: 85,0,r.34
0,0,0
m. device93
g93: 85,0,r.34
0,0,0
m. device94
g94: 85,0,r.34
0,0,0
m. device95
g95: 85,0,r.34
0,0,0
m. device96
g96: 85,0,r.34
0,0,0
m. device 97
g97: 85,0,r.34
0,0,0
m. device 98
g98: 85,0,r.34
0,0,0
m. device 99
g99: 85,0,r.34
z.
n.
m. interrupt table
g15+a240
g16+a240
g28+a240
g29+a240
n.
m. controller table
0,g15+a230,a198,8
0,g16+a230,a198,9
0,g28+a230,a198,10
0,g29+a230,a198,11
n.
; options - operating system s.
m. s size options
c81=5 ; number of standard console descriptions
n.
m. s console table
k, k-2, 0, 2, 8.1770, 0, r.c1>1-5
n.
m. s device exception table
n.
; initiation information.
m. init catalog definition
24, 25, 26, 27
n.
m. init linkup list
p.<:deviceinit:>
n.
m. device autoload list
<:main1:> , 0, 0, 28, 1176
n.
▶EOF◀