home *** CD-ROM | disk | FTP | other *** search
| MacBinary | 1989-09-13 | 2.9 KB | [TEXT/KAHL] |
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
| 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, Mon Aug 22 12:23:06 1988, modified Wed Sep 7 18:06:02 1988, creator Think C, type ASCII, 2788 bytes "utility.c"
| 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 | [KAHL] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 75 74 69 6c 69 74 | 79 2e 63 00 00 00 00 00 |..utilit|y.c.....|
|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 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 0a e4 00 | 00 00 00 9f 35 fa ea 9f |........|....5...|
|00000060| 4b 63 4a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |KcJ.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 23 69 6e 63 6c 75 64 65 | 20 3c 4d 61 63 54 79 70 |#include| <MacTyp|
|00000090| 65 73 2e 68 3e 0d 23 69 | 6e 63 6c 75 64 65 20 3c |es.h>.#i|nclude <|
|000000a0| 51 75 69 63 6b 44 72 61 | 77 2e 68 3e 0d 23 69 6e |QuickDra|w.h>.#in|
|000000b0| 63 6c 75 64 65 20 3c 57 | 69 6e 64 6f 77 4d 67 72 |clude <W|indowMgr|
|000000c0| 2e 68 3e 0d 23 69 6e 63 | 6c 75 64 65 20 3c 43 6f |.h>.#inc|lude <Co|
|000000d0| 6e 74 72 6f 6c 4d 67 72 | 2e 68 3e 0d 23 69 6e 63 |ntrolMgr|.h>.#inc|
|000000e0| 6c 75 64 65 20 3c 44 69 | 61 6c 6f 67 4d 67 72 2e |lude <Di|alogMgr.|
|000000f0| 68 3e 0d 23 69 6e 63 6c | 75 64 65 20 3c 45 76 65 |h>.#incl|ude <Eve|
|00000100| 6e 74 4d 67 72 2e 68 3e | 0d 23 69 6e 63 6c 75 64 |ntMgr.h>|.#includ|
|00000110| 65 20 3c 54 6f 6f 6c 62 | 6f 78 55 74 69 6c 2e 68 |e <Toolb|oxUtil.h|
|00000120| 3e 0d 0d 23 69 6e 63 6c | 75 64 65 20 22 66 69 78 |>..#incl|ude "fix|
|00000130| 2e 68 22 0d 0d 23 64 65 | 66 69 6e 65 09 57 41 54 |.h"..#de|fine.WAT|
|00000140| 43 48 5f 43 55 52 53 4f | 52 20 34 0d 0d 09 2f 2a |CH_CURSO|R 4.../*|
|00000150| 20 47 65 74 20 61 6e 20 | 69 74 65 6d 20 68 61 6e | Get an |item han|
|00000160| 64 6c 65 20 66 72 6f 6d | 20 61 20 64 69 61 6c 6f |dle from| a dialo|
|00000170| 67 2e 20 2a 2f 0d 0d 48 | 61 6e 64 6c 65 20 67 65 |g. */..H|andle ge|
|00000180| 74 5f 69 74 65 6d 28 74 | 68 65 5f 64 69 61 6c 6f |t_item(t|he_dialo|
|00000190| 67 2c 69 74 65 6d 29 0d | 09 44 69 61 6c 6f 67 50 |g,item).|.DialogP|
|000001a0| 74 72 20 74 68 65 5f 64 | 69 61 6c 6f 67 3b 0d 09 |tr the_d|ialog;..|
|000001b0| 69 6e 74 20 69 74 65 6d | 3b 0d 7b 0d 09 48 61 6e |int item|;.{..Han|
|000001c0| 64 6c 65 20 74 68 65 5f | 69 74 65 6d 3b 0d 09 69 |dle the_|item;..i|
|000001d0| 6e 74 20 74 79 70 65 3b | 0d 09 52 65 63 74 20 62 |nt type;|..Rect b|
|000001e0| 6f 78 3b 0d 0d 09 47 65 | 74 44 49 74 65 6d 28 74 |ox;...Ge|tDItem(t|
|000001f0| 68 65 5f 64 69 61 6c 6f | 67 2c 20 69 74 65 6d 2c |he_dialo|g, item,|
|00000200| 20 26 74 79 70 65 2c 20 | 26 74 68 65 5f 69 74 65 | &type, |&the_ite|
|00000210| 6d 2c 20 26 62 6f 78 29 | 3b 0d 09 72 65 74 75 72 |m, &box)|;..retur|
|00000220| 6e 28 74 68 65 5f 69 74 | 65 6d 29 3b 0d 7d 0d 0d |n(the_it|em);.}..|
|00000230| 09 2f 2a 20 53 65 74 20 | 74 68 65 20 63 75 72 73 |./* Set |the curs|
|00000240| 6f 72 20 74 6f 20 74 68 | 65 20 77 61 74 63 68 2e |or to th|e watch.|
|00000250| 20 2a 2f 0d 0d 76 6f 69 | 64 20 73 65 74 5f 77 61 | */..voi|d set_wa|
|00000260| 74 63 68 5f 63 75 72 73 | 6f 72 28 29 0d 7b 0d 09 |tch_curs|or().{..|
|00000270| 53 65 74 43 75 72 73 6f | 72 28 2a 47 65 74 43 75 |SetCurso|r(*GetCu|
|00000280| 72 73 6f 72 28 57 41 54 | 43 48 5f 43 55 52 53 4f |rsor(WAT|CH_CURSO|
|00000290| 52 29 29 3b 0d 7d 0d 0d | 09 2f 2a 20 53 65 74 20 |R));.}..|./* Set |
|000002a0| 74 68 65 20 63 75 72 73 | 6f 72 20 74 6f 20 74 68 |the curs|or to th|
|000002b0| 65 20 61 72 72 6f 77 2e | 20 2a 2f 0d 0d 76 6f 69 |e arrow.| */..voi|
|000002c0| 64 20 73 65 74 5f 6e 6f | 72 6d 61 6c 5f 63 75 72 |d set_no|rmal_cur|
|000002d0| 73 6f 72 28 29 0d 7b 0d | 09 49 6e 69 74 43 75 72 |sor().{.|.InitCur|
|000002e0| 73 6f 72 28 29 3b 0d 7d | 0d 0d 09 2f 2a 20 52 65 |sor();.}|.../* Re|
|000002f0| 6d 6f 76 65 20 61 20 72 | 65 73 6f 75 72 63 65 20 |move a r|esource |
|00000300| 66 72 6f 6d 20 74 68 65 | 20 63 75 72 72 65 6e 74 |from the| current|
|00000310| 20 72 65 73 6f 75 72 63 | 65 20 66 69 6c 65 2e 20 | resourc|e file. |
|00000320| 2a 2f 0d 0d 23 69 66 6e | 64 65 66 20 54 45 53 54 |*/..#ifn|def TEST|
|00000330| 5f 4d 4f 44 45 0d 0d 76 | 6f 69 64 20 6b 69 6c 6c |_MODE..v|oid kill|
|00000340| 5f 72 65 73 6f 75 72 63 | 65 28 74 79 70 65 2c 20 |_resourc|e(type, |
|00000350| 69 64 29 0d 09 6c 6f 6e | 67 20 74 79 70 65 3b 0d |id)..lon|g type;.|
|00000360| 09 69 6e 74 20 69 64 3b | 0d 7b 0d 09 72 65 67 69 |.int id;|.{..regi|
|00000370| 73 74 65 72 20 48 61 6e | 64 6c 65 20 68 61 6e 64 |ster Han|dle hand|
|00000380| 3b 0d 0d 09 53 65 74 52 | 65 73 4c 6f 61 64 28 30 |;...SetR|esLoad(0|
|00000390| 29 3b 0d 09 68 61 6e 64 | 20 3d 20 47 65 74 52 65 |);..hand| = GetRe|
|000003a0| 73 6f 75 72 63 65 28 74 | 79 70 65 2c 20 69 64 29 |source(t|ype, id)|
|000003b0| 3b 0d 09 69 66 20 28 48 | 6f 6d 65 52 65 73 46 69 |;..if (H|omeResFi|
|000003c0| 6c 65 28 68 61 6e 64 29 | 20 3d 3d 20 43 75 72 52 |le(hand)| == CurR|
|000003d0| 65 73 46 69 6c 65 28 29 | 29 20 7b 0d 09 09 52 6d |esFile()|) {...Rm|
|000003e0| 76 65 52 65 73 6f 75 72 | 63 65 28 68 61 6e 64 29 |veResour|ce(hand)|
|000003f0| 3b 0d 09 09 44 69 73 70 | 6f 73 48 61 6e 64 6c 65 |;...Disp|osHandle|
|00000400| 28 68 61 6e 64 29 3b 0d | 09 7d 0d 09 65 6c 73 65 |(hand);.|.}..else|
|00000410| 0d 09 09 52 65 6c 65 61 | 73 65 52 65 73 6f 75 72 |...Relea|seResour|
|00000420| 63 65 28 68 61 6e 64 29 | 3b 0d 09 53 65 74 52 65 |ce(hand)|;..SetRe|
|00000430| 73 4c 6f 61 64 28 31 29 | 3b 0d 7d 0d 23 65 6e 64 |sLoad(1)|;.}.#end|
|00000440| 69 66 20 54 45 53 54 5f | 4d 4f 44 45 0d 0d 09 2f |if TEST_|MODE.../|
|00000450| 2a 20 43 6f 70 79 20 61 | 20 50 61 73 63 61 6c 2d |* Copy a| Pascal-|
|00000460| 73 74 79 6c 65 20 73 74 | 72 69 6e 67 20 2a 2f 0d |style st|ring */.|
|00000470| 0d 76 6f 69 64 20 63 6f | 70 79 73 74 72 28 64 65 |.void co|pystr(de|
|00000480| 73 74 2c 20 73 6f 75 72 | 63 65 29 0d 09 72 65 67 |st, sour|ce)..reg|
|00000490| 69 73 74 65 72 20 75 6e | 73 69 67 6e 65 64 20 63 |ister un|signed c|
|000004a0| 68 61 72 20 2a 64 65 73 | 74 2c 20 2a 73 6f 75 72 |har *des|t, *sour|
|000004b0| 63 65 3b 0d 7b 0d 09 72 | 65 67 69 73 74 65 72 20 |ce;.{..r|egister |
|000004c0| 69 6e 74 20 6c 65 6e 67 | 74 68 3b 0d 0d 09 61 73 |int leng|th;...as|
|000004d0| 6d 20 7b 0d 09 09 63 6c | 72 2e 77 09 6c 65 6e 67 |m {...cl|r.w.leng|
|000004e0| 74 68 09 09 09 09 3b 20 | 4e 65 65 64 20 66 75 6c |th....; |Need ful|
|000004f0| 6c 20 77 6f 72 64 20 66 | 6f 72 20 6c 65 6e 67 74 |l word f|or lengt|
|00000500| 68 0d 09 09 6d 6f 76 65 | 2e 62 09 28 73 6f 75 72 |h...move|.b.(sour|
|00000510| 63 65 29 2c 6c 65 6e 67 | 74 68 09 09 3b 20 47 65 |ce),leng|th..; Ge|
|00000520| 74 20 6c 65 6e 67 74 68 | 20 62 79 74 65 0d 40 30 |t length| byte.@0|
|00000530| 09 09 6d 6f 76 65 2e 62 | 09 28 73 6f 75 72 63 65 |..move.b|.(source|
|00000540| 29 2b 2c 28 64 65 73 74 | 29 2b 09 3b 20 43 6f 70 |)+,(dest|)+.; Cop|
|00000550| 79 20 61 20 62 79 74 65 | 20 6f 66 20 74 68 65 20 |y a byte| of the |
|00000560| 73 74 72 69 6e 67 0d 09 | 09 64 62 72 61 09 6c 65 |string..|.dbra.le|
|00000570| 6e 67 74 68 2c 40 30 09 | 09 09 3b 20 4b 65 65 70 |ngth,@0.|..; Keep|
|00000580| 20 67 6f 69 6e 67 20 75 | 6e 74 69 6c 20 61 6c 6c | going u|ntil all|
|00000590| 20 64 6f 6e 65 0d 09 7d | 0d 7d 0d 0d 09 2f 2a 20 | done..}|.}.../* |
|000005a0| 43 6f 6e 63 61 74 65 6e | 61 74 65 20 74 77 6f 20 |Concaten|ate two |
|000005b0| 50 61 73 63 61 6c 2d 73 | 74 79 6c 65 20 73 74 72 |Pascal-s|tyle str|
|000005c0| 69 6e 67 73 20 69 6e 74 | 6f 20 61 20 74 68 69 72 |ings int|o a thir|
|000005d0| 64 2e 20 2a 2f 0d 0d 76 | 6f 69 64 20 63 6f 6e 63 |d. */..v|oid conc|
|000005e0| 61 74 73 74 72 28 66 69 | 72 73 74 2c 20 73 65 63 |atstr(fi|rst, sec|
|000005f0| 6f 6e 64 2c 20 64 65 73 | 74 29 0d 09 72 65 67 69 |ond, des|t)..regi|
|00000600| 73 74 65 72 20 75 6e 73 | 69 67 6e 65 64 20 63 68 |ster uns|igned ch|
|00000610| 61 72 20 2a 66 69 72 73 | 74 2c 20 2a 73 65 63 6f |ar *firs|t, *seco|
|00000620| 6e 64 2c 20 2a 64 65 73 | 74 3b 0d 7b 0d 09 09 2f |nd, *des|t;.{.../|
|00000630| 2a 20 43 6f 70 79 20 74 | 68 65 20 66 69 72 73 74 |* Copy t|he first|
|00000640| 20 73 74 72 69 6e 67 20 | 74 6f 20 74 68 65 20 64 | string |to the d|
|00000650| 65 73 74 69 6e 61 74 69 | 6f 6e 20 28 75 6e 6c 65 |estinati|on (unle|
|00000660| 73 73 20 74 68 65 20 73 | 61 6d 65 29 2e 20 2a 2f |ss the s|ame). */|
|00000670| 0d 0d 09 69 66 20 28 66 | 69 72 73 74 20 21 3d 20 |...if (f|irst != |
|00000680| 64 65 73 74 29 0d 09 09 | 63 6f 70 79 73 74 72 28 |dest)...|copystr(|
|00000690| 64 65 73 74 2c 20 66 69 | 72 73 74 29 3b 0d 0d 09 |dest, fi|rst);...|
|000006a0| 09 2f 2a 20 49 66 20 73 | 65 63 6f 6e 64 20 73 74 |./* If s|econd st|
|000006b0| 72 69 6e 67 20 65 6d 70 | 74 79 2c 20 6a 75 73 74 |ring emp|ty, just|
|000006c0| 20 72 65 74 75 72 6e 2e | 20 2a 2f 0d 0d 09 69 66 | return.| */...if|
|000006d0| 20 28 73 65 63 6f 6e 64 | 5b 30 5d 20 3d 3d 20 27 | (second|[0] == '|
|000006e0| 5c 30 27 29 0d 09 09 72 | 65 74 75 72 6e 3b 0d 0d |\0')...r|eturn;..|
|000006f0| 09 09 2f 2a 20 49 66 20 | 64 65 73 74 69 6e 61 74 |../* If |destinat|
|00000700| 69 6f 6e 20 65 6d 70 74 | 79 2c 20 6a 75 73 74 20 |ion empt|y, just |
|00000710| 63 6f 70 79 20 73 65 63 | 6f 6e 64 20 74 6f 20 69 |copy sec|ond to i|
|00000720| 74 2e 20 2a 2f 0d 0d 09 | 69 66 20 28 64 65 73 74 |t. */...|if (dest|
|00000730| 5b 30 5d 20 3d 3d 20 27 | 5c 30 27 29 20 7b 0d 09 |[0] == '|\0') {..|
|00000740| 09 63 6f 70 79 73 74 72 | 28 64 65 73 74 2c 20 73 |.copystr|(dest, s|
|00000750| 65 63 6f 6e 64 29 3b 0d | 09 09 72 65 74 75 72 6e |econd);.|..return|
|00000760| 3b 0d 09 7d 0d 0d 09 09 | 2f 2a 20 43 68 65 63 6b |;..}....|/* Check|
|00000770| 20 74 68 61 74 20 62 6f | 74 68 20 73 74 72 69 6e | that bo|th strin|
|00000780| 67 73 20 77 69 6c 6c 20 | 66 69 74 2e 20 2a 2f 0d |gs will |fit. */.|
|00000790| 0d 09 7b 0d 09 09 72 65 | 67 69 73 74 65 72 20 69 |..{...re|gister i|
|000007a0| 6e 74 20 6c 31 2c 20 6c | 32 3b 0d 0d 09 09 6c 31 |nt l1, l|2;....l1|
|000007b0| 20 3d 20 28 75 6e 73 69 | 67 6e 65 64 20 63 68 61 | = (unsi|gned cha|
|000007c0| 72 29 20 66 69 72 73 74 | 5b 30 5d 3b 0d 09 09 6c |r) first|[0];...l|
|000007d0| 32 20 3d 20 28 75 6e 73 | 69 67 6e 65 64 20 63 68 |2 = (uns|igned ch|
|000007e0| 61 72 29 20 73 65 63 6f | 6e 64 5b 30 5d 3b 0d 09 |ar) seco|nd[0];..|
|000007f0| 09 69 66 20 28 28 6c 31 | 20 2b 20 6c 32 29 20 3e |.if ((l1| + l2) >|
|00000800| 20 32 35 35 29 09 09 2f | 2a 20 64 6f 65 73 6e 27 | 255)../|* doesn'|
|00000810| 74 20 66 69 74 21 20 2a | 2f 0d 09 09 09 72 65 74 |t fit! *|/....ret|
|00000820| 75 72 6e 3b 0d 09 7d 0d | 0d 09 09 2f 2a 20 43 6f |urn;..}.|.../* Co|
|00000830| 70 79 20 74 68 65 20 73 | 65 63 6f 6e 64 20 73 74 |py the s|econd st|
|00000840| 72 69 6e 67 20 74 6f 20 | 74 68 65 20 65 6e 64 20 |ring to |the end |
|00000850| 6f 66 20 74 68 65 20 64 | 65 73 74 69 6e 61 74 69 |of the d|estinati|
|00000860| 6f 6e 2e 20 2a 2f 0d 0d | 09 7b 0d 09 09 72 65 67 |on. */..|.{...reg|
|00000870| 69 73 74 65 72 20 69 6e | 74 20 6c 65 6e 67 74 68 |ister in|t length|
|00000880| 2c 20 66 69 72 73 74 5f | 6c 65 6e 67 74 68 3b 0d |, first_|length;.|
|00000890| 0d 09 09 61 73 6d 20 7b | 0d 09 09 09 63 6c 72 2e |...asm {|....clr.|
|000008a0| 77 09 66 69 72 73 74 5f | 6c 65 6e 67 74 68 09 09 |w.first_|length..|
|000008b0| 09 3b 20 47 65 74 20 6c | 65 6e 67 74 68 20 6f 66 |.; Get l|ength of|
|000008c0| 20 66 69 72 73 74 20 73 | 74 72 69 6e 67 0d 09 09 | first s|tring...|
|000008d0| 09 6d 6f 76 65 2e 62 09 | 28 66 69 72 73 74 29 2c |.move.b.|(first),|
|000008e0| 66 69 72 73 74 5f 6c 65 | 6e 67 74 68 09 3b 20 28 |first_le|ngth.; (|
|000008f0| 6d 61 79 20 61 6c 73 6f | 20 62 65 20 64 65 73 74 |may also| be dest|
|00000900| 69 6e 61 74 69 6f 6e 29 | 0d 09 09 09 63 6c 72 2e |ination)|....clr.|
|00000910| 77 09 6c 65 6e 67 74 68 | 09 09 09 09 09 3b 20 47 |w.length|.....; G|
|00000920| 65 74 20 6c 65 6e 67 74 | 68 20 6f 66 20 73 65 63 |et lengt|h of sec|
|00000930| 6f 6e 64 20 73 74 72 69 | 6e 67 0d 09 09 09 6d 6f |ond stri|ng....mo|
|00000940| 76 65 2e 62 09 28 73 65 | 63 6f 6e 64 29 2c 6c 65 |ve.b.(se|cond),le|
|00000950| 6e 67 74 68 0d 09 09 09 | 61 64 64 2e 62 09 6c 65 |ngth....|add.b.le|
|00000960| 6e 67 74 68 2c 28 64 65 | 73 74 29 09 09 09 3b 20 |ngth,(de|st)...; |
|00000970| 45 78 70 61 6e 64 20 73 | 74 72 69 6e 67 20 74 6f |Expand s|tring to|
|00000980| 20 66 69 74 0d 09 09 09 | 61 64 64 61 2e 77 09 66 | fit....|adda.w.f|
|00000990| 69 72 73 74 5f 6c 65 6e | 67 74 68 2c 64 65 73 74 |irst_len|gth,dest|
|000009a0| 09 09 3b 20 41 64 76 61 | 6e 63 65 20 70 6f 69 6e |..; Adva|nce poin|
|000009b0| 74 65 72 20 66 6f 72 77 | 61 72 64 0d 09 09 09 61 |ter forw|ard....a|
|000009c0| 64 64 71 2e 77 09 23 31 | 2c 64 65 73 74 09 09 09 |ddq.w.#1|,dest...|
|000009d0| 09 09 3b 20 50 61 73 74 | 20 6c 65 6e 67 74 68 20 |..; Past| length |
|000009e0| 62 79 74 65 2c 20 74 6f | 6f 2e 2e 2e 0d 09 09 09 |byte, to|o.......|
|000009f0| 61 64 64 71 2e 77 09 23 | 31 2c 73 65 63 6f 6e 64 |addq.w.#|1,second|
|00000a00| 09 09 09 09 3b 20 53 6b | 69 70 20 6c 65 6e 67 74 |....; Sk|ip lengt|
|00000a10| 68 20 62 79 74 65 0d 09 | 09 09 73 75 62 71 2e 77 |h byte..|..subq.w|
|00000a20| 09 23 31 2c 6c 65 6e 67 | 74 68 09 09 09 09 3b 20 |.#1,leng|th....; |
|00000a30| 53 6b 69 70 20 69 74 20 | 61 67 61 69 6e 0d 40 30 |Skip it |again.@0|
|00000a40| 09 09 09 6d 6f 76 65 2e | 62 09 28 73 65 63 6f 6e |...move.|b.(secon|
|00000a50| 64 29 2b 2c 28 64 65 73 | 74 29 2b 09 09 3b 20 43 |d)+,(des|t)+..; C|
|00000a60| 6f 70 79 20 61 20 62 79 | 74 65 0d 09 09 09 64 62 |opy a by|te....db|
|00000a70| 72 61 09 6c 65 6e 67 74 | 68 2c 20 40 30 09 09 09 |ra.lengt|h, @0...|
|00000a80| 09 3b 20 4b 65 65 70 20 | 67 6f 69 6e 67 20 75 6e |.; Keep |going un|
|00000a90| 74 69 6c 20 61 6c 6c 20 | 64 6f 6e 65 0d 09 09 7d |til all |done...}|
|00000aa0| 0d 09 7d 0d 7d 0d 0d 09 | 2f 2a 20 54 65 73 74 20 |..}.}...|/* Test |
|00000ab0| 74 77 6f 20 50 61 73 63 | 61 6c 2d 73 74 79 6c 65 |two Pasc|al-style|
|00000ac0| 20 73 74 72 69 6e 67 73 | 20 66 6f 72 20 65 71 75 | strings| for equ|
|00000ad0| 61 6c 69 74 79 20 2a 2f | 0d 0d 69 6e 74 20 65 71 |ality */|..int eq|
|00000ae0| 75 61 6c 73 74 72 28 73 | 31 2c 20 73 32 29 0d 09 |ualstr(s|1, s2)..|
|00000af0| 75 6e 73 69 67 6e 65 64 | 20 63 68 61 72 20 2a 73 |unsigned| char *s|
|00000b00| 31 2c 20 2a 73 32 3b 0d | 7b 0d 09 2f 2a 20 43 6f |1, *s2;.|{../* Co|
|00000b10| 75 6c 64 20 63 61 6c 6c | 20 49 55 45 71 75 61 6c |uld call| IUEqual|
|00000b20| 53 74 72 69 6e 67 20 69 | 66 20 77 61 6e 74 65 64 |String i|f wanted|
|00000b30| 2e 20 2a 2f 0d 0d 09 72 | 65 74 75 72 6e 20 28 45 |. */...r|eturn (E|
|00000b40| 71 75 61 6c 53 74 72 69 | 6e 67 28 73 31 2c 20 73 |qualStri|ng(s1, s|
|00000b50| 32 2c 20 46 41 4c 53 45 | 2c 20 54 52 55 45 29 29 |2, FALSE|, TRUE))|
|00000b60| 3b 0d 7d 0d 00 00 00 00 | 00 00 00 00 00 00 00 00 |;.}.....|........|
|00000b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+
