Subversion Repositories pentevo

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1186 savelij 1 
		ifndef  regv60inc     	; avoid multiple inclusion
2 
regv60inc     	equ     1
3 
;****************************************************************************
4 
;*                                                                          *
5 
;*   AS File REGV60.INC                                                     *
6 
;*   								            *
7 
;*   Contains Register Definitions for V60...V80 Processors                 *
8 
;* 									    *
9 
;****************************************************************************
10 
 
11 
		save
12 
                listing off		; no listing over this file
13 
 
14 
                if      (MOMCPUNAME<>"70616")
15 
                 fatal  "wrong target selected: only 70616 supported"
16 
		endif
17 
 
18 
 
19 
                if      MOMPASS=1
20 
		 message "NEC V60 Register Definitions (C) 2022 Alfred Arnold"
21 
		endif
22 
 
23 
;--------------------------------------------------------------------------
24 
; Privileged Registers
25 
 
26 
ISP		equ	0	; Interrupt Stack Pointer
27 
L0SP		equ	1	; Level 0 Stack Pointer
28 
L1SP		equ	2	; Level 1 Stack Pointer
29 
L2SP		equ	3	; Level 2 Stack Pointer
30 
L3SP		equ	4	; Level 3 Stack Pointer
31 
SBR		equ	5	; System Base Register
32 
TR		equ	6	; Task Register
33 
SYCW		equ	7	; System Control Word
34 
TKCW		equ	8	; Task Control Word
35 
PIR		equ	9	; Processor ID Register
36 
PSW2		equ	15	; Emulation Mode Status Word
37 
ATBR0		equ	16	; Area Table Base 0 Register
38 
ATLR0		equ	17	; Area Table Length 0 Register
39 
ATBR1		equ	18	; Area Table Base 1 Register
40 
ATLR1		equ	19	; Area Table Length 1 Register
41 
ATBR2		equ	20	; Area Table Base 2 Register
42 
ATLR2		equ	21	; Area Table Length 2 Register
43 
ATBR3		equ	22	; Area Table Base 3 Register
44 
ATLR3		equ	23	; Area Table Length 3 Register
45 
TRMOD		equ	24	; Trap Mode Register
46 
ADTR0		equ	25	; Address Trap Register 0
47 
ADTR1		equ	26	; Address Trap Register 1
48 
ADTRM0		equ	27	; Address Trap Mask Register 0
49 
ADTRM1		equ	28	; Address Trap Mask Register 1
50 
 
51 
;--------------------------------------------------------------------------
52 
 
53 
		restore                 ; re-enable listing
54 
 
55 
                endif			; regv60inc