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

⟦fcd025299⟧

    Length: 4102 (0x1006)
    Notes: pts_type(SC)
    Names: »FMT403.SC«

Derivation

└─⟦38a30a456⟧ Bits:30009662 Philips computer tape "600104"
    └─⟦this⟧ »OD-KOM/FMT403.SC« 
└─⟦d2cdd233a⟧ Bits:30009674 Philips computer tape "600204"
    └─⟦this⟧ »OD-KOM/FMT403.SC« 

PTS(SC)

* 
* 
SUBF55   FRMT 
         FLINK   SUBX55 
         FLINK   SUBX56 
         FLINK   SUBX57 
         FNL
         FKI     13,MAXL=10,REWRT,APPL=58,DUPL=GTREGF(CBIN5),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN6)
         FKI     25,MAXL=10,REWRT,APPL=59,DUPL=GTREGF(CBIN6),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN7)
         FNL
         FKI     13,MAXL=10,REWRT,APPL=60,DUPL=GTREGF(CBIN7),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN8)
         FKI     25,MAXL=10,REWRT,APPL=61,DUPL=GTREGF(CBIN8),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN9)
         FNL
         FKI     25,MAXL=10,REWRT,APPL=62,DUPL=GTREGF(CBIN9),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN10) 
         FMEND
* 
SUBX55   FRMT 
         FKI      1,MAXL=10,REWRT,APPL=55,SCHK=4
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN3)
         FMEND
* 
SUBX56   FRMT 
         FKI     13,MAXL=10,REWRT,APPL=56,DUPL=GTREGF(CBIN3),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN4)
         FMEND
* 
SUBX57   FRMT 
         FKI     25,MAXL=10,REWRT,APPL=57,DUPL=GTREGF(CBIN4),SCHK=4 
         FMEL    'TTTTTTTTTX-',GTREGF(CBIN5)
         FMEND
* 
SUBF57   FRMT 
         FLINK   SUBX55 
         FLINK   SUBX56 
         FLINK   SUBX57 
         FMEND
SUBF56   FRMT 
         FLINK   SUBX56 
         FMEND
* 
SUBF64   FRMT 
	FLINK	SUB164 
	FLINK	SUB264 
	FMEND
* 
SUB164	FRMT 
	FBP	GSSWITCH(CBIN12),LAB164
         FKI     20,MAXL=1,APPL=64,DUPL=GTDUPF(CBIN12),   		C 
                 ME,NCLR
	FMEL	'X',GTREGF(CBIN12)
LAB164	FMEND
* 
SUB264	FRMT 
	FBZ	GSSWITCH(CBIN12),LAB264
	FKI	20,MAXL=1,APPL=64,NCLR,VERIF 
      FMEL    'X',GTREGF(CBIN12)
LAB264	FMEND
* 
* 
SUBF65	FRMT 
	FKI	13,MAXL=4,APPL=65,DUPL=GTDUPF(CBIN13),		C
		ME,NCLR 
	FMEL	'TTTX',GTREGF(CBIN13) 
	FMEND
* 
* 
SUBF54   FRMT 
	FLINK	SUB154 
	FLINK	SUB254 
	FMEND
* 
SUB154	FRMT 
	FBP	GSSWITCH(CBIN2),LAB154 
         FKI     27,MAXL=10,REWRT,APPL=54,DUPL=GTDUPF(CBIN2),SCHK=4,   		C
                 ME,NCLR
	FMEL	'TTTTTTTTTX-',GTREGF(CBIN2) 
LAB154	FMEND
* 
SUB254	FRMT 
	FBZ	GSSWITCH(CBIN2),LAB254 
	FKI	27,MAXL=10,APPL=54,NCLR,VERIF
        FMEL    'TTTTTTTTTX-',GTREGF(CBIN2) 
LAB254	FMEND
* 
SUBF63   FRMT 
         FKI     1,MINL=6,MAXL=6,APPL=63,DUPL=GTDUPF(CBIN11),		C
                 ME,NCLR,SCHK=2 
         FMEL    'XXVXXVXX',GTREGF(CBIN11)
         FMEND
* 
SUBF70   FRMT 
         FKI     1,MAXL=4,APPL=70,DUPL=GTDUPF(CBIN1),     		C 
                 ME,NCLR
         FMEL    'TTTX',GTREGF(CBIN1) 
         FMEND
* 
* 

Full view