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

⟦4c4f48599⟧ 

    Length: 4312 (0x10d8)
    Notes: pts_type(UF)
    Names: »M:PROC.UF«

Derivation

└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/M:PROC.UF«

PTS(SC)

$REL
LED @P,/S,/EE,##
##DL 0,1
	IDENT @P    	REL 11.0 81-01-26 870105041100

##EN
KPF /S
ASM /S,NL 
KPF /O
SCR /S
SCR /O
END 
$MOVSC
MES @P
MOV @P,/S,TOSSWORK,/F1
KPF /S
SCR /S
SCR /O
END 
$MOVUF
MES @P
MOV @P,/A,TOSSWORK,/F1
KPF /A,@P 
SCR /A
END 
$BX 
MES @P
ASG 2,LP0F
BEA @P
KPF /O
XRF @P
SKF 3 
ASG 2,NO
END 
$BSX
MES @P
ASG 2,LP0F
BEA /S
KPF /O
SKF 3 
ASG 2,NO
END 
$MMU
MES @P
LED @P,/S,/EE,##
##CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
##CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
##EN
ASG 2,LP0F
BEA /S
SKF 3 
ASG 2,NO
END 
$MMUDSK 
MES @P
LED @P,/S,/EE,##
##CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
##CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
##CH $$DSKPAG	EQU	0$$DSKPAG	EQU	1$$ 
##EN
ASG 2,LP0F
BEA /S
SKF 3 
ASG 2,NO
END 
$DSK
MES @P
LED @P,/S,/EE,##
##CH $$DSKPAG	EQU	0$$DSKPAG	EQU	1$$ 
##EN
ASG 2,LP0F
BEA /S
SKF 3 
ASG 2,NO
END 
$C57DSK 
MES @P
LED @P,/S,/EE,##
##CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
##CH $$DSKPAG	EQU	0$$DSKPAG	EQU	1$$ 
##EN
ASG 2,LP0F
BEA /S
SKF 3 
ASG 2,NO
END 
$C57
MES @P
LED @P,/S,/EE,##
##CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
##EN
ASG 2,LP0F
BEA /S
SKF 3 
ASG 2,NO
END 
$ALL
MES @P
LED @P,/S,/EE,##
##CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
##CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
##CH $$DSKPAG	EQU	0$$DSKPAG	EQU	1$$ 
##CH $$SWPBLK	EQU	0$$SWPBLK	EQU	1$$ 
##CH $$X:A	EQU	0$$X:A	EQU	1$$ 
##CH $$X:B	EQU	0$$X:B	EQU	1$$ 
##CH $$X:C	EQU	0$$X:C	EQU	1$$ 
##EN
ASG 2,LP0F
BEA /S
SKF 3 
ASG 2,NO
END 
$REF
MES @P
ASG /10,DK
MOV @P,/S 
RUN REFORM,0
RDS /10 
KPF /S
END

Full view