DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦b4d09c2db⟧ 

    Length: 4376 (0x1118)
    Notes: pts_type(UF)
    Names: »KM821X.UF«

Derivation

└─⟦75255755f⟧ Bits:30009693 Philips computer tape "600410"
    └─⟦this⟧ »NJREMIT/KM821X.UF« 
└─⟦b6546aa17⟧ Bits:30009689 Philips computer tape "600325"
    └─⟦this⟧ »REMIT2/KM821X.UF«

PTS(SC)

PRT KM821 
PRT C821
MES HJ	RRING KOMMUNE, REMITTERING 
ASG 2,NO
SCR 
LED KMD08,/S
!!CH $$DCTASK$$DCTSK$$
!!DL 67,68 FD03,FD04
!!DL 72,94 TERM KA
!!DL 95,112 TERM GA 
!!DL 113,128 TERM LA
!!DL 141,165 TB9
!!DL 184
MF1KBV STRG 32X'40' DV ADR KB/VDU 
!!DL 185
MF1GTP STRG 32X'40' DV ADR GTP
!!DL 188
MF1CU STRG X'6D4D' CU ADR 
!!DL 190
CNFHC STRGI (16),'  ' HARDCOPY PRINTER
!!DL 195,196
OFF STRGI (12)2C'  '
!!RE 202,$$FALSE$$TRUE$$ BKO
!!RE 203,$$FALSE$$TRUE$$ SALDO KORT 
!!RE 209,$$TRUE$$FALSE$$ CKTAUTO
!!RE 210,$$FALSE$$TRUE$$ DC 
!!RE 213,$$FALSE$$TRUE$$ 5M DISK
!!RE 239,$$FALSE$$TRUE$$ CREMITFLG
!!RE 248,$$FALSE$$TRUE$$ TEXT REG 
!!RE 249,$$FALSE$$TRUE$$ LEV REG
!!DL 283
CFLAG BINI (12),X'0051',X'0010',X'0010',X'0064' 
!!RE 316,$$128$$80$$
!!RE 324,$$6'OD-KOM'$$12X'484A5C52522E'$$ 
!!RE 325,$$01014610$$%VER%REL%MOD$$ VERSION 
!!RE 372,$$1400$$10000$$ NO OF REG. 
!!RE 381,$$20$$200$$ LEV INDEX
!!RE 386,$$5$$1$$ KORT LINE 
!!DL 389,390
ON STRGI (12)2C'  ' 
!!IL 475
TTKEY1 BOOL F 
TTKEY2 BOOL F 
TTKEY3 BOOL F 
TTKEY4 BOOL F 
!!DL 665,666 ENTRY
!!DL 668
!!DL 671,674
!!DL 689,707 KBVGO
!!DL 708,723 GTPGO
!!DL 724,735 LPGO 
!!DL 758,762 RESTART OFFLINE TASK 
!!EN
ASG 2,LP0F
NOD C 
TRA /S
INC DIV461
INC RGADM 
NOD R 
INC RGSUBS
INC KMDIO 
NOD R 
INC RGSUB3
LED SCREEN,/S 
!!CH $$KEY461$$KEY821$$ 
!!CH $$SL461$$SLCOP$$ 
!!DL 220
 CMP SPBINW2,=W'0'
 BE RETUR POWER OFF 
 BG DYK20 NORMAL
 ADD SPBINW2,=W'9' KEYSWITCH TURNED 
 IB SPBINW2,SET1,SET2,SET3,SET4,CLR1,CLR2,CLR3,CLR4 
 B RETUR
SET1
 SET TTKEY1 
 B DYKIN
SET2
 SET TTKEY2 
 B DYKIN
SET3
 SET TTKEY3 
 B DYKIN
SET4
 SET TTKEY4 
 B DYKIN
CLR1
 CLEAR TTKEY1 
 B DYKIN
CLR2
 CLEAR TTKEY2 
 B DYKIN
CLR3
 CLEAR TTKEY3 
 B DYKIN
CLR4
 CLEAR TTKEY4 
 B DYKIN
!!IL 225
 TBF TTKEY1,DYKRET KEYBOARD OFF 
 IB SPKEY,DYK30,DYK40,DYK50 
DYK30 
 TBF TTKEY2,DYK80 CORR TO KEYPOS 1 ON 6234
 B DYKRET 
DYK40 
 TBT TTKEY2,DYK80 CORR TO KEYPOS 2 ON 6234
DYKRET
 PERF BELL
 B SETCREAD 
DYK80 
!!EN
TRA /S,NL 
NOD R 
INC SUBAPL
NOD R 
INC RGFRMT
NOD R 
INC KTOPR 
INC KTPLN 
INC ADM6
NOD R 
INC RGSUB1
INC RGSUB2
INC DKSUBS
NOD R 
INC RGMAIN
INC RGSTRT
NOD R 
INC REMFMT
INC REMTXT
NOD R 
INC REMLEV
TLK U,4K
INC DCTSK 
$INCGEN 
LKE M 
KPF /L,RGLOAD 
SCR 
MES $PDISC M=M:9.2H,MU=M:9.2H,A=RGLOAD,C=C821 
$ASG2

Full view