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

⟦4949be2e3⟧ 

    Length: 4724 (0x1274)
    Notes: pts_type(UF)
    Names: »KM805.UF«

Derivation

└─⟦26dca8ec8⟧ Bits:30009711 Philips computer tape "RÅKON-DIVFMT"
    └─⟦this⟧ »REMIT2/KM805.UF«

PTS(SC)

PRT KM805 
PRT C805
MES BR	NDERSLEV KOMMUNE 
SCR 
LED KMD08,/S
!!DL 60,63
!!DL 68,108 R]KONV
!!DL 224,225
MF1KBV STRG 32X'C1C27F' DEV ADDRESS KB
MF1GTP STRG 32X'C3C47F' DEVADS PRINTER
!!DL 228
MF1CU STRG X'6E4E' CU ADDRESS 
!!DL 230
CNFHC STRGI (16),'LA','GA','  ' HC PRINTER
!!DL 235,236
FROMKX STRGI (12)2C'TD','TE','  ' 
!!RE 240,$$FALSE$$TRUE$$ CBKOFLG
!!RE 241,$$FALSE$$TRUE$$ CKTFLAG
!!RE 242,$$FALSE$$FALSE$$ CCLKTFLG
!!RE 244,$$FALSE$$FALSE$$ CTRVALG 
!!RE 247,$$TRUE$$FALSE$$ CKTAUTO
!!RE 248,$$FALSE$$TRUE$$ CDCFLAG
!!RE 249,$$FALSE$$FALSE$$ CCYWRTF 
!!RE 250,$$FALSE$$FALSE$$ CADM22F 
!!RE 251,$$FALSE$$TRUE$$ C5MDISK
!!RE 252,$$TRUE$$FALSE$$ CKASFLG
!!RE 253,$$TRUE$$TRUE$$ CSLDFLG 
!!RE 279,$$FALSE$$FALSE$$ CREMITFL
!!RE 287,$$FALSE$$TRUE$$ DISKOVERLAY
!!RE 288,$$FALSE$$FALSE$$ CTEXTFLG
!!RE 289,$$FALSE$$FALSE$$ CSTRKFLG
!!RE 290,$$FALSE$$FALSE$$ CBUDTFLG
!!DL 331
CFLAG BINI (4,2),X'0051',X'0000',X'0064',X'0000',		C
		X'0068',X'0000',X'0050',X'0000' 
!!RE 361,$$FALSE$$FALSE$$ BUDGET
!!RE 363,$$FALSE$$TRUE$$ 90-94
!!RE 416,$$01014610$$%VER%REL%MOD$$ VERSION 
!!RE 422,$$732$$2$$ EDITBUF 
!!RE 442,$$18$$-18$$
!!RE 443,$$19$$-19$$
!!RE 444,$$28$$-28$$
!!RE 445,$$29$$-29$$
!!RE 476,$$FALSE$$FALSE$$ CLEV8FLG
!!RE 484,$$1400$$10000$$DISK SIZE 
!!RE 490,$$128$$80$$ CRECLGD
!!RE 492,$$6'OD-KOM'$$6'BR.LEV'$$ 
!!RE 495,$$5$$1$$ CKTTOP
!!DL 496,497
FROMTX STRGI (4)2C'  ','KA','KB','  ' 
!!DL 817,1091 RK BLOCKS 
!!DL 1103,1105 RK 
!!DL 1107 RK
!!DL 1156,1175 RKGO 
!!DL 1200 
 MOVE TCT01,=W'2' PRINTER NR
!!DL 1250,1262 RKSWITCH 
!!DL 1265 REENTER 
!!EN
NOD C 
TRA /S,NL 
INC DIV805,DIVFMT,/F3 
NOD R 
LED SCREEN,/S 
!!CH $$KEY461$$KEY805$$ 
!!CH $$SL461$$SLCOP$$ 
!!EN
TRA /S,NL 
LED RGSTRT
!!DL 72,75
!!JN GENDAT,1,4 
!!EN
TRA /S,NL 
NOD D 
INC RGMAIN
INC RGSUBS
INC RGSUB1
INC RGSUB2
INC RGSUB3
NOD D 
INC RGKLAR
INC KTPLN 
INC KTOPR 
NOD D 
INC RGADM 
INC BUDD
INC RAADUM
NOD R 
INC ADM5D 
INC SUBAPL
INC REMSUB
NOD R 
INC REMDUM
INC RGSUB4
LED RGFRMT
!!DL 429,437
 FTAB 5 
 FCOPY =X'56414C5C52' 
 FTAB 15
 FTEXT 'LEVKONTO' 
 FTAB 28
 FTEXT 'TXT'
 FNL
 FLINK SUBF11 
 FLINK SUBF25 
 FLINK SUBF26 
!!DL 479,487
 FTAB 5 
 FCOPY =X'56414C5C52' 
 FTAB 15
 FTEXT 'LEVKONTO' 
 FTAB 28
 FTEXT 'TXT'
 FNL
 FLINK SUBF11 
 FLINK SUBF25 
 FLINK SUBF26 
!!RE 783,$$1,$$15,$$
!!RE 787,$$1,$$15,$$
!!RE 795,$$13,$$28,$$ 
!!EN
TRA /S,NL 
NOD R 
INC KMDIO 
INC DKSUBS
INC REMRED
INC MOD805
INC ADM6
TLK U,4K
INC PRT 
INC VDUPRT
INC START 
INC TB3270
$INCGEN 
LKE M 
KPF /L,RGL805 
SCR 
MES $PDISC M=M:267,MU=M:POOL92,A=RGL805,C=C805
$ASG2

Full view