home *** CD-ROM | disk | FTP | other *** search
- /****************************************************************************
- *
- * Screen - Screen configurator (almost useless example of FileRequest());
- *
- * By Kevin Lee Clague
- * 408 Tortolla Way
- * San Jose, Ca 95033
- * 408-258-9891 work 408-737-5481
- *
- * Copyright (C) 1986. All rights reserved.
- *
- * This program is freely distributable as long as this copyright notice
- * is retained. It intended for personal, non-commercial use.
- *
- ***************************************************************************/
- #include "screen.h"
-
- struct IntuiText ProjectItemIntui[] =
- {
- {
- 0,
- 1,
- 0,
- 0,
- 2,
- NULL,
- (UBYTE *) "Load",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 0,
- 2,
- NULL,
- (UBYTE *) "Save",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 0,
- 2,
- NULL,
- (UBYTE *) "Use",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 0,
- 2,
- NULL,
- (UBYTE *) "Quit",
- NULL
- }
- };
- struct MenuItem ProjectItem[] =
- {
- {
- (struct MenuItem *) &ProjectItem[1],
- 0,
- 0,
- 75,
- 12,
- ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHCOMP,
- 0x0,
- (APTR) &ProjectItemIntui[0],
- NULL,
- 'l',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &ProjectItem[2],
- 0,
- 12,
- 75,
- 12,
- ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHCOMP,
- 0x0,
- (APTR) &ProjectItemIntui[1],
- NULL,
- 's',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &ProjectItem[3],
- 0,
- 24,
- 75,
- 12,
- ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHCOMP,
- 0x0,
- (APTR) &ProjectItemIntui[2],
- NULL,
- 'u',
- NULL,
- NULL
- },
- {
- NULL,
- 0,
- 36,
- 75,
- 12,
- ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHCOMP,
- 0x0,
- (APTR) &ProjectItemIntui[3],
- NULL,
- 'q',
- NULL,
- NULL
- }
- };
- struct IntuiText DepthSubIntui[] =
- {
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "1",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "2",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "3",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "4",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "5",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "6",
- NULL
- }
- };
- struct MenuItem DepthSub[] =
- {
- {
- (struct MenuItem *) &DepthSub[1],
- 47,
- 11,
- 70,
- 12,
- CHECKIT|ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHBOX,
- 0x3e,
- (APTR) &DepthSubIntui[0],
- NULL,
- '1',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &DepthSub[2],
- 47,
- 23,
- 70,
- 12,
- CHECKIT|ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHBOX,
- 0x3d,
- (APTR) &DepthSubIntui[1],
- NULL,
- '2',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &DepthSub[3],
- 47,
- 35,
- 70,
- 12,
- CHECKIT|ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHBOX,
- 0x3b,
- (APTR) &DepthSubIntui[2],
- NULL,
- '3',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &DepthSub[4],
- 121,
- 11,
- 70,
- 12,
- CHECKIT|CHECKED|ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHBOX,
- 0x37,
- (APTR) &DepthSubIntui[3],
- NULL,
- '4',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &DepthSub[5],
- 121,
- 23,
- 70,
- 12,
- CHECKIT|ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHBOX,
- 0x2f,
- (APTR) &DepthSubIntui[4],
- NULL,
- '5',
- NULL,
- NULL
- },
- {
- NULL,
- 121,
- 35,
- 70,
- 12,
- CHECKIT|ITEMTEXT|COMMSEQ|ITEMENABLED|HIGHBOX,
- 0x1f,
- (APTR) &DepthSubIntui[5],
- NULL,
- '6',
- NULL,
- NULL
- }
- };
- struct IntuiText ViewModesSubIntui[] =
- {
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "HIRES",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "INTERLACE",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "SPRITES",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "DUALPF",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 19,
- 2,
- NULL,
- (UBYTE *) "HAM",
- NULL
- }
- };
- struct MenuItem ViewModesSub[] =
- {
- {
- (struct MenuItem *) &ViewModesSub[1],
- 48,
- 11,
- 91,
- 12,
- CHECKIT|CHECKED|ITEMTEXT|ITEMENABLED|HIGHBOX,
- 0x0,
- (APTR) &ViewModesSubIntui[0],
- NULL,
- '\0x0',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &ViewModesSub[2],
- 48,
- 23,
- 91,
- 12,
- CHECKIT|ITEMTEXT|ITEMENABLED|HIGHBOX,
- 0x0,
- (APTR) &ViewModesSubIntui[1],
- NULL,
- '\0x0',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &ViewModesSub[3],
- 48,
- 35,
- 91,
- 12,
- CHECKIT|ITEMTEXT|ITEMENABLED|HIGHBOX,
- 0x0,
- (APTR) &ViewModesSubIntui[2],
- NULL,
- '\0x0',
- NULL,
- NULL
- },
- {
- (struct MenuItem *) &ViewModesSub[4],
- 48,
- 47,
- 91,
- 12,
- CHECKIT|ITEMTEXT|ITEMENABLED|HIGHBOX,
- 0x0,
- (APTR) &ViewModesSubIntui[3],
- NULL,
- '\0x0',
- NULL,
- NULL
- },
- {
- NULL,
- 48,
- 59,
- 91,
- 12,
- CHECKIT|ITEMTEXT|ITEMENABLED|HIGHBOX,
- 0x0,
- (APTR) &ViewModesSubIntui[4],
- NULL,
- '\0x0',
- NULL,
- NULL
- }
- };
- struct IntuiText EditItemIntui[] =
- {
- {
- 0,
- 1,
- 0,
- 0,
- 2,
- NULL,
- (UBYTE *) "Depth",
- NULL
- },
- {
- 0,
- 1,
- 0,
- 0,
- 2,
- NULL,
- (UBYTE *) "ViewModes",
- NULL
- }
- };
- struct MenuItem EditItem[] =
- {
- {
- (struct MenuItem *) &EditItem[1],
- 0,
- 0,
- 72,
- 12,
- ITEMTEXT|ITEMENABLED|HIGHCOMP,
- 0x0,
- (APTR) &EditItemIntui[0],
- NULL,
- '\0x0',
- (struct MenuItem *) &DepthSub,
- NULL
- },
- {
- NULL,
- 0,
- 12,
- 72,
- 12,
- ITEMTEXT|ITEMENABLED|HIGHCOMP,
- 0x0,
- (APTR) &EditItemIntui[1],
- NULL,
- '\0x0',
- (struct MenuItem *) &ViewModesSub,
- NULL
- }
- };
- struct Menu Menu[] =
- {
- {
- (struct Menu *) &Menu[1],
- 4,
- 0,
- 58,
- 8,
- 1,
- (BYTE *) "Project",
- (struct MenuItem *) &ProjectItem,
- },
- {
- NULL,
- 68,
- 0,
- 34,
- 8,
- 257,
- (BYTE *) "Edit",
- (struct MenuItem *) &EditItem,
- }
- };
-