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

⟦45511a8d9⟧ 

    Length: 4332 (0x10ec)
    Notes: pts_type(SC)
    Names: »SPLITT.SC«

Derivation

└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
    └─⟦this⟧ »SCREEN/SPLITT.SC«

PTS(SC)

* 
********************************
*    S P L I T T    79-12-10   *
********************************
* 
*    THIS MODULE IS USED BY SCREEN PACKAGE. 
*    IT CONTAINS KEYTABLES AND ERROR PRINTOUTS
*    USED IN CONNECTION WITH SCREEN PACKAGE 
*    (A MINIMUM)
* 
 EJECT
* 
*    KEYTABLE USED WHEN CURSOR IS PLACED AT THE VERY
*    FIRST POSITION IN THE CURRENT FIELD
* 
SPKTAB1 KTAB BSP,CLR1,CLR2,EOI,CANC1,CANC2,		C
		FWD,BWD,HOME,LDOWN,		C
		LEFT,RIGHT,DOWN,UP,HCOPY,		C
		DUP,EDIT,ENT
* 
*    KEYTABLE USED WHEN CURSOR IS PLACED AT ANY 
*    POSITION BUT THE VERY FIRST IN THE CURRENT FIELD 
* 
SPKTAB2 KTAB BSP,CLR1,CLR2,EOI,CANC1,CANC2,		C
		FWD,BWD,HOME,LDOWN,		C
		LEFT,RIGHT,DOWN,UP,HCOPY,		C
		DUP,EDIT,ENT
* 
*    KEYTABLE USED IN EDIT MODE 
* 
SPKTAB3 KTAB CFWD,CBWD,INS,DEL,CLR1,		C 
		CLR2,CLR3,EOI,CANC1,CANC2,		C 
		FWD,BWD,HOME,LDOWN,		C
		LEFT,RIGHT,DOWN,UP,HCOPY,		C
		DUP,EDIT,ENT
 EJECT
* 
*    FORMAT TABLE CONTAINING ERROR PRINTOUTS
* 
SPFTBERR FTABLE ERFM01,ERFM02,ERFM03,ERFM04,ERFM05,ERFM06 
* 
ERFM01 FRMT 
 FSL
 FTEXT 'TOO FEW INPUT CHARACTERS' 
 FMEND
* 
ERFM02 FRMT 
 FSL
 FTEXT 'UNDEFINED ERROR'
 FMEND
* 
ERFM03 FRMT 
 FSL
 FTEXT 'I/O-ERROR'
 FMEND
* 
ERFM04 FRMT 
 FSL
 FTEXT 'ILLEGAL END-OF-ITEM KEY'
 FMEND
* 
ERFM05 FRMT 
 FSL
 FTEXT 'COMPULSORY FIELD NOT FILLED'
 FMEND
ERFM06 FRMT 
 FSL
 FTEXT 'ILLEGAL TYPE' 
 FMEND
 EJECT
* 
*      KEYCODES SUITING PTS 6236 & 6272 KEYBOARDS 
* 
BSP EQU X'00' 
CLR1 EQU X'62'
CLR2 EQU X'63'
EOI EQU X'0C' 
CANC1 EQU X'65' 
CANC2 EQU X'66' 
FWD EQU X'09' 
BWD EQU X'07' 
HOME EQU X'05'
LDOWN EQU X'01' 
LEFT EQU X'04'
RIGHT EQU X'06' 
DOWN EQU X'02'
UP EQU X'08'
HCOPY EQU X'0E' 
DUP EQU X'0D' 
EDIT EQU X'03'
ENT EQU X'1C' 
CFWD	EQU	X'0A'
CBWD	EQU	X'00'
INS EQU X'1E' 
DEL EQU X'1D' 
CLR3 EQU X'64'

Full view