|
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: 1514 (0x5ea)
Notes: pts_type(UF)
Names: »DRFDDE.UF«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »M:DENJ/DRFDDE.UF«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »M:DENJ/DRFDDE.UF«
LED DRFD01,/S,## ##IL 0 CONV, 81-04-18,DK1 ONLY VALID FOR DATA ENTRY,DK1 ##DL 906 CF A5,ASC:01 TRANSFORM TO ASCII DK1 ##DL 967 CF A5,EBC:01 TRANSFORM AND MOVE TO BUF DK1 ##DL 1576 CF A5,ASC:01 TRANSFER IBM VOL NAME TO ASCII DK1 ##IL 1613 LD A1,DWT:LA,A6 GET LOGICAL BUFFER ADDRESS DK1 RF(NZ) ASC:01 BUFFER NOT IN SYSTEM AREA DK1 LD A4,DWTBA,A6 GET BUFFER ADDRESS DK1 RF ASC:02 DK1 ASC:01 EQU * DK1 ##IL 1617 ASC:02 EQU * DK1 ##DL 1648 LD A1,DWT:LA,A6 GET LOGICAL BUFFER ADDRESS DK1 RF(NZ) EBC:01 BUFFER NOT IN SYSTEM AREA DK1 LD A4,DWTBA,A6 GET BUFFER ADDRESS DK1 RF EBC:02 DK1 EBC:01 EQU * DK1 ##IL 1652 EBC:02 EQU * DK1 ##IL 1653 ENB DK1 ##RE 1660,$$ SC$$* SC$$ SCR A1,A4 PUT EBCDIC IN OUTPUT BUFFER DK1 ##RE 1663,$$ LDKL$$* LDKL$$ ##EN KPF /S,DRFDDE SCR ASM DRFDDE KPF /O ASG /E0,TY10 SCR