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

⟦1c1c369df⟧ 

    Length: 20402 (0x4fb2)
    Notes: pts_type(UF)
    Names: »M:DSB.UF«

Derivation

└─⟦025d39960⟧ Bits:30009672 Philips computer tape "600133"
    └─⟦this⟧ »M:DSB/M:DSB.UF«

PTS(SC)

ASG /02,NO
MOV TCLASS,/S,TOSSWORK
KPF /S,TCLASS
SCR 
INC TCLASS,TOSSWORK 
KPF /O
MOV SCLASS,/S,TOSSWORK
KPF /S,SCLASS
SCR 
INC SCLASS,TOSSWORK 
KPF /O
MOV MONTAB,/S,TOSSWORK
KPF /S,MONTAB
SCR 
INC MONTAB,TOSSWORK 
KPF /O
INC DEBUGM,TOSSWORK 
KPF /O
MOV SYSTAB,/S,TOSSWORK
KPF /S,SYSTAB
SCR 
MOV  TDISP,/S,TOSSWORK
KPF /S,TDISP
SCR 
MOV LRPINT,/S,TOSSWORK
KPF /S,LRPINT
SCR 
MOV  TPROC,/S,TOSSWORK
KPF /S,TPROC
SCR 
MOV  MSUBS,/S,TOSSWORK
KPF /S,MSUBS
SCR 
MOV TTMJOB,/S,TOSSWORK
KPF /S,TTMJOB
SCR 
MOV TOSSIO,/S,TOSSWORK
KPF /S,TOSSIO
SCR 
MOV SYSLDM,/S,TOSSWORK
KPF /S,SYSLDM
SCR 
MOV SYSLDA,/S,TOSSWORK
KPF /S,SYSLDA
SCR 
MOV LDTASK,/S,TOSSWORK
KPF /S,LDTASK
SCR 
MOV  PFTAB,/S,TOSSWORK
KPF /S,PFTAB
SCR 
MOV  LKMAL,/S,TOSSWORK
KPF /S,LKMAL
SCR 
MOV  CTABX,/S,TOSSWORK
KPF /S,CTABX
SCR 
MOV TIODMX,/S,TOSSWORK
KPF /S,TIODMX
SCR 
INC TIODMX,TOSSWORK 
KPF /O
LED SYSTAB
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  TDISP
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED LRPINT
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  TPROC
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  MSUBS
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TTMJOB
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TOSSIO
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED SYSLDM
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED SYSLDA
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED LDTASK
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
MOV  DVTKB,/S,TOSSWORK
KPF /S,DVTKB
SCR 
MOV  DVTGP,/S,TOSSWORK
KPF /S,DVTGP
SCR 
MOV  DVTDI,/S,TOSSWORK
KPF /S,DVTDI
SCR 
MOV  DVTDY,/S,TOSSWORK
KPF /S,DVTDY
SCR 
MOV DW1501,/S,TOSSWORK
KPF /S,DW1501
SCR 
INC DW1501,TOSSWORK 
KPF /O
LED DW1501
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
MOV DRKB03,/S,TOSSWORK
KPF /S,DRKB03
SCR 
MOV DRGP01,/S,TOSSWORK
KPF /S,DRGP01
SCR 
MOV DRDI01,/S,TOSSWORK
KPF /S,DRDI01
SCR 
MOV DRDY01,/S,TOSSWORK
KPF /S,DRDY01
SCR 
MOV DRRT01,/S,TOSSWORK
KPF /S,DRRT01
SCR 
MOV DRSOP1,/S,TOSSWORK
KPF /S,DRSOP1
SCR 
MOV DRDC15,/S,TOSSWORK
KPF /S,DRDC15
SCR 
LED DRKB03
!!CH $$	X:A$$	1$$ 
!!CH $$	X:B$$	1$$ 
!!CH $$	X:C$$	1$$ 
!!CH $$	X:D$$	2$$ 
!!CH $$	X:E$$	0$$ 
!!CH $$	X:F$$	30$$
!!CH $$	X:G$$	1$$ 
!!CH $$	X:H$$	0$$ 
!!CH $$	X:I$$	0$$ 
!!CH $$	X:J$$	030$$ 
!!CH $$	X:K$$	32$$
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRGP01
!!CH $$	X:A$$	1$$ 
!!CH $$	X:B$$	0$$ 
!!CH $$	X:C$$	0$$ 
!!CH $$	X:D$$	0$$ 
!!CH $$	X:E$$	0$$ 
!!CH $$	X:F$$	0$$ 
!!CH $$	X:G$$	1$$ 
!!CH $$	X:H$$	300$$ 
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRDI01
!!CH $$	X:A$$	0$$ 
!!CH $$	X:B$$	1$$ 
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRDY01
!!CH $$	X:A$$	0$$ 
!!CH $$	X:B$$	0$$ 
!!CH $$	X:C$$	0$$ 
!!CH $$	X:D$$	0$$ 
!!CH $$	X:E$$	0$$ 
!!CH $$	X:F$$	0$$ 
!!CH $$	X:G$$	6$$ 
!!CH $$	X:H$$	300$$ 
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRRT01
!!CH $$	X:A$$	0$$ 
!!CH $$	X:B$$	3$$ 
!!CH $$	X:C$$	0$$ 
!!CH $$	X:D$$	1$$ 
!!CH $$	X:E$$	/15$$ 
!!CH $$	X:F$$	01$$
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRSOP1
!!CH $$	X:A$$	0$$ 
!!CH $$	X:B$$	0$$ 
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRDC15
!!CH $$	X:A$$	150$$ 
!!CH $$	X:B$$	/60$$ 
!!CH $$	X:C$$	0$$ 
!!CH $$	X:D$$	600$$ 
!!CH $$	X:E$$	0$$ 
!!CH $$	X:F$$	0$$ 
!!CH $$	X:G$$	300$$ 
!!CH $$	X:H$$	0$$ 
!!CH $$	X:I$$	0$$ 
!!CH $$	X:J$$	1$$ 
!!CH $$	X:K$$	1$$ 
!!CH $$	X:L$$	5$$ 
!!CH $$	X:M$$	00$$
!!CH $$	X:N$$	02$$
!!CH $$	X:O$$	0$$ 
!!CH $$	X:P$$	0$$ 
!!CH $$	X:Q$$	0$$ 
!!CH $$	X:R$$	300$$ 
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
MOV EBCDIC,/S,TOSSWORK
KPF /S,EBCDIC
SCR 
LED EBCDIC
!!CH $$EQU	X:B$$EQU	0$$ 
!!CH $$EQU	X:A$$EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DRKB03
!!CH $$	X:A$$	1$$ 
!!CH $$	X:B$$	1$$ 
!!CH $$	X:C$$	1$$ 
!!CH $$	X:D$$	2$$ 
!!CH $$	X:E$$	0$$ 
!!CH $$	X:F$$	30$$
!!CH $$	X:G$$	1$$ 
!!CH $$	X:H$$	0$$ 
!!CH $$	X:I$$	0$$ 
!!CH $$	X:J$$	030$$ 
!!CH $$	X:K$$	32$$
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED DVTKB 
!!DL 35 
	DATA	0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,
!!IL 38 
	DATA	0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TOSSIO
!!CH $$	X:A$$	1$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
MOV  TIMER,/S,TOSSWORK
KPF /S,TIMER
SCR 
MOV  TPROC,/S,TOSSWORK
KPF /S,TPROC
SCR 
MOV TMMLKM,/S,TOSSWORK
KPF /S,TMMLKM
SCR 
MOV TLDSEG,/S,TOSSWORK
KPF /S,TLDSEG
SCR 
MOV TABORT,/S,TOSSWORK
KPF /S,TABORT
SCR 
MOV MONTIM,/S,TOSSWORK
KPF /S,MONTIM
SCR 
LED  TIMER
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  TPROC
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TMMLKM
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TLDSEG
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TABORT
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED MONTIM
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED LKMAL 
!!DL 019
!!DL 022
!!DL 023
!!DL 024
!!DL 027
!!DL 028
!!DL 042
         DATA     00
!!DL 045
         DATA     00
!!DL 046
         DATA     00
!!DL 047
         DATA     00
!!DL 050
!!DL 051
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED LRPINT
!!CH $$	X:A$$	1$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED SYSTAB
!!CH $$IHINPT$$TRAP$$ 
!!CH $$	X:A$$	00001$$ 
!!CH $$	X:C$$	00000$$ 
!!CH $$	X:D$$	00000$$ 
!!CH $$	X:E$$	00000$$ 
!!CH $$	X:F$$	00001$$ 
!!CH $$ILLINT	     12$$IH1501	     12$$ 
!!CH $$ILLINT	     13$$IH1502	     13$$ 
!!IL 55 
         EXTRN    IH1501
         EXTRN    IH1502
!!DL 056
!!DL 057
!!DL 064
!!DL 066
!!DL 067
!!DL 068
!!DL 069
!!DL 070
!!DL 071
!!DL 075
!!DL 076
!!DL 077
!!DL 078
!!DL 079
!!DL 080
!!DL 081
!!DL 85 
!!DL 122
         DATA     ILLINT
!!DL 123
         DATA     ILLINT
!!DL 130
         DATA     ILLINT
!!DL 132
         DATA     ILLINT
!!DL 133
         DATA     ILLINT
!!DL 134
         DATA     ILLINT
!!DL 135
         DATA     ILLINT
!!DL 136
         DATA     ILLINT
!!DL 138
         DATA     ILLINT
!!DL 142
         DATA     ILLINT
!!DL 145
         DATA     ILLINT
!!DL 149
         DATA     ILLINT
!!DL 150
         DATA     ILLINT
!!DL 155
         DATA     ILLINT
!!DL 156
         DATA     ILLINT
!!DL 159
         DATA     ILLINT
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED PFTAB 
!!IL 12 
         EXTRN    DC15ON
!!DL 013
!!DL 014
!!DL 018
!!DL 019
!!DL 020
!!DL 021
!!DL 022
!!DL 023
!!DL 024
!!DL 025
!!DL 026
!!DL 027
!!DL 028
!!DL 029
!!DL 030
!!DL 031
!!DL 032
!!DL 033
!!DL 034
!!DL 035
!!DL 036
!!DL 037
!!DL 038
!!DL 039
!!IL 40 
         DATA     DC15ON
!!DL 041
!!DL 042
!!DL 046
!!DL 047
!!DL 048
!!DL 049
!!DL 050
!!DL 051
!!DL 052
!!DL 053
!!DL 054
!!DL 055
!!DL 056
!!DL 057
!!DL 058
!!DL 059
!!DL 060
!!DL 061
!!DL 062
!!DL 063
!!DL 064
!!DL 065
!!DL 066
!!DL 067
!!EN
ASM /S
KPF /O
KPF /S
SCR 
MOV CTAB01,/S,GLMON 
ASM /S
KPF /O
KPF /S
SCR 
MOV CTAB02,/S,GLMON 
ASM /S
KPF /O
KPF /S
SCR 
MOV DRDC15,/S,GLMON 
ASM /S
KPF /O
KPF /S
SCR 
MOV DRGP01,/S,GLMON 
ASM /S
KPF /O
KPF /S
SCR 
MOV DRDY01,/S,GLMON 
ASM /S
KPF /O
KPF /S
SCR 
LED  DVTKB
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!CH $$DVTKB$$DVKB00$$
!!CH $$KBAD$$KBAD3$$
!!CH $$/1111$$/1140$$ 
!!CH $$BCA$$FFFF$$
!!CH $$ED0$$BBBA$$
!!CH $$0	CODE $$CTAB01	CODE $$
!!CH $$ECH$$DVDY00$$
!!DL 5
	EXTRN	CTAB01
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  DVTGP
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!CH $$DVTGP$$DVGP00$$
!!CH $$/1111$$/2000$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  DVTDI
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!CH $$DVTDI$$DVDI00$$
!!CH $$2010$$0000$$ 
!!CH $$/1111$$/9010$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  DVTDY
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!CH $$DVTDY$$DVDY00$$
!!CH $$/ABC$$/0628$$
!!CH $$/1111$$/C020$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  DVTKB
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!CH $$DVTKB$$DVKB01$$
!!CH $$KBAD$$KBAD3$$
!!CH $$/1111$$/1100$$ 
!!CH $$BCA$$FFFF$$
!!CH $$ED0$$FFFF$$
!!CH $$0	CODE $$CTAB02	CODE $$
!!CH $$ECH$$DVDY01$$
!!DL 5
	EXTRN	CTAB02
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED  DVTDY
!!CH $$CREDIT	EQU	0$$CREDIT	EQU	1$$ 
!!CH $$MMUPAG	EQU	0$$MMUPAG	EQU	1$$ 
!!CH $$CPU852	EQU	1$$CPU852	EQU	0$$ 
!!CH $$DVTDY$$DVDY01$$
!!CH $$/ABC$$/1850$$
!!CH $$/1111$$/C000$$ 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED TCLASS
!!IL 6
         EXTRN    DVKB00
         EXTRN    DVGP00
         EXTRN    DVDI00
         EXTRN    DVDY00
         EXTRN    DVKB01
         EXTRN    DVDY01
!!IL 11 
         DATA     TC00
         DATA     TC01
!!IL 12 
TC00     DATA     TC00E-* 
         DATA     /0020 
         DATA     DVKB00
         DATA     /00300
         DATA     DVGP00
         DATA     /00400
         DATA     DVDI00
         DATA     /00500
         DATA     DVDY00
TC00E    EQU      * 
TC01     DATA     TC01E-* 
         DATA     /00210
         DATA     DVKB01
         DATA     /00311
         DATA     DVDY01
TC01E    EQU      * 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED SCLASS
!!IL 6
         EXTRN    DWSI01
         EXTRN    DWSO01
         EXTRN    DW1501
         EXTRN    DW1500
	EXTRN	DWREMU 
!!IL 11 
         DATA     TC00
         DATA     TC01
         DATA     TC02
!!IL 12 
TC00     DATA     TC00E-* 
         DATA     /00101
         DATA     DWSI01
         DATA     /00111
         DATA     DWSO01
TC00E    EQU      * 
TC01     DATA     TC01E-* 
         DATA     /00611
         DATA     DW1501
TC01E    EQU      * 
TC02     DATA     TC02E-* 
         DATA     /00601
         DATA     DW1500
	DATA	/015
	DATA	DWREMU
TC02E    EQU      * 
!!EN
ASM /S
KPF /O
KPF /S
SCR 
LED MONTAB
!!IL 19 
****
	EXTRN	CTAB01 
	EXTRN	CTAB02 
!!DL 021
!!DL 022
!!DL 024
!!DL 027
!!DL 029
!!DL 030
!!DL 031
!!DL 032
!!DL 033
!!IL 47 
****
	DATA 	CTAB01 
	DATA 	CTAB02 
!!DL 049
!!DL 050
!!DL 052
!!DL 055
!!DL 057
!!DL 058
!!DL 059
!!DL 060
!!DL 061
!!EN
ASM /S
KPF /O
KPF /S
SCR 
ASG /02,LP0F
SCR 
INC SYSTAB
INC DEBUGM
LKE M 
KPF /L,M:DSB
ASG /E0,TY10

Full view