* * Source machine generated by GadToolsBox V2.0b * which is (c) Copyright 1991-1993 Jaba Development * * GUI Designed by : Jesper Skov * include 'exec/types.i' include 'intuition/intuition.i' include 'intuition/classes.i' include 'intuition/classusr.i' include 'intuition/imageclass.i' include 'intuition/gadgetclass.i' include 'libraries/gadtools.i' include 'graphics/displayinfo.i' include 'graphics/gfxbase.i' OpenScreenTagList EQU -612 OpenWindowTagList EQU -606 CloseScreen EQU -66 CloseWindow EQU -72 PrintIText EQU -216 LockPubScreen EQU -510 UnlockPubScreen EQU -516 SetMenuStrip EQU -264 ClearMenuStrip EQU -54 GetVisualInfoA EQU -126 FreeVisualInfo EQU -132 CreateContext EQU -114 CreateGadgetA EQU -30 GT_RefreshWindow EQU -84 FreeGadgets EQU -36 CreateMenusA EQU -48 LayoutMenusA EQU -66 FreeMenus EQU -54 OpenDiskFont EQU -30 CloseFont EQU -78 DrawBevelBoxA EQU -120 FreeClass EQU -714 NewObjectA EQU -636 DisposeObject EQU -642 TextLength EQU -54 CopyMem EQU -624 FindTagItem EQU -30 IntuiTextLength EQU -330 Forbid EQU -132 Permit EQU -138 GD_MainLoad EQU 0 GD_MainCancel EQU 1 GD_MainInput EQU 2 GD_MainMisc EQU 3 GD_MainDisassem EQU 4 GD_MainStartup EQU 5 GD_MainMemory EQU 6 GD_MainDisk EQU 7 GD_MainScreen EQU 8 GD_MainSave EQU 9 GD_DefaultPrefs EQU 10 GD_ModifyGR EQU 11 GD_ScreenOK EQU 0 GD_ScreenCancel EQU 1 GD_ScreenMode EQU 2 GD_EditScreenMode EQU 3 GD_ScreenColor EQU 4 GD_TextColor EQU 5 GD_HeaderColor EQU 6 GD_HeaderTColor EQU 7 GD_CursorColor EQU 8 GD_PointerColor1 EQU 9 GD_PointerColor2 EQU 10 GD_DiskOK EQU 0 GD_DiskCancel EQU 1 GD_DefaultDrive EQU 2 GD_DiskSync EQU 3 GD_DTrackLength EQU 4 GD_HTrackLength EQU 5 GD_Retries EQU 6 GD_BMReserved EQU 7 GD_BMFree EQU 8 GD_BMUsed EQU 9 GD_DiskVerify EQU 10 GD_InputOK EQU 0 GD_InputCancel EQU 1 GD_DelaySpeed EQU 2 GD_RepeatSpeed EQU 3 GD_EditMode EQU 4 GD_CursorRate EQU 5 GD_PointerBlanker EQU 6 GD_PasteKey EQU 7 GD_DisAsmOK EQU 0 GD_DisAsmCancel EQU 1 GD_LeadingZeros EQU 2 GD_ShortAddress EQU 3 GD_OffsetAddress EQU 4 GD_NegativeOffsets EQU 5 GD_DCASCII EQU 6 GD_DisAsmBreak EQU 7 GD_DumpLines EQU 8 GD_DisassemNext EQU 9 GD_ShowCPU EQU 10 GD_LongUpDis EQU 11 GD_MiscOK EQU 0 GD_MiscCancel EQU 1 GD_Prompt EQU 2 GD_NonASCII EQU 3 GD_TextJoker EQU 4 GD_ProgressBar EQU 5 GD_PeekerHeight EQU 6 GD_MemoryOK EQU 0 GD_MemoryCancel EQU 1 GD_ChipMemory EQU 2 GD_RAMBank0Start EQU 3 GD_RAMBank0End EQU 4 GD_RAMBank1Start EQU 5 GD_RAMBank1End EQU 6 GD_RAMBank2Start EQU 7 GD_RAMBank2End EQU 8 GD_RAMBank3Start EQU 9 GD_RAMBank3End EQU 10 GD_RAMBank4Start EQU 11 GD_RAMBank4End EQU 12 GD_RAMBank5Start EQU 13 GD_RAMBank5End EQU 14 GD_StartOK EQU 0 GD_StartCancel EQU 1 GD_ResetEntry EQU 2 GD_Exceptions EQU 3 GD_NMI EQU 4 GD_NMIROM EQU 5 GD_CopOffset EQU 6 GD_ClearMatrix EQU 7 GD_ClearScreen EQU 8 GD_BreakOK EQU 0 GD_BreakCancel EQU 1 GD_BLEditUB EQU 2 GD_BLEditCB EQU 3 GD_BLEditE EQU 4 GD_BLEditR EQU 5 GD_BLEditSR EQU 6 GD_BLEditDW EQU 7 GD_BLDumpUB EQU 8 GD_BLDumpCB EQU 9 GD_BLDumpE EQU 10 GD_BLDumpR EQU 11 GD_BLDumpSR EQU 12 GD_BLDumpDW EQU 13 GD_ScreenModeOK EQU 0 GD_ScreenModeCancel EQU 1 GD_TextLines EQU 2 GD_CustomDisplay EQU 3 GD_diwstrt EQU 4 GD_diwstop EQU 5 GD_ddfstrt EQU 6 GD_ddfstop EQU 7 GD_beamcon0 EQU 8 GD_bplcon0 EQU 9 GD_hbstrt EQU 10 GD_hbstop EQU 11 GD_hsstrt EQU 12 GD_hsstop EQU 13 GD_htotal EQU 14 GD_hcenter EQU 15 GD_vbstrt EQU 16 GD_vbstop EQU 17 GD_vsstrt EQU 18 GD_vsstop EQU 19 GD_vtotal EQU 20 GD_diwhigh EQU 21 GD_SystemView EQU 22 GD_ModeName EQU 23 Ghost_Rider_Prefs_CNT EQU 12 ScreenPrefs_CNT EQU 11 DiskPrefs_CNT EQU 11 InputPrefs_CNT EQU 8 DisAssemPrefs_CNT EQU 12 MiscPrefs_CNT EQU 7 MemPrefs_CNT EQU 15 StartPrefs_CNT EQU 9 BLPrefs_CNT EQU 14 Screen_Mode_CNT EQU 24 XDEF Scr XDEF VisualInfo XDEF PubScreenName XDEF Ghost_Rider_PrefsWnd XDEF ScreenPrefsWnd XDEF DiskPrefsWnd XDEF InputPrefsWnd XDEF DisAssemPrefsWnd XDEF MiscPrefsWnd XDEF MemPrefsWnd XDEF StartPrefsWnd XDEF BLPrefsWnd XDEF Screen_ModeWnd XDEF Ghost_Rider_PrefsGList XDEF ScreenPrefsGList XDEF DiskPrefsGList XDEF InputPrefsGList XDEF DisAssemPrefsGList XDEF MiscPrefsGList XDEF MemPrefsGList XDEF StartPrefsGList XDEF BLPrefsGList XDEF Screen_ModeGList XDEF Ghost_Rider_PrefsGadgets XDEF ScreenPrefsGadgets XDEF DiskPrefsGadgets XDEF InputPrefsGadgets XDEF DisAssemPrefsGadgets XDEF MiscPrefsGadgets XDEF MemPrefsGadgets XDEF StartPrefsGadgets XDEF BLPrefsGadgets XDEF Screen_ModeGadgets XDEF Ghost_Rider_PrefsLeft XDEF Ghost_Rider_PrefsTop XDEF Ghost_Rider_PrefsWidth XDEF Ghost_Rider_PrefsHeight XDEF ScreenPrefsLeft XDEF ScreenPrefsTop XDEF ScreenPrefsWidth XDEF ScreenPrefsHeight XDEF DiskPrefsLeft XDEF DiskPrefsTop XDEF DiskPrefsWidth XDEF DiskPrefsHeight XDEF InputPrefsLeft XDEF InputPrefsTop XDEF InputPrefsWidth XDEF InputPrefsHeight XDEF DisAssemPrefsLeft XDEF DisAssemPrefsTop XDEF DisAssemPrefsWidth XDEF DisAssemPrefsHeight XDEF MiscPrefsLeft XDEF MiscPrefsTop XDEF MiscPrefsWidth XDEF MiscPrefsHeight XDEF MemPrefsLeft XDEF MemPrefsTop XDEF MemPrefsWidth XDEF MemPrefsHeight XDEF StartPrefsLeft XDEF StartPrefsTop XDEF StartPrefsWidth XDEF StartPrefsHeight XDEF BLPrefsLeft XDEF BLPrefsTop XDEF BLPrefsWidth XDEF BLPrefsHeight XDEF Screen_ModeLeft XDEF Screen_ModeTop XDEF Screen_ModeWidth XDEF Screen_ModeHeight Scr: DC.L 0 VisualInfo: DC.L 0 PubScreenName: DC.L WBName WBName: DC.B 'Workbench',0 CNOP 0,2 Ghost_Rider_PrefsWnd: DC.L 0 ScreenPrefsWnd: DC.L 0 DiskPrefsWnd: DC.L 0 InputPrefsWnd: DC.L 0 DisAssemPrefsWnd: DC.L 0 MiscPrefsWnd: DC.L 0 MemPrefsWnd: DC.L 0 StartPrefsWnd: DC.L 0 BLPrefsWnd: DC.L 0 Screen_ModeWnd: DC.L 0 Ghost_Rider_PrefsGList: DC.L 0 ScreenPrefsGList: DC.L 0 DiskPrefsGList: DC.L 0 InputPrefsGList: DC.L 0 DisAssemPrefsGList: DC.L 0 MiscPrefsGList: DC.L 0 MemPrefsGList: DC.L 0 StartPrefsGList: DC.L 0 BLPrefsGList: DC.L 0 Screen_ModeGList: DC.L 0 Ghost_Rider_PrefsGadgets: DCB.L 12,0 ScreenPrefsGadgets: DCB.L 11,0 DiskPrefsGadgets: DCB.L 11,0 InputPrefsGadgets: DCB.L 8,0 DisAssemPrefsGadgets: DCB.L 12,0 MiscPrefsGadgets: DCB.L 7,0 MemPrefsGadgets: DCB.L 15,0 StartPrefsGadgets: DCB.L 9,0 BLPrefsGadgets: DCB.L 14,0 Screen_ModeGadgets: DCB.L 24,0 BufNewGad: DC.W 0,0,0,0 DC.L 0,0 DC.W 0 DC.L 0,0,0 TD: DC.L TAG_DONE NR: DC.L GT_VisualInfo,$00000000,TAG_DONE IR: DC.L GT_VisualInfo,$00000000,GTBB_Recessed,1,TAG_DONE Ghost_Rider_PrefsLeft: DC.W 0 Ghost_Rider_PrefsTop: DC.W 0 Ghost_Rider_PrefsWidth: DC.W 360 Ghost_Rider_PrefsHeight: DC.W 149 ScreenPrefsLeft: DC.W 0 ScreenPrefsTop: DC.W 0 ScreenPrefsWidth: DC.W 360 ScreenPrefsHeight: DC.W 139 DiskPrefsLeft: DC.W 0 DiskPrefsTop: DC.W 0 DiskPrefsWidth: DC.W 360 DiskPrefsHeight: DC.W 139 InputPrefsLeft: DC.W 0 InputPrefsTop: DC.W 0 InputPrefsWidth: DC.W 360 InputPrefsHeight: DC.W 139 DisAssemPrefsLeft: DC.W 0 DisAssemPrefsTop: DC.W 0 DisAssemPrefsWidth: DC.W 360 DisAssemPrefsHeight: DC.W 139 MiscPrefsLeft: DC.W 0 MiscPrefsTop: DC.W 0 MiscPrefsWidth: DC.W 360 MiscPrefsHeight: DC.W 139 MemPrefsLeft: DC.W 0 MemPrefsTop: DC.W 0 MemPrefsWidth: DC.W 360 MemPrefsHeight: DC.W 139 StartPrefsLeft: DC.W 0 StartPrefsTop: DC.W 0 StartPrefsWidth: DC.W 360 StartPrefsHeight: DC.W 139 BLPrefsLeft: DC.W 0 BLPrefsTop: DC.W 0 BLPrefsWidth: DC.W 360 BLPrefsHeight: DC.W 139 Screen_ModeLeft: DC.W 0 Screen_ModeTop: DC.W 0 Screen_ModeWidth: DC.W 361 Screen_ModeHeight: DC.W 247 Ghost_Rider_PrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W BUTTON_KIND ScreenPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W CYCLE_KIND DC.W BUTTON_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DiskPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W CYCLE_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W SLIDER_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W CHECKBOX_KIND InputPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W SLIDER_KIND DC.W SLIDER_KIND DC.W CYCLE_KIND DC.W SLIDER_KIND DC.W CHECKBOX_KIND DC.W STRING_KIND DisAssemPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W BUTTON_KIND DC.W SLIDER_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND MiscPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W CHECKBOX_KIND DC.W SLIDER_KIND MemPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND StartPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W CYCLE_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W STRING_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND BLPrefsGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND DC.W CHECKBOX_KIND Screen_ModeGTypes: DC.W BUTTON_KIND DC.W BUTTON_KIND DC.W SLIDER_KIND DC.W CHECKBOX_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W STRING_KIND DC.W CHECKBOX_KIND DC.W STRING_KIND Ghost_Rider_PrefsNGads: DC.W 4,115,91,14 DC.L MainLoadText,0 DC.W GD_MainLoad DC.L PLACETEXT_IN,0,0 DC.W 255,131,91,14 DC.L MainCancelText,0 DC.W GD_MainCancel DC.L PLACETEXT_IN,0,0 DC.W 4,35,153,13 DC.L MainInputText,0 DC.W GD_MainInput DC.L PLACETEXT_IN,0,0 DC.W 4,99,153,13 DC.L MainMiscText,0 DC.W GD_MainMisc DC.L PLACETEXT_IN,0,0 DC.W 4,51,153,13 DC.L MainDisassemText,0 DC.W GD_MainDisassem DC.L PLACETEXT_IN,0,0 DC.W 4,83,153,13 DC.L MainStartupText,0 DC.W GD_MainStartup DC.L PLACETEXT_IN,0,0 DC.W 4,67,153,13 DC.L MainMemoryText,0 DC.W GD_MainMemory DC.L PLACETEXT_IN,0,0 DC.W 4,19,153,13 DC.L MainDiskText,0 DC.W GD_MainDisk DC.L PLACETEXT_IN,0,0 DC.W 4,3,153,13 DC.L MainScreenText,0 DC.W GD_MainScreen DC.L PLACETEXT_IN,0,0 DC.W 4,131,91,14 DC.L MainSaveText,0 DC.W GD_MainSave DC.L PLACETEXT_IN,0,0 DC.W 255,115,91,14 DC.L DefaultPrefsText,0 DC.W GD_DefaultPrefs DC.L PLACETEXT_IN,0,0 DC.W 131,123,91,14 DC.L ModifyGRText,0 DC.W GD_ModifyGR DC.L PLACETEXT_IN,0,0 ScreenPrefsNGads: DC.W 4,122,91,14 DC.L ScreenOKText,0 DC.W GD_ScreenOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L ScreenCancelText,0 DC.W GD_ScreenCancel DC.L PLACETEXT_IN,0,0 DC.W 16,89,285,13 DC.L ScreenModeText,0 DC.W GD_ScreenMode DC.L PLACETEXT_BELOW,0,0 DC.W 312,89,20,13 DC.L EditScreenModeText,0 DC.W GD_EditScreenMode DC.L PLACETEXT_BELOW,0,0 DC.W 16,6,45,12 DC.L ScreenColorText,0 DC.W GD_ScreenColor DC.L PLACETEXT_RIGHT,0,0 DC.W 16,22,45,12 DC.L TextColorText,0 DC.W GD_TextColor DC.L PLACETEXT_RIGHT,0,0 DC.W 16,41,45,12 DC.L HeaderColorText,0 DC.W GD_HeaderColor DC.L PLACETEXT_RIGHT,0,0 DC.W 16,56,45,12 DC.L HeaderTColorText,0 DC.W GD_HeaderTColor DC.L PLACETEXT_RIGHT,0,0 DC.W 194,4,45,12 DC.L CursorColorText,0 DC.W GD_CursorColor DC.L PLACETEXT_RIGHT,0,0 DC.W 194,20,45,12 DC.L PointerColor1Text,0 DC.W GD_PointerColor1 DC.L PLACETEXT_RIGHT,0,0 DC.W 194,34,45,12 DC.L PointerColor2Text,0 DC.W GD_PointerColor2 DC.L PLACETEXT_RIGHT,0,0 DiskPrefsNGads: DC.W 8,122,91,14 DC.L DiskOKText,0 DC.W GD_DiskOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L DiskCancelText,0 DC.W GD_DiskCancel DC.L PLACETEXT_IN,0,0 DC.W 12,5,97,13 DC.L DefaultDriveText,0 DC.W GD_DefaultDrive DC.L PLACETEXT_RIGHT,0,0 DC.W 13,57,53,12 DC.L DiskSyncText,0 DC.W GD_DiskSync DC.L PLACETEXT_RIGHT,0,0 DC.W 13,76,53,12 DC.L DTrackLengthText,0 DC.W GD_DTrackLength DC.L PLACETEXT_RIGHT,0,0 DC.W 13,90,53,12 DC.L HTrackLengthText,0 DC.W GD_HTrackLength DC.L PLACETEXT_RIGHT,0,0 DC.W 12,23,153,11 DC.L RetriesText,0 DC.W GD_Retries DC.L PLACETEXT_RIGHT,0,0 DC.W 208,57,29,12 DC.L BMReservedText,0 DC.W GD_BMReserved DC.L PLACETEXT_RIGHT,0,0 DC.W 208,74,29,12 DC.L BMFreeText,0 DC.W GD_BMFree DC.L PLACETEXT_RIGHT,0,0 DC.W 208,92,29,12 DC.L BMUsedText,0 DC.W GD_BMUsed DC.L PLACETEXT_RIGHT,0,0 DC.W 11,39,26,11 DC.L DiskVerifyText,0 DC.W GD_DiskVerify DC.L PLACETEXT_RIGHT,0,0 InputPrefsNGads: DC.W 4,122,91,14 DC.L InputOKText,0 DC.W GD_InputOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L InputCancelText,0 DC.W GD_InputCancel DC.L PLACETEXT_IN,0,0 DC.W 4,3,165,11 DC.L DelaySpeedText,0 DC.W GD_DelaySpeed DC.L PLACETEXT_RIGHT,0,0 DC.W 4,19,165,11 DC.L RepeatSpeedText,0 DC.W GD_RepeatSpeed DC.L PLACETEXT_RIGHT,0,0 DC.W 4,51,109,11 DC.L EditModeText,0 DC.W GD_EditMode DC.L PLACETEXT_RIGHT,0,0 DC.W 4,36,165,11 DC.L CursorRateText,0 DC.W GD_CursorRate DC.L PLACETEXT_RIGHT,0,0 DC.W 4,69,26,11 DC.L PointerBlankerText,0 DC.W GD_PointerBlanker DC.L PLACETEXT_RIGHT,0,0 DC.W 4,87,29,12 DC.L PasteKeyText,0 DC.W GD_PasteKey DC.L PLACETEXT_RIGHT,0,0 DisAssemPrefsNGads: DC.W 4,122,91,14 DC.L DisAsmOKText,0 DC.W GD_DisAsmOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L DisAsmCancelText,0 DC.W GD_DisAsmCancel DC.L PLACETEXT_IN,0,0 DC.W 7,1,26,11 DC.L LeadingZerosText,0 DC.W GD_LeadingZeros DC.L PLACETEXT_RIGHT,0,0 DC.W 7,13,26,11 DC.L ShortAddressText,0 DC.W GD_ShortAddress DC.L PLACETEXT_RIGHT,0,0 DC.W 7,25,26,11 DC.L OffsetAddressText,0 DC.W GD_OffsetAddress DC.L PLACETEXT_RIGHT,0,0 DC.W 7,37,26,11 DC.L NegativeOffsetsText,0 DC.W GD_NegativeOffsets DC.L PLACETEXT_RIGHT,0,0 DC.W 7,49,26,11 DC.L DCASCIIText,0 DC.W GD_DCASCII DC.L PLACETEXT_RIGHT,0,0 DC.W 120,123,109,11 DC.L DisAsmBreakText,0 DC.W GD_DisAsmBreak DC.L PLACETEXT_IN,0,0 DC.W 4,103,185,11 DC.L DumpLinesText,0 DC.W GD_DumpLines DC.L PLACETEXT_RIGHT,0,0 DC.W 7,61,26,11 DC.L DisassemNextText,0 DC.W GD_DisassemNext DC.L PLACETEXT_RIGHT,0,0 DC.W 7,73,26,11 DC.L ShowCPUText,0 DC.W GD_ShowCPU DC.L PLACETEXT_RIGHT,0,0 DC.W 7,88,26,11 DC.L LongUpDisText,0 DC.W GD_LongUpDis DC.L PLACETEXT_RIGHT,0,0 MiscPrefsNGads: DC.W 4,122,91,14 DC.L MiscOKText,0 DC.W GD_MiscOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L MiscCancelText,0 DC.W GD_MiscCancel DC.L PLACETEXT_IN,0,0 DC.W 20,9,29,12 DC.L PromptText,0 DC.W GD_Prompt DC.L PLACETEXT_RIGHT,0,0 DC.W 20,24,29,12 DC.L NonASCIIText,0 DC.W GD_NonASCII DC.L PLACETEXT_RIGHT,0,0 DC.W 20,38,29,12 DC.L TextJokerText,0 DC.W GD_TextJoker DC.L PLACETEXT_RIGHT,0,0 DC.W 20,57,26,11 DC.L ProgressBarText,0 DC.W GD_ProgressBar DC.L PLACETEXT_RIGHT,0,0 DC.W 20,93,177,11 DC.L PeekerHeightText,0 DC.W GD_PeekerHeight DC.L PLACETEXT_RIGHT,0,0 MemPrefsNGads: DC.W 4,122,91,14 DC.L MemoryOKText,0 DC.W GD_MemoryOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L MemoryCancelText,0 DC.W GD_MemoryCancel DC.L PLACETEXT_IN,0,0 DC.W 16,9,69,12 DC.L ChipMemoryText,0 DC.W GD_ChipMemory DC.L PLACETEXT_RIGHT,0,0 DC.W 14,26,85,12 DC.L RAMBank0StartText,0 DC.W GD_RAMBank0Start DC.L 0,0,0 DC.W 110,26,85,12 DC.L RAMBank0EndText,0 DC.W GD_RAMBank0End DC.L PLACETEXT_RIGHT,0,0 DC.W 14,40,85,12 DC.L RAMBank1StartText,0 DC.W GD_RAMBank1Start DC.L 0,0,0 DC.W 110,40,85,12 DC.L RAMBank1EndText,0 DC.W GD_RAMBank1End DC.L PLACETEXT_RIGHT,0,0 DC.W 14,54,85,12 DC.L RAMBank2StartText,0 DC.W GD_RAMBank2Start DC.L 0,0,0 DC.W 110,54,85,12 DC.L RAMBank2EndText,0 DC.W GD_RAMBank2End DC.L PLACETEXT_RIGHT,0,0 DC.W 14,68,85,12 DC.L RAMBank3StartText,0 DC.W GD_RAMBank3Start DC.L 0,0,0 DC.W 110,68,85,12 DC.L RAMBank3EndText,0 DC.W GD_RAMBank3End DC.L PLACETEXT_RIGHT,0,0 DC.W 14,82,85,12 DC.L RAMBank4StartText,0 DC.W GD_RAMBank4Start DC.L 0,0,0 DC.W 110,82,85,12 DC.L RAMBank4EndText,0 DC.W GD_RAMBank4End DC.L PLACETEXT_RIGHT,0,0 DC.W 14,96,85,12 DC.L RAMBank5StartText,0 DC.W GD_RAMBank5Start DC.L 0,0,0 DC.W 110,96,85,12 DC.L RAMBank5EndText,0 DC.W GD_RAMBank5End DC.L PLACETEXT_RIGHT,0,0 StartPrefsNGads: DC.W 4,122,91,14 DC.L StartOKText,0 DC.W GD_StartOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L StartCancelText,0 DC.W GD_StartCancel DC.L PLACETEXT_IN,0,0 DC.W 168,15,117,13 DC.L ResetEntryText,0 DC.W GD_ResetEntry DC.L PLACETEXT_LEFT,0,0 DC.W 19,41,26,11 DC.L ExceptionsText,0 DC.W GD_Exceptions DC.L PLACETEXT_RIGHT,0,0 DC.W 19,57,26,11 DC.L NMIText,0 DC.W GD_NMI DC.L PLACETEXT_RIGHT,0,0 DC.W 19,73,26,11 DC.L NMIROMText,0 DC.W GD_NMIROM DC.L PLACETEXT_RIGHT,0,0 DC.W 19,97,69,12 DC.L CopOffsetText,0 DC.W GD_CopOffset DC.L PLACETEXT_RIGHT,0,0 DC.W 204,41,26,11 DC.L ClearMatrixText,0 DC.W GD_ClearMatrix DC.L PLACETEXT_RIGHT,0,0 DC.W 204,58,26,11 DC.L ClearScreenText,0 DC.W GD_ClearScreen DC.L PLACETEXT_RIGHT,0,0 BLPrefsNGads: DC.W 4,122,91,14 DC.L BreakOKText,0 DC.W GD_BreakOK DC.L PLACETEXT_IN,0,0 DC.W 258,122,91,14 DC.L BreakCancelText,0 DC.W GD_BreakCancel DC.L PLACETEXT_IN,0,0 DC.W 99,23,26,11 DC.L BLEditUBText,0 DC.W GD_BLEditUB DC.L PLACETEXT_RIGHT,0,0 DC.W 99,37,26,11 DC.L BLEditCBText,0 DC.W GD_BLEditCB DC.L PLACETEXT_RIGHT,0,0 DC.W 99,51,26,11 DC.L BLEditEText,0 DC.W GD_BLEditE DC.L PLACETEXT_RIGHT,0,0 DC.W 99,65,26,11 DC.L BLEditRText,0 DC.W GD_BLEditR DC.L PLACETEXT_RIGHT,0,0 DC.W 99,79,26,11 DC.L BLEditSRText,0 DC.W GD_BLEditSR DC.L PLACETEXT_RIGHT,0,0 DC.W 99,93,26,11 DC.L BLEditDWText,0 DC.W GD_BLEditDW DC.L PLACETEXT_RIGHT,0,0 DC.W 47,23,26,11 DC.L BLDumpUBText,0 DC.W GD_BLDumpUB DC.L 0,0,0 DC.W 47,37,26,11 DC.L BLDumpCBText,0 DC.W GD_BLDumpCB DC.L 0,0,0 DC.W 47,51,26,11 DC.L BLDumpEText,0 DC.W GD_BLDumpE DC.L 0,0,0 DC.W 47,65,26,11 DC.L BLDumpRText,0 DC.W GD_BLDumpR DC.L 0,0,0 DC.W 47,79,26,11 DC.L BLDumpSRText,0 DC.W GD_BLDumpSR DC.L 0,0,0 DC.W 47,93,26,11 DC.L BLDumpDWText,0 DC.W GD_BLDumpDW DC.L 0,0,0 Screen_ModeNGads: DC.W 4,228,91,14 DC.L ScreenModeOKText,0 DC.W GD_ScreenModeOK DC.L PLACETEXT_IN,0,0 DC.W 258,228,91,14 DC.L ScreenModeCancelText,0 DC.W GD_ScreenModeCancel DC.L PLACETEXT_IN,0,0 DC.W 12,59,169,13 DC.L TextLinesText,0 DC.W GD_TextLines DC.L PLACETEXT_RIGHT,0,0 DC.W 188,96,26,11 DC.L CustomDisplayText,0 DC.W GD_CustomDisplay DC.L PLACETEXT_RIGHT,0,0 DC.W 12,30,53,12 DC.L diwstrtText,0 DC.W GD_diwstrt DC.L PLACETEXT_BELOW,0,0 DC.W 104,30,53,12 DC.L diwstopText,0 DC.W GD_diwstop DC.L PLACETEXT_BELOW,0,0 DC.W 196,30,53,12 DC.L ddfstrtText,0 DC.W GD_ddfstrt DC.L PLACETEXT_BELOW,0,0 DC.W 288,30,53,12 DC.L ddfstopText,0 DC.W GD_ddfstop DC.L PLACETEXT_BELOW,0,0 DC.W 12,80,53,12 DC.L beamcon0Text,0 DC.W GD_beamcon0 DC.L PLACETEXT_BELOW,0,0 DC.W 84,80,53,12 DC.L bplcon0Text,0 DC.W GD_bplcon0 DC.L PLACETEXT_BELOW,0,0 DC.W 116,120,53,12 DC.L hbstrtText,0 DC.W GD_hbstrt DC.L PLACETEXT_LEFT,0,0 DC.W 176,120,53,12 DC.L hbstopText,0 DC.W GD_hbstop DC.L PLACETEXT_RIGHT,0,0 DC.W 116,135,53,12 DC.L hsstrtText,0 DC.W GD_hsstrt DC.L PLACETEXT_LEFT,0,0 DC.W 176,135,53,12 DC.L hsstopText,0 DC.W GD_hsstop DC.L PLACETEXT_RIGHT,0,0 DC.W 116,152,53,12 DC.L htotalText,0 DC.W GD_htotal DC.L PLACETEXT_LEFT,0,0 DC.W 176,152,53,12 DC.L hcenterText,0 DC.W GD_hcenter DC.L PLACETEXT_RIGHT,0,0 DC.W 116,172,53,12 DC.L vbstrtText,0 DC.W GD_vbstrt DC.L PLACETEXT_LEFT,0,0 DC.W 176,172,53,12 DC.L vbstopText,0 DC.W GD_vbstop DC.L PLACETEXT_RIGHT,0,0 DC.W 116,187,53,12 DC.L vsstrtText,0 DC.W GD_vsstrt DC.L PLACETEXT_LEFT,0,0 DC.W 176,187,53,12 DC.L vsstopText,0 DC.W GD_vsstop DC.L PLACETEXT_RIGHT,0,0 DC.W 116,204,53,12 DC.L vtotalText,0 DC.W GD_vtotal DC.L PLACETEXT_LEFT,0,0 DC.W 176,204,53,12 DC.L diwhighText,0 DC.W GD_diwhigh DC.L PLACETEXT_RIGHT,0,0 DC.W 188,79,26,11 DC.L SystemViewText,0 DC.W GD_SystemView DC.L PLACETEXT_RIGHT,0,0 DC.W 92,7,249,12 DC.L ModeNameText,0 DC.W GD_ModeName DC.L PLACETEXT_LEFT,0,0 Ghost_Rider_PrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE ScreenPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTCY_Labels,ScreenModeLabels DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DC.L GTST_MaxChars,3 DC.L TAG_DONE DiskPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTCY_Labels,DefaultDriveLabels DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTSL_Max,5 DC.L GTSL_MaxLevelLen,5 DC.L GTSL_LevelFormat,RetriesFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DC.L TAG_DONE RetriesFormat: DC.B '%2ld',0 CNOP 0,2 InputPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTSL_Max,30 DC.L GTSL_MaxLevelLen,4 DC.L GTSL_LevelFormat,DelaySpeedFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE DC.L GTSL_MaxLevelLen,4 DC.L GTSL_LevelFormat,RepeatSpeedFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE DC.L GTCY_Labels,EditModeLabels DC.L TAG_DONE DC.L GTSL_Max,5 DC.L GTSL_MaxLevelLen,4 DC.L GTSL_LevelFormat,CursorRateFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DelaySpeedFormat: DC.B '%2ld',0 CNOP 0,2 RepeatSpeedFormat: DC.B '%2ld',0 CNOP 0,2 CursorRateFormat: DC.B '%2ld',0 CNOP 0,2 DisAssemPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L GA_Disabled,1 DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L GTSL_Min,4 DC.L GTSL_Max,32 DC.L GTSL_Level,4 DC.L GTSL_MaxLevelLen,4 DC.L GTSL_LevelFormat,DumpLinesFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE DC.L TAG_DONE DC.L GA_Disabled,1 DC.L TAG_DONE DC.L TAG_DONE DumpLinesFormat: DC.B '%2ld',0 CNOP 0,2 MiscPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DC.L GTST_MaxChars,1 DC.L TAG_DONE DC.L TAG_DONE DC.L GTSL_Min,1 DC.L GTSL_Level,1 DC.L GTSL_MaxLevelLen,4 DC.L GTSL_LevelFormat,PeekerHeightFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE PeekerHeightFormat: DC.B '%2ld',0 CNOP 0,2 MemPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,6 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE DC.L GTST_MaxChars,8 DC.L TAG_DONE StartPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTCY_Labels,ResetEntryLabels DC.L TAG_DONE DC.L GA_Disabled,1 DC.L TAG_DONE DC.L GA_Disabled,1 DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,6 DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE BLPrefsGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE DC.L TAG_DONE Screen_ModeGTags: DC.L TAG_DONE DC.L TAG_DONE DC.L GTSL_Min,20 DC.L GTSL_Max,51 DC.L GTSL_MaxLevelLen,4 DC.L GTSL_LevelFormat,TextLinesFormat DC.L GTSL_LevelPlace,PLACETEXT_RIGHT DC.L PGA_Freedom,LORIENT_HORIZ DC.L GA_RelVerify,1 DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L GTST_MaxChars,4 DC.L TAG_DONE DC.L TAG_DONE DC.L GTST_MaxChars,31 DC.L TAG_DONE TextLinesFormat: DC.B '%2ld',0 CNOP 0,2 MainLoadText: DC.B 'Load',0 MainCancelText: DC.B 'Quit',0 MainInputText: DC.B 'Input',0 MainMiscText: DC.B 'Miscellaneous',0 MainDisassemText: DC.B 'Dis/Assembler',0 MainStartupText: DC.B 'Startup',0 MainMemoryText: DC.B 'Memory',0 MainDiskText: DC.B 'Disk',0 MainScreenText: DC.B 'Screen',0 MainSaveText: DC.B 'Save',0 DefaultPrefsText: DC.B 'Default',0 ModifyGRText: DC.B 'Modify GR',0 CNOP 0,2 ScreenOKText: DC.B 'Ok',0 ScreenCancelText: DC.B 'Cancel',0 ScreenModeText: DC.B 'Screen Mode',0 EditScreenModeText: DC.B 'Edit',0 ScreenColorText: DC.B 'Screen Color',0 TextColorText: DC.B 'Text Color',0 HeaderColorText: DC.B 'Header Color',0 HeaderTColorText: DC.B 'Header Text Color',0 CursorColorText: DC.B 'Cursor Color',0 PointerColor1Text: DC.B 'Pointer 1',0 PointerColor2Text: DC.B 'Pointer 2',0 CNOP 0,2 DiskOKText: DC.B 'Ok',0 DiskCancelText: DC.B 'Cancel',0 DefaultDriveText: DC.B 'Default Drive',0 DiskSyncText: DC.B 'Disk Sync',0 DTrackLengthText: DC.B 'DD Track Length',0 HTrackLengthText: DC.B 'HD Track Length',0 RetriesText: DC.B ' Retries',0 BMReservedText: DC.B 'BM Reserved',0 BMFreeText: DC.B 'BM Free',0 BMUsedText: DC.B 'BM Used',0 DiskVerifyText: DC.B 'Disk Verify',0 CNOP 0,2 InputOKText: DC.B 'Ok',0 InputCancelText: DC.B 'Cancel',0 DelaySpeedText: DC.B ' Delay Speed',0 RepeatSpeedText: DC.B ' Repeat Speed',0 EditModeText: DC.B 'Edit Mode',0 CursorRateText: DC.B ' Cursor Blink Rate',0 PointerBlankerText: DC.B 'PointerBlanker',0 PasteKeyText: DC.B 'Paste Key',0 CNOP 0,2 DisAsmOKText: DC.B 'Ok',0 DisAsmCancelText: DC.B 'Cancel',0 LeadingZerosText: DC.B 'Suppres Leading Zeros',0 ShortAddressText: DC.B 'Short Address',0 OffsetAddressText: DC.B 'Offset Address',0 NegativeOffsetsText: DC.B 'Negative Offsets',0 DCASCIIText: DC.B 'ASCII after DC.x',0 DisAsmBreakText: DC.B 'Break Lines',0 DumpLinesText: DC.B ' Dump Lines',0 DisassemNextText: DC.B 'Disassemble Next',0 ShowCPUText: DC.B 'Show CPU',0 LongUpDisText: DC.B 'Long Disassembly',0 CNOP 0,2 MiscOKText: DC.B 'Ok',0 MiscCancelText: DC.B 'Cancel',0 PromptText: DC.B 'Prompt',0 NonASCIIText: DC.B 'Non-ASCII',0 TextJokerText: DC.B 'Text Joker',0 ProgressBarText: DC.B 'Progress Bar',0 PeekerHeightText: DC.B ' Peeker Height',0 CNOP 0,2 MemoryOKText: DC.B 'Ok',0 MemoryCancelText: DC.B 'Cancel',0 ChipMemoryText: DC.B 'Workspace in CHIP',0 RAMBank0StartText: DC.B '',0 RAMBank0EndText: DC.B 'RAM Bank 0',0 RAMBank1StartText: DC.B '',0 RAMBank1EndText: DC.B 'RAM Bank 1',0 RAMBank2StartText: DC.B '',0 RAMBank2EndText: DC.B 'RAM Bank 2',0 RAMBank3StartText: DC.B '',0 RAMBank3EndText: DC.B 'RAM Bank 3',0 RAMBank4StartText: DC.B '',0 RAMBank4EndText: DC.B 'RAM Bank 4',0 RAMBank5StartText: DC.B '',0 RAMBank5EndText: DC.B 'RAM Bank 5',0 CNOP 0,2 StartOKText: DC.B 'Ok',0 StartCancelText: DC.B 'Cancel',0 ResetEntryText: DC.B 'Reset entry at',0 ExceptionsText: DC.B 'Exceptions',0 NMIText: DC.B 'Level 7 (NMI)',0 NMIROMText: DC.B 'NMI entry from ROM',0 CopOffsetText: DC.B 'Coppersearch Offset',0 ClearMatrixText: DC.B 'Clear Matrix',0 ClearScreenText: DC.B 'Clear Screen',0 CNOP 0,2 BreakOKText: DC.B 'Ok',0 BreakCancelText: DC.B 'Cancel',0 BLEditUBText: DC.B 'Uncoditionally branch',0 BLEditCBText: DC.B 'Conditionally branch',0 BLEditEText: DC.B 'Exception',0 BLEditRText: DC.B 'Return from subroutine',0 BLEditSRText: DC.B 'Call to subroutine',0 BLEditDWText: DC.B 'Datawords',0 BLDumpUBText: DC.B '',0 BLDumpCBText: DC.B '',0 BLDumpEText: DC.B '',0 BLDumpRText: DC.B '',0 BLDumpSRText: DC.B '',0 BLDumpDWText: DC.B '',0 CNOP 0,2 ScreenModeOKText: DC.B 'Ok',0 ScreenModeCancelText: DC.B 'Cancel',0 TextLinesText: DC.B ' Text Lines',0 CustomDisplayText: DC.B 'Custom Display',0 diwstrtText: DC.B 'diwstrt',0 diwstopText: DC.B 'diwstop',0 ddfstrtText: DC.B 'ddfstrt',0 ddfstopText: DC.B 'ddfstop',0 beamcon0Text: DC.B 'beamcon0',0 bplcon0Text: DC.B 'bplcon0',0 hbstrtText: DC.B 'hbstrt',0 hbstopText: DC.B 'hbstop',0 hsstrtText: DC.B 'hsstrt',0 hsstopText: DC.B 'hsstop',0 htotalText: DC.B 'htotal',0 hcenterText: DC.B 'hcenter',0 vbstrtText: DC.B 'vbstrt',0 vbstopText: DC.B 'vbstop',0 vsstrtText: DC.B 'vsstrt',0 vsstopText: DC.B 'vsstop',0 vtotalText: DC.B 'vtotal',0 diwhighText: DC.B 'diwhigh',0 SystemViewText: DC.B 'System View',0 ModeNameText: DC.B 'Mode Name',0 CNOP 0,2 XDEF ScreenModeLabels ScreenModeLabels: DC.L ScreenModeLab0 DC.L ScreenModeLab1 DC.L 0 ScreenModeLab0: DC.B ' ',0 ScreenModeLab1: DC.B ' ',0 CNOP 0,2 XDEF DefaultDriveLabels DefaultDriveLabels: DC.L DefaultDriveLab0 DC.L DefaultDriveLab1 DC.L DefaultDriveLab2 DC.L DefaultDriveLab3 DC.L 0 DefaultDriveLab0: DC.B 'DF0:',0 DefaultDriveLab1: DC.B 'DF1:',0 DefaultDriveLab2: DC.B 'DF2:',0 DefaultDriveLab3: DC.B 'DF3:',0 CNOP 0,2 XDEF EditModeLabels EditModeLabels: DC.L EditModeLab0 DC.L EditModeLab1 DC.L 0 EditModeLab0: DC.B 'Insert',0 EditModeLab1: DC.B 'Overwrite',0 CNOP 0,2 XDEF ResetEntryLabels ResetEntryLabels: DC.L ResetEntryLab0 DC.L ResetEntryLab1 DC.L ResetEntryLab2 DC.L ResetEntryLab3 DC.L ResetEntryLab4 DC.L 0 ResetEntryLab0: DC.B 'Never',0 ResetEntryLab1: DC.B 'Always',0 ResetEntryLab2: DC.B 'Right mouse',0 ResetEntryLab3: DC.B 'Left mouse',0 ResetEntryLab4: DC.B 'Joystick',0 CNOP 0,2 XDEF topaz8 topaz8: DC.L topazFName8 DC.W 8 DC.B $00,$01 topazFName8: DC.B 'topaz.font',0 CNOP 0,2 XDEF Ghost_Rider_PrefsWindowTags Ghost_Rider_PrefsWindowTags: Ghost_Rider_PrefsL: DC.L WA_Left,0 Ghost_Rider_PrefsT: DC.L WA_Top,0 Ghost_Rider_PrefsW: DC.L WA_Width,0 Ghost_Rider_PrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!IDCMP_GADGETDOWN!IDCMP_INTUITICKS!IDCMP_MOUSEMOVE!IDCMP_MOUSEBUTTONS!IDCMP_MENUPICK!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE Ghost_Rider_PrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,Ghost_Rider_PrefsWTitle DC.L TAG_DONE Ghost_Rider_PrefsWTitle: DC.B 'GhostRider Preference Editor V38.8',0 CNOP 0,2 XDEF ScreenPrefsWindowTags ScreenPrefsWindowTags: ScreenPrefsL: DC.L WA_Left,0 ScreenPrefsT: DC.L WA_Top,0 ScreenPrefsW: DC.L WA_Width,0 ScreenPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!CYCLEIDCMP!STRINGIDCMP!IDCMP_GADGETDOWN!IDCMP_MOUSEMOVE!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE ScreenPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,ScreenPrefsWTitle DC.L TAG_DONE ScreenPrefsWTitle: DC.B 'Screen Preferences',0 CNOP 0,2 XDEF DiskPrefsWindowTags DiskPrefsWindowTags: DiskPrefsL: DC.L WA_Left,0 DiskPrefsT: DC.L WA_Top,0 DiskPrefsW: DC.L WA_Width,0 DiskPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!CYCLEIDCMP!STRINGIDCMP!SLIDERIDCMP!CHECKBOXIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE DiskPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,DiskPrefsWTitle DC.L TAG_DONE DiskPrefsWTitle: DC.B 'Disk Preferences',0 CNOP 0,2 XDEF InputPrefsWindowTags InputPrefsWindowTags: InputPrefsL: DC.L WA_Left,0 InputPrefsT: DC.L WA_Top,0 InputPrefsW: DC.L WA_Width,0 InputPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!SLIDERIDCMP!CYCLEIDCMP!CHECKBOXIDCMP!STRINGIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE InputPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,InputPrefsWTitle DC.L TAG_DONE InputPrefsWTitle: DC.B 'Input Preferences',0 CNOP 0,2 XDEF DisAssemPrefsWindowTags DisAssemPrefsWindowTags: DisAssemPrefsL: DC.L WA_Left,0 DisAssemPrefsT: DC.L WA_Top,0 DisAssemPrefsW: DC.L WA_Width,0 DisAssemPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!CHECKBOXIDCMP!SLIDERIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE DisAssemPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,DisAssemPrefsWTitle DC.L TAG_DONE DisAssemPrefsWTitle: DC.B 'Dis/Assembler Preferences',0 CNOP 0,2 XDEF MiscPrefsWindowTags MiscPrefsWindowTags: MiscPrefsL: DC.L WA_Left,0 MiscPrefsT: DC.L WA_Top,0 MiscPrefsW: DC.L WA_Width,0 MiscPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!STRINGIDCMP!CHECKBOXIDCMP!SLIDERIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE MiscPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,MiscPrefsWTitle DC.L TAG_DONE MiscPrefsWTitle: DC.B 'Miscellaneous Preferences',0 CNOP 0,2 XDEF MemPrefsWindowTags MemPrefsWindowTags: MemPrefsL: DC.L WA_Left,0 MemPrefsT: DC.L WA_Top,0 MemPrefsW: DC.L WA_Width,0 MemPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!STRINGIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE MemPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,MemPrefsWTitle DC.L TAG_DONE MemPrefsWTitle: DC.B 'Memory Preferences',0 CNOP 0,2 XDEF StartPrefsWindowTags StartPrefsWindowTags: StartPrefsL: DC.L WA_Left,0 StartPrefsT: DC.L WA_Top,0 StartPrefsW: DC.L WA_Width,0 StartPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!CYCLEIDCMP!CHECKBOXIDCMP!STRINGIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE StartPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,StartPrefsWTitle DC.L TAG_DONE StartPrefsWTitle: DC.B 'Startup Preferences',0 CNOP 0,2 XDEF BLPrefsWindowTags BLPrefsWindowTags: BLPrefsL: DC.L WA_Left,0 BLPrefsT: DC.L WA_Top,0 BLPrefsW: DC.L WA_Width,0 BLPrefsH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!CHECKBOXIDCMP!IDCMP_CLOSEWINDOW!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH!WFLG_ACTIVATE BLPrefsWG: DC.L WA_Gadgets,0 DC.L WA_Title,BLPrefsWTitle DC.L TAG_DONE BLPrefsWTitle: DC.B 'Break Lines',0 CNOP 0,2 XDEF Screen_ModeWindowTags Screen_ModeWindowTags: Screen_ModeL: DC.L WA_Left,0 Screen_ModeT: DC.L WA_Top,0 Screen_ModeW: DC.L WA_Width,0 Screen_ModeH: DC.L WA_Height,0 DC.L WA_IDCMP,BUTTONIDCMP!SLIDERIDCMP!CHECKBOXIDCMP!STRINGIDCMP!IDCMP_REFRESHWINDOW DC.L WA_Flags,WFLG_DRAGBAR!WFLG_DEPTHGADGET!WFLG_SMART_REFRESH Screen_ModeWG: DC.L WA_Gadgets,0 DC.L WA_Title,Screen_ModeWTitle DC.L TAG_DONE Screen_ModeWTitle: DC.B 'Screen Mode Definitions',0 CNOP 0,2 XDEF Ghost_Rider_PrefsText0 Ghost_Rider_PrefsText0: DC.B 2,0 DC.B RP_JAM1 DC.B 0 DC.W 216,7 DC.L topaz8 DC.L Ghost_Rider_PrefsIText0 DC.L Ghost_Rider_PrefsText1 Ghost_Rider_PrefsText1: DC.B 2,0 DC.B RP_JAM1 DC.B 0 DC.W 188,17 DC.L topaz8 DC.L Ghost_Rider_PrefsIText1 DC.L Ghost_Rider_PrefsText2 Ghost_Rider_PrefsText2: DC.B 2,0 DC.B RP_JAM1 DC.B 0 DC.W 180,23 DC.L topaz8 DC.L Ghost_Rider_PrefsIText2 DC.L Ghost_Rider_PrefsText3 Ghost_Rider_PrefsText3: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 176,31 DC.L topaz8 DC.L Ghost_Rider_PrefsIText3 DC.L Ghost_Rider_PrefsText4 Ghost_Rider_PrefsText4: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 212,43 DC.L topaz8 DC.L Ghost_Rider_PrefsIText4 DC.L Ghost_Rider_PrefsText5 Ghost_Rider_PrefsText5: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 168,55 DC.L topaz8 DC.L Ghost_Rider_PrefsIText5 DC.L Ghost_Rider_PrefsText6 Ghost_Rider_PrefsText6: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 200,65 DC.L topaz8 DC.L Ghost_Rider_PrefsIText6 DC.L Ghost_Rider_PrefsText7 Ghost_Rider_PrefsText7: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 228,75 DC.L topaz8 DC.L Ghost_Rider_PrefsIText7 DC.L Ghost_Rider_PrefsText8 Ghost_Rider_PrefsText8: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 232,89 DC.L topaz8 DC.L Ghost_Rider_PrefsIText8 DC.L Ghost_Rider_PrefsText9 Ghost_Rider_PrefsText9: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 188,99 DC.L topaz8 DC.L Ghost_Rider_PrefsIText9 DC.L 0 XDEF BLPrefsText0 BLPrefsText0: DC.B 1,0 DC.B RP_JAM1 DC.B 0 DC.W 48,9 DC.L topaz8 DC.L BLPrefsIText0 DC.L 0 Ghost_Rider_PrefsIText0: DC.B 'GhostRider',0 Ghost_Rider_PrefsIText1: DC.B 'Preference Editor',0 Ghost_Rider_PrefsIText2: DC.B '-------------------',0 Ghost_Rider_PrefsIText3: DC.B 'Copyright 1993, 1994',0 Ghost_Rider_PrefsIText4: DC.B 'Jesper Skov',0 Ghost_Rider_PrefsIText5: DC.B 'Check GhostRider.guide',0 Ghost_Rider_PrefsIText6: DC.B 'for my present',0 Ghost_Rider_PrefsIText7: DC.B 'address!',0 Ghost_Rider_PrefsIText8: DC.B 'Email:',0 Ghost_Rider_PrefsIText9: DC.B 'jskov@iesd.auc.dk',0 CNOP 0,2 BLPrefsIText0: DC.B 'Dump Edit',0 CNOP 0,2 XDEF SetupScreen SetupScreen movem.l d1-d3/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l PubScreenName,a0 jsr LockPubScreen(a6) move.l d0,Scr tst.l d0 beq SError move.l Scr,a0 move.l _GadToolsBase,a6 lea.l TD,a1 jsr GetVisualInfoA(a6) move.l d0,VisualInfo tst.l d0 beq VError moveq #0,d0 SDone: movem.l (sp)+,d1-d3/a0-a2/a6 rts SError: moveq #1,d0 bra.s SDone VError: moveq #2,d0 bra.s SDone XDEF CloseDownScreen CloseDownScreen: movem.l d0-d1/a0-a1/a6,-(sp) move.l _GadToolsBase,a6 move.l VisualInfo,a0 cmpa.l #0,a0 beq.s NoVis jsr FreeVisualInfo(a6) move.l #0,VisualInfo NoVis: move.l _IntuitionBase,a6 suba.l a0,a0 move.l Scr,a1 cmpa.l #0,a1 beq.s NoScr jsr UnlockPubScreen(a6) move.l #0,Scr NoScr: movem.l (sp)+,d0-d1/a0-a1/a6 rts XDEF Ghost_Rider_PrefsRender Ghost_Rider_PrefsRender: movem.l d0-d5/a0-a2/a6,-(sp) move.l Ghost_Rider_PrefsWnd,a0 move.b wd_BorderLeft(a0),d4 ext.w d4 move.b wd_BorderTop(a0),d5 ext.w d5 move.l VisualInfo,NR+4 move.l VisualInfo,IR+4 move.l _GadToolsBase,a6 move.l Ghost_Rider_PrefsWnd,a0 move.l wd_RPort(a0),a2 move.l a2,a0 lea.l IR,a1 move.w #164,d0 add.w d4,d0 move.w #3,d1 add.w d5,d1 move.w #185,d2 move.w #109,d3 jsr DrawBevelBoxA(a6) move.l _IntuitionBase,a6 move.l Ghost_Rider_PrefsWnd,a0 move.l wd_RPort(a0),a0 lea.l Ghost_Rider_PrefsText0,a1 move.l d4,d0 move.l d5,d1 jsr PrintIText(a6) movem.l (sp)+,d0-d5/a0-a2/a6 rts XDEF OpenGhost_Rider_PrefsWindow OpenGhost_Rider_PrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l Ghost_Rider_PrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq Ghost_Rider_PrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l Ghost_Rider_PrefsGTags,a4 Ghost_Rider_PrefsGL: move.l _SysBase,a6 lea.l Ghost_Rider_PrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l Ghost_Rider_PrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s Ghost_Rider_PrefsCOK movem.w (sp)+,d2-d3 bra Ghost_Rider_PrefsGError Ghost_Rider_PrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l Ghost_Rider_PrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) Ghost_Rider_PrefsTL: tst.l (a4) beq.s Ghost_Rider_PrefsDN addq.w #8,a4 bra.s Ghost_Rider_PrefsTL Ghost_Rider_PrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #Ghost_Rider_Prefs_CNT,d3 bmi Ghost_Rider_PrefsGL movem.w (sp)+,d2-d3 move.l Ghost_Rider_PrefsGList,Ghost_Rider_PrefsWG+4 moveq #0,d0 move.w Ghost_Rider_PrefsLeft,d0 move.l d0,Ghost_Rider_PrefsL+4 move.w Ghost_Rider_PrefsTop,d0 move.l d0,Ghost_Rider_PrefsT+4 move.w Ghost_Rider_PrefsWidth,d0 move.l d0,Ghost_Rider_PrefsW+4 move.w Ghost_Rider_PrefsHeight,d0 add.w d3,d0 move.l d0,Ghost_Rider_PrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l Ghost_Rider_PrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,Ghost_Rider_PrefsWnd tst.l d0 beq Ghost_Rider_PrefsWError move.l _GadToolsBase,a6 move.l Ghost_Rider_PrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) jsr Ghost_Rider_PrefsRender moveq #0,d0 Ghost_Rider_PrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts Ghost_Rider_PrefsCError: moveq #1,d0 bra.s Ghost_Rider_PrefsDone Ghost_Rider_PrefsGError: moveq #2,d0 bra.s Ghost_Rider_PrefsDone Ghost_Rider_PrefsWError: moveq #4,d0 bra.s Ghost_Rider_PrefsDone XDEF CloseGhost_Rider_PrefsWindow CloseGhost_Rider_PrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l Ghost_Rider_PrefsWnd,a0 cmpa.l #0,a0 beq Ghost_Rider_PrefsNWnd jsr CloseWindow(a6) move.l #0,Ghost_Rider_PrefsWnd Ghost_Rider_PrefsNWnd: move.l _GadToolsBase,a6 move.l Ghost_Rider_PrefsGList,a0 cmpa.l #0,a0 beq Ghost_Rider_PrefsNGad jsr FreeGadgets(a6) move.l #0,Ghost_Rider_PrefsGList Ghost_Rider_PrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenScreenPrefsWindow OpenScreenPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l ScreenPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq ScreenPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l ScreenPrefsGTags,a4 ScreenPrefsGL: move.l _SysBase,a6 lea.l ScreenPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l ScreenPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s ScreenPrefsCOK movem.w (sp)+,d2-d3 bra ScreenPrefsGError ScreenPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l ScreenPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) ScreenPrefsTL: tst.l (a4) beq.s ScreenPrefsDN addq.w #8,a4 bra.s ScreenPrefsTL ScreenPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #ScreenPrefs_CNT,d3 bmi ScreenPrefsGL movem.w (sp)+,d2-d3 move.l ScreenPrefsGList,ScreenPrefsWG+4 moveq #0,d0 move.w ScreenPrefsLeft,d0 move.l d0,ScreenPrefsL+4 move.w ScreenPrefsTop,d0 move.l d0,ScreenPrefsT+4 move.w ScreenPrefsWidth,d0 move.l d0,ScreenPrefsW+4 move.w ScreenPrefsHeight,d0 add.w d3,d0 move.l d0,ScreenPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l ScreenPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,ScreenPrefsWnd tst.l d0 beq ScreenPrefsWError move.l _GadToolsBase,a6 move.l ScreenPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 ScreenPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts ScreenPrefsCError: moveq #1,d0 bra.s ScreenPrefsDone ScreenPrefsGError: moveq #2,d0 bra.s ScreenPrefsDone ScreenPrefsWError: moveq #4,d0 bra.s ScreenPrefsDone XDEF CloseScreenPrefsWindow CloseScreenPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l ScreenPrefsWnd,a0 cmpa.l #0,a0 beq ScreenPrefsNWnd jsr CloseWindow(a6) move.l #0,ScreenPrefsWnd ScreenPrefsNWnd: move.l _GadToolsBase,a6 move.l ScreenPrefsGList,a0 cmpa.l #0,a0 beq ScreenPrefsNGad jsr FreeGadgets(a6) move.l #0,ScreenPrefsGList ScreenPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenDiskPrefsWindow OpenDiskPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l DiskPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq DiskPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l DiskPrefsGTags,a4 DiskPrefsGL: move.l _SysBase,a6 lea.l DiskPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l DiskPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s DiskPrefsCOK movem.w (sp)+,d2-d3 bra DiskPrefsGError DiskPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l DiskPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) DiskPrefsTL: tst.l (a4) beq.s DiskPrefsDN addq.w #8,a4 bra.s DiskPrefsTL DiskPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #DiskPrefs_CNT,d3 bmi DiskPrefsGL movem.w (sp)+,d2-d3 move.l DiskPrefsGList,DiskPrefsWG+4 moveq #0,d0 move.w DiskPrefsLeft,d0 move.l d0,DiskPrefsL+4 move.w DiskPrefsTop,d0 move.l d0,DiskPrefsT+4 move.w DiskPrefsWidth,d0 move.l d0,DiskPrefsW+4 move.w DiskPrefsHeight,d0 add.w d3,d0 move.l d0,DiskPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l DiskPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,DiskPrefsWnd tst.l d0 beq DiskPrefsWError move.l _GadToolsBase,a6 move.l DiskPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 DiskPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts DiskPrefsCError: moveq #1,d0 bra.s DiskPrefsDone DiskPrefsGError: moveq #2,d0 bra.s DiskPrefsDone DiskPrefsWError: moveq #4,d0 bra.s DiskPrefsDone XDEF CloseDiskPrefsWindow CloseDiskPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l DiskPrefsWnd,a0 cmpa.l #0,a0 beq DiskPrefsNWnd jsr CloseWindow(a6) move.l #0,DiskPrefsWnd DiskPrefsNWnd: move.l _GadToolsBase,a6 move.l DiskPrefsGList,a0 cmpa.l #0,a0 beq DiskPrefsNGad jsr FreeGadgets(a6) move.l #0,DiskPrefsGList DiskPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenInputPrefsWindow OpenInputPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l InputPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq InputPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l InputPrefsGTags,a4 InputPrefsGL: move.l _SysBase,a6 lea.l InputPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l InputPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s InputPrefsCOK movem.w (sp)+,d2-d3 bra InputPrefsGError InputPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l InputPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) InputPrefsTL: tst.l (a4) beq.s InputPrefsDN addq.w #8,a4 bra.s InputPrefsTL InputPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #InputPrefs_CNT,d3 bmi InputPrefsGL movem.w (sp)+,d2-d3 move.l InputPrefsGList,InputPrefsWG+4 moveq #0,d0 move.w InputPrefsLeft,d0 move.l d0,InputPrefsL+4 move.w InputPrefsTop,d0 move.l d0,InputPrefsT+4 move.w InputPrefsWidth,d0 move.l d0,InputPrefsW+4 move.w InputPrefsHeight,d0 add.w d3,d0 move.l d0,InputPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l InputPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,InputPrefsWnd tst.l d0 beq InputPrefsWError move.l _GadToolsBase,a6 move.l InputPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 InputPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts InputPrefsCError: moveq #1,d0 bra.s InputPrefsDone InputPrefsGError: moveq #2,d0 bra.s InputPrefsDone InputPrefsWError: moveq #4,d0 bra.s InputPrefsDone XDEF CloseInputPrefsWindow CloseInputPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l InputPrefsWnd,a0 cmpa.l #0,a0 beq InputPrefsNWnd jsr CloseWindow(a6) move.l #0,InputPrefsWnd InputPrefsNWnd: move.l _GadToolsBase,a6 move.l InputPrefsGList,a0 cmpa.l #0,a0 beq InputPrefsNGad jsr FreeGadgets(a6) move.l #0,InputPrefsGList InputPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenDisAssemPrefsWindow OpenDisAssemPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l DisAssemPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq DisAssemPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l DisAssemPrefsGTags,a4 DisAssemPrefsGL: move.l _SysBase,a6 lea.l DisAssemPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l DisAssemPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s DisAssemPrefsCOK movem.w (sp)+,d2-d3 bra DisAssemPrefsGError DisAssemPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l DisAssemPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) DisAssemPrefsTL: tst.l (a4) beq.s DisAssemPrefsDN addq.w #8,a4 bra.s DisAssemPrefsTL DisAssemPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #DisAssemPrefs_CNT,d3 bmi DisAssemPrefsGL movem.w (sp)+,d2-d3 move.l DisAssemPrefsGList,DisAssemPrefsWG+4 moveq #0,d0 move.w DisAssemPrefsLeft,d0 move.l d0,DisAssemPrefsL+4 move.w DisAssemPrefsTop,d0 move.l d0,DisAssemPrefsT+4 move.w DisAssemPrefsWidth,d0 move.l d0,DisAssemPrefsW+4 move.w DisAssemPrefsHeight,d0 add.w d3,d0 move.l d0,DisAssemPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l DisAssemPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,DisAssemPrefsWnd tst.l d0 beq DisAssemPrefsWError move.l _GadToolsBase,a6 move.l DisAssemPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 DisAssemPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts DisAssemPrefsCError: moveq #1,d0 bra.s DisAssemPrefsDone DisAssemPrefsGError: moveq #2,d0 bra.s DisAssemPrefsDone DisAssemPrefsWError: moveq #4,d0 bra.s DisAssemPrefsDone XDEF CloseDisAssemPrefsWindow CloseDisAssemPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l DisAssemPrefsWnd,a0 cmpa.l #0,a0 beq DisAssemPrefsNWnd jsr CloseWindow(a6) move.l #0,DisAssemPrefsWnd DisAssemPrefsNWnd: move.l _GadToolsBase,a6 move.l DisAssemPrefsGList,a0 cmpa.l #0,a0 beq DisAssemPrefsNGad jsr FreeGadgets(a6) move.l #0,DisAssemPrefsGList DisAssemPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenMiscPrefsWindow OpenMiscPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l MiscPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq MiscPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l MiscPrefsGTags,a4 MiscPrefsGL: move.l _SysBase,a6 lea.l MiscPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l MiscPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s MiscPrefsCOK movem.w (sp)+,d2-d3 bra MiscPrefsGError MiscPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l MiscPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) MiscPrefsTL: tst.l (a4) beq.s MiscPrefsDN addq.w #8,a4 bra.s MiscPrefsTL MiscPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #MiscPrefs_CNT,d3 bmi MiscPrefsGL movem.w (sp)+,d2-d3 move.l MiscPrefsGList,MiscPrefsWG+4 moveq #0,d0 move.w MiscPrefsLeft,d0 move.l d0,MiscPrefsL+4 move.w MiscPrefsTop,d0 move.l d0,MiscPrefsT+4 move.w MiscPrefsWidth,d0 move.l d0,MiscPrefsW+4 move.w MiscPrefsHeight,d0 add.w d3,d0 move.l d0,MiscPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l MiscPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,MiscPrefsWnd tst.l d0 beq MiscPrefsWError move.l _GadToolsBase,a6 move.l MiscPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 MiscPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts MiscPrefsCError: moveq #1,d0 bra.s MiscPrefsDone MiscPrefsGError: moveq #2,d0 bra.s MiscPrefsDone MiscPrefsWError: moveq #4,d0 bra.s MiscPrefsDone XDEF CloseMiscPrefsWindow CloseMiscPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l MiscPrefsWnd,a0 cmpa.l #0,a0 beq MiscPrefsNWnd jsr CloseWindow(a6) move.l #0,MiscPrefsWnd MiscPrefsNWnd: move.l _GadToolsBase,a6 move.l MiscPrefsGList,a0 cmpa.l #0,a0 beq MiscPrefsNGad jsr FreeGadgets(a6) move.l #0,MiscPrefsGList MiscPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenMemPrefsWindow OpenMemPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l MemPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq MemPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l MemPrefsGTags,a4 MemPrefsGL: move.l _SysBase,a6 lea.l MemPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l MemPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s MemPrefsCOK movem.w (sp)+,d2-d3 bra MemPrefsGError MemPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l MemPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) MemPrefsTL: tst.l (a4) beq.s MemPrefsDN addq.w #8,a4 bra.s MemPrefsTL MemPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #MemPrefs_CNT,d3 bmi MemPrefsGL movem.w (sp)+,d2-d3 move.l MemPrefsGList,MemPrefsWG+4 moveq #0,d0 move.w MemPrefsLeft,d0 move.l d0,MemPrefsL+4 move.w MemPrefsTop,d0 move.l d0,MemPrefsT+4 move.w MemPrefsWidth,d0 move.l d0,MemPrefsW+4 move.w MemPrefsHeight,d0 add.w d3,d0 move.l d0,MemPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l MemPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,MemPrefsWnd tst.l d0 beq MemPrefsWError move.l _GadToolsBase,a6 move.l MemPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 MemPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts MemPrefsCError: moveq #1,d0 bra.s MemPrefsDone MemPrefsGError: moveq #2,d0 bra.s MemPrefsDone MemPrefsWError: moveq #4,d0 bra.s MemPrefsDone XDEF CloseMemPrefsWindow CloseMemPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l MemPrefsWnd,a0 cmpa.l #0,a0 beq MemPrefsNWnd jsr CloseWindow(a6) move.l #0,MemPrefsWnd MemPrefsNWnd: move.l _GadToolsBase,a6 move.l MemPrefsGList,a0 cmpa.l #0,a0 beq MemPrefsNGad jsr FreeGadgets(a6) move.l #0,MemPrefsGList MemPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenStartPrefsWindow OpenStartPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l StartPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq StartPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l StartPrefsGTags,a4 StartPrefsGL: move.l _SysBase,a6 lea.l StartPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l StartPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s StartPrefsCOK movem.w (sp)+,d2-d3 bra StartPrefsGError StartPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l StartPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) StartPrefsTL: tst.l (a4) beq.s StartPrefsDN addq.w #8,a4 bra.s StartPrefsTL StartPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #StartPrefs_CNT,d3 bmi StartPrefsGL movem.w (sp)+,d2-d3 move.l StartPrefsGList,StartPrefsWG+4 moveq #0,d0 move.w StartPrefsLeft,d0 move.l d0,StartPrefsL+4 move.w StartPrefsTop,d0 move.l d0,StartPrefsT+4 move.w StartPrefsWidth,d0 move.l d0,StartPrefsW+4 move.w StartPrefsHeight,d0 add.w d3,d0 move.l d0,StartPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l StartPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,StartPrefsWnd tst.l d0 beq StartPrefsWError move.l _GadToolsBase,a6 move.l StartPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 StartPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts StartPrefsCError: moveq #1,d0 bra.s StartPrefsDone StartPrefsGError: moveq #2,d0 bra.s StartPrefsDone StartPrefsWError: moveq #4,d0 bra.s StartPrefsDone XDEF CloseStartPrefsWindow CloseStartPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l StartPrefsWnd,a0 cmpa.l #0,a0 beq StartPrefsNWnd jsr CloseWindow(a6) move.l #0,StartPrefsWnd StartPrefsNWnd: move.l _GadToolsBase,a6 move.l StartPrefsGList,a0 cmpa.l #0,a0 beq StartPrefsNGad jsr FreeGadgets(a6) move.l #0,StartPrefsGList StartPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF BLPrefsRender BLPrefsRender: movem.l d0-d5/a0-a2/a6,-(sp) move.l BLPrefsWnd,a0 move.b wd_BorderLeft(a0),d4 ext.w d4 move.b wd_BorderTop(a0),d5 ext.w d5 move.l _IntuitionBase,a6 move.l BLPrefsWnd,a0 move.l wd_RPort(a0),a0 lea.l BLPrefsText0,a1 move.l d4,d0 move.l d5,d1 jsr PrintIText(a6) movem.l (sp)+,d0-d5/a0-a2/a6 rts XDEF OpenBLPrefsWindow OpenBLPrefsWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l BLPrefsGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq BLPrefsCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l BLPrefsGTags,a4 BLPrefsGL: move.l _SysBase,a6 lea.l BLPrefsNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l BLPrefsGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s BLPrefsCOK movem.w (sp)+,d2-d3 bra BLPrefsGError BLPrefsCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l BLPrefsGadgets,a0 add.l d0,a0 move.l a3,(a0) BLPrefsTL: tst.l (a4) beq.s BLPrefsDN addq.w #8,a4 bra.s BLPrefsTL BLPrefsDN: addq.w #4,a4 addq.w #1,d3 cmp.w #BLPrefs_CNT,d3 bmi BLPrefsGL movem.w (sp)+,d2-d3 move.l BLPrefsGList,BLPrefsWG+4 moveq #0,d0 move.w BLPrefsLeft,d0 move.l d0,BLPrefsL+4 move.w BLPrefsTop,d0 move.l d0,BLPrefsT+4 move.w BLPrefsWidth,d0 move.l d0,BLPrefsW+4 move.w BLPrefsHeight,d0 add.w d3,d0 move.l d0,BLPrefsH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l BLPrefsWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,BLPrefsWnd tst.l d0 beq BLPrefsWError move.l _GadToolsBase,a6 move.l BLPrefsWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) jsr BLPrefsRender moveq #0,d0 BLPrefsDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts BLPrefsCError: moveq #1,d0 bra.s BLPrefsDone BLPrefsGError: moveq #2,d0 bra.s BLPrefsDone BLPrefsWError: moveq #4,d0 bra.s BLPrefsDone XDEF CloseBLPrefsWindow CloseBLPrefsWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l BLPrefsWnd,a0 cmpa.l #0,a0 beq BLPrefsNWnd jsr CloseWindow(a6) move.l #0,BLPrefsWnd BLPrefsNWnd: move.l _GadToolsBase,a6 move.l BLPrefsGList,a0 cmpa.l #0,a0 beq BLPrefsNGad jsr FreeGadgets(a6) move.l #0,BLPrefsGList BLPrefsNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts XDEF OpenScreen_ModeWindow OpenScreen_ModeWindow: movem.l d1-d4/a0-a4/a6,-(sp) move.l Scr,a0 moveq #0,d3 moveq #0,d2 move.b sc_WBorLeft(a0),d2 move.l sc_Font(a0),a1 move.w ta_YSize(a1),d3 addq.w #1,d3 move.b sc_WBorTop(a0),d0 ext.w d0 add.w d0,d3 move.l _GadToolsBase,a6 lea.l Screen_ModeGList,a0 jsr CreateContext(a6) move.l d0,a3 tst.l d0 beq Screen_ModeCError movem.w d2-d3,-(sp) moveq #0,d3 lea.l Screen_ModeGTags,a4 Screen_ModeGL: move.l _SysBase,a6 lea.l Screen_ModeNGads,a0 move.l d3,d0 mulu #gng_SIZEOF,d0 add.l d0,a0 lea.l BufNewGad,a1 moveq #gng_SIZEOF,d0 jsr CopyMem(a6) lea.l BufNewGad,a0 move.l VisualInfo,gng_VisualInfo(a0) move.l #topaz8,gng_TextAttr(a0) move.w gng_LeftEdge(a0),d0 add.w (sp),d0 move.w d0,gng_LeftEdge(a0) move.w gng_TopEdge(a0),d0 add.w 2(sp),d0 move.w d0,gng_TopEdge(a0) move.l _GadToolsBase,a6 lea.l Screen_ModeGTypes,a0 moveq #0,d0 move.l d3,d1 asl.l #1,d1 add.l d1,a0 move.w (a0),d0 move.l a3,a0 lea.l BufNewGad,a1 move.l a4,a2 jsr CreateGadgetA(a6) tst.l d0 bne.s Screen_ModeCOK movem.w (sp)+,d2-d3 bra Screen_ModeGError Screen_ModeCOK: move.l d0,a3 move.l d3,d0 asl.l #2,d0 lea.l Screen_ModeGadgets,a0 add.l d0,a0 move.l a3,(a0) Screen_ModeTL: tst.l (a4) beq.s Screen_ModeDN addq.w #8,a4 bra.s Screen_ModeTL Screen_ModeDN: addq.w #4,a4 addq.w #1,d3 cmp.w #Screen_Mode_CNT,d3 bmi Screen_ModeGL movem.w (sp)+,d2-d3 move.l Screen_ModeGList,Screen_ModeWG+4 moveq #0,d0 move.w Screen_ModeLeft,d0 move.l d0,Screen_ModeL+4 move.w Screen_ModeTop,d0 move.l d0,Screen_ModeT+4 move.w Screen_ModeWidth,d0 move.l d0,Screen_ModeW+4 move.w Screen_ModeHeight,d0 add.w d3,d0 move.l d0,Screen_ModeH+4 move.l _IntuitionBase,a6 suba.l a0,a0 lea.l Screen_ModeWindowTags,a1 jsr OpenWindowTagList(a6) move.l d0,Screen_ModeWnd tst.l d0 beq Screen_ModeWError move.l _GadToolsBase,a6 move.l Screen_ModeWnd,a0 suba.l a1,a1 jsr GT_RefreshWindow(a6) moveq #0,d0 Screen_ModeDone: movem.l (sp)+,d1-d4/a0-a4/a6 rts Screen_ModeCError: moveq #1,d0 bra.s Screen_ModeDone Screen_ModeGError: moveq #2,d0 bra.s Screen_ModeDone Screen_ModeWError: moveq #4,d0 bra.s Screen_ModeDone XDEF CloseScreen_ModeWindow CloseScreen_ModeWindow: movem.l d0-d1/a0-a2/a6,-(sp) move.l _IntuitionBase,a6 move.l Screen_ModeWnd,a0 cmpa.l #0,a0 beq Screen_ModeNWnd jsr CloseWindow(a6) move.l #0,Screen_ModeWnd Screen_ModeNWnd: move.l _GadToolsBase,a6 move.l Screen_ModeGList,a0 cmpa.l #0,a0 beq Screen_ModeNGad jsr FreeGadgets(a6) move.l #0,Screen_ModeGList Screen_ModeNGad: movem.l (sp)+,d0-d1/a0-a2/a6 rts