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

⟦33cce9eb9⟧

    Length: 1318 (0x526)
    Notes: pts_type(SC)
    Names: »DMINIT.SC«

Derivation

└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
    └─⟦this⟧ »TOSSWORK/DMINIT.SC« 
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »M:TU10/DMINIT.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »M:TU10/DMINIT.SC« 

PTS(SC)

	IDENT DMINIT 	REL 10.0 80-03-14 870105041000 

****************************************************
* 
*   PHILIPS TERMINAL SYSTEM  PTS
* 
*   DMINIT = DATA MANAGEMENT INITIALIZATION 
* 
* 
* 
* 
* 
* 
****************************************************
* 
*   CLEAR THE USE BIT AND THE BUFFER HEADER IN DM BUFFERS 
* 
*   DMINIT IS CALLED AS A PFINIT ROUTINE
* 
*   REGISTERS A1 - A6 ARE USED
	EJECT
* 
	ENTRY	DMINIT 
	ENTRY	DMI010	FROM DMBUF
* 
	EXTRN	INIFLG 
	EXTRN	DMI020	SEE DMBUF 
	EJECT
* 
DMINIT	EQU	*
*	NO INITIALIZATIONS IF POWER FAIL RESTART
* 
	LD	A1,INIFLG 
	ABL(NZ)	DMI020	FIRST ACTIVATION AFTER IPL
DMI010	EQU	*
	RTN	A15
	END

Full view