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


;-----------------------------------------------
;
;   Imported addresses
;
;-----------------------------------------------

	IMPORT	P_BringFront,P_SendBack
	IMPORT	P_ChangeAll,P_DoFont
	IMPORT	P_ChgGuideMag,P_GotoPage,P_SetPageNo
	IMPORT	P_ChgGuideVis,P_SetGuides,P_ChgGuideLock
	IMPORT	P_ChgTemplate,P_ChgTmplCount
	IMPORT	P_ChgView,P_ChgPalVis,P_ChgRulerVis
	IMPORT	P_DoColor
	IMPORT	P_DoSize
	IMPORT	P_DoStyle,T_Upper,T_Lower,T_Capit
	IMPORT	P_FlipHoriz,P_FlipVert
	IMPORT	P_InsertPages,P_DeletePage
	IMPORT	P_Left,P_Center,P_Right,P_Full
	IMPORT	P_RotateLeft,P_RotateRight
	IMPORT	P_SelectAll,P_Duplicate
	IMPORT	P_SetSpacing
	IMPORT	P_SingleSpace,P_DoubleSpace,P_TripleSpace

	IMPORT P_KillLMasterStr,P_CancelStr,P_OKStr,P_InsText1Msg
	IMPORT P_InsText2Msg,P_RCtlMsg1,P_RCtlMsg2,P_RCtlMsg3
	IMPORT P_DelText1Msg,P_DelText2Msg,P_GotoTextMsg
	IMPORT P_PNumMsg,P_LRMsg,P_TBMsg,P_ColMsg,P_CSMsg

;-----------------------------------------------
;
;   Forward addresses and entries
;
;-----------------------------------------------

	ENTRY	P_0Msg
	ENTRY	P_25Msg
	ENTRY	P_5Msg
	ENTRY	P_ArrangeMenu
	ENTRY	P_CS_25
	ENTRY	P_Col_1
	ENTRY	P_Col_1Msg
	ENTRY	P_Col_2Msg
	ENTRY	P_ColorMenuTab
	ENTRY	P_DPagesFr
	ENTRY	P_ExEditList
	ENTRY	P_FontMenuTab
	ENTRY	P_GotoOK
	ENTRY	P_InchMsg
	ENTRY	P_InitCol
	ENTRY	P_InitMarg
	ENTRY	P_InsOK
	ENTRY	P_InsText2
	ENTRY	P_LRTxt
	ENTRY	P_LR_25
	ENTRY	P_LR_LE
	ENTRY	P_MLastBList
	ENTRY	P_MenuBitList
	ENTRY	P_MenuList
	ENTRY	P_MenuProcList
	ENTRY	P_OptionsMenu
	ENTRY	P_Pages1
	ENTRY	P_Pages2
	ENTRY	P_Pages3
	ENTRY	P_Pages4
	ENTRY	P_PagesPN
	ENTRY	P_SampTitle
	ENTRY	P_SelAll
	ENTRY	P_SgAdd
	ENTRY	P_SwinEND
	ENTRY	P_TB_25
	ENTRY	P_TextMenu









		EXPORT	P_NoUndo
		EXPORT	P_ID,P_VNum,P_VersNum
		EXPORT	P_FillUndo,P_PenSizeUndo,P_MoveUndo,P_CropUndo,P_StretchUndo
		EXPORT	P_FontUndo,P_FontIDUndo,P_StyleUndo,P_SizeUndo,P_ColorUndo
		EXPORT	P_ClearTextUndo,P_CUtTextUndo,P_ClearObjUndo,P_CutObjUndo
		EXPORT	P_TypeUndo,P_GuideUndo
		EXPORT	LightGray,DarkGray,LightGrey,DarkGrey,CheckMark
		EXPORT	P_FrontBit,P_BackBit,P_FlipHBit,P_FlipVBit,P_RotLBit,P_RotRBit
		EXPORT	P_DefaultArrange,P_AllArrange,P_ObjArrange
		EXPORT	P_ViewPageBit,P_HidePaletteBit,P_HideRulerBit,P_HideGuideBit,P_SetGuideBit,P_LockGuideBit,P_MagGuideBit,P_GoToPageBit,P_SetNumBit,P_UseTempBit,P_DblPageBit
		EXPORT	P_AllOptions,P_DefaultOpt
		EXPORT	P_ViewPageItem,P_HidePaletteItem,P_HideRulerItem,P_HideGuideItem,P_SetGuideItem,P_LockGuideItem,P_MagGuideItem,P_GotoPageItem,P_SetNumItem,P_UseTempItem,P_DblPageItem
		EXPORT	P_AllText,P_DefaultText
		EXPORT	P_LeftBit,P_CenterBit,P_RightBit,P_FullBit,P_SingleSpBit,P_1_5SpBit,P_DoubleSpBit,P_SetSpBit
		EXPORT	P_LeftItem,P_CenterItem,P_RightItem,P_FullItem,P_SingleItem,P_DoubleItem,P_TripleItem,P_SetSItem
		EXPORT	P_DefaultEdit,P_ObjEdit,P_TextEdit,P_EditAll
		EXPORT	P_SelectAllBit,P_DuplicateBit,P_InsertBit,P_DeleteBit
		EXPORT	P_MinHeight
		EXPORT	P_MaxPages
		EXPORT	P_MenuColor,P_MenuStyle,P_MenuSize,P_MenuFont,P_MenuFormat,P_MenuArrange,P_MenuOptions,P_MenuEdit,P_MenuFile,P_MenuApple
		EXPORT	MargGuide,ColGuide,RulerGuide
		EXPORT	P_MaxTabCount,P_LeftTab,P_DecimalTab,P_RightTab,P_IndentTab,P_MinTabDist


		EXPORT	P_ALPHA,P_ARROW,P_BLHDL,P_BRHDL,P_CIRCLE,P_COLORATTR,P_DATETOOL,P_DELETED,P_ENDLINE
		EXPORT	P_ENDPARAG,P_FONTATTR,P_ITEMCOLOR,P_ITEMFONTID,P_LINE,P_MOVEMENT,P_NEXT,P_NTHREAD
		EXPORT	P_OBJCOLOR,P_OBJFILLED,P_OBJRECT,P_PAGENO,P_PAGETOOL,P_PARAGHDL,P_PENSIZE,P_PICTHANDLE
		EXPORT	P_PICTRECT,P_PICTURE,P_PREV,P_PTHREAD,P_RECTANGLE,P_RLEFT,P_RRIGHT,P_SELECTED
		EXPORT	P_SIZEATTR,P_STARTLINE,P_STARTPARAG,P_STRLINE,P_STYLEATTR,P_TEXTOBJSIZE,P_TLHDL
		EXPORT	P_TRECT,P_TRHDL,P_TYPE,P_UNDODATA

		EXPORT	PL_SelRect,PL_DeselectAll,PL_SelectAll,PL_FixTObj,PL_OffsetObj
		EXPORT	PL_AddUpdate,PL_ClrUndoData,PL_SetUndoData,PL_CpyUndoData



		include 'pl.equ'
	
	



P_ATTRData	PROC		EXPORT
		EXPORT	P_AttrTable
		EXPORT	P_MenuList
		EXPORT	P_ArrangeMenu
		EXPORT	P_OptionsMenu
		EXPORT	P_VPage
		EXPORT	P_HPalette
		EXPORT	P_HRulers
		EXPORT	P_HGuides
		EXPORT	P_SetGuidez
		EXPORT	P_LGuides
		EXPORT	P_MGuides
		EXPORT	P_Go2Page
		EXPORT	P_SetNum
		EXPORT	P_NTemplate
		EXPORT	P_SPTempl
		EXPORT	P_NPage
		EXPORT	P_SPalette
		EXPORT	P_SRulers
		EXPORT	P_SGuides
		EXPORT	P_ULGuides
		EXPORT	P_UTemplate
		EXPORT	P_DPTempl
		EXPORT	P_TextMenu
		EXPORT	P_ExEditList
		EXPORT	P_SelAll
		EXPORT	P_Dup
		EXPORT	P_InstPg
		EXPORT	P_DelPg
		EXPORT	P_MenuBitList
		EXPORT	P_MLastBList
		EXPORT	P_MenuProcList
		EXPORT	P_ArrangeMenuTab
		EXPORT	P_FontMenuTab
		EXPORT	P_SizeMenuTab
		EXPORT	P_StyleMenuTab
		EXPORT	P_ColorMenuTab
		EXPORT	P_ExEditTable
		EXPORT	P_OptMenutab
		EXPORT	P_FmtMenuTab
		EXPORT	P_SampTitle

		
P_AttrTable
	DC.L	P_MenuList	;list of applications menus
	DC.L	P_MenuProcList	;ptrs to procs for each menu
	DC.L	P_MenuBitList	;bit descriptions of above]
	DC.L	P_MLastBList	;the last menu bit*2 for each menu
	DC.L	P_ExEditList	;extra edit items, can be 0
	DC.L	0	;default undo string, can be 0
	DC.L	P_SampTitle
	DC.W	0	; no buttons
		DS.B 8						; no button space

P_SampTitle	str ' (PL) '

;		   menus are inserted backwards

P_MenuList
	DC.L	ColorMenu+9		;menu 9
	DC.L	StyleMenu+8		;menu 8
	DC.L	SizeMenu+7		;menu 7
	DC.L	FontMenu+6		;menu 6
	DC.L	P_TextMenu		;menu 5
	DC.L	P_ArrangeMenu	;menu A
	DC.L	P_OptionsMenu	;menu 4
;			Edit Menu			  3
;			File Menu			  2
;			ð    Menu			  1
	DC.L	0


P_ArrangeMenu
	DC.B	'>   Arrange  \N10'
	DC.B	cr
	DC.B	'  Bring to Front\*+=H'
	DC.W	$A01
	DC.B	cr
	DC.B	'  Send to Back\*-_VH'
	DC.W	$A02
	DC.B	cr
	DC.B	'  Flip Horizontal\H'
	DC.W	$A03
	DC.B	cr
	DC.B	'  Flip Vertical\H'
	DC.W	$A04
	DC.B	cr
	DC.B	'  Rotate Left\H'
	DC.W	$A05
	DC.B	cr
	DC.B	'  Rotate Right\H'
	DC.W	$A06
	DC.B	cr
	DC.B	'.'


P_OptionsMenu
	DC.B	'>   Options  \N4'
	DC.B	cr
P_VPage	DC.B	'  Fit in Window\*WwVH'
	DC.W	$401
	DC.B	cr
P_HPalette	DC.B	'  Hide Tools\H'
	DC.W	$402
	DC.B	cr
P_HRulers	DC.B	'  Hide Rulers\H'
	DC.W	$403
	DC.B	cr
P_HGuides	DC.B	'  Hide Guides\VH'
	DC.W	$404
	DC.B	cr
P_SetGuidez	DC.B	'  Set GuidesÉ\H'
	DC.W	$405
	DC.B	cr
P_LGuides	DC.B	'  Lock Guides\H'
	DC.W	$406
	DC.B	cr
P_MGuides	DC.B	'  Magnetic Guides\VH'
	DC.W	$407
	DC.B	cr
P_Go2Page	DC.B	'  Go to pageÉ\*GgH'
	DC.W	$408
	DC.B	cr
P_SetNum	DC.B	'  Set First PageÉ\VH'
	DC.W	$409
	DC.B	cr
P_NTemplate	DC.B	'  Ignore Master Page\H'
	DC.W	$40A
	DC.B	cr
P_SPTempl	DC.B	'  Single Master Page\H'
	DC.W	$40B
	DC.B	cr
	DC.B	'.'

P_NPage	DC.B	'  Actual Size\*WwVH'
	DC.W	$401
	DC.B	cr
P_SPalette	DC.B	'  Show Tools\H'
	DC.W	$402
	DC.B	cr
P_SRulers	DC.B	'  Show Rulers\H'
	DC.W	$403
	DC.B	cr
P_SGuides	DC.B	'  Show Guides\VH'
	DC.W	$404
	DC.B	cr
P_ULGuides	DC.B	'  Unlock Guides\H'
	DC.W	$406
	DC.B	cr
P_UTemplate	DC.B	'  Use Master Page\H'
	DC.W	$40A
	DC.B	cr
P_DPTempl	DC.B	'  Left/Right Master Pages\H'
	DC.W	$40B
	DC.B	cr





P_TextMenu
	DC.B	'>   Text  \N5'
	DC.B	cr
	DC.B	'  Left\CH'
	DC.W	$501
	DC.B	cr
	DC.B	'  Center\H'
	DC.W	$502
	DC.B	cr
	DC.B	'  Right\H'
	DC.W	$503
	DC.B	cr
	DC.B	'  Full\VH'
	DC.W	$504
	DC.B	cr
	DC.B	'  Single Space\CH'
	DC.W	$505
	DC.B	cr
	DC.B	'  1-1/2 Space\H'
	DC.W	$506
	DC.B	cr
	DC.B	'  Double Space\H'
	DC.W	$507
	DC.B	cr
	DC.B	'  Set SpacingÉ\H'
	DC.W	$508
	DC.B	cr
	DC.B	'.'




P_ExEditList	DC.L	P_SelAll,P_Dup,P_InstPg,P_DelPg,0
P_SelAll	DC.B	'  Select All\*AaH'
	DC.W	ExEditStart
	DC.B	cr
P_Dup		DC.B	'  Duplicate\*DdVH'
	DC.W	ExEditStart+1
	DC.B	cr
P_InstPg	DC.B	'  Insert Page(s)É\H'
	DC.W	ExEditStart+2
	DC.B	cr
P_DelPg		DC.B	'  Delete Page(s)É\H'
	DC.W	ExEditStart+3
	DC.B	cr



P_MenuBitList
		DS.B 4						; skips zero and one
	DC.W	FileStandard	; file menu
	DC.W	P_DefaultEdit
	DC.W	P_DefaultOpt
	DC.W	P_DefaultText
	DC.W	1	; font menu
	DC.W	1	; size menu
	DC.W	1	; style menu
	DC.W	1	; color menu
	DC.W	P_DefaultArrange

P_MLastBList
		DS.B 4						;skip menu0 D_Menu1
	DC.W	QuitBit<<1
	DC.W	P_DeleteBit<<1
	DC.W	P_DblPageBit<<1
	DC.W	P_SetSpBit<<1
	DC.W	0
	DC.W	0
	DC.W	0
	DC.W	0
	DC.W	P_RotRBit<<1


P_MenuProcList	DC.L	0,0,P_ExEditTable,P_OptMenuTab,P_FmtMenuTab
	DC.L	P_FontMenuTab,P_SizeMenuTab,P_StyleMenuTab
	DC.L	P_ColorMenuTab,P_ArrangeMenuTab

P_ArrangeMenuTab	DC.L	P_BringFront,P_SendBack
	DC.L	P_FlipHoriz,P_FlipVert
	DC.L	P_RotateLeft,P_RotateRight


P_FontMenuTab	DC.L	P_ChangeAll,P_DoFont

P_SizeMenuTab	DC.L	P_DoSize,0,0

P_StyleMenuTab	DC.L	P_DoStyle,T_Upper,T_Lower,T_Capit

P_ColorMenuTab	DC.L	P_DoColor

P_ExEditTable	DC.L	0,0,0,0,0
	DC.L	P_SelectAll,P_Duplicate
	DC.L	P_InsertPages,P_DeletePage

P_OptMenutab	DC.L	P_ChgView,P_ChgPalVis,P_ChgRulerVis
	DC.L	P_ChgGuideVis,P_SetGuides,P_ChgGuideLock
	DC.L	P_ChgGuideMag,P_GotoPage,P_SetPageNo
	DC.L	P_ChgTemplate,P_ChgTmplCount

P_FmtMenuTab	DC.L	P_Left,P_Center,P_Right,P_Full
	DC.L	P_SingleSpace,P_DoubleSpace,P_TripleSpace
	DC.L	P_SetSpacing


		ENDP







;---------------------------------------------------------------------------


P_Data	PROC		EXPORT
		EXPORT	P_SwinParams
		EXPORT	P_Plane
		EXPORT	P_SwinEND
		EXPORT	P_WindColors
		EXPORT	P_FrameColor
		EXPORT	P_TitleColor
		EXPORT	P_TBarColor
		EXPORT	P_GrowColor
		EXPORT	P_InfoBarColor
		EXPORT	P_HScrTempl
		EXPORT	P_HValue
		EXPORT	P_HViewSize
		EXPORT	P_HDataSize
		EXPORT	P_VScrTempl
		EXPORT	P_VValue
		EXPORT	P_VViewSize
		EXPORT	P_VDataSize
		EXPORT	P_PageDlog
		EXPORT	P_InsOK
		EXPORT	P_InsCancel
		EXPORT	P_InsText1
		EXPORT	P_InsText2
		EXPORT	P_InsPgCnt
		EXPORT	P_Pages1
		EXPORT	P_RCtl1
		EXPORT	P_RCtl2
		EXPORT	P_RCtl3
		EXPORT	P_DPageDlog
		EXPORT	P_DelOK
		EXPORT	P_DelCancel
		EXPORT	P_DelText1
		EXPORT	P_DelText2
		EXPORT	P_DPagesTo
		EXPORT	P_Pages3
		EXPORT	P_DPagesFr
		EXPORT	P_Pages4
		EXPORT	P_Go2PDlog
		EXPORT	P_GotoOK
		EXPORT	P_GotoCancel
		EXPORT	P_GotoText
		EXPORT	P_GotoPgCnt
		EXPORT	P_Pages2
		EXPORT	P_PNumDlog
		EXPORT	P_PNumText
		EXPORT	P_PNumCnt
		EXPORT	P_PagesPN
		EXPORT	P_SGuideDlog
		EXPORT	P_SgAdd
		EXPORT	P_SgCancel
		EXPORT	P_LR_LE
		EXPORT	P_InitMarg
		EXPORT	P_TB_LE
		EXPORT	P_Col_LE
		EXPORT	P_InitCol
		EXPORT	P_CS_LE
		EXPORT	P_LR_25
		EXPORT	P_25Msg
		EXPORT	P_LR_5
		EXPORT	P_5Msg
		EXPORT	P_LR_0
		EXPORT	P_InchMsg
		EXPORT	P_TB_25
		EXPORT	P_TB_5
		EXPORT	P_TB_0
		EXPORT	P_Col_1
		EXPORT	P_Col_1Msg
		EXPORT	P_Col_2
		EXPORT	P_Col_2Msg
		EXPORT	P_Col_0
		EXPORT	P_0Msg
		EXPORT	P_CS_25
		EXPORT	P_CS_5
		EXPORT	P_CS_0
		EXPORT	P_LRTxt
		EXPORT	P_TBTxt
		EXPORT	P_ColTxt
		EXPORT	P_CSTxt
		EXPORT	P_LineRects
		EXPORT	P_Mask
		EXPORT	P_TrackMaskVert
		EXPORT	P_TrackMaskHorz
		EXPORT	P_CurrentWin
		EXPORT	P_NotActive
		EXPORT	P_Placing
		EXPORT	P_ImportType
		EXPORT	P_ImportHdl
		EXPORT	P_ThreadHdl
		EXPORT	P_ThreadDir
		EXPORT	P_HotRect
		EXPORT	P_SpecStr
		EXPORT	P_OldClip
		EXPORT	P_NewClip
		EXPORT	P_Pattern
		EXPORT	P_OldIdlePt
		EXPORT	P_PastePt
		EXPORT	P_Header
		EXPORT	P_Version
		EXPORT	P_WindowStuff
		EXPORT	P_Palette
		EXPORT	P_TrackOn
		EXPORT	P_LineSize
		EXPORT	P_FillMode
		EXPORT	P_VisRuler
		EXPORT	P_VisPalette
		EXPORT	P_PageMode
		EXPORT	P_Cursor
		EXPORT	P_ToolType
		EXPORT	P_DblPage
		EXPORT	P_PageCount
		EXPORT	P_PageArray
		EXPORT	P_Page
		EXPORT	P_FirstPOff
		EXPORT	P_PageStart
		EXPORT	P_PrintHand
		EXPORT	P_PageRect
		EXPORT	P_PaperRect
		EXPORT	P_FullPageRect
		EXPORT	P_FullPaperRect
		EXPORT	P_HRulRect
		EXPORT	P_VRulRect
		EXPORT	P_OrgOffset
		EXPORT	P_V
		EXPORT	P_H
		EXPORT	P_VScroll
		EXPORT	P_HScroll
		EXPORT	P_ContentRect
		EXPORT	P_GrowRect
		EXPORT	P_PIconRect
		EXPORT	P_PortRect
		EXPORT	P_VisGuides
		EXPORT	P_LockGuides
		EXPORT	P_MagGuides
		EXPORT	P_DefSpacing
		EXPORT	P_DefJust
		EXPORT	P_DefFont
		EXPORT	P_DefStyle
		EXPORT	P_DefSize
		EXPORT	P_DefColor
		EXPORT	P_AllHGuides
		EXPORT	P_AllVGuides
		EXPORT	P_AllHGCount
		EXPORT	P_AllVGCount
		EXPORT	P_CurDate
		EXPORT	P_StoreV
		EXPORT	P_StoreH
		EXPORT	P_Reserved
		EXPORT	P_PageInfo
		EXPORT	P_ObjList
		EXPORT	P_LastObj
		EXPORT	P_VertGuides
		EXPORT	P_HorizGuides
		EXPORT	P_VertGCount
		EXPORT	P_HorizGCount
		EXPORT	P_UseTemplate
		EXPORT	P_EndofInfo
		EXPORT	P_HeaderSize,P_InfoSize,P_WinStuffSize,P_PInfoSize
		
P_DefaultWinTitle	STR 'P'		

P_SwinParams	
	DC.W	P_SwinEND-P_SwinParams	; Parameter block length
	DC.W	fZoomed+fCtlTie+fQContent+fMove+fZoom+fFlex+fClose+fTitle
P_TitlePtr	
	DC.L	P_DefaultWinTitle	; Title
	DC.L	2	; RefCon
	DC.W	P_WinTop,P_WinLeft	; Window 'full' size
	DC.W	P_WinTop+P_WinHeight,P_WinLeft+P_WinWidth
	DC.L	0	; Color table pointer (default)
	DC.W	0,0	; Effective TM origin
	DC.W	180,0	; DATA size (GUESS)
	DC.W	0,0	; Max content size (default)
	DC.W	0,0	; # scroll Pixels (GUESS)
	DC.W	0,0	; # page Pixels (GUESS)
	DC.L	0	; Info bar DATA (none)
	DC.W	0	; Info bar height (none)
	DC.L	0	; Frame defproc (default)
	DC.L	0	; Info bar defproc (none)
	DC.L	0	; Content defproc
	DC.W	P_WinTop,P_WinLeft
	DC.W	P_WinHeight+P_WinTop,P_WinWidth+P_WinLeft
P_Plane	
	DC.L	$FFFFFFFF	; Starting plane (front)
	DC.L	0	; Address (any)
P_SwinEND




P_WindColors
P_FrameColor		DS.B 2
P_TitleColor		DS.B 2
P_TBarColor		DS.B 2
P_GrowColor		DS.B 2
P_InfoBarColor		DS.B 2
		DS.B 10









P_HScrTempl	DC.W	0,0,0,0	; these are filled in before use
	DC.L	0
	DC.W	horScroll+leftFlag+rightFlag
P_HValue	DC.W	0
P_HViewSize	DC.W	5
P_HDataSize	DC.W	20
	DC.L	scrollProc
	DC.L	1
	DC.L	0

P_VScrTempl	DC.W	0,0,0,0	; these are filled in before use
	DC.L	0
	DC.W	downFlag+upFlag
P_VValue	DC.W	0
P_VViewSize	DC.W	5
P_VDataSize	DC.W	20
	DC.L	scrollProc
	DC.L	2
	DC.L	0



;---------------------------------------------------------------------------
; Insert Pages Dialog
;
;		   1 = OK
;		   2 = Cancel
;		   3 = 'Insert'
;		   4 = pages
;		   5 = 'page(s)'
;		   6 = (¥) at the beginning.
;		   7 = (¥) after the current page.
;		   8 = (¥) at the end.

P_PageDlog	DC.W	48,185,136,462
	DC.W	1	; dialog is visible
	DC.L	0
	DC.L	P_InsOK,P_InsCancel,P_InsText1,P_InsPgCnt
	DC.L	P_InsText2,P_RCtl1,P_RCtl2,P_RCtl3
	DC.L	0	; terminator

P_InsOK	DC.W	1
	DC.W	69,165,82,230
	DC.W	$000A
	DC.L	P_OKStr
	DC.W	0
	DC.W	0
	DC.L	0

P_InsCancel	DC.W	2
	DC.W	69,40,82,105
	DC.W	$000A
	DC.L	P_CancelStr
	DC.W	0
	DC.W	0
	DC.L	0

P_InsText1	DC.W	3
	DC.W	10,60,23,110
	DC.W	$000F
	DC.L	P_InsText1Msg
	DC.W	0
	DC.W	0
	DC.L	0

P_InsText2	DC.W	5
	DC.W	10,156,23,216
	DC.W	$800F
	DC.L	P_InsText2Msg
	DC.W	0
	DC.W	0
	DC.L	0

P_InsPgCnt	DC.W	4
	DC.W	8,114,21,150
	DC.W	$8011
	DC.L	P_Pages1
	DC.W	3
	DC.W	0
	DC.L	0
P_Pages1	STR '1'

P_RCtl1	DC.W	6
	DC.W	25,40,35,230
	DC.W	$000C
	DC.L	P_RCtlMsg1
	DC.W	0
	DC.W	0
	DC.L	0

P_RCtl2	DC.W	7
	DC.W	39,40,49,230
	DC.W	$000C
	DC.L	P_RCtlMsg2
	DC.W	1	; ON -- this is the default.
	DC.W	0
	DC.L	0

P_RCtl3	DC.W	8
	DC.W	53,40,63,230
	DC.W	$000C
	DC.L	P_RCtlMsg3
	DC.W	0
	DC.W	0
	DC.L	0



;---------------------------------------------------------------------------
; Delete Pages Dialog
;
;		   1 = OK
;		   2 = Cancel
;		   3 = 'Delete pages'
;		   4 = FromPage
;		   5 = 'through'
;		   6 = ToPage

P_DPageDlog	DC.W	48,185,117,462
	DC.W	1
	DC.L	0
	DC.L	P_DelOK,P_DelCancel,P_DelText1
	DC.L	P_DPagesFr,P_DelText2,P_DPagesTo
	DC.L	0

P_DelOK	DC.W	1
	DC.W	51,165,64,230
	DC.W	$000A
	DC.L	P_OKStr
	DC.W	0
	DC.W	0
	DC.L	0

P_DelCancel	DC.W	2
	DC.W	51,40,64,105
	DC.W	$000A
	DC.L	P_CancelStr
	DC.W	0
	DC.W	0
	DC.L	0

P_DelText1	DC.W	3
	DC.W	10,86,23,191
	DC.W	$800F
	DC.L	P_DelText1Msg
	DC.W	0
	DC.W	0
	DC.L	0

P_DelText2	DC.W	5
	DC.W	27,107,40,163
	DC.W	$800F
	DC.L	P_DelText2Msg
	DC.W	0
	DC.W	0
	DC.L	0

P_DPagesTo	DC.W	6
	DC.W	25,167,38,205
	DC.W	$8011
	DC.L	P_Pages3
	DC.W	4
	DC.W	0
	DC.W	0
P_Pages3	STR '1'

P_DPagesFr	DC.W	4
	DC.W	25,65,38,103
	DC.W	$8011
	DC.L	P_Pages4
	DC.W	4
	DC.W	0
	DC.W	0
P_Pages4	STR '1'



;---------------------------------------------------------------------------
; Goto Page Dialog
;
;		   1 = OK
;		   2 = Cancel
;		   3 = 'Go to page'
;		   4 = PageCount

P_Go2PDlog	DC.W	48,185,101,462
	DC.W	1
	DC.L	0
	DC.L	P_GotoOK,P_GotoCancel,P_GotoText,P_GotoPgCnt
	DC.L	0

P_GotoOK	DC.W	1
	DC.W	34,160,47,230
	DC.W	$000A
	DC.L	P_OKStr
	DC.W	0
	DC.W	0
	DC.L	0

P_GotoCancel	DC.W	2
	DC.W	34,40,47,110
	DC.W	$000A
	DC.L	P_CancelStr
	DC.W	0
	DC.W	0
	DC.L	0

P_GotoText	DC.W	3
	DC.W	10,80,23,161
	DC.W	$800F
	DC.L	P_GotoTextMsg
	DC.W	0
	DC.W	0
	DC.L	0

P_GotoPgCnt	DC.W	4
	DC.W	8,165,21,203
	DC.W	$8011
	DC.L	P_Pages2
	DC.W	4
	DC.W	0
	DC.W	0
P_Pages2	STR '1'



;---------------------------------------------------------------------------
; Set Page Number Dialog
;
;		   1 = OK
;		   2 = Cancel
;		   3 = 'First page number:'
;		   4 = PageCount

P_PNumDlog	DC.W	48,185,101,462
	DC.W	1
	DC.L	0
	DC.L	P_GotoOK,P_GotoCancel,P_PNumText,P_PNumCnt
	DC.L	0

P_PNumText	DC.W	3
	DC.W	10,40,23,175
	DC.W	$800F
	DC.L	P_PNumMsg
	DC.W	0
	DC.W	0
	DC.L	0

P_PNumCnt	DC.W	4
	DC.W	8,179,21,217
	DC.W	$8011
	DC.L	P_PagesPN
	DC.W	3
	DC.W	0
	DC.W	0
P_PagesPN	STR '1'
		DS.B 4   ; extra string space




;---------------------------------------------------------------------------
; Set Guides Dialog
;
;		   1 = OK
;		   2 = Cancel
;
;		   4 = LR LineEdit
;		   5 = TB LineEdit
;		   6 = Col LineEdit
;		   7 = CS LineEdit
;
;		   8 = LR  0.25 inch
;		   9 =	 0.5 inch
;		  10 =	 LE control
;
;		  12 = TB  0.25 inch
;		  13 =	 0.5 inch
;		  14 =	 LE control
;
;		  16 = Col 1
;		  17 =	 2
;		  18 =	 LE control
;
;		  20 = CS  0.25 inch
;		  21 =	 0.5 inch
;		  22 =	 LE control
;
;		  24 = L/R Margins
;		  25 = T/B Margins
;		  26 = Columns
;		  27 = Column Spacing
;

P_SGuideDlog	DC.W	23,140,176,500
	DC.W	1
	DC.L	0
	DC.L	P_SgAdd,P_SgCancel
	DC.L	P_LR_LE,P_CS_LE,P_TB_LE,P_Col_LE
	DC.L	P_LR_25,P_LR_5,P_LR_0
	DC.L	P_TB_25,P_TB_5,P_TB_0
	DC.L	P_Col_1,P_Col_2,P_Col_0
	DC.L	P_CS_25,P_CS_5,P_CS_0
	DC.L	P_LRTxt,P_TBTxt,P_ColTxt,P_CSTxt
	DC.L	0

;		 ; Buttons
P_SgAdd	DC.W	1
	DC.W	131,220,144,305
	DC.W	buttonItem
	DC.L	P_OKStr
	DC.W	0
	DC.W	0
	DC.L	0

P_SgCancel	DC.W	2
	DC.W	131,50,144,135
	DC.W	buttonItem
	DC.L	P_CancelStr
	DC.W	0
	DC.W	0
	DC.L	0


;		 ; LineEdits
P_LR_LE	DC.W	4
	DC.W	47,76,60,116
	DC.W	editLine
	DC.L	P_InitMarg
	DC.W	4
	DC.W	0
	DC.W	0
P_InitMarg	STR '1.0'

P_TB_LE	DC.W	5
	DC.W	107,76,120,116
	DC.W	editLine
	DC.L	P_InitMarg
	DC.W	4
	DC.W	0
	DC.W	0

P_Col_LE	DC.W	6
	DC.W	47,256,60,276
	DC.W	editLine
	DC.L	P_InitCol
	DC.W	1
	DC.W	0
	DC.W	0
P_InitCol	STR '3'

P_CS_LE	DC.W	7
	DC.W	107,256,120,296
	DC.W	editLine
	DC.L	P_InitMarg
	DC.W	4
	DC.W	0
	DC.W	0

;		 ; Radio Controls
P_LR_25	DC.W	8
	DC.W	23,50,33,155
	DC.W	radioItem
	DC.L	P_25Msg
	DC.W	1
	DC.W	8
	DC.L	0
P_25Msg	STR '0.25 inch'

P_LR_5	DC.W	9
	DC.W	36,50,46,155
	DC.W	radioItem
	DC.L	P_5Msg
	DC.W	0
	DC.W	8
	DC.L	0
P_5Msg	STR '0.5 inch'

P_LR_0	DC.W	10
	DC.W	49,50,59,155
	DC.W	radioItem
	DC.L	P_InchMsg
	DC.W	0
	DC.W	8
	DC.L	0
P_InchMsg	STR '            inch'

P_TB_25	DC.W	12
	DC.W	83,50,93,155
	DC.W	radioItem
	DC.L	P_25Msg
	DC.W	1
	DC.W	12
	DC.L	0

P_TB_5	DC.W	13
	DC.W	96,50,106,155
	DC.W	radioItem
	DC.L	P_5Msg
	DC.W	0
	DC.W	12
	DC.L	0

P_TB_0	DC.W	14
	DC.W	109,50,119,155
	DC.W	radioItem
	DC.L	P_InchMsg
	DC.W	0
	DC.W	12
	DC.L	0

P_Col_1	DC.W	16
	DC.W	23,230,33,295
	DC.W	radioItem
	DC.L	P_Col_1Msg
	DC.W	1
	DC.W	16
	DC.L	0
P_Col_1Msg	STR '1'

P_Col_2	DC.W	17
	DC.W	36,230,46,295
	DC.W	radioItem
	DC.L	P_Col_2Msg
	DC.W	0
	DC.W	16
	DC.L	0
P_Col_2Msg	STR '2'

P_Col_0	DC.W	18
	DC.W	49,230,59,255
	DC.W	radioItem
	DC.L	P_0Msg
	DC.W	0
	DC.W	16
	DC.L	0
P_0Msg	DC.B	0

P_CS_25	DC.W	20
	DC.W	83,230,93,335
	DC.W	radioItem
	DC.L	P_25Msg
	DC.W	1
	DC.W	20
	DC.L	0

P_CS_5	DC.W	21
	DC.W	96,230,106,335
	DC.W	radioItem
	DC.L	P_5Msg
	DC.W	0
	DC.W	20
	DC.L	0

P_CS_0	DC.W	22
	DC.W	109,230,119,335
	DC.W	radioItem
	DC.L	P_InchMsg
	DC.W	0
	DC.W	20
	DC.L	0


;		 ; Static Text
P_LRTxt	DC.W	24
	DC.W	10,30,23,190
	DC.W	$800F
	DC.L	P_LRMsg
	DC.W	0
	DC.W	0
	DC.L	0

P_TBTxt	DC.W	25
	DC.W	70,30,83,190
	DC.W	$800F
	DC.L	P_TBMsg
	DC.W	0
	DC.W	0
	DC.L	0

P_ColTxt	DC.W	26
	DC.W	10,215,23,275
	DC.W	$800F
	DC.L	P_ColMsg
	DC.W	0
	DC.W	0
	DC.L	0

P_CSTxt	DC.W	27
	DC.W	70,215,83,340
	DC.W	$800F
	DC.L	P_CSMsg
	DC.W	0
	DC.W	0
	DC.L	0





; Various non-refcon globals

P_LineRects	DC.W	96,1,101,35	;BOGUS
	DC.W	100,1,106,35
	DC.W	105,1,112,35
	DC.W	111,1,119,35
	DC.W	118,1,127,35
	DC.W	126,1,136,35
	DC.W	135,1,146,35



P_Mask	DC.B	%11001100
	DC.B	%00110011
	DC.B	%11001100
	DC.B	%00110011
	DC.B	%11001100
	DC.B	%00110011
	DC.B	%11001100
	DC.B	%00110011

P_TrackMaskVert	DC.B	%00000000
	DC.B	%11111111
	DC.B	%00000000
	DC.B	%11111111
	DC.B	%00000000
	DC.B	%11111111
	DC.B	%00000000
	DC.B	%11111111

P_TrackMaskHorz	DC.B	%01100110
	DC.B	%01100110
	DC.B	%01100110
	DC.B	%01100110
	DC.B	%01100110
	DC.B	%01100110
	DC.B	%01100110
	DC.B	%01100110




; Various equates












; Globals and refcon data


P_CurrentWin		DS.B 4		  ; Always reflects the window whose refcon data
;						   ; is on board

P_NotActive		DS.B 2		  ; Don't fuck with the menus because I'm not active


P_Placing		DS.B 2		  ; boolean
P_ImportType		DS.B 2		  ; 0 - Text, 1 - picture
P_ImportHdl		DS.B 4		  ; For Text, this is a ParagHdl.

P_ThreadHdl		DS.B 4		  ; Object to thread to.
P_ThreadDir		DS.B 4		  ; Direction threading

P_HotRect		DS.B 8		  ; Used for hot copy
P_SpecStr		DS.B 40		 ; Used for page and date string building

P_OldClip		DS.B 4		  ; Temp clip rgn handle
P_NewClip		DS.B 4		  ; Temp clip rgn handle

P_Pattern		DS.B 32

P_OldIdlePt		DC.W	-20,-20	; way off screen
P_PastePt		DC.W	-20,-20	; Where to center the next paste


P_Header
;-------------------
P_Version		DC.W	P_VersNum


P_WindowStuff
;-------------------
P_Palette		DS.B 8	; rectangle of selected palette tool
				DS.B 4  ; old title ptr space
P_TrackOn		DS.B 2
P_LineSize		DS.B 2	; pixel height of drawing Line
P_FillMode		DS.B 2	; bool - graphic objects filled/hollow
P_VisRuler		DS.B 2	; bool - Ruler is visible?
P_VisPalette	DS.B 2	; bool - Palette is visible?
P_PageMode		DS.B 2	; bool - viewing page?
P_Cursor		DS.B 2	; current D_Cursor (over content Rect)
P_ToolType		DS.B 2	; tool chosen from palette (0-6)
P_DblPage		DS.B 2	; bool - template page mode
P_PageCount		DS.B 2	; # pages (1-32767)
P_PageArray		DS.B 4	; Handle to array of page infos.
P_Page			DS.B 2	; Active Page #
P_FirstPOff		DS.B 2	; Offset from actual page to user page #.
P_PageStart		DS.B 2	; First visible page icon
P_PrintHand		DS.B 4	; Handle to print record
P_PageRect		DS.B 8	; Rect with printable interior
P_PaperRect		DS.B 8	; Actual size of the damn piece of paper.
P_FullPageRect	DS.B 8	; Rect of full page when viewing entire page
P_FullPaperRect	DS.B 8	; Rect of full paper when viewing entire page
P_HRulRect		DS.B 8	; Horizontal Ruler rectangle
P_VRulRect		DS.B 8	; Vertical Ruler rectangle
P_OrgOffset	; ; pt.
P_V				DS.B 2	; Vertical offset for scrolling	(neg)
P_H				DS.B 2	; Horizontal offset for scrolling  (neg)
P_VScroll		DS.B 4	; Ctl Handle
P_HScroll		DS.B 4	; Ctl Handle
P_ContentRect	DS.B 8	; Visible area of document within window
P_GrowRect		DS.B 8
P_PIconRect		DS.B 8
P_PortRect		DS.B 8
P_VisGuides		DS.B 2
P_LockGuides	DS.B 2
P_MagGuides		DS.B 2


P_DefSpacing	DS.B 2	; Default Text spacing
P_DefJust		DS.B 2	; Default Text justification

P_DefFont		DS.B 2	; Default font family
P_DefStyle		DS.B 2	; Default style
P_DefSize		DS.B 2	; Default size
P_DefColor		DS.B 2	; Default color

P_AllHGuides	DS.B 4
P_AllVGuides	DS.B 4
P_AllHGCount	DS.B 2
P_AllVGCount	DS.B 2

P_CurDate		DS.B 4
P_StoreV		DS.B 2
P_StoreH		DS.B 2
P_Reserved		DS.B 16


P_PageInfo	; ; current page info.
;-------------------
P_ObjList		DS.B 4	; Beginning of object linked list
P_LastObj		DS.B 4	; Ending of object linked list
P_VertGuides	DS.B 4
P_HorizGuides	DS.B 4
P_VertGCount	DS.B 2
P_HorizGCount	DS.B 2
P_UseTemplate	DS.B 2	; bool
P_EndofInfo


P_PINFOSIZE		equ P_EndofInfo-P_PageInfo
P_WINSTUFFSIZE	equ P_EndofInfo-P_WindowStuff
P_HEADERSIZE	equ P_EndofInfo-P_Header

		ENDP
		END


