|
|
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: 1536 (0x600)
Types: TextFile
Names: »tst«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »tst«
r=slang
b.w.
p.<:fpnames:>
s.a14,w.
k=h55
0,0
rl w1 66
dl w3 x1+4
ds. w3 a1.
dl w3 x1+8
ds. w3 a2.
al. w3 a0.
al. w1 a3.
jd 1<11+16
rs. w2 a4.
dl w1 x2+6
ds. w1 a5.
al w2 0
jd 1<11+24
se. w2 (a4.)
jl. -4
dl w1 x2+6
ds. w1 a6.
jd 1<11+26
dl w1 x2+6
ds. w1 a7.
al w0 1
al. w1 a3.
jd 1<11+22
dl w1 x2+6
ds. w1 a8.
jd 1<11+26
al. w0 a9.
al. w2 a5.
jl. w3 a13.
al. w0 a10.
al. w2 a6.
jl. w3 a13.
al. w0 a11.
al. w2 a7.
jl. w3 a13.
al. w0 a12.
al. w2 a8.
jl. w3 a13.
al w2 10
jl. w3 h26.
al w2 0
jl. h7.
a0: 0
a1: 0
0
a2: 0
0
a3: 0,r.8
a4: 0
0
a5: 0
0
a6: 0
0
a7: 0
0
a8: 0
a9: <:
receiver sender
after send message <0>:>
a10:<:
after wait event <0>:>
a11:<:
after get event <0>:>
a12:<:
after send answer <0>:>
a13:
rs. w3 a14.
jl. w3 h31.-2
rl w0 x2-2
jl. w3 h32.
1<23+32<12+10
rl w0 x2
jl. w3 h32.
1<23+32<12+10
jl. (a14.)
a14:
0
e.e.e.
▶EOF◀