mirror of
https://github.com/marketideas/qasm.git
synced 2026-10-25 13:02:45 +00:00
Move the assembler to src/qasm. qlink links OMF 1.0 and 2.0 from a script. makeBin flattens a load file, qomf dumps OMF, and qpro builds ProDOS volumes. APW and MPW assemble through the ORCA front end. Relocatable modules emit OMF objects. Listings stay off unless -l is set. make boot assembles the GS/OS 6.0.1 ProDOS 8 kernel and BASIC.SYSTEM into an 800K volume. BASIC.SYSTEM accepts ls and pfx, and its splash reports PRODOS BASIC 2.0, copyright 1983-2026. IIGS.601.SRC is the source and the BASIC.SYSTEM oracle that image is built from.
1 line
3.6 KiB
Plaintext
1 line
3.6 KiB
Plaintext
//
|
|
// FindFile.rez
|
|
//
|
|
// Copyright Apple Computer, Inc 1990-1993
|
|
// All Rights Reserved
|
|
//
|
|
// by Jim Mensch, Harry Yee, Dave Lyons
|
|
//
|
|
|
|
#include "TypesIIgs.r"
|
|
|
|
resource rVersion(1) {
|
|
{ 1, 1, 0, release, $00 },
|
|
verUS,
|
|
"Find File",
|
|
"Copyright 1990-93 Apple Computer, Inc."
|
|
};
|
|
|
|
resource rWindParam1 (640) { // 640-mode window
|
|
fTitle+fClose+fMove+fVis,
|
|
0,
|
|
0,
|
|
{0,0,0,0},
|
|
0x07ff0001, // window color table resource (lined)
|
|
{0,0},
|
|
{0,0},
|
|
{0,0},
|
|
{0,0},
|
|
{0,0},
|
|
0,
|
|
0,
|
|
{30,10,180,330},
|
|
inFront,
|
|
640,
|
|
0x0809 };
|
|
|
|
resource rWindParam1 (320) { // 320-mode window
|
|
fTitle+fClose+fMove+fVis,
|
|
0,
|
|
0,
|
|
{0,0,0,0},
|
|
0x07ff0001, // window color table resource (lined)
|
|
{0,0}, // origin
|
|
{0,0}, // DataHeight
|
|
{0,0}, // MaxHeight
|
|
{0,0}, // Scroll
|
|
{0,0}, // Page
|
|
0, // InfoText
|
|
0, // InfoHeight
|
|
{26,1,176,320}, // position
|
|
inFront,
|
|
320,
|
|
0x0809 };
|
|
|
|
resource rControlList (640) {
|
|
{ 1001,
|
|
1002,
|
|
1006,
|
|
1007,
|
|
1008,
|
|
1009 + 640,
|
|
1015 + 640
|
|
};
|
|
};
|
|
|
|
resource rControlList (320) {
|
|
{ 1001,
|
|
1002,
|
|
1006,
|
|
1007,
|
|
1008,
|
|
1009 + 320,
|
|
1015 + 320
|
|
};
|
|
};
|
|
|
|
// Find File button
|
|
resource rControlTemplate (1001) {
|
|
1001,
|
|
{5,230,20,310},
|
|
SimpleButtonControl{
|
|
{
|
|
1,
|
|
2+FctlProcNotPtr,
|
|
0,
|
|
1001}
|
|
};
|
|
};
|
|
|
|
// Stop button
|
|
resource rControlTemplate (1002) {
|
|
1002,
|
|
{5,230,20,310},
|
|
SimpleButtonControl{
|
|
{
|
|
0,
|
|
2+FctlProcNotPtr+fCtlWantsEvents,
|
|
0,
|
|
1002,
|
|
0, // color table
|
|
{"\0x1b", "\0x1b", 0, 0}
|
|
}
|
|
};
|
|
};
|
|
|
|
// search-how pop-up
|
|
resource rControlTemplate (1006) {
|
|
1006,
|
|
{30,208-24,0,0},
|
|
popUpControl{
|
|
{ 0x0030,
|
|
2+FctlProcNotPtr+$0080/*drawArrowIcon*/,
|
|
0,
|
|
0,
|
|
1006,
|
|
1604}
|
|
};
|
|
};
|
|
|
|
|
|
// Files-to-search-for string
|
|
resource rControlTemplate (1007) {
|
|
1007,
|
|
{20+1,10,30,150},
|
|
statTextControl{
|
|
{ 0,
|
|
2+FctlProcNotPtr,
|
|
0,
|
|
1007,
|
|
19}
|
|
};
|
|
};
|
|
|
|
// File to search for edit-line control
|
|
resource rControlTemplate (1008) {
|
|
1008,
|
|
{30,10,45,200-24},
|
|
editLineControl{
|
|
{
|
|
0,
|
|
FctlProcNotPtr+FctlWantsEvents+FctlCanBeTarget+RefIsResource,
|
|
0,
|
|
31,
|
|
1108}
|
|
};
|
|
};
|
|
|
|
// Files-found list
|
|
resource rControlTemplate (1009 + 640) {
|
|
1009 + 640,
|
|
{48,-1,98,298},
|
|
listControl{
|
|
{ 0,
|
|
FctlProcNotPtr+FctlIsMultiPart,
|
|
0,
|
|
0,
|
|
0,
|
|
2,
|
|
1,
|
|
10,
|
|
20,
|
|
0}
|
|
};
|
|
};
|
|
|
|
resource rControlTemplate (1009 + 320) {
|
|
1009 + 320,
|
|
{48,-1,98,304},
|
|
listControl{
|
|
{ 0,
|
|
FctlProcNotPtr+FctlIsMultiPart,
|
|
0,
|
|
0,
|
|
0,
|
|
2,
|
|
1,
|
|
10,
|
|
20,
|
|
0}
|
|
};
|
|
};
|
|
|
|
// Path-to-a-found-file list
|
|
resource rControlTemplate (1015 + 640) {
|
|
1015 + 640,
|
|
{99,-1,149,298},
|
|
listControl{
|
|
{ 0x0080+0x0040 /* testMemNever */,
|
|
FctlProcNotPtr+FctlIsMultiPart,
|
|
0,
|
|
0,
|
|
0,
|
|
2,
|
|
1,
|
|
10,
|
|
20,
|
|
0}
|
|
};
|
|
};
|
|
|
|
resource rControlTemplate (1015 + 320) {
|
|
1015 + 320,
|
|
{99,-1,149,304},
|
|
listControl{
|
|
{ 0x0080+0x0040 /* testMemNever */,
|
|
FctlProcNotPtr+FctlIsMultiPart,
|
|
0,
|
|
0,
|
|
0,
|
|
2,
|
|
1,
|
|
10,
|
|
20,
|
|
0}
|
|
};
|
|
};
|
|
|
|
resource rMenu (1006) {
|
|
1006,
|
|
0xA000,
|
|
1006,
|
|
{ 1604,
|
|
1601,
|
|
1602,
|
|
1603}
|
|
};
|
|
|
|
resource rMenuItem (1601) {
|
|
1601,
|
|
"","",
|
|
0,
|
|
0x8000,
|
|
1003};
|
|
|
|
resource rMenuItem (1602) {
|
|
1602,
|
|
"","",
|
|
0,
|
|
0x8000,
|
|
1004};
|
|
|
|
resource rMenuItem (1603) {
|
|
1603,
|
|
"","",
|
|
0,
|
|
0x8000,
|
|
1005};
|
|
|
|
resource rMenuItem (1604) {
|
|
1604,
|
|
"","",
|
|
0,
|
|
0x8000,
|
|
1006};
|
|
|
|
resource rMenuItem (1605) {
|
|
1605,
|
|
"","",
|
|
0,
|
|
0x8000,
|
|
1007};
|
|
|
|
|
|
resource rPString (1) { "FindFile" };
|
|
resource rPString (1001) { "Find File" };
|
|
resource rPString (1002) { "Stop" };
|
|
resource rPString (1003) { "Matches" };
|
|
resource rPString (1004) { "Starts With" };
|
|
resource rPString (1005) { "Ends With" };
|
|
resource rPString (1006) { "Contains" };
|
|
|
|
|
|
resource rTextForLETextBox2 (1007) { "File to search for:" };
|
|
resource rPString (1108) { "" };
|