Return to i286aio.inc CVS log

Up to [RetroPC.NET] / np2 / i286a

fix i286a (T.Yui)

; PI_levels			equ		0
; PI_level			equ		4
; PI_levelsbak		equ		12
; PI_levelbak		equ		16
; PI_pry			equ		24
; PI_icw			equ		32
PI_IMR				equ		36
; PI_ocw3			equ		37
; PI_irr			equ		38
; PI_ext			equ		39
; PI_isr			equ		40
; PI_isrbak			equ		41
; PI_writeicw		equ		42
; PI_padding		equ		43
PI_SIZE				equ		44

PIC_MASTER			equ		0
PIC_SLAVE			equ		PI_SIZE
PIC_EXTIRQ			equ		(PI_SIZE * 2)


; DMACH_adrs		equ		0
; DMACH_leng		equ		4
; DMACH_adrsorg		equ		6
; DMACH_lengorg		equ		8
; DMACH_action		equ		10
; DMACH_outproc		equ		12
; DMACH_inproc		equ		16
; DMACH_extproc		equ		20
; DMACH_mode		equ		24
; DMACH_sreq		equ		25
; DMACH_ready		equ		26
; DMACH_mask		equ		27
DMACH_SIZE			equ		28

; DMA_dmach			equ		0
; DMA_lh			equ		(DMACH_SIZE * 4) + 0
; DMA_work			equ		(DMACH_SIZE * 4) + 4
DMAC_WORKING		equ		(DMACH_SIZE * 4) + 8
; DMA_mask			equ		(DMACH_SIZE * 4) + 12
; DMA_stat			equ		(DMACH_SIZE * 4) + 13


	MACRO
$label	PICEXISTINTR
				mov		r12, #(&ff << 24)
				ldrb	r1, [r0, #PIC_EXTIRQ]
				ldr		r2, [r0, #(PIC_MASTER + PI_IMR)]
				ldr		r3, [r0, #(PIC_SLAVE + PI_IMR)]
				cmp		r1, #0
				eoreq	r0, r12, r2 lsl #24
				tsteq	r0, r2 lsl #8
				eoreq	r0, r12, r3 lsl #24
				tsteq	r0, r3 lsl #8
	MEND

	END