|
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 - download
Length: 41472 (0xa200)
Types: TextFile
Names: »hkoarb «
└─⟦cde9d517b⟧ Bits:30007477 RC8000 Backup tape fra HT's bus-radio system
└─⟦6a563b143⟧
└─ ⟦this⟧ »hkoarb «
└─⟦110021343⟧ Bits:30007476 RC8000 Backup tape fra HT's bus-radio system
└─⟦a957ba283⟧
└─ ⟦this⟧ »hkoarb «
▶aa◀
▶13◀asmkilde▶03◀disco▶fb◀▶a8◀Q▶e2◀
▶13◀asmtx▶04◀disco▶fc◀.▶90◀▶02◀
▶13◀checkfiltx▶01◀discv@y▶a0◀H
▶13◀dumptx▶02◀discm▶b6◀7▶c0◀▶b3◀
▶c7◀facittx▶01◀discs▶8f◀▶d1◀▶d1◀p
▶13◀fk1tx▶01◀discoB5▶e1◀x
▶13◀fk2tx▶01◀discoB<▶f1◀▶80◀
▶13◀fk3tx▶01◀discoBG▶01◀▶02◀▶03◀
▶13◀fpatx▶01◀disctp▶eb◀▶01◀▶10◀
▶13◀listc▶01◀discbi▶dc◀▶01◀"
▶13◀listsegtx▶07◀discnm▶cf◀▶01◀▶90◀▶da◀
▶13◀læskr▶01◀disct▶0f◀▶fe◀▶01◀▶a6◀▶c8◀
▶13◀låndata▶01◀discc▶e4◀▶1e◀▶01◀▶b3◀▶e0◀
▶13◀låntx▶03◀discc▶e4◀
▶01◀▶e2◀▶13◀
▶13◀mon5tx▶06◀discfO▶04◀▶13◀▶02◀C▶d2◀
▶13◀skrivraptx«bs»discvÅH▶02◀▶c0◀▶88◀
▶13◀skrivstattx▶02◀discs▶02◀▶81◀▶02◀▶e4◀▶10◀
▶13◀sættidtx▶04◀discm+▶93◀▶03◀ ▶d8◀
▶13◀talkonvtx▶02◀discc▶a4◀▶fb◀▶13◀\f
; correct trd-applicationprogram
.titl ctrd0
.nrel
; program description
pgd: 1b0+1 ; spec
pgst ; start
0 ; chain
pcd-pgd ; size
.txt 'ctrdx' ; name
pgst: lda 1,program ; progaddr:=
lda 2,prgn ; searchitem(prog,"trda");
searchitem ;
lda 0,disp ; addr:=
add 0,2 ; progadr+ 8:001021;
lda 0 corr ; code:= 'subzr 1 1'
sta 0 0,2 ; word(addr):=code;
mov 3,2 ;
brk: stopprocess ; stopproces
jmp .+0 ;
prgn: .+1 ;
.txt 'trda<0> ;
disp: 1021 ;
corr: subzr 1 1 ;
\f
; process description
pcd: 0 ; next
0 ; prev
0 ; chain
pcd1-pcd ; size
.txt 'ctrdx' ; name
.-0 ; first event
.-1 ; last event
0 ; buffer
pgd ; program
0 ; state
0 ; timer
1b2 ; priority
brk ; breakaddr
0 ; ac0
0 ; ac1
0 ; ac2
0 ; ac3
pgst*2 ; psw
0 ; save
pcd1:
.end pcd ; pcd=8:000027
▶EOF◀