DiskBrowser/diskbrowser.rez
2019-04-19 17:54:58 -05:00

191 lines
5.4 KiB
Plaintext

#include "types.rez"
#define winDiskBrowser 1001
#define searchLine 1002
#define searchButton 1003
#define findDisksForText 1004
#define forIIGSRadio 1005
#define forAnyAppleIIRadio 1006
#define disksList 1007
#define mountDiskButton 1008
resource rVersion (1) {
{
1,0,0, /* Version number */
beta, 1, /* Release version */
},
verUS, /* Region code */
"Archive.org Disk Browser", /* Title */
"By Stephen Heumann"
};
resource rWindParam1 (winDiskBrowser) {
fTitle+fClose+fFlex+fMove+fVis, /* wFrameBits */
winDiskBrowser, /* wTitle */
0, /* wRefCon */
{0,0,0,0}, /* ZoomRect */
winDiskBrowser, /* wColor ID */
{0,0}, /* Origin */
{0,0}, /* data size */
{0,0}, /* max height-width */
{0,0}, /* scroll vertical, horizontal */
{0,0}, /* page vertical, horizontal */
0, /* wInfoRefCon */
0, /* wInfoHeight */
{27,5,198,425}, /* wPosition */
infront, /* wPlane */
winDiskBrowser, /* wStorage */
$0A09 /* wInVerb */
};
resource rPString(winDiskBrowser) { " Archive.org Disk Browser " };
resource rWindColor (winDiskBrowser) {
0x0000, /* frameColor */
0x0F00, /* titleColor */
0x020F, /* tbarColor */
0xF0F0, /* growColor */
0x00F0 /* infoColor */
};
resource rControlList (winDiskBrowser) {{
mountDiskButton,
disksList,
findDisksForText,
forIIGSRadio,
forAnyAppleIIRadio,
searchLine,
searchButton
}};
resource rControlTemplate (searchLine) {
searchLine,
{8, 10, 26, 300},
editLineControl {{
0,
$7000+RefIsResource,
0,
255, /* max size */
searchLine /* text ref */
}};
};
resource rPString (searchLine) { "" };
resource rControlTemplate (searchButton) {
searchButton,
{10, 309, 24, 410},
SimpleButtonControl {{
0,
$3000+RefIsResource,
0,
searchButton,
0, /* color table ref */
{"\$0D","\$0D",0,0} /* key equivalent = Return */
}};
};
resource rPString(searchButton) { "Find Disks" };
resource rControlTemplate (findDisksForText) {
findDisksForText, /* control ID */
{30, 9, 42, 118}, /* control rect */
statTextControl {{
fBlastText, /* flags */
$1000+RefIsResource, /* moreFlags */
0, /* refCon */
findDisksForText /* title ref */
}};
};
resource rTextForLETextBox2 (findDisksForText) {
"Find disks for:"
};
resource rControlTemplate (forIIGSRadio) {
forIIGSRadio,
{30,120,0,0},
RadioControl {{
$0002,
$1002,
0,
forIIGSRadio, /* Title ref */
1 /* initial value */
}};
};
resource rPString (forIIgsRadio) {"Apple IIGS"};
resource rControlTemplate (forAnyAppleIIRadio) {
forAnyAppleIIRadio,
{30,235,0,0},
RadioControl {{
$0002,
$1002,
0,
forAnyAppleIIRadio, /* Title ref */
0 /* initial value */
}};
};
resource rPString (forAnyAppleIIRadio) {"Any Apple II"};
resource rControlTemplate (disksList) {
disksList, /* control ID */
{45, 10, 147, 386}, /* control rect */
ListControl {{
$0000, /* flags */
$1400, /* more flags */
0, /* refcon */
0, /* list size */
10, /* List View */
$0003, /* List Type */
0, /* List Start */
10, /* ListMemHeight */
13, /* List Mem Size */
0, /* List Ref */
0 /* Color Ref */
}};
};
resource rControlTemplate (mountDiskButton) {
mountDiskButton,
{152, 305, 166, 410},
SimpleButtonControl {{
0,
$1000+RefIsResource,
0,
mountDiskButton,
0, /* color table ref */
{"\$0D","\$0D",0,0} /* key equivalent */
}};
};
resource rPString(mountDiskButton) { "Mount Disk" };
/*
* Error messages
*/
#define searchErrorAlert 3000
#define mountErrorAlert 3001
resource rAlertString (searchErrorAlert) {
"72/"
"There was an error when searching for disks.\n"
"\n"
"*0"
"/^#0\$00"
};
resource rAlertString (mountErrorAlert) {
"72/"
"There was an error when trying to mount a disk.\n"
"\n"
"*0"
"/^#0\$00"
};