ClearScreen	macro
	addrin	\1,a1		;rastport
	move.l	_GfxBase(a4),a6
	jsr	-48(a6)		;_LVOClearScreen(a6)
	endm

Text	macro
	addrin	\1,a1	;rastport
	addrin	\2,a0	;string
	varin	\3,d0		;count
	move.l	_GfxBase(a4),a6
	jsr	-60(a6)		;_LVOText(a6)
	endm

DrawCircle	macro
	movem.l	d2/d3,-(sp)
	addrin	\1,a1		;rastport
	varin	\2,d0			;xp
	varin	\3,d1			;yp
	varin	\4,d2			;r
	varin	\4,d3			;r
	move.l	_GfxBase(a4),a6
	jsr	-180(a6)		;_LVODrawEllipse(a6)
	movem.l	(sp)+,d2/d3
	endm

DrawEllipse	macro
	movem.l	d2/d3,-(sp)
	addrin	\1,a1	;rastport
	varin	\2,d0		;xp
	varin	\3,d1		;yp
	varin	\4,d2		;xr
	varin	\5,d3		;yr
	move.l	_GfxBase(a4),a6
	jsr	-180(a6)	;_LVODrawEllipse(a6)
	movem.l	(sp)+,d2/d3
	endm

LoadRGB4	macro
	addrin	\1,a0		;viewport
	addrin	\2,a1		;colors
	varin	\3,d0		;count
	move.l	_GfxBase(a4),a6
	jsr	-192(a6)	;_LVOLoadRGB4(a6)
	endm

InitRastPort	macro
		addrin	\1,a1	;rport
		move.l	_GfxBase(a4),a6
		jsr	-198(a6)	;_LVOInitRastPort(a6)
		endm

InitVPort	macro
		addrin	\1,a1	;view
		move.l	_GfxBase(a4),a6
		jsr	-204(a6)	;_LVOInitVPort(a6)
		endm

MrgCop		macro
		addrin	\1,a0	;view
		move.l	_GfxBase(a4),a6
		jsr	-210(a6)	;_LVOMrgCop(a6)
		endm

MakeVPort	macro
		addrin	\1,a0	;view
		addrin	\2,a1	;viewport
		move.l	_GfxBase(a4),a6
		jsr	-216(a6)	;_LVOMakeVPort(a6)
		endm

LoadView	macro
		addrin	\1,a1	;view
		move.l	_GfxBase(a4),a6
		jsr	-222(a6)	;_LVOLoadView(a6)
		endm

WaitBlit	macro
	move.l	_GfxBase(a4),a6
	jsr	-228(a6)	;_LVOWaitBlit(a6)
	endm

SetRast	macro
	addrin	\1,a1		;rastport
	varin	\2,d0			;color
	move.l	_GfxBase(a4),a6
	jsr	-234(a6)	;_LVOSetRast(a6)
	endm
	
MovePen	macro
	addrin	\1,a1		;rastport
	varin	\2,d0			;x
	varin	\3,d1			;y
	move.l	_GfxBase(a4),a6
	jsr	-240(a6)		;_LVOMove(a6)
	endm


Draw	macro
	addrin	\1,a1		;rastport
	varin	\2,d0
	varin	\3,d1
	move.l	_GfxBase(a4),a6
	jsr	-246(a6)	;_LVODraw(a6)
	endm

AreaMove	macro
	addrin	\1,a1		;rastport
	varin	\2,d0			;x
	varin	\3,d1			;y
	move.l	_GfxBase(a4),a6
	jsr	-252(a6)	;_LVOAreaMove(a6)
	endm

AreaDraw	macro
	addrin	\1,a1		;rastport
	varin	\2,d0
	varin	\3,d1
	move.l	_GfxBase(a4),a6
	jsr	-258(a6)	;_LVOAreaDraw(a6)
	endm

AreaEnd		macro
	addrin	\1,a1		;rastport
	move.l	_GfxBase(a4),a6
	jsr	-264(a6)	;_LVOAreaEnd(a6)
	endm

WaitTOF		macro
	move.l	_GfxBase(a4),a6
	jsr	-270(a6)	;_LVOWaitTOF(a6)
	endm

InitArea	macro
	
	addrin	\1,a0		;areainfo
	addrin	\2,a1		;vectortable
	varin	\3,d0			;size
	move.l	_GfxBase(a4),a6
	jsr	-282(a6)	;_LVOInitArea(a6)
	endm

SetRGB4		macro
	movem.l	d2/d3,-(sp)
	addrin	\1,a0		;viewport
	varin	\2,d0			;index
	varin	\3,d1			;red color
	varin	\4,d2			;green color
	varin	\5,d3			;blue color
	move.l	_GfxBase(a4),a6
	jsr	-288(a6)		;_LVOSetRGB4(a6)
	movem.l	(sp)+,d2/d3
	endm
	
BltClear	macro
	addrin	\1,a1		;memory
	varin	\2,d0
	varin	\3,d1
	add.w	#15,d0
	asr.w	#3,d0
	muls.w	d1,d0
	varin	\4,d1
	move.l	_GfxBase(a4),a6
	jsr	-300(a6)	;_LVOBltClear(a6)
		endm

RectFill	macro
	movem.l	d2,d3,-(sp)
	addrin	\1,a1		;rastport
	varin	\2,d0			;ulx
	varin	\3,d1			;uly
	varin	\4,d2			;brx
	varin	\5,d3			lbry
	move.l	_GfxBase(a4),a6
	jsr	-306(a6)	;_LVORectFill(a6)
	movem.l	(sp)+,d2,d3
	endm

ReadPixel	macro
	addrin	\1,a1			;rastport
	varin	\2,d0			;x
	varin	\3,d1			;y
	move.l	_GfxBase(a4),a6
	jsr	-318(a6)	;_LVOReadPixel(a6)
	endm

WritePixel	macro
	move.l	d2,-(sp)
	addrin	\1,a1
	varin	\2,d0			;x
	varin	\3,d2			;y
	move.l	_GfxBase(a4),a6
	jsr	-324(a6)		;_LVOWritePixel(a6)
	move.l	(sp)+,d2
	endm

Flood	macro
	move.l	d2,-(sp)
	addrin	\1,a1		;rastport
	varin	\2,d2			;mode
	varin	\3,d0			;x
	varin	\4,d1
	move.l	_GfxBase(a4),a6
	jsr	-330(a6)	;_LVOFlood(a6)
	move.l	(sp)+,d2
	endm

SetAPen	macro
	addrin	\1,a1		;rastport
	varin	\2,d0			;color
	move.l	_GfxBase(a4),a6
	jsr	-342(a6)	;_LVOSetAPen(a6)
	endm

SetBPen	macro
	addrin	\1,a1
	varin	\2,d0			;color
	move.l	_GfxBase(a4),a6
	jsr	-348(a6)		;_LVOSetBPen(a6)
	endm

SetOPen	macro
	addrin	\1,a0	;rastport
	varin	\2,d0			;color
	move.b	d0,rp_AOLPen(a0)	;rp,->,AOLPen
	or.w	#8,rp_Flags		;areaoutline on
	endm

BNDRYOFF	macro
	addrin	\1,a0		;rp
	and.w	#$fff7,rp_Flags(a0)	areaoutline off
	endm

SetDrMd	macro
	addrin	\1,a1		;rastport
	varin	\2,d0			;mode
	move.l	_GfxBase(a4),a6
	jsr	-354(a6)		;_LVOSetDrMd(a6)
	endm

InitView	macro
		addrin	\1,a1	;view
		move.l	_GfxBase(a4),a6
		jsr	-360(a6)	;_LVOInitView(a6)
		endm

InitBitMap	macro
		move.l	d2,-(sp)
		addrin	\1,a0
		varin	\2,d0	;depth
		varin	\3,d1	;width
		varin	\4,d2	;weight
		move.l	_GfxBase(a4),a6
		jsr	-3390(a6)	;_LVOInitBitMap(a6)	
		move.l	(sp)+,d2	
		endm

ScrollRaster	macro
	movem.l	d2-d5,-(sp)
	addrin	\1,a1		;rastport
	varin	\2,d0			;dx
	varin	\3,d1			;dy
	varin	\4,d2			;minx
	varin	\5,d3			;miny
	varin	\6,d4			;maxx
	varin	\7,d5			;maxy
	move.l	_GfxBase(a4),a6
	jsr	-396(a6)		;_LVOScrollRaster(a6)
	movem.l	(sp)+,d2-d5
	endm

OwnBlitter	macro
	move.l	_GfxBase(a4),a6
	jsr	-456(a6)	;_LVOOwnBlitter(a6)
	endm

InitTmpRas	macro
	addrin	\1,a0	;tmpras
	addrin	\2,a1	;buf
	varin	\3,d0		;xsize
	varin	\4,d1		;ysize
	add.w	#15,d0
	asr.w	#3,d0
	muls.w	d1,d0		;rassize
	move.l	_GfxBase(a4),a6
	jsr	-468(a6)	;_LVOInitTmpRas(a6)
	endm	

AllocRaster	macro
	varin	\1,d0		;width
	varin	\2,d1		;height
	move.l	_GfxBase(a4),a6
	jsr	-492(a6)	;_LVOAllocRaster(a6)
	endm

FreeRaster	macro
	addrin	\1,a0	;planeptr
	varin	\2,d0	;width
	varin	\3,d1	;height
	move.l	_GfxBase(a4),a6
	jsr	-498(a6)	;_LVOFreeRaster(a6)
	endm
	
FreeVPortCopLists	macro
		addrin	\1,a0
		move.l	_GfxBase(a4),a6
		jsr	-540(a6)	;_LVOFreeVPortCopLists(a6)
		endm

FreeCprList	macro
		addrin	\1,a0	;cprlist
		move.l	_GfxBase(a4),a6
		jsr	-546(a6)	;_LVOFreeCprList(a6)
		endm

GetColorMap	macro
		varin	\1,d0
		move.l	_GfxBase(a4),a6
		jsr	-570(a6)	;_LVOGetColorMap(a6)
		endm

FreeColorMap	macro
		addrin	\1,a0
		move.l	_GfxBase(a4),a6
		jsr	-576(a6)	;_LVOFreeColorMap(a6)
		endm