	LOAD	'Macros.dump'
	INCLUDE 'Pict.equ'
	INCLUDE	'Driver.equ'

	IMPORT	Q_FlipHMap
	IMPORT	Q_FlipVMap
	IMPORT	Q_RotLMap
	IMPORT	Q_RotRMap
****************************************************************
*															  ;
*		Picture flipping and rotating routines				;
*		Jeff G. Erickson									  ;
*															  ;
****************************************************************

****************************************************************
Q_PictData	PROC		EXPORT
		EXPORT	Q_picterr
		EXPORT	Q_gotPScomm
		EXPORT	Q_op
		EXPORT	Q_center
		EXPORT	Q_addbytes
		EXPORT	Q_pictSCB
		EXPORT	Q_thePnSize
		EXPORT	Q_theMask
		EXPORT	Q_thePnLoc
		EXPORT	Q_theFGcolor
		EXPORT	Q_theBGcolor
		EXPORT	Q_theTxFont
		EXPORT	Q_theTxMode
		EXPORT	Q_theChExtra
		EXPORT	Q_theSpExtra
		EXPORT	Q_theFontFlags
		EXPORT	Q_theTxLoc
		EXPORT	Q_txtPort
		EXPORT	Q_txtPortLoc
		EXPORT	Q_txtSCB
		EXPORT	Q_txtImage
		EXPORT	Q_txtWidth
		EXPORT	Q_txtBounds
		EXPORT	Q_txtHandle
		EXPORT	Q_txtHsize
		EXPORT	Q_txtRect
		EXPORT	Q_pixSCB
		EXPORT	Q_pixbounds
		EXPORT	Q_srcpixsize
		EXPORT	Q_dstpixsize
		EXPORT	Q_PixelTable
		EXPORT	Q_printsquare
		EXPORT	Q_square
		EXPORT	Q_half



Q_picterr		DS.B 2
Q_gotPScomm	DC.W	0
*--------------------------------------------------------------*
*						 Picture stuff						;
*--------------------------------------------------------------*
Q_op		DS.B 2			   ; current picture opcode
Q_center		DS.B 4			   ; TWICE the Q_center of the picture
Q_addbytes		DS.B 4			   ; how many bytes to add to the pict?

Q_pictSCB		DS.B 2			   ; picture's original SCB
Q_thePnSize		DS.B 4			   ; current pen size w/i the D_New picture
Q_theMask		DS.B 8			   ; ... pen Q_Mask ...
Q_thePnLoc		DS.B 4			   ; current pen location w/i OLD picture

*--------------------------------------------------------------*
*						  Q_Text stuff						  ;
*--------------------------------------------------------------*
Q_theFGcolor		DS.B 2			   ; ... foreground color ...
Q_theBGcolor		DS.B 2			   ; ... background color ...
Q_theTxFont		DS.B 4			   ; ... font ID ...
Q_theTxMode		DS.B 2			   ; ... Q_Text mode ...
Q_theChExtra		DS.B 4			   ; ... charExtra ...
Q_theSpExtra		DS.B 4			   ; ... spaceExtra ...
Q_theFontFlags		DS.B 2			   ; ... font flags ...
Q_theTxLoc		DS.B 4			   ; ... the Q_Text location ...

Q_txtPort		DS.B 170			 ; Q_Text port
Q_txtPortLoc	; ; Q_Text port loc
Q_txtSCB		DS.B 2			   ; SCB
Q_txtImage		DS.B 4			   ; pointer to Q_Text image
Q_txtWidth		DS.B 2			   ; byte width of Q_Text image (mult. of 8)
Q_txtBounds		DS.B 8			   ; bounds of Q_Text image (adj'd to width)

Q_txtHandle		DS.B 4			   ; handle on Q_Text image (ptr to Q_txtImage)
Q_txtHsize		DS.B 4			   ; size of Q_txtHandle
Q_txtRect		DS.B 8			   ; REAL bounds of Q_Text image

*--------------------------------------------------------------*
*						Pixelmap stuff						;
*--------------------------------------------------------------*
Q_pixSCB		DS.B 2			   ; pixmap's scan-Q_Line control byte
Q_pixbounds		DS.B 4			   ; bottom right of (old) bounds
Q_srcpixsize		DS.B 4			   ; size (bytes) of source pixmap
Q_dstpixsize		DS.B 4			   ; size (bytes) of detination pixmap

Q_PixelTable	; ; routines for mangling pixmaps
	DC.L	Q_FlipHMap
	DC.L	Q_FlipVMap
	DC.L	Q_RotRMap
	DC.L	Q_RotLMap

*--------------------------------------------------------------*
*						 Q_Region stuff						 ;
*--------------------------------------------------------------*
Q_printsquare	DC.W	0,0,128,256
Q_square	DC.W	0,0,128,128
Q_half	DC.W	0,0,128,64

		ENDP
		END

