;*********************************************************************
;*								*
;*	------------------------				*
;*		STARFOX2 					*
;*	------------------------				*
;*								*
;*	File 		: yajima.def				*
;*	Description	; Yajima's Macros			*
;*	Date		: 1994.7.15				*
;*	Author		: H.Yajima				*
;*								*
;*********************************************************************

;*******************************************************************
;	original macro
;*******************************************************************

;----------------------------------
xx	equ	0ffffh
;----------------------------------
Mnegative	macro
	eor	#0ffffh
	inc	a
	endm
;----------------------------------
Mabsolute	macro
	bpl	.absoluteskip
	eor	#0ffffh
	inc	a
.absoluteskip
	endm
;----------------------------------
Madx	macro
	txa
	clc
	adc	#\1
	tax
	endm
;----------------------------------
Mady	macro
	tya
	clc
	adc	#\1
	tay
	endm
;----------------------------------
Masr1	macro
	cmp	#8000h
	ror	a
	endm
;--------------------------------------------------------------------
Mset	macro
	lda	#\2
	sta	\1
	endm
;--------------------------------------------------------------------
MsetBL	macro	
	a8
	lda	#\2
	sta.l	\1
	a16
	endm
;--------------------------------------------------------------------
Mbank7e	macro
	phb
	pea	7e7eh
	plb
	plb
	endm
;-------------------------------------------------------------------
Mbank7f	macro
	phb
	pea	7f7fh
	plb
	plb
	endm
;-------------------------------------------------------------------
Mbankprog	macro
	phb		; >
	phk		;  >
	plb		;  <
	endm
;-------------------------------------------------------------------
Mbankrts	macro
	plb		; <
	rts
	endm
;-------------------------------------------------------------------
Mbankrtl	macro
	plb		; <
	rtl
	endm
;-------------------------------------------------------------------
Mbrakepoint	macro
	lda.l	7ffffeh
	endm
;-------------------------------------------------------------------
dwcode	macro
	dw	\1&0ffffh
	endm
Mdw	macro
	dw	\1&0ffffh
	endm
;-------------------------------------------------------------------
;	signed 16bit/ unsigned 8bit
; MDV_s16u08
;	DBR = 7e or 7f
;	in	Areg ( s16bit ) 
;		Xreg ( u8bit  )
;	out 	Areg ( s16bit )
;-------------------------------------------------------------------
Mdiv	macro	
	php
	bpl	\@p1
	eor	#0ffffh
	inc	a
\@p1	sta.l	4204h
	a8
	txa
	sta.l	4206h
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	a16
	lda.l	4214h
	plp
	bpl	\@p2
	eor	#0ffffh
	inc	a
\@p2
	endm
;-------------------------------------------------------------------

;======================================================================
;======================================================================
;======================================================================
;======================================================================
;======================================================================