/ Garbo
/ Garbo.cdr / mac / source / menustuf.sit / SetMenu.p.bin ![]() | < prev | next > |
MacBinary | 1990-04-16 | 1.6 KB | [TEXT/MPS ] |
Confidence | Program | Detection | Match Type | Support |
---|---|---|---|---|
66% | dexvert | AMOS Picture Packer (image/amosPicturePacker) | ext | Supported |
1% | dexvert | Debian floppy split (archive/debianFloppySplit) | ext | Unsupported |
1% | dexvert | Sound Images sound sample (audio/soundImagesSoundSample) | ext | Unsupported |
1% | dexvert | DESI-III drawing (image/desiIIIDrawing) | ext | Unsupported |
1% | dexvert | MS-DOS PMODE extender executable (executable/msdosPMODEExtenderExecutable) | ext | Unsupported |
1% | dexvert | Alien Trilogytextures (other/alienTrilogyTextures) | ext | Unsupported |
1% | dexvert | APT cache data (other/aptCacheData) | ext | Unsupported |
1% | dexvert | CorelTRACE configuration (other/corelTRACEConfiguration) | ext | Unsupported |
1% | dexvert | Dreamcast Disc (other/dreamcastDisc) | ext | Unsupported |
1% | dexvert | EST flat binary (other/estFlatBinary) | ext | Unsupported |
1% | dexvert | Finale Enigma Binary Format (other/finaleEnigmaBinaryFormat) | ext | Unsupported |
1% | dexvert | Sega Genesis/Megadrive/32x ROM (other/genesisROM) | ext | Unsupported |
1% | dexvert | Myth: The Fallen Lords game archive (other/mythTheFallenLordsGameArchive) | ext | Unsupported |
1% | dexvert | Sound Images Sound Driver (other/soundImagesSoundDriver) | ext | Unsupported |
1% | dexvert | Symantec/Norton Config (other/symantecNortonConfig) | ext | Unsupported |
1% | dexvert | Vectrex ROM (other/vectrexROM) | ext | Unsupported |
1% | dexvert | BIS raP encoded format (other/bisraPEncoded) | ext | Unsupported |
1% | dexvert | Pascal Script binary (other/pascalScriptBinary) | ext | Unsupported |
1% | dexvert | 7th Level game data archive (other/seventhLevelGameDataArchive) | ext | Unsupported |
1% | dexvert | MacBinary (archive/macBinary) | fallback | Supported |
1% | dexvert | Text File (text/txt) | fallback | Supported |
100% | file | MacBinary, Sat Oct 29 11:29:38 1988, modified Mon Feb 19 04:48:17 1990, creator 'MPS ', type ASCII, 1030 bytes "SetMenu.p" , at 0x486 382 bytes resource | default (weak) | |
99% | file | data | default | |
74% | TrID | Macintosh plain text (MacBinary) | default | |
25% | TrID | MacBinary 1 | default (weak) | |
100% | lsar | MacBinary | default | |
100% | gt2 | MAC Bilddatei | default (weak) |
id metadata | |
---|---|
key | value |
macFileType | [TEXT] |
macFileCreator | [MPS ] |
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 53 65 74 4d 65 6e | 75 2e 70 00 00 00 00 00 |..SetMen|u.p.....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 04 06 00 | 00 01 7e 9f 8f 94 62 a2 |........|..~...b.|
|00000060| 05 71 61 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.qa.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 50 72 6f 67 72 61 6d 20 | 53 65 74 4d 65 6e 75 3b |Program |SetMenu;|
|00000090| 0d 7b 0d 09 54 68 69 73 | 20 70 72 6f 67 72 61 6d |.{..This| program|
|000000a0| 20 69 73 20 61 6e 20 4d | 50 57 20 74 6f 6f 6c 20 | is an M|PW tool |
|000000b0| 77 68 69 63 68 20 63 68 | 61 6e 67 65 73 20 74 68 |which ch|anges th|
|000000c0| 65 20 74 65 78 74 20 66 | 6f 72 20 61 20 73 70 65 |e text f|or a spe|
|000000d0| 63 69 66 69 65 64 0d 09 | 6d 65 6e 75 20 69 74 65 |cified..|menu ite|
|000000e0| 6d 2e 20 43 61 6c 6c 20 | 69 74 20 66 72 6f 6d 20 |m. Call |it from |
|000000f0| 74 68 65 20 4d 50 57 20 | 53 68 65 6c 6c 20 61 73 |the MPW |Shell as|
|00000100| 20 66 6f 6c 6c 6f 77 73 | 3a 0d 0d 09 09 53 65 74 | follows|:....Set|
|00000110| 4d 65 6e 75 20 6d 65 6e | 75 4e 61 6d 65 20 69 74 |Menu men|uName it|
|00000120| 65 6d 4e 6f 20 69 74 65 | 6d 54 65 78 74 0d 0d 09 |emNo ite|mText...|
|00000130| 77 68 65 72 65 20 6d 65 | 6e 75 4e 61 6d 65 20 69 |where me|nuName i|
|00000140| 73 20 74 68 65 20 6e 61 | 6d 65 20 6f 66 20 74 68 |s the na|me of th|
|00000150| 65 20 6d 65 6e 75 20 74 | 6f 20 62 65 20 61 6c 74 |e menu t|o be alt|
|00000160| 65 72 65 64 2c 20 69 74 | 65 6d 4e 6f 20 69 73 20 |ered, it|emNo is |
|00000170| 74 68 65 0d 09 6e 75 6d | 62 65 72 20 6f 66 20 74 |the..num|ber of t|
|00000180| 68 65 20 6d 65 6e 75 20 | 69 74 65 6d 2c 20 61 6e |he menu |item, an|
|00000190| 64 20 69 74 65 6d 54 65 | 78 74 20 69 73 20 74 68 |d itemTe|xt is th|
|000001a0| 65 20 6e 65 77 20 69 74 | 65 6d 20 74 65 78 74 2e |e new it|em text.|
|000001b0| 0d 0d 09 57 72 69 74 74 | 65 6e 20 62 79 20 4c 44 |...Writt|en by LD|
|000001c0| 4f 20 31 39 38 38 20 4f | 63 74 6f 62 65 72 20 32 |O 1988 O|ctober 2|
|000001d0| 39 2e 0d 09 4d 6f 64 69 | 66 69 65 64 20 31 39 38 |9...Modi|fied 198|
|000001e0| 39 20 4a 61 6e 75 61 72 | 79 20 34 20 74 6f 20 69 |9 Januar|y 4 to i|
|000001f0| 6e 69 74 69 61 6c 69 73 | 65 20 51 75 69 63 6b 44 |nitialis|e QuickD|
|00000200| 72 61 77 20 28 6a 75 73 | 74 20 69 6e 20 63 61 73 |raw (jus|t in cas|
|00000210| 65 29 20 61 6e 64 0d 09 | 6d 6f 76 65 20 75 73 65 |e) and..|move use|
|00000220| 66 75 6c 20 73 74 75 66 | 66 20 74 6f 20 4d 65 6e |ful stuf|f to Men|
|00000230| 75 53 74 75 66 66 43 6f | 6d 6d 6f 6e 20 66 6f 72 |uStuffCo|mmon for|
|00000240| 20 75 73 65 20 62 79 20 | 74 68 65 20 6f 74 68 65 | use by |the othe|
|00000250| 72 20 74 6f 6f 6c 73 20 | 69 6e 20 74 68 69 73 20 |r tools |in this |
|00000260| 73 65 74 2e 0d 7d 0d 0d | 09 55 73 65 73 0d 09 09 |set..}..|.Uses...|
|00000270| 4d 65 6d 54 79 70 65 73 | 2c 0d 09 09 51 75 69 63 |MemTypes|,...Quic|
|00000280| 6b 44 72 61 77 2c 0d 09 | 09 4f 53 49 6e 74 66 2c |kDraw,..|.OSIntf,|
|00000290| 0d 09 09 54 6f 6f 6c 49 | 6e 74 66 2c 0d 09 09 50 |...ToolI|ntf,...P|
|000002a0| 61 63 6b 49 6e 74 66 2c | 0d 09 09 49 6e 74 45 6e |ackIntf,|...IntEn|
|000002b0| 76 2c 0d 09 09 4d 65 6e | 75 53 74 75 66 66 43 6f |v,...Men|uStuffCo|
|000002c0| 6d 6d 6f 6e 3b 0d 0d 09 | 56 61 72 0d 09 09 54 68 |mmon;...|Var...Th|
|000002d0| 65 4d 65 6e 75 20 3a 20 | 4d 65 6e 75 48 61 6e 64 |eMenu : |MenuHand|
|000002e0| 6c 65 3b 0d 0d 20 20 42 | 65 67 69 6e 0d 09 49 6e |le;.. B|egin..In|
|000002f0| 69 74 47 72 61 66 28 40 | 54 68 65 50 6f 72 74 29 |itGraf(@|ThePort)|
|00000300| 3b 0d 09 49 66 20 41 72 | 67 43 20 3e 20 33 20 74 |;..If Ar|gC > 3 t|
|00000310| 68 65 6e 0d 09 20 20 42 | 65 67 69 6e 0d 09 09 54 |hen.. B|egin...T|
|00000320| 68 65 4d 65 6e 75 20 3a | 3d 20 46 69 6e 64 4d 65 |heMenu :|= FindMe|
|00000330| 6e 75 28 41 72 67 56 5e | 5b 31 5d 5e 29 3b 0d 09 |nu(ArgV^|[1]^);..|
|00000340| 09 49 66 20 54 68 65 4d | 65 6e 75 20 3c 3e 20 4e |.If TheM|enu <> N|
|00000350| 69 6c 20 74 68 65 6e 0d | 09 09 09 53 65 74 49 74 |il then.|...SetIt|
|00000360| 65 6d 28 54 68 65 4d 65 | 6e 75 2c 20 53 74 72 69 |em(TheMe|nu, Stri|
|00000370| 6e 67 54 6f 4e 75 6d 28 | 41 72 67 56 5e 5b 32 5d |ngToNum(|ArgV^[2]|
|00000380| 5e 29 2c 20 41 72 67 56 | 5e 5b 33 5d 5e 29 0d 09 |^), ArgV|^[3]^)..|
|00000390| 09 65 6c 73 65 0d 09 09 | 20 20 42 65 67 69 6e 0d |.else...| Begin.|
|000003a0| 09 09 09 57 72 69 74 65 | 6c 6e 28 44 69 61 67 6e |...Write|ln(Diagn|
|000003b0| 6f 73 74 69 63 2c 20 27 | 23 23 23 20 27 2c 20 41 |ostic, '|### ', A|
|000003c0| 72 67 56 5e 5b 30 5d 5e | 2c 20 27 20 2d 20 6d 65 |rgV^[0]^|, ' - me|
|000003d0| 6e 75 20 22 27 2c 20 41 | 72 67 56 5e 5b 31 5d 5e |nu "', A|rgV^[1]^|
|000003e0| 2c 20 27 22 20 6e 6f 74 | 20 66 6f 75 6e 64 27 29 |, '" not| found')|
|000003f0| 3b 0d 09 09 09 49 45 45 | 78 69 74 28 32 29 0d 09 |;....IEE|xit(2)..|
|00000400| 09 20 20 45 6e 64 0d 09 | 20 20 45 6e 64 0d 09 65 |. End..| End..e|
|00000410| 6c 73 65 0d 09 20 20 42 | 65 67 69 6e 0d 09 09 57 |lse.. B|egin...W|
|00000420| 72 69 74 65 6c 6e 28 44 | 69 61 67 6e 6f 73 74 69 |riteln(D|iagnosti|
|00000430| 63 2c 20 27 23 23 23 20 | 27 2c 20 41 72 67 56 5e |c, '### |', ArgV^|
|00000440| 5b 30 5d 5e 2c 20 27 20 | 2d 20 6e 6f 74 20 65 6e |[0]^, ' |- not en|
|00000450| 6f 75 67 68 20 61 72 67 | 75 6d 65 6e 74 73 27 29 |ough arg|uments')|
|00000460| 3b 0d 09 09 49 45 45 78 | 69 74 28 31 29 0d 09 20 |;...IEEx|it(1).. |
|00000470| 20 45 6e 64 0d 20 20 45 | 6e 64 20 7b 53 65 74 4d | End. E|nd {SetM|
|00000480| 65 6e 75 7d 2e 0d 00 00 | 00 00 00 00 00 00 00 00 |enu}....|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00000510| 0d 0d 20 20 20 20 55 73 | 65 73 0d 09 4d 65 6d 54 |.. Us|es..MemT|
|00000520| 79 70 65 73 2c 0d 09 51 | 75 69 63 6b 44 72 61 77 |ypes,..Q|uickDraw|
|00000530| 09 53 65 74 4d 65 6e 75 | 2e 70 02 00 00 00 00 00 |.SetMenu|.p......|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 a2 46 60 8e 00 00 | 00 00 00 00 01 7e 64 20 |...F`...|.....~d |
|00000580| 7b 53 65 74 4d 65 6e 75 | 7d 2e 0d 6f 78 28 4d 79 |{SetMenu|}..ox(My|
|00000590| 53 74 6f 72 61 67 65 29 | 3b 0d 09 09 53 65 74 53 |Storage)|;...SetS|
|000005a0| 65 6c 65 63 74 28 4d 79 | 53 74 6f 72 61 67 65 2c |elect(My|Storage,|
|000005b0| 20 30 29 3b 0d 09 09 4d | 79 57 69 6e 64 6f 77 5e | 0);...M|yWindow^|
|000005c0| 2e 57 69 6e 64 6f 77 4b | 69 6e 64 20 3a 3d 20 4d |.WindowK|ind := M|
|000005d0| 79 44 43 45 2e 44 43 74 | 6c 52 65 66 4e 75 6d 3b |yDCE.DCt|lRefNum;|
|000005e0| 0d 09 09 53 68 6f 77 57 | 69 6e 64 6f 77 28 57 69 |...ShowW|indow(Wi|
|000005f0| 6e 64 6f 77 50 74 72 28 | 4d 79 57 69 6e 64 6f 77 |ndowPtr(|MyWindow|
|00000600| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 49 6e 74 |...H..Mo|naco.Int|
|00000610| 66 2c 0d 09 54 6f 6f 6c | 49 6e 74 66 2c 0d 09 50 |f,..Tool|Intf,..P|
|00000620| 61 63 6b 49 6e 74 00 06 | 00 04 00 6b 00 0c 01 d5 |ackInt..|...k....|
|00000630| 02 50 00 6b 00 0c 01 d5 | 02 50 a2 05 71 61 00 00 |.P.k....|.P..qa..|
|00000640| 03 0f 00 00 03 0f 00 00 | 01 97 01 00 00 00 01 00 |........|........|
|00000650| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 37 54 08 |...L...L|...2.7T.|
|00000660| 05 e2 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00000670| 00 0a 03 ed ff ff 00 00 | 00 00 00 38 8b a4 00 00 |........|...8....|
+--------+-------------------------+-------------------------+--------+--------+