home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / source / tarsrc.sit / tar.r < prev    next >
Text File  |  1989-09-14  |  12KB  |  664 lines
  1. resource 'MENU' (128, "Apple", preload) {
  2.     128,
  3.     textMenuProc,
  4.     0x7FFFFFFD,
  5.     enabled,
  6.     apple,
  7.     {    /* array: 2 elements */
  8.         /* [1] */
  9.         "About Tar...", noIcon, noKey, noMark, plain,
  10.         /* [2] */
  11.         "-", noIcon, noKey, noMark, plain
  12.     }
  13. };
  14.  
  15. resource 'MENU' (129, "File", preload) {
  16.     129,
  17.     textMenuProc,
  18.     0x7FFFFFB7,
  19.     enabled,
  20.     "File",
  21.     {    /* array: 8 elements */
  22.         /* [1] */
  23.         "Create...", noIcon, noKey, noMark, plain,
  24.         /* [2] */
  25.         "Extract...", noIcon, noKey, noMark, plain,
  26.         /* [3] */
  27.         "List...", noIcon, noKey, noMark, plain,
  28.         /* [4] */
  29.         "-", noIcon, noKey, noMark, plain,
  30.         /* [5] */
  31.         "Close", noIcon, noKey, noMark, plain,
  32.         /* [6] */
  33.         "Page Setup...", noIcon, noKey, noMark, plain,
  34.         /* [7] */
  35.         "-", noIcon, noKey, noMark, plain,
  36.         /* [8] */
  37.         "Quit", noIcon, noKey, noMark, plain
  38.     }
  39. };
  40.  
  41. resource 'MENU' (130, "Edit", preload) {
  42.     130,
  43.     textMenuProc,
  44.     0x7FFFFFFD,
  45.     enabled,
  46.     "Edit",
  47.     {    /* array: 6 elements */
  48.         /* [1] */
  49.         "Undo", noIcon, "Z", noMark, plain,
  50.         /* [2] */
  51.         "-", noIcon, noKey, noMark, plain,
  52.         /* [3] */
  53.         "Cut", noIcon, "X", noMark, plain,
  54.         /* [4] */
  55.         "Copy", noIcon, "C", noMark, plain,
  56.         /* [5] */
  57.         "Paste", noIcon, "V", noMark, plain,
  58.         /* [6] */
  59.         "Clear", noIcon, noKey, noMark, plain
  60.     }
  61. };
  62.  
  63. resource 'MENU' (131, "Options", preload) {
  64.     131,
  65.     textMenuProc,
  66.     0x7FFFFFB7,
  67.     enabled,
  68.     "Options",
  69.     {    /* array: 8 elements */
  70.         /* [1] */
  71.         "Convert Newlines", noIcon, noKey, noMark, plain,
  72.         /* [2] */
  73.         "Old Tar Compatible", noIcon, noKey, noMark, plain,
  74.         /* [3] */
  75.         "Block Size...", noIcon, noKey, noMark, plain,
  76.         /* [4] */
  77.         "-", noIcon, noKey, noMark, plain,
  78.         /* [5] */
  79.         "Page Screen Listings", noIcon, noKey, noMark, plain,
  80.         /* [6] */
  81.         "List to Printer", noIcon, noKey, noMark, plain,
  82.         /* [7] */
  83.         "-", noIcon, noKey, noMark, plain,
  84.         /* [8] */
  85.         "Set Creator/Type...", noIcon, noKey, noMark, plain
  86.     }
  87. };
  88.  
  89. resource 'DLOG' (128, "AboutTar", purgeable) {
  90.     {68, 112, 240, 380},
  91.     dBoxProc,
  92.     visible,
  93.     noGoAway,
  94.     0x0,
  95.     128,
  96.     ""
  97. };
  98.  
  99. resource 'DLOG' (130, "SelectDirectory", purgeable) {
  100.     {0, 0, 184, 304},
  101.     dBoxProc,
  102.     invisible,
  103.     noGoAway,
  104.     0x0,
  105.     130,
  106.     ""
  107. };
  108.  
  109. resource 'DLOG' (129, "BlockSize", purgeable) {
  110.     {44, 75, 144, 375},
  111.     dBoxProc,
  112.     visible,
  113.     noGoAway,
  114.     0x0,
  115.     129,
  116.     ""
  117. };
  118.  
  119. resource 'DLOG' (131, "Creator/Type", purgeable) {
  120.     {44, 75, 154, 375},
  121.     dBoxProc,
  122.     visible,
  123.     nogoAway,
  124.     0x0,
  125.     131,
  126.     ""
  127. };
  128.  
  129. resource 'DITL' (129, "BlockSize", purgeable) {
  130.     {    /* array DITLarray: 4 elements */
  131.         /* [1] */
  132.         {15, 200, 37, 260},
  133.         Button {
  134.             enabled,
  135.             "OK"
  136.         },
  137.         /* [2] */
  138.         {50, 200, 74, 260},
  139.         Button {
  140.             enabled,
  141.             "Cancel"
  142.         },
  143.         /* [3] */
  144.         {40, 80, 55, 121},
  145.         EditText {
  146.             enabled,
  147.             ""
  148.         },
  149.         /* [4] */
  150.         {15, 40, 35, 159},
  151.         StaticText {
  152.             enabled,
  153.             "Enter block size:"
  154.         }
  155.     }
  156. };
  157.  
  158. resource 'DITL' (192, "BadBlockAlert", purgeable) {
  159.     {    /* array DITLarray: 2 elements */
  160.         /* [1] */
  161.         {60, 124, 80, 184},
  162.         Button {
  163.             enabled,
  164.             "OK"
  165.         },
  166.         /* [2] */
  167.         {9, 67, 49, 256},
  168.         StaticText {
  169.             enabled,
  170.             "Block size must be between 1 and 128 inc"
  171.             "lusive!"
  172.         }
  173.     }
  174. };
  175.  
  176. resource 'DITL' (130, "SelectDirectory", purgeable) {
  177.     {    /* array DITLarray: 8 elements */
  178.         /* [1] */
  179.         {132, 218, 150, 288},
  180.         Button {
  181.             enabled,
  182.             "Select"
  183.         },
  184.         /* [2] */
  185.         {158, 218, 176, 288},
  186.         Button {
  187.             enabled,
  188.             "Cancel"
  189.         },
  190.         /* [3] */
  191.         {10, 15, 26, 198},
  192.         StaticText {
  193.             disabled,
  194.             "Select Directory"
  195.         },
  196.         /* [4] */
  197.         {29, 198, 49, 302},
  198.         UserItem {
  199.             disabled
  200.         },
  201.         /* [5] */
  202.         {56, 218, 74, 288},
  203.         Button {
  204.             enabled,
  205.             "Eject"
  206.         },
  207.         /* [6] */
  208.         {82, 218, 100, 288},
  209.         Button {
  210.             enabled,
  211.             "Drive"
  212.         },
  213.         /* [7] */
  214.         {0, 1500, 50, 1550},
  215.         EditText {
  216.             enabled,
  217.             ""
  218.         },
  219.         /* [8] */
  220.         {59, 14, 157, 197},
  221.         UserItem {
  222.             disabled
  223.         }
  224.     }
  225. };
  226.  
  227. resource 'DITL' (193, "OSAlert", purgeable) {
  228.     {    /* array DITLarray: 5 elements */
  229.         /* [1] */
  230.         {121, 126, 141, 186},
  231.         Button {
  232.             enabled,
  233.             "OK"
  234.         },
  235.         /* [2] */
  236.         {10, 65, 30, 315},
  237.         StaticText {
  238.             enabled,
  239.             "Routine: ^0"
  240.         },
  241.         /* [3] */
  242.         {35, 65, 55, 315},
  243.         StaticText {
  244.             enabled,
  245.             "OS Call: ^1"
  246.         },
  247.         /* [4] */
  248.         {60, 65, 80, 315},
  249.         StaticText {
  250.             enabled,
  251.             "^2"
  252.         },
  253.         /* [4] */
  254.         {85, 65, 110, 315},
  255.         StaticText {
  256.             enabled,
  257.             "OS Error: ^3"
  258.         }
  259.     }
  260. };
  261.  
  262. resource 'DITL' (194, "PgmAlert", purgeable) {
  263.     {    /* array DITLarray: 4 elements */
  264.         /* [1] */
  265.         {122, 123, 142, 183},
  266.         Button {
  267.             enabled,
  268.             "OK"
  269.         },
  270.         /* [2] */
  271.         {10, 65, 30, 315},
  272.         StaticText {
  273.             enabled,
  274.             "Routine: ^0"
  275.         },
  276.         /* [3] */
  277.         {35, 65, 70, 315},
  278.         StaticText {
  279.             enabled,
  280.             "^1"
  281.         },
  282.         /* [4] */
  283.         {75, 65, 95, 315},
  284.         StaticText {
  285.             enabled,
  286.             "^2"
  287.         }
  288.     }
  289. };
  290.  
  291. resource 'DITL' (195, "HFSAlert", purgeable) {
  292.     {    /* array DITLarray: 2 elements */
  293.         /* [1] */
  294.         {60, 124, 80, 184},
  295.         Button {
  296.             enabled,
  297.             "OK"
  298.         },
  299.         /* [2] */
  300.         {9, 92, 49, 221},
  301.         StaticText {
  302.             enabled,
  303.             "Tar only works with HFS volumes."
  304.         }
  305.     }
  306. };
  307.  
  308. resource 'DITL' (196, "SkipAlert", purgeable) {
  309.     {    /* array DITLarray: 2 elements */
  310.         /* [1] */
  311.         {63, 130, 83, 190},
  312.         Button {
  313.             enabled,
  314.             "OK"
  315.         },
  316.         /* [2] */
  317.         {9, 81, 56, 266},
  318.         StaticText {
  319.             enabled,
  320.             "Skipping archive file (it is within the "
  321.             "directory being archived)."
  322.         }
  323.     }
  324. };
  325.  
  326. resource 'DITL' (197, "StackAlert", purgeable) {
  327.     {    /* array DITLarray: 2 elements */
  328.         /* [1] */
  329.         {63, 130, 83, 190},
  330.         Button {
  331.             enabled,
  332.             "OK"
  333.         },
  334.         /* [2] */
  335.         {9, 81, 56, 266},
  336.         StaticText {
  337.             enabled,
  338.             "Overrun of stack in window print (can't "
  339.             "continue)!"
  340.         }
  341.     }
  342. };
  343.  
  344. resource 'DITL' (198, "DFAlert", purgeable) {
  345.     {    /* array DITLarray: 2 elements */
  346.         /* [1] */
  347.         {60, 124, 80, 184},
  348.         Button {
  349.             enabled,
  350.             "OK"
  351.         },
  352.         /* [2] */
  353.         {9, 92, 49, 221},
  354.         StaticText {
  355.             enabled,
  356.             "Archive file disk full!"
  357.         }
  358.     }
  359. };
  360.  
  361. resource 'DITL' (131, "Creator/Type", purgeable) {
  362.     {    /* array DITLarray: 6 elements */
  363.         /* [1] */
  364.         {78, 43, 98, 103},
  365.         Button {
  366.             enabled,
  367.             "OK"
  368.         },
  369.         /* [2] */
  370.         {79, 182, 99, 242},
  371.         Button {
  372.             enabled,
  373.             "Cancel"
  374.         },
  375.         /* [3] */
  376.         {13, 114, 33, 174},
  377.         EditText {
  378.             enabled,
  379.             ""
  380.         },
  381.         /* [4] */
  382.         {45, 114, 65, 174},
  383.         EditText {
  384.             enabled,
  385.             ""
  386.         },
  387.         /* [5] */
  388.         {13, 38, 33, 98},
  389.         StaticText {
  390.             enabled,
  391.             "Creator:"
  392.         },
  393.         /* [6] */
  394.         {44, 58, 65, 100},
  395.         StaticText {
  396.             enabled,
  397.             "Type:"
  398.         }
  399.     }
  400. };
  401.  
  402. resource 'DITL' (128, "AboutTar", purgeable) {
  403.     {    /* array DITLarray: 2 elements */
  404.         /* [1] */
  405.         {130, 74, 150, 134},
  406.         Button {
  407.             enabled,
  408.             "OK"
  409.         },
  410.         /* [2] */
  411.         {7, 7, 114, 254},
  412.         Picture {
  413.             enabled,
  414.             128
  415.         }
  416.     }
  417. };
  418.  
  419. resource 'ALRT' (129, "BadBlockSize", purgeable) {
  420.     {50, 65, 140, 385},
  421.     192,
  422.     {    /* array: 4 elements */
  423.         /* [1] */
  424.         OK, visible, silent,
  425.         /* [2] */
  426.         OK, visible, silent,
  427.         /* [3] */
  428.         OK, visible, silent,
  429.         /* [4] */
  430.         OK, visible, silent
  431.     }
  432. };
  433.  
  434. resource 'ALRT' (130, "OSAlert", purgeable) {
  435.     {50, 65, 200, 385},
  436.     193,
  437.     {    /* array: 4 elements */
  438.         /* [1] */
  439.         OK, visible, silent,
  440.         /* [2] */
  441.         OK, visible, silent,
  442.         /* [3] */
  443.         OK, visible, silent,
  444.         /* [4] */
  445.         OK, visible, silent
  446.     }
  447. };
  448.  
  449. resource 'ALRT' (131, "PgmAlert", purgeable) {
  450.     {50, 65, 200, 385},
  451.     194,
  452.     {    /* array: 4 elements */
  453.         /* [1] */
  454.         OK, visible, silent,
  455.         /* [2] */
  456.         OK, visible, silent,
  457.         /* [3] */
  458.         OK, visible, silent,
  459.         /* [4] */
  460.         OK, visible, silent
  461.     }
  462. };
  463.  
  464. resource 'ALRT' (132, "HFSAlert", purgeable) {
  465.     {50, 65, 140, 385},
  466.     195,
  467.     {    /* array: 4 elements */
  468.         /* [1] */
  469.         OK, visible, silent,
  470.         /* [2] */
  471.         OK, visible, silent,
  472.         /* [3] */
  473.         OK, visible, silent,
  474.         /* [4] */
  475.         OK, visible, silent
  476.     }
  477. };
  478.  
  479. resource 'ALRT' (133, "SkipAlert", purgeable) {
  480.     {50, 65, 140, 385},
  481.     196,
  482.     {    /* array: 4 elements */
  483.         /* [1] */
  484.         OK, visible, silent,
  485.         /* [2] */
  486.         OK, visible, silent,
  487.         /* [3] */
  488.         OK, visible, silent,
  489.         /* [4] */
  490.         OK, visible, silent
  491.     }
  492. };
  493.  
  494. resource 'ALRT' (134, "StackAlert", purgeable) {
  495.     {50, 65, 140, 385},
  496.     197,
  497.     {    /* array: 4 elements */
  498.         /* [1] */
  499.         OK, visible, silent,
  500.         /* [2] */
  501.         OK, visible, silent,
  502.         /* [3] */
  503.         OK, visible, silent,
  504.         /* [4] */
  505.         OK, visible, silent
  506.     }
  507. };
  508.  
  509. resource 'ALRT' (135, "DFAlert", purgeable) {
  510.     {50, 65, 140, 385},
  511.     198,
  512.     {    /* array: 4 elements */
  513.         /* [1] */
  514.         OK, visible, silent,
  515.         /* [2] */
  516.         OK, visible, silent,
  517.         /* [3] */
  518.         OK, visible, silent,
  519.         /* [4] */
  520.         OK, visible, silent
  521.     }
  522. };
  523.  
  524. resource 'WIND' (129, "ListingWindow") {
  525.     {40, 20, 320, 480},
  526.     dBoxProc,
  527.     visible,
  528.     noGoAway,
  529.     0x0,
  530.     ""
  531. };
  532.  
  533. resource 'ICN#' (128) {
  534.     {    /* array: 2 elements */
  535.         /* [1] */
  536.         $"3F FF FF FC 20 FF F0 04 20 F0 F0 F4 20 C0 30 F4"
  537.         $"20 80 10 04 20 86 10 04 20 8F 10 04 20 9F 90 04"
  538.         $"20 9F 90 04 20 8F 10 04 20 86 10 04 20 80 10 04"
  539.         $"20 C0 30 04 20 F0 F0 04 20 FF F0 04 20 80 10 04"
  540.         $"20 AC 10 04 20 FF F0 04 20 F0 F0 04 20 C0 30 04"
  541.         $"20 80 10 04 20 86 10 04 20 8F 10 04 20 9F 90 04"
  542.         $"20 9F 90 04 20 8F 10 04 20 86 10 04 20 80 10 04"
  543.         $"20 C0 30 04 20 F0 F0 04 20 FF F0 04 3F FF FF FC",
  544.         /* [2] */
  545.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  546.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  547.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  548.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  549.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  550.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  551.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  552.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  553.     }
  554. };
  555.  
  556. resource 'ICN#' (129) {
  557.     {    /* array: 2 elements */
  558.         /* [1] */
  559.         $"00 00 C0 00 00 00 30 00 00 0F FC 00 00 30 0F 00"
  560.         $"00 C7 E3 C0 01 1F F8 E0 02 7F FE 40 04 FF FF 20"
  561.         $"09 FF FF 90 0B FF FF D0 13 FF FF C8 17 F8 1F E8"
  562.         $"27 F3 CF E4 2F E4 27 F4 2F E8 17 F4 2F E8 17 F4"
  563.         $"2F E8 17 F4 2F E8 17 F4 2F E4 27 F4 27 F3 CF E4"
  564.         $"17 F8 1F E8 13 FF FF C8 0B FF FF D0 09 FF FF 90"
  565.         $"04 FF FF 20 02 7F FE 40 01 1F F8 80 00 C7 E3 00"
  566.         $"00 30 0C 00 00 0F F0",
  567.         /* [2] */
  568.         $"00 00 C0 00 00 00 30 00 00 0F FC 00 00 3F FF 00"
  569.         $"00 FF FF C0 01 FF FF E0 03 FF FF C0 07 FF FF E0"
  570.         $"0F FF FF F0 0F FF FF F0 1F FF FF F8 1F FF FF F8"
  571.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  572.         $"3F FF FF FC 3F FF FF FC 3F FF FF FC 3F FF FF FC"
  573.         $"1F FF FF F8 1F FF FF F8 0F FF FF F0 0F FF FF F0"
  574.         $"07 FF FF E0 03 FF FF C0 01 FF FF 80 00 FF FF 00"
  575.         $"00 3F FC 00 00 0F F0"
  576.     }
  577. };
  578.  
  579. resource 'FREF' (128) {
  580.     'APPL',
  581.     0,
  582.     ""
  583. };
  584.  
  585. resource 'FREF' (129) {
  586.     'TARF',
  587.     1,
  588.     ""
  589. };
  590.  
  591. resource 'BNDL' (128) {
  592.     'TAR ',
  593.     0,
  594.     {    /* array TypeArray: 2 elements */
  595.         /* [1] */
  596.         'ICN#',
  597.         {    /* array IDArray: 2 elements */
  598.             /* [1] */
  599.             0, 128,
  600.             /* [2] */
  601.             1, 129
  602.         },
  603.         /* [2] */
  604.         'FREF',
  605.         {    /* array IDArray: 2 elements */
  606.             /* [1] */
  607.             0, 128,
  608.             /* [2] */
  609.             1, 129
  610.         }
  611.     }
  612. };
  613.  
  614. type 'ftyp' {
  615.     string[8];
  616. };
  617.  
  618. resource 'ftyp' (0, purgeable) {
  619.     "MPS TEXT"
  620. };
  621.  
  622. data 'TAR ' (0) {
  623.     $"08 54 61 72 20 76 32 2E 30"                         /* .Tar v2.0 */
  624. };
  625.  
  626. resource 'PICT' (128, purgeable) {
  627.     474,
  628.     {7, 7, 114, 254},
  629.     $"11 01 A0 00 82 A1 00 96 00 06 05 00 00 00 02 98"
  630.     $"A1 00 9A 00 08 FF FC 00 00 00 45 00 00 A0 00 98"
  631.     $"01 00 0A 00 07 00 07 00 72 00 FE 03 00 02 0D 00"
  632.     $"0C 2B 0B 16 15 54 61 72 20 66 6F 72 20 74 68 65"
  633.     $"20 4D 61 63 69 6E 74 6F 73 68 A0 00 99 A0 00 97"
  634.     $"A1 00 96 00 06 05 00 00 00 02 98 A1 00 9A 00 08"
  635.     $"00 1A 00 00 00 78 00 00 A0 00 98 0D 00 0A 2A 1B"
  636.     $"22 57 72 69 74 74 65 6E 20 62 79 20 43 72 61 69"
  637.     $"67 20 52 75 66 66 20 77 69 74 68 20 65 78 63 65"
  638.     $"72 70 74 29 BF 07 73 20 66 72 6F 6D 0D A0 00 99"
  639.     $"A1 00 9A 00 08 00 0E 00 00 00 78 00 00 A0 00 98"
  640.     $"28 00 3D 00 0B 22 4A 6F 68 6E 20 47 69 6C 6D 6F"
  641.     $"72 65 27 73 20 70 75 62 6C 69 63 20 64 6F 6D 61"
  642.     $"69 6E 20 74 61 72 20 70 29 BF 08 72 6F 67 72 61"
  643.     $"6D 2E 0D A0 00 99 A1 00 9A 00 08 00 02 00 00 00"
  644.     $"78 00 00 A0 00 98 28 00 49 00 0B 01 0D A0 00 99"
  645.     $"A1 00 9A 00 08 FF F6 00 00 00 78 00 00 A0 00 98"
  646.     $"2A 0C 22 54 68 69 73 20 70 72 6F 67 72 61 6D 20"
  647.     $"69 73 20 70 75 62 6C 69 63 20 64 6F 6D 61 69 6E"
  648.     $"2E 20 20 4E 6F 29 BE 09 20 66 65 65 20 6D 61 79"
  649.     $"0D A0 00 99 A1 00 9A 00 08 FF EA 00 00 00 78 00"
  650.     $"00 A0 00 98 28 00 61 00 0B 22 62 65 20 63 68 61"
  651.     $"72 67 65 64 20 66 6F 72 20 61 20 63 6F 70 79 20"
  652.     $"6F 66 20 74 68 69 73 20 70 72 6F 67 29 BA 08 72"
  653.     $"61 6D 20 61 6E 64 0D A0 00 99 A1 00 9A 00 08 FF"
  654.     $"DE 00 00 00 78 00 00 A0 00 98 28 00 6D 00 0B 22"
  655.     $"64 69 73 74 72 69 62 75 74 69 6F 6E 20 6D 61 79"
  656.     $"20 6E 6F 74 20 62 65 20 72 65 73 74 72 69 63 74"
  657.     $"65 64 29 B8 01 2E A0 00 99 A0 00 97 A0 00 83 FF"
  658. };
  659.  
  660. resource 'vers' (1) {
  661.     0x02, 0x00, beta, 0x01, verUS,
  662.     "2.0",
  663.     "Macintosh Tar, v2.0"
  664. };