BuildCubeE/BootableMPW/Interfaces/RIncludes/siow.r
2018-11-06 07:44:15 +08:00

372 lines
7.1 KiB
R

/*------------------------------------------------------------------------------
#
# Apple Macintosh Developer Technical Support
#
# MultiFinder-Aware Simple Input/Output Window
#
# SIOW
#
# Copyright: © 1989-1991 by Apple Computer, Inc., all rights reserved.
#
------------------------------------------------------------------------------*/
#include "systypes.r"
#include "types.r"
#include "SIOW.h"
#ifndef CREATOR
#define CREATOR 'siow'
#endif
#ifndef FCREATOR
#define FCREATOR 'MPS '
#endif
type 'pzza' {
literal longint;
};
resource 'pzza' (128, purgeable) {
FCREATOR;
};
/* we use an MBAR resource to conveniently load all the menus */
resource 'MBAR' (__rMenuBar, preload) {
{ __mApple, __mFile, __mEdit, __mFont /*, __mSize */}; /* five menus */
};
resource 'MENU' (__mApple, preload) {
__mApple, textMenuProc,
0b1111111111111111111111111111101, /* disable dashed line, enable About and DAs */
enabled, apple,
{
"About S I O W\311",
noicon, nokey, nomark, plain;
"-",
noicon, nokey, nomark, plain
}
};
resource 'MENU' (__mFile, preload) {
__mFile, textMenuProc,
0b000000000000000000000000000000, /* enable Quit only, program enables others */
enabled, "File",
{
"New",
noicon, "N", nomark, plain;
"Open",
noicon, "O", nomark, plain;
"-",
noicon, nokey, nomark, plain;
"Close",
noicon, "W", nomark, plain;
"Save",
noicon, "S", nomark, plain;
"Save As\311",
noicon, nokey, nomark, plain;
"-",
noicon, nokey, nomark, plain;
"Page Setup\311",
noicon, nokey, nomark, plain;
"Print\311",
noicon, nokey, nomark, plain;
"-",
noicon, nokey, nomark, plain;
"Quit",
noicon, "Q", nomark, plain
}
};
resource 'MENU' (__mEdit, preload) {
__mEdit, textMenuProc,
0b0000000000000000000000000000000, /* disable everything, program does the enabling */
enabled, "Edit",
{
"Undo",
noicon, "Z", nomark, plain;
"-",
noicon, nokey, nomark, plain;
"Cut",
noicon, "X", nomark, plain;
"Copy",
noicon, "C", nomark, plain;
"Paste",
noicon, "V", nomark, plain;
"Clear",
noicon, nokey, nomark, plain
}
};
resource 'MENU' (__mFont, preload) {
__mFont, textMenuProc,
0b1111111111111111111111111111111, /* enable everything */
enabled, "Font",
{
}
};
/* this ALRT and DITL are used as an About screen */
resource 'ALRT' (__rAboutAlert, purgeable) {
{66, 58, 344, 396}, __rAboutAlert, {
OK, visible, silent;
OK, visible, silent;
OK, visible, silent;
OK, visible, silent
};
};
resource 'DITL' (__rAboutAlert, purgeable) {
{ /* array DITLarray: 8 elements */
/* [1] */
{233, 144, 253, 224},
Button {
enabled,
"OK"
},
/* [2] */
{8, 72, 23, 264},
StaticText {
disabled,
"Simple Input/Output Window"
},
/* [3] */
{56, 24, 71, 337},
StaticText {
disabled,
"Copyright ©Apple Computer, Inc. 1989-1990 "
},
/* [4] */
{80, 108, 96, 244},
StaticText {
disabled,
"Brought to you by..."
},
/* [5] */
{109, 132, 134, 229},
StaticText {
disabled,
"\"PZZA SLT\""
},
/* [6] */
{176, 56, 200, 289},
StaticText {
disabled,
"Roger, Russ, Landon, Ira & Munch"
},
/* [7] */
{152, 24, 170, 212},
StaticText {
disabled,
"Special Thanks to..."
},
/* [8] */
{32, 152, 47, 200},
StaticText {
disabled,
"(SIOW)"
}
}
};
/* this ALRT and DITL are used as an error screen */
resource 'ALRT' (__rUserAlert, purgeable) {
{40, 20, 150, 260},
__rUserAlert,
{ /* array: 4 elements */
/* [1] */
OK, visible, silent,
/* [2] */
OK, visible, silent,
/* [3] */
OK, visible, silent,
/* [4] */
OK, visible, silent
}
};
resource 'DITL' (__rUserAlert, purgeable) {
{ /* array DITLarray: 3 elements */
/* [1] */
{80, 150, 100, 230},
Button {
enabled,
"OK"
},
/* [2] */
{10, 60, 60, 230},
StaticText {
disabled,
"Error. ^0."
},
/* [3] */
{8, 8, 40, 40},
Icon {
disabled,
2
}
}
};
#define WindowHeight 286
#define WindowWidth 480
resource 'WIND' (__rDocWindow, preload, purgeable) {
{0, 0, WindowHeight, WindowWidth},
zoomDocProc, invisible, noGoAway, 0x0, "untitled"
};
resource 'CNTL' (__rVScroll, preload, purgeable) {
{-1, WindowWidth-15, WindowHeight-14, WindowWidth+1},
0, invisible, 0, 0, scrollBarProc, 0, ""
};
resource 'CNTL' (__rHScroll, preload, purgeable) {
{WindowHeight-15, -1, WindowHeight+1, WindowWidth-14},
0, invisible, 0, 0, scrollBarProc, 0, ""
};
resource 'STR#' (__kErrStrings, purgeable) {
{
"You must run on 512Ke or later";
"Application Memory Size is too small";
"Not enough memory to run SIOW";
"Not enough memory to do Cut";
"Cannot do Cut";
"Cannot do Copy";
"Cannot exceed 32,000 characters with Paste";
"Not enough memory to do Paste";
"Cannot create window";
"Cannot exceed 32,000 characters";
"Cannot do Paste"
"Font not found"
}
};
/* here is the quintessential MultiFinder friendliness device, the SIZE resource */
resource 'SIZE' (-1) {
dontSaveScreen,
acceptSuspendResumeEvents,
enableOptionSwitch,
canBackground, /* we can background; we don't currently, but our sleep value */
/* guarantees we don't hog the Mac while we are in the background */
multiFinderAware, /* this says we do our own activate/deactivate; don't fake us out */
backgroundAndForeground, /* this is definitely not a background-only application! */
dontGetFrontClicks, /* change this is if you want "do first click" behavior like the Finder */
ignoreChildDiedEvents, /* essentially, I'm not a debugger (sub-launching) */
not32BitCompatible, /* this app should not be run in 32-bit address space */
reserved,
reserved,
reserved,
reserved,
reserved,
reserved,
reserved,
__kPrefSize * 1024,
__kMinSize * 1024
};
type CREATOR as 'STR ';
resource CREATOR (0) {
"MultiFinder-Aware Simple Input/Output Window (SIOW)"
};
resource 'BNDL' (128) {
CREATOR,
0,
{
'ICN#',
{
0, 128
},
'FREF',
{
0, 128
}
}
};
resource 'FREF' (128) {
'APPL',
0,
""
};
resource 'ICN#' (128) {
{ /* array: 2 elements */
/* [1] */
$"0000 0000 0000 0000 0010 4100 0010 2200"
$"0020 2200 0020 2100 0020 4100 0010 4200"
$"0010 4200 0010 2200 0020 2100 0020 0100"
$"00FF FF00 03FF FFE0 0791 03F0 0ED1 0E7C"
$"1C31 321C 380D C10E 3FFF FFFE 3003 C106"
$"380D 300E 1E31 0E3C 1FC1 01F8 07FF FFE0"
$"00FF FE00",
/* [2] */
$"0000 0000 0000 0000 0010 4100 0010 2200"
$"0020 2200 0020 2100 0020 4100 0010 4200"
$"0010 4200 0010 2200 0020 2100 0020 0100"
$"00FF FF00 03FF FFE0 07FF FFF0 0FFF FFFC"
$"1FFF FFFC 3FFF FFFE 3FFF FFFE 3FFF FFFE"
$"3FFF FFFE 1FFF FFFC 1FFF FFF8 07FF FFE0"
$"00FF FE00"
}
};
resource 'ALRT' (__rSaveAlert, preload) {
{72, 64, 212, 372},
__rSaveAlert,
{ /* array: 4 elements */
/* [1] */
OK, visible, silent,
/* [2] */
OK, visible, silent,
/* [3] */
OK, visible, silent,
/* [4] */
OK, visible, silent
}
};
resource 'DITL' (__rSaveAlert, preload) {
{ /* array DITLarray: 4 elements */
/* [1] */
{58, 25, 76, 99},
Button {
enabled,
"Yes"
},
/* [2] */
{86, 25, 104, 99},
Button {
enabled,
"No"
},
/* [3] */
{12, 20, 45, 277},
StaticText {
disabled,
"Save changes before closing?"
},
/* [4] */
{86, 195, 104, 269},
Button {
enabled,
"Cancel"
}
}
};