load	'macros.dump'
	include 'driver.equ'
	include 'scrap.equ'

;**********************************************************************
;
;   X_ClipData
;
;**********************************************************************

X_ClipData	RECORD	EXPORT
	EXPORT	X_CurrentParRecord
	EXPORT	X_BHand
	EXPORT	X_BOffset
	EXPORT	X_BAttr
	EXPORT	X_BRuler
	EXPORT	X_BPixels
	EXPORT	X_BLine
	EXPORT	X_BLast
	EXPORT	X_EndBlock
	EXPORT	X_PageBreakPar
	EXPORT	X_CurrentRuler
	EXPORT	X_RReserved
	EXPORT	X_RStatus
	EXPORT	X_RLeftMargin
	EXPORT	X_RIndent
	EXPORT	X_RRightMargin
	EXPORT	X_RNumTabs
	EXPORT	X_RTabList
	EXPORT	X_REndRuler
	EXPORT	X_ScrStdRuler
	EXPORT	X_ScrStdTabList
	EXPORT	X_SWorksTypes
	EXPORT	X_WPScTypes
	EXPORT	X_SSScTypes
	EXPORT	X_DBScTypes
	EXPORT	X_PLScTypes
	EXPORT	X_GRScTypes
	EXPORT	X_CMScTypes
	EXPORT	X_ScrListTable
	EXPORT	X_ScrapType
	EXPORT	X_ScrapRefCon
	EXPORT	X_CacheType
	EXPORT	X_CacheRefcon
	EXPORT	X_DiScrap
	EXPORT	X_BogusType
	EXPORT	X_DefHeader
	EXPORT	X_OldCursor
	EXPORT	X_CantImportStr
	EXPORT	X_AWIndent
	EXPORT	X_AWLeftMargin
	export	X_ParBlockSize
	export	X_TabBlockSize
	export	X_RulerSize
	export	X_scr_or_EndRulRec
	export	X_CurHeader

X_SWorksTypes
	DC.W	SWText
	DC.W	WPText
	DC.W	StaticText
	DC.W	PICT
	DC.W	PLPict
	DC.W	GRPict
	DC.W	AsciiText
	DC.W	SSScrap
	DC.W	DBScrap
	DC.W	0

X_WPScTypes
	DC.W	WPText
	DC.W	0

X_SSScTypes
	DC.W	SSScrap
	DC.W	0

X_DBScTypes
	DC.W	DBScrap
	DC.W	AsciiText
	DC.W	StaticText
	DC.W	PICT
	DC.W	WPText
	DC.W	SSScrap
	DC.W	0

X_PLScTypes
	DC.W	WPText
	DC.W	PICT
	DC.W	PLPict
	DC.W	0

X_GRScTypes
	DC.W	GRPict
	DC.W	PICT
	DC.W	StaticText
	DC.W	0

X_CMScTypes
	DC.W	AsciiText
	DC.W	0

X_ScrListTable
	DC.L	0,X_WPScTypes,X_SSScTypes,X_SworksTypes,X_PLScTypes,X_GRScTypes,X_CMScTypes

X_ScrapType	DC.W	X_NullScrap
X_ScrapRefCon	DS.B 4

X_CacheType	DC.W	X_NullScrap
X_CacheRefcon	DS.B 4

X_DiScrap	DS.B 256

X_BogusType	DS.B 2

;The default paragraph header
X_DefHeader	DC.W	$4
	DC.B	0
	DC.B	9
	DC.B	0
	DC.W	0

X_OldCursor	DS.B 2

X_CantImportStr	STR 'This document is empty.'
X_AWIndent	DS.B 2
X_AWLeftMargin	DS.B 2

X_CurrentParRecord
X_BHand	DS.B 4
X_BOffset	DS.B 2
X_BAttr	DS.B 2
X_BRuler	DS.B 4
X_BPixels	DC.W	0
X_BLine	DC.L	0
X_BLast	DC.W	0
X_EndBlock

X_CurHeader	
	DS.B 7
	DC.B	CR

X_PageBreakPar
	DC.L	0	;Handle
	DC.W	0	;Offset
	DC.W	X_WPPageBreak	;Attribute
	DC.L	0	;Ruler
	DC.W	0	;Q_Pixels
	DC.L	0	;Q_Line
	DC.W	0	;Last
	DC.W	0	;Bytes


X_CurrentRuler
X_RReserved	DS.B 2
X_RStatus	DS.B 2
X_RLeftMargin	DS.B 2
X_RIndent	DS.B 2
X_RRightMargin	DS.B 2
X_RNumTabs	DS.B 2
X_RTabList	DS.B 40
X_REndRuler

X_ScrStdRuler
	DS.B 2	; D_Reserved
	DC.W	X_scr_r_left+X_scr_r_single	; status
	DC.W	40	; left margin
	DC.W	40	; indent margin
	DC.W	560	; right margin
	DC.W	1	; number of tabs
X_ScrStdTabList
	DC.W	350	; tab type
	DC.W	X_scr_rt_left	; tab location
	DS.B	36	 ; (other tabs could go here!)

X_ParBlockSize	equ X_EndBlock-X_CurrentParRecord
X_TabBlockSize	equ X_scr_ort_EndTabRec*X_scr_maxTabs
X_scr_or_EndRulRec	equ X_scr_or_TabList+(X_scr_ort_EndTabRec*X_scr_maxTabs)
X_RulerSize	equ X_REndRuler-X_CurrentRuler

	ENDR
	END