platotermClassicMac/PLATOTERM.r

249 lines
11 KiB
R
Executable File
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

#include "Processes.r"
#include "Menus.r"
#include "Windows.r"
#include "MacTypes.r"
#include "Finder.r"
type 'PLTO' as 'STR ';
resource 'PLTO' (0, purgeable) {
"PLATOTerm 0.1"
};
resource 'MENU' (128) {
128, textMenuProc;
allEnabled, enabled;
apple;
{
"About PLATOTERM", noIcon, noKey, noMark, plain;
"-", noIcon, noKey, noMark, plain;
}
};
resource 'MENU' (129) {
129, textMenuProc;
allEnabled, enabled;
"File";
{
"Quit", noIcon, "Q", noMark, plain;
}
};
resource 'MENU' (130) {
130, textMenuProc;
0, 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 'MBAR' (128) {
{ 128, 129, 130 };
};
resource 'SIZE' (-1) {
dontSaveScreen,
acceptSuspendResumeEvents,
enableOptionSwitch,
canBackground,
multiFinderAware,
backgroundAndForeground,
dontGetFrontClicks,
ignoreChildDiedEvents,
is32BitCompatible,
isHighLevelEventAware,
onlyLocalHLEvents,
notStationeryAware,
reserved,
reserved,
reserved,
reserved,
256 * 1024,
256 * 1024
};
data 'ICN#' (128, purgeable) {
$"0000 0000 0000 7E00 0003 89FC 001E 222C" /* ......~...‰ü..", */
$"007F C8F4 0055 7F84 007A AA04 005F D604" /* ..Èô.U.„.zª.._Ö. */
$"006A BE04 00D5 5404 00BE AC04 00DF F408" /* .j¾..ÕT..¾¬..ßô. */
$"00BF EC08 00DF D808 01BF E808 017F D808" /* .¿ì..ßØ..¿è...Ø. */
$"01BF E808 017F D808 01BF B008 0157 D008" /* .¿è...Ø..¿°..WÐ. */
$"03AA B008 03F5 5010 031E B060 05E1 E080" /* .ª°..õP...°`.áà€ */
$"091E 2300 3223 D400 2444 F800 1C89 4000" /* Æ.#.2#Ô.$Dø..‰@. */
$"0392 8000 0075 0000 000E 0000 0000 0000" /* .’€..u.......... */
$"0000 0000 0000 7E00 0003 FFFC 001F FFFC" /* ......~...ÿü..ÿü */
$"007F FFFC 007F FFFC 007F FFFC 007F FFFC" /* ..ÿü..ÿü..ÿü..ÿü */
$"007F FFFC 00FF FFFC 00FF FFFC 00FF FFF8" /* ..ÿü.ÿÿü.ÿÿü.ÿÿø */
$"00FF FFF8 00FF FFF8 01FF FFF8 01FF FFF8" /* .ÿÿø.ÿÿø.ÿÿø.ÿÿø */
$"01FF FFF8 01FF FFF8 01FF FFF8 01FF FFF8" /* .ÿÿø.ÿÿø.ÿÿø.ÿÿø */
$"03FF FFF8 03FF FFF0 03FF FFE0 07FF FF80" /* .ÿÿø.ÿÿð.ÿÿà.ÿÿ€ */
$"0FFF FF00 3FFF FC00 3FFF F800 1FFF C000" /* .ÿÿ.?ÿü.?ÿø..ÿÀ. */
$"03FF 8000 007F 0000 000E 0000 0000 0000" /* .ÿ€............. */
};
data 'ics#' (128, purgeable) {
$"0000 0000 1FF8 7FFE 7FFE E183 EEEF EEEF" /* .....ø.þ.þáƒîïîï */
$"E1EF EFEF EFEF 7FFE 7FFE 1FF8 0000 0000" /* áïïïïï.þ.þ.ø.... */
$"0000 0000 1FF8 7FFE 7FFE FFFF FFFF FFFF" /* .....ø.þ.þÿÿÿÿÿÿ */
$"FFFF FFFF FFFF 7FFE 7FFE 1FF8 0000 0000" /* ÿÿÿÿÿÿ.þ.þ.ø.... */
};
data 'icl4' (128, purgeable) {
$"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */
$"0000 0000 0000 0000 0FFF FFF0 0000 0000" /* .........ÿÿð.... */
$"0000 0000 0000 00FF F000 B00F FFFF FF00" /* .......ÿð.°.ÿÿÿ. */
$"0000 0000 000F FFF0 00B0 00B0 00B0 FF00" /* ......ÿð.°.°.°ÿ. */
$"0000 0000 0FFF FFFF FF00 B000 FFFF BF00" /* .....ÿÿÿÿ.°.ÿÿ¿. */
$"0000 0000 0FBB BBBB BFFF FFFF FB0B 0F00" /* .....»»»¿ÿÿÿû... */
$"0000 0000 0FFB BBBB BBBB BBF0 B0B0 BF00" /* .....û»»»»»ð°°¿. */
$"0000 0000 0FBF FFFF FFBB BFFB 0B0B 0F00" /* .....¿ÿÿÿ»¿û.... */
$"0000 0000 0FBB BBBB BBFF FFF0 B0B0 BF00" /* .....»»»»ÿÿð°°¿. */
$"0000 0000 FFBB BBBB BBBB BF0B 0B0B 0F00" /* ....ÿ»»»»»¿..... */
$"0000 0000 FBBF FFFB BBBB BFB0 B0B0 BF00" /* ....û¿ÿû»»¿°°°¿. */
$"0000 0000 FBBF FFFF FFFB BF0B 0B0B F000" /* ....û¿ÿÿÿû¿...ð. */
$"0000 0000 FBBF 22FF FFFB BFB0 B0B0 F000" /* ....û¿"ÿÿû¿°°°ð. */
$"0000 0000 FBBF F2F2 2FBB FB0B 0B0B F000" /* ....û¿òò/»û...ð. */
$"0000 000F FBFF FFF2 FFBB F0B0 B0B0 F000" /* ....ûÿÿòÿ»ð°°°ð. */
$"0000 000F BBFF FFFF FFBB FB0B 0B0B F000" /* ....»ÿÿÿÿ»û...ð. */
$"0000 000F BBFF 2FFF FFBB F0B0 B0B0 F000" /* ....»ÿ/ÿÿ»ð°°°ð. */
$"0000 000F BBFF 2222 FFBB FB0B 0B0B F000" /* ....»ÿ""ÿ»û...ð. */
$"0000 000F BBFF FFFF FBBF B0B0 B0B0 F000" /* ....»ÿÿÿû¿°°°°ð. */
$"0000 000F BBBB BFFF FBBF 0B0B 0B0B F000" /* ....»»¿ÿû¿....ð. */
$"0000 00FF BBBB BBBB BBBF B0B0 B0B0 F000" /* ...ÿ»»»»»¿°°°°ð. */
$"0000 00FF FFFF BBBB BBBF 0B0B 0B0F 0000" /* ...ÿÿÿ»»»¿...... */
$"0000 00FF FAAF FFFB BBBF B0B0 BFF0 0000" /* ...ÿú¯ÿû»¿°°¿ð.. */
$"0000 0FBF FFFA AAAF FFFB 0B0B F000 0000" /* ...¿ÿúª¯ÿû..ð... */
$"0000 FBBB BBBF FFFA AAF0 B0FF 0000 0000" /* ..û»»¿ÿúªð°ÿ.... */
$"00FF BBCC 0CCB BBFF FF0F 0F00 0000 0000" /* .ÿ»Ì»ÿÿ....... */
$"00FB BB0C CC0C BBBB FFFF F000 0000 0000" /* ».Ì.»»ÿÿð..... */
$"000F FFBB 0CCC 0CCB BF00 0000 0000 0000" /* ..ÿ».Ì.Ë¿....... */
$"0000 00FF FB0C CCFB B000 0000 0000 0000" /* ...ÿû.Ìû°....... */
$"0000 0000 0FFF BBFF 0000 0000 0000 0000" /* .....ÿ»ÿ........ */
$"0000 0000 0000 FFF0 0000 0000 0000 0000" /* ......ÿð........ */
$"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */
};
data 'ics4' (128, purgeable) {
$"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */
$"000F FFFF FFFF F000 0FFF FFFF FFFF FFF0" /* ..ÿÿÿÿð..ÿÿÿÿÿÿð */
$"0FFF FFFF FFFF FFF0 FFF2 222F F222 22FF" /* .ÿÿÿÿÿÿðÿò"/ò""ÿ */
$"FFF2 FFF2 FFF2 FFFF FFF2 FFF2 FFF2 FFFF" /* ÿòÿòÿòÿÿÿòÿòÿòÿÿ */
$"FFF2 222F FFF2 FFFF FFF2 FFFF FFF2 FFFF" /* ÿò"/ÿòÿÿÿòÿÿÿòÿÿ */
$"FFF2 FFFF FFF2 FFFF 0FFF FFFF FFFF FFF0" /* ÿòÿÿÿòÿÿ.ÿÿÿÿÿÿð */
$"0FFF FFFF FFFF FFF0 000F FFFF FFFF F000" /* .ÿÿÿÿÿÿð..ÿÿÿÿð. */
$"0000 0000 0000 0000 0000 0000 0000 0000" /* ................ */
};
resource 'FREF' (128, purgeable) {
'APPL',
0,
""
};
resource 'BNDL' (128, purgeable) {
'PLTO',
0, /*resource ID of signature resource: should be 0*/
{
'ICN#', { /*mapping local IDs in 'FREF's to 'ICN#' IDs*/
0, 128 /*'FREF' w/ local ID 0 maps to 'ICN#' res ID 128*/
},
'ics#', { /*mapping local IDs in 'FREF's to 'ICN#' IDs*/
0, 128 /*'FREF' w/ local ID 0 maps to 'ICN#' res ID 128*/
},
'icl4', { /*mapping local IDs in 'FREF's to 'ICN#' IDs*/
0, 128 /*'FREF' w/ local ID 0 maps to 'ICN#' res ID 128*/
},
'ics4', { /*mapping local IDs in 'FREF's to 'ICN#' IDs*/
0, 128 /*'FREF' w/ local ID 0 maps to 'ICN#' res ID 128*/
},
'FREF', { /*local res IDs for 'FREF's: no duplicates*/
0, 128
}
}
};
data 'ppat' (128) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 AA55 AA55 AA55 AA55 0000 0000" /* ....ªUªUªUªU.... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 AA55" /* .........V....ªU */
$"AA55 AA55 AA55 0000 0000 0000 0001 0000" /* ªUªUªU.......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (129) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 9224 4992 2449 9224 0000 0000" /* ....$I$I$.... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 9224" /* .........V....$ */
$"4992 2449 9224 0000 0000 0000 0001 0000" /* I$I$.......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (130) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 DD77 DD77 DD77 DD77 0000 0000" /* ....ÝwÝwÝwÝw.... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 DD77" /* .........V....Ýw */
$"DD77 DD77 DD77 0000 0000 0000 0001 0000" /* ÝwÝwÝw.......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (131) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 AAAA AAAA AAAA AAAA 0000 0000" /* ....ªªªªªªªª.... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 AAAA" /* .........V....ªª */
$"AAAA AAAA AAAA 0000 0000 0000 0001 0000" /* ªªªªªª.......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (132) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 FF00 FF00 FF00 FF00 0000 0000" /* ....ÿ.ÿ.ÿ.ÿ..... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 FF00" /* .........V....ÿ. */
$"FF00 FF00 FF00 0000 0000 0000 0001 0000" /* ÿ.ÿ.ÿ........... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (133) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 8822 8822 8822 8822 0000 0000" /* ....ˆ"ˆ"ˆ"ˆ".... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 8822" /* .........V....ˆ" */
$"8822 8822 8822 0000 0000 0000 0001 0000" /* ˆ"ˆ"ˆ".......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (134) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 0022 0088 0022 0088 0000 0000" /* .....".ˆ.".ˆ.... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 0022" /* .........V....." */
$"0088 0022 0088 0000 0000 0000 0001 0000" /* .ˆ.".ˆ.......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};
data 'ppat' (135) {
$"0001 0000 001C 0000 004E 0000 0000 FFFF" /* .........N....ÿÿ */
$"0000 0000 00DD 0077 00BD 00ED 0000 0000" /* .....Ý.w.½.í.... */
$"8001 0000 0000 0008 0008 0000 0000 0000" /*............... */
$"0000 0048 0000 0048 0000 0000 0001 0001" /* ...H...H........ */
$"0001 0000 0000 0000 0056 0000 0000 00DD" /* .........V.....Ý */
$"0077 00BD 00ED 0000 0000 0000 0001 0000" /* .w.½.í.......... */
$"FFFF FFFF FFFF 0001 0000 0000 0000" /* ÿÿÿÿÿÿ........ */
};