|
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: 3370 (0xd2a)
Notes: pts_type(SC)
Names: »UTXT.SC«
└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
└─⟦this⟧ »BDKAPP/UTXT.SC«
IDENT UTXT CONPAC REL=1.0 DATE= 80.04.29 *************************************************************** * * U S E R MODULE OF CONCENTRATOR APPLICATION PEAB-T * * PROGRAMMER: JES * * * U T X T * * * * * THIS MODULE CONTAINS FORMAT STRINGS AND PICTURE STRINGS * * * * * THIS MODULE RUNS UNDER TASK: ALL TASKS * * * *************************************************************** EJECT * * * ENTRY ADDRESSES * *************************************************************** * * ENTRY DESCRIPTION * ENTRY U:F100 EJECT * * EXTERNAL REFERENCES * ************************************************************* * * ADDRESSES IN MODULE * EJECT * * FORMS FOR FORMAT CODES * EOL FORM 8=1,8 END OF FORMAT LIST EOR FORM 8=9,8 END OF RECORD TXT FORM 8=/10,8 TEXT ELEMENT CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT ENDSUB FORM 16=/1700 END OF SUBFORMAT COND FORM 8=/1F,8 CONDITIONAL FORMAT FILLER FORM 8,8 FILLER SPACE FORM 8=/20,8 SPACE PICT FORM 1=1,7,8 PICTURE PICREF FORM 8,8,16 GENERATE FORMS BYTE FORM 8,8 BCD FORM 4=0,12 ASCII FORM 4=8,12 * EJECT ************************************************************ * * TEXT STRINGS * ************************************************************ U:F100 EQU * EJECT ************************************************************ * * ELEMENTARY STRINGS * ************************************************************ U:F200 EQU * IS ENDSUB END *