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