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

⟦f041c9f5d⟧ 

    Length: 4490 (0x118a)
    Notes: pts_type(UF)
    Names: »M:PROC.UF«

Derivation

└─⟦9ad21746d⟧ Bits:30009682 Philips computer tape "600304"
    └─⟦this⟧ »NJ-AMT/M:PROC.UF«

PTS(SC)

$KMDALL 
SKF 1 
$KMDGEN KMD=080,VER=@VER=02$$,REL=@REL=01$$,MOD=0801$$ @080=
$KMDGEN KMD=0801,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0801=
$KMDGEN KMD=0802,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0802=
$KMDGEN KMD=0803,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0803=
$KMDGEN KMD=0804,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0804=
$KMDGEN KMD=0805,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0805=
$KMDGEN KMD=0806,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0806=
$KMDGEN KMD=0807,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0807=
$KMDGEN KMD=0808,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0808=
$KMDGEN KMD=0809,VER=@VER=02$$,REL=@REL=01$$,MOD=0802$$ @0809=
END 
$KMDNR
PRT KMDNR 
END 
$HELP 
PRT HELP
END 
$LEDLS
LED LEDLS,/A
KPF /A,LEDFIL 
ASG /E0,DK,LEDFIL 
END 
$KMDGEN 
LED KM@KMD=,/A,/EE
!!CH $$%VER$$@VER=02$$
!!CH $$%REL$$@REL=01$$
!!CH $$%MOD$$@MOD=9751$$
!!EN
KPF /A,KMDFIL 
ASG /E0,DK,KMDFIL 
END 
$INCGEN 
INC FMOVE,INT:PROD
INC EMPTYT,INT:PROD 
INC T:EDFL,INT:PROD 
INC T:DYKI,INT:PROD 
INC T:UPDF,INT:PROD 
INC T:DUPL,INT:PROD 
INC T:GETC,INT:PROD 
INC T:GETA,INT:PROD 
INC T:TSTC,INT:PROD 
INC T:TFWD,INT:PROD 
INC T:DISP,INT:PROD 
INC T:GETF,INT:PROD 
INC T:REWR,INT:PROD 
INC T:DEDT,INT:PROD 
INC T:ENLI,INT:PROD 
INC T:EINP,INT:PROD 
INC T:ENIN,INT:PROD 
INC T:SETC,INT:PROD 
INC T:CLMI,INT:PROD 
INC T:ATTF,INT:PROD 
INC T:LSEG,INT:PROD 
INC T:TEI0,INT:PROD 
INC T:GTI0,INT:PROD 
INC T:DC,INT:PROD 
INC T:ASSI,INT:PROD 
INC T:DMR,INT:PROD
INC T:TEI,INT:PROD
INC T:DEL,INT:PROD
INC T:MSK0,INT:PROD 
INC T:SCD,INT:PROD
INC T:GTID,INT:PROD 
INC T:IO,INT:PROD 
INC I:NTP,INT:PROD
INC I:EVA,INT:PROD
INC I:ADS,INT:PROD
INC I:CMP,INT:PROD
INC I:CPA,INT:PROD
INC I:MOV,INT:PROD
INC I:MUL,INT:PROD
INC I:DIV,INT:PROD
INC I:NTF,INT:PROD
INC I:EDT,INT:PROD
INC I:EDTE,INT:PROD 
INC I:EDS,INT:PROD
INC I:STR,INT:PROD
INC I:EVS,INT:PROD
INC T:USE,INT:PROD
INC I:EPIC,INT:PROD 
END 
$REL
MES @NAM
LED @NAM,/S,/EE,##
##DL 0
	IDENT @NAM  	02.01.XXX.1 
##EN
KPF /S,@NAM 
END 
$RDA
ASG /E1,@DEV=CR0D 
RDA /A
KPF /A,@NAM=TEST
END 
$RDS
ASG /E1,@DEV=CR0D 
RDS 
KPF /S,@NAM=TEST
END 
$LED
LED @NAM=,@FC=/S,@CC
KPF @FC=/S,@NAM=
END 
$MOVE 
MOV @NAM=,@FC=/S,@ID=KMDPRO8
KPF @FC=/S,@NAM 
END 
$COMPEV 
MES PARAMETERS NAME=@NAM=/S, LISTING=@NL, DEBUG=@BUG=YES, 
MES            MONITOR=@M=M:KONV, APPLICATION=@A=AAAA,
MES            CONFIGURATION DATA=@C=KONFIG 
TRA @NAM=/S,@NL 
KPF /O
SCR /7D 
ASG /7D,DK
ASG /02,NO @TLK=
TLK M,X 
ASG /02,TY10 @TLK=
SCR /7D 
BEA DUMMY,NL @BUG=
ASG /02,NO @LKE=
LKE M 
ASG /02,TY10 @LKE=
KPF /L,@A=AAAA
$PCAS M=@M=M:KONV,A=@A=AAAA,C=@C=KONFIG 
END 
$LETRA
LED @NAM= 
KPF /S,@NAM=
$TRA N=@NAM=,L=@LS= 
$TRA1 N=@NAM
END 
$TRA
TRA @N=,@L= 
KPF /O
END 
$TRA1 
TRA @N= 
KPF /O
END 
$LINK 
ASG /02,NO
TRA KONVER,NL 
ASG /7D,DK
ASG /02,TY10
$TLK2 N=@NAM,L=@LS,B=@BG= 
$TLK N=@NAM=,L=@LS= 
$TLK1 N=@NAM= 
END 
$TLK
TLK M 
SCR /7D 
BEA DUMMY,NL
LKE M 
KPF /L,@N=
$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG 
END 
$TLK1 
TLK 
SCR /7D 
BEA DUMMY,NL
LKE 
KPF /L,@N=
$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG 
END 
$TLK2 
TLK U,M 
SCR /7D 
LKE M 
KPF /L,@N=
$PCAS M=M:KONV,MU=M:KONV,A=@N=,C=KONFIG 
END 
$ASG1 
ASG /E1,TY10
RDA /A
END 
$ASG2 
ASG /E0,TY10
END 
$TLK3 
TLK U,X 
SCR /7D 
END

Full view