|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1492 (0x5d4)
Notes: pts_type(SC)
Names: »DE11ST.SC«
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
└─⟦this⟧ »S:DE/DE11ST.SC«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »DEN10/DE11ST.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »S:DE/DE11ST.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »DEN10/DE11ST.SC«
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
└─⟦this⟧ »S:DE/DE11ST.SC«
IDENT DE11ST REL 10.0 80-04-11 79-11-15/LABJ ************************* * 11 DATE AND TIME ************************* DDUM DEDDIV PDIV ENTRY DE11ST EXT DECLRN EXT DERROR EJECT * * KEYTABLES * INCLUDE DEKEYS,LIST DEKTAB4 KTAB CLR,CAN,RET EJECT DE11ST PROC ATTFMT F11 SET DEPROMPT GETTIME STR6A MOVE TIME,STR6A MOVE BCDI21(W1),DATE CANC PERF DECLRN CBE11 IB DEBINW2,CANCEL,RETUR,ENTER MOVE DEBINW4,W4 ERROR PERF DERROR,DEKTAB4 SUB DEBINW2,W1 CBE DEBINW2,W0,CANC B CBE11 CANCEL CLEAR DEPROMPT GETTIME STR6A MOVE TIME,STR6A MOVE BCDI21(W1),DATE DISPLAY 1,W1,W0 B CANC ENTER EDIT STR6A,FTIME SETTIME STR6A MOVE DATE,BCDI21(W1) RETUR RET PEND EJECT F11 FRMT FSL FCOPY ='11 DATE AND TIME' FNL FCOPY ='DATE:' FKI 7,MINL=6,MAXL=6,ME,NEOI,REWRT,APPL=102 FMEL 'XXE-XXE-XX',BCDI21(W1) DATE FILLR ' ',4 FCOPY ='TIME:' FKI 25,MINL=6,MAXL=6,ME,NEOI,REWRT,APPL=103 FMEL 'XXE.XXE.XX',TIME FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND FTIME FRMT FMEL '999999',TIME FMEND END