********************************************************************
*	Imports...
*
* Thursday, April 27, 1989 11:51:49 AM
********************************************************************


;------------------------------------------
;
; Equates from procedure WPglobals
;
;------------------------------------------
W_HdrPixelLimit	equ 110
W_NormalOn		equ 0
W_HeaderOn		equ 1
W_FooterOn		equ -1

;The paragraph data structure is an array from 1..W_LastP of par info blocks
;The paragraph info block
W_pBlockHand		equ 0 ;the W_Handle to the block that the par is in
W_pOffset			equ 4 ;the W_offset into this block that starts the par
W_pAttr			equ 6 ;the attribute word for the par
W_pRulerHand		equ 8 ;the W_Handle to the ruler(formatting) that governs this par
W_pPixels			equ 12 ;the number of Q_Pixels tall this par is
W_pLineHand		equ 14 ;the W_Handle to the Q_Line structure for this par(Purgeable)
W_pLastLine		equ 18 ;the number of last Q_Line in the parplus 1, cr is 0
W_pBytes			equ 20

W_PgBrk			equ 1

W_Picture			equ $8000

W_Font			equ 1
W_Size			equ 2
W_Style			equ 3
W_Color			equ 4
W_PageNumber	equ 5
W_Date			equ 6
W_Time			equ 7

;The block structure may contain several pars, but the block will always
;have a header of BlockHeader length
W_BSize			equ 0
W_BUsed			equ 2
W_BHeader			equ 4

;The linehandle will always have a header as follows
W_MaxLine			equ 0
W_LineHeader		equ 4


;The LineHandle in the par record is an array from 0..W_lastline-1
;Each record looks like
W_lOffset			equ 0
W_lFont			equ 2
W_lStyle			equ 4
W_lSize			equ 5
W_lColor			equ 6
W_lAscent			equ 8
W_lDescent		equ 10
W_lHeight			equ 12
W_lLeading		equ 14
W_lBytes			equ 16

W_TextHeader		equ 7

W_StandFont		equ 3					;X_Geneva
W_StandStyle		equ $c00				 ; 12 pt X_Plain


W_InsertUndo		equ 1
W_DeleteUndo		equ 2
W_RangeUndo		equ 3
W_RTUndo			equ 4
W_StyleUndo		equ 5
W_CaseUndo		equ 6
W_CutUndo			equ 7
W_ClearUndo		equ 8
W_PasteUndo		equ 9

********************************************************************
*
*	Equates from W_pagedlg
*
*
*
*
* Monday, May 1, 1989 6:07:00 AM
********************************************************************
W_FSkipFirst     equ     1<<5
W_FonEven        equ     1<<4
W_FonOdd         equ     1<<3
W_HSkipFirst     equ     1<<2
W_HonEven        equ     1<<1
W_HonOdd         equ     1<<0


********************************************************************
*	Added from rulers source segment
*
* Sunday, April 30, 1989 9:31:24 PM
********************************************************************

*--------------------------------------------------------------*
*              Definition of ruler record (et al.)             *
*--------------------------------------------------------------*

W_maxTabs        	equ 10               	;   << Maximum number of W_Tabs
W_RulWdth			equ 29
W_RulLength		equ 640
W_TabOffset		equ -4				   	; how far right would a tab at 0 be?
W_TabSlop			equ 10				   	; how D_Close can W_Tabs be to each other?
W_pixPerInch		equ 80				   	; (currently, anyhow)
W_boxtop			equ 16
W_welltop			equ 20
W_tabtop			equ 10
W_t1				equ 272
W_t2				equ 304
W_t3				equ 336
W_THoff			equ 10


W_ort_Location   equ 0                  ; << ---- TAB RECORD OFFSETS ----
W_ort_Type       equ W_ort_Location+2
W_ort_EndTabRec  equ W_ort_Type+2

W_or_Reserved    equ 0                  ; << ---- RULER RECORD OFFSETS ----
W_or_Status      equ W_or_Reserved+2
W_or_LeftM       equ W_or_Status+2
W_or_IndentM     equ W_or_LeftM+2
W_or_RightM      equ W_or_IndentM+2
W_or_NumTabs     equ W_or_RightM+2
W_or_TabList     equ W_or_NumTabs+2
W_or_EndRulRec   equ W_or_TabList+(W_ort_EndTabRec*W_maxTabs)


W_r_single       equ 1<<0               ;  << ---- STATUS BITS ----
W_r_double       equ 1<<1
W_r_triple       equ 1<<2
W_r_widow        equ 1<<3
W_r_left         equ 1<<4
W_r_center       equ 1<<5
W_r_right        equ 1<<6
W_r_full         equ 1<<7
;
W_ch_left        equ 1<<8                ; << ---- CHANGE BITS (incl. above) ----
W_ch_indent      equ 1<<9
W_ch_right       equ 1<<10
W_ch_tabs        equ 1<<11

W_r_spacing      equ W_r_single+W_r_double+W_r_triple
W_r_just         equ W_r_full+W_r_center+W_r_right+W_r_left
W_r_defined      equ W_r_spacing+W_r_widow+W_r_just
W_r_reserved     equ $ffff-W_r_defined

W_rt_decimal     equ -1                ;  << ---- TAB TYPES ----
W_rt_left        equ 0
W_rt_right       equ 1
W_rt_leftm       equ 2                 ;  << \
W_rt_indentm     equ 3                ;   <<  > (for use by W_TrackTab only)
W_rt_rightm      equ 4                ;   << /
;------------------------------------------
;
; Equates from procedure W_ATTRData
;
;------------------------------------------
W_FindRepBit			equ 1<<0
W_FindBit				equ 1<<1
W_InsertBit			equ 1<<2
W_GPageBit			equ 1<<3
W_GBegBit				equ 1<<4
W_GEndBit				equ 1<<5
W_SpellBit			equ 1<<6
W_ThesBit				equ 1<<7
W_EUBit				equ 1<<8
W_AllSearch			equ (1<<9)-1
W_NVItem				equ $501
W_VHItem				equ $502
W_VFItem				equ $503
W_vstandbit			equ 1<<0
W_vheadbit			equ 1<<1
W_vfootbit			equ 1<<2
W_srulerbit			equ 1<<3
W_PageDBit			equ 1<<4
W_IPBBit				equ 1<<5
W_IPNBit				equ 1<<6
W_IDBit				equ 1<<7
W_ITBit				equ 1<<8
W_statBit				equ 1<<9
W_AllDocument			equ (1<<$a)-1
W_AddMergeBit			equ 1<<(5+5)
W_EditAll	equ 		EditStandard+%11111100000
W_CopyRulBit			equ 1<<(ExEditStart-$301)
W_PasteRulBit			equ 1<<(ExEditStart-$301)+1
W_SelectABit			equ 1<<(ExEditStart-$301)+2
W_SelectPBit			equ 1<<(ExEditStart-$301)+3
W_SelectSBit			equ 1<<(ExEditStart-$301)+4

********************************************************************
*
*	Screen Equs taken from SCREEN
*
*
*
*
* Monday, May 1, 1989 7:05:13 AM
********************************************************************


W_SideWidth      equ 25
W_PNumBoxHt      equ 11
W_RulerHt        equ 30


