#include "types.rez" resource rVersion (1) { { 1,0,0,beta,3 }, verUS, "NetDisk", "By Stephen Heumann" }; resource rComment (1) { "The NetDisk control panel allows you to mount disk images " "hosted on HTTP servers.\n" "\n" "Copyright 2018 Stephen Heumann\n" "\n" "This program contains material from the ORCA/C Run-Time Libraries, " "copyright 1987-1996 by Byte Works, Inc. Used with permission." }; resource rCDEVFlags (1) { wantMachine+wantHit+wantClose+wantEdit+wantCreate, 1, /* enabled */ 1, /* version */ 1, /* min ROM version */ 0, /* reserved */ {0, 0, 71, 320}, /* rectangle */ "NetDisk", /* name */ "Stephen Heumann", /* author */ "v1.0b3" /* version string */ }; read rCDevCode (0x1,convert,locked) "cdev.obj"; resource rIcon (1) { 0x8000, /* color icon */ 20, /* dimensions */ 28, $"FFFFF000000000000000000FFFFF" $"FFFFF0F0FFFFFFFFFFFF0F0FFFFF" $"FFFFF0F0F33333F333FF0F0FFFFF" $"FFFFF0F0FFFFFFFFFFFF0F0FFFFF" $"FFFFF0F0F333F333333F0F0FFFFF" $"FFFFF0F0FFFFFFFFFFFF0F0FFFFF" $"FFFFF0F0FFFFFFFFFFFF0F0FFFFF" $"FFFFF0F00000000000000F0FFFFF" $"FFFFF0FFFFFFFFFFFFFFFF0FFFFF" $"FFFFF0FFFFCCCCCCCCFFFF0FFFFF" $"FFFFF0FFFFCCFCCCCCFFFF0FFFFF" $"FFFFFF0FFFCCFCCCCCFFFF0FFFFF" $"FFFFFFF0000000000000000FFFFF" $"FFFFFFFFFFFFF0F0FFFFFFFFFFFF" $"FFFFFFFFFFFF00000FFFFFFFFFFF" $"FFFFFFFFFFFF0FFF0FFFFFFFFFFF" $"FFFFFFFFFFFF00000FFFFFFFFFFF" $"F0F00000000000F0000000000F0F" $"FFFFFFFFFFFFFF0FFFFFFFFFFFFF" $"F0F00000000000F0000000000F0F", $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"00000FFFFFFFFFFFFFFFFFF00000" $"000000FFFFFFFFFFFFFFFFF00000" $"0000000FFFFFFFFFFFFFFFF00000" $"0000000000000FFF000000000000" $"000000000000FFFFF00000000000" $"000000000000FFFFF00000000000" $"000000000000FFFFF00000000000" $"0F0FFFFFFFFFFFFFFFFFFFFFF0F0" $"0F0FFFFFFFFFFFFFFFFFFFFFF0F0" $"0F0FFFFFFFFFFF0FFFFFFFFFF0F0" }; #define cdevWindow 1000 #define helpWindow 2000 #define imageURLTxt 2 #define urlLine 3 #define mountBtn 1 //#define optionsPopUp 6 //#define trianglePic 7 #define useCacheChk 8 #define helpTxt 5 #define imageFormatMenu 300 #define formatAutoDetectItem 301 #define format2mgItem 302 #define formatRawItem 303 #define formatDOSOrderItem 304 #define formatDiskCopy42Item 305 /* * Controls in the control panel window (for 640 mode or 320 mode) */ resource rControlList (640) { { cdevWindow+imageURLTxt, cdevWindow+urlLine, cdevWindow+useCacheChk, cdevWindow+mountBtn, cdevWindow+imageFormatMenu }; }; resource rControlList (320) { { cdevWindow+imageURLTxt, cdevWindow+urlLine, cdevWindow+useCacheChk, cdevWindow+mountBtn, cdevWindow+imageFormatMenu }; }; resource rControlTemplate (cdevWindow+imageURLTxt) { imageURLTxt, /* control ID */ {4, 9, 15, 270}, /* control rect */ statTextControl {{ fBlastText, /* flags */ $1000+RefIsResource, /* moreFlags */ 0, /* refCon */ cdevWindow+imageURLTxt /* title ref */ }}; }; resource rTextForLETextBox2 (cdevWindow+imageURLTxt) { "Disk Image URL:" }; resource rControlTemplate (cdevWindow+urlLine) { urlLine, {15, 10, 28, 310}, editLineControl {{ 0, $7000+RefIsResource, 0, 255, /* max size */ cdevWindow+urlLine /* text ref */ }}; }; resource rPString (cdevWindow+urlLine) { "http://" }; resource rControlTemplate (cdevWindow+mountBtn) { mountBtn, {50, 156, 0, 0}, SimpleButtonControl {{ DefaultButton, $3000+RefIsResource, 0, cdevWindow+mountBtn, 0, /* color table ref */ {"\$0D","\$0D",0,0} /* key equivalent = Return */ }}; }; resource rPString(cdevWindow+mountBtn) { "Mount Disk Image" }; resource rControlTemplate (cdevWindow+useCacheChk) { useCacheChk, {52,10,0,0}, CheckControl {{ $0000, $1002, 0, cdevWindow+useCacheChk, /* Title ref */ 1 /* initial value */ }}; }; resource rPString (cdevWindow+useCacheChk) {"Use Disk Cache"}; /* Disk image format pop-up menu */ resource rControlTemplate (cdevWindow+imageFormatMenu) { imageFormatMenu, {31, 9, 43, 277}, PopUpControl {{ 0, fCtlProcNotPtr+RefIsResource+fDrawPopDownIcon, 0, 0, /* title width */ imageFormatMenu, /* menu ref */ formatAutoDetectItem, /* initial value */ 0 }}; }; resource rMenu (imageFormatMenu) { imageFormatMenu, /* menu ID */ refIsResource*menuTitleRefShift + refIsResource*itemRefShift, imageFormatMenu, /* menu title ref (not drawn) */ { formatAutoDetectItem, format2mgItem, formatRawItem, formatDOSOrderItem, formatDiskCopy42Item, }; }; resource rPString(imageFormatMenu,noCrossBank) { "Format: " }; resource rMenuItem (formatAutoDetectItem) { formatAutoDetectItem, /* menu item ID */ "","", 0, refIsResource*itemTitleRefShift, formatAutoDetectItem /* menu item title ref */ }; resource rPString(formatAutoDetectItem,noCrossBank) { "Auto-Detect" }; resource rMenuItem (format2mgItem) { format2mgItem, /* menu item ID */ "","", 0, refIsResource*itemTitleRefShift, format2mgItem /* menu item title ref */ }; resource rPString(format2mgItem,noCrossBank) { "Universal Disk Image (2MG)" }; resource rMenuItem (formatRawItem) { formatRawItem, /* menu item ID */ "","", 0, refIsResource*itemTitleRefShift, formatRawItem /* menu item title ref */ }; resource rPString(formatRawItem,noCrossBank) { "ProDOS Order/Raw/ISO" }; resource rMenuItem (formatDOSOrderItem) { formatDOSOrderItem, /* menu item ID */ "","", 0, refIsResource*itemTitleRefShift, formatDOSOrderItem /* menu item title ref */ }; resource rPString(formatDOSOrderItem,noCrossBank) { "DOS Order" }; resource rMenuItem (formatDiskCopy42Item) { formatDiskCopy42Item, /* menu item ID */ "","", 0, refIsResource*itemTitleRefShift, formatDiskCopy42Item /* menu item title ref */ }; resource rPString(formatDiskCopy42Item,noCrossBank) { "DiskCopy 4.2" }; /* * Controls in the help window */ resource rControlList (2) { { helpWindow+helpTxt }; }; resource rControlTemplate (helpWindow+helpTxt) { helpTxt, {38, 5, 138, 280}, statTextControl {{ 0, /* flags */ $1000+RefIsResource, /* moreFlags */ 0, /* refCon */ helpWindow+helpTxt /* title ref */ }}; }; resource rTextForLETextBox2 (helpWindow+helpTxt) { "The NetDisk control panel allows you to mount disk images " "hosted on HTTP servers.\n" }; /* * Error messages */ #define netDiskMissingError 3000 #define mountURLError 3001 #define unsupportedProtocolAlert 3002 #define marinettiMissingError 3003 resource rAlertString (netDiskMissingError) { "62/" "To use this control panel, you must have NetDiskInit installed " "in the System:System.Setup folder on the boot disk." "/^#0\$00" }; resource rAlertString (marinettiMissingError) { "62/" "Marinetti is not available. You must install Marinetti to use NetDisk." "/^#0\$00" }; resource rAlertString (mountURLError) { "32:" "MountURL error *0." ":^#0\$00" }; resource rAlertString (unsupportedProtocolAlert) { "64:" "NetDisk does not support the *0 protocol. Do you want to try " "connecting using unencrypted HTTP instead? (The server may " "or may not support this.)" ":#3:^#2\$00" };