home *** CD-ROM | disk | FTP | other *** search
| MacBinary | 1989-09-14 | 3.6 KB | [TEXT/KAHL] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: MacBinary
(archive/macBinary).
You can browse this item here: HyperXCmd.h.bin
| 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, Thu Aug 6 08:14:00 1987, modified Wed Sep 30 08:41:35 1987, creator Think C, type ASCII, 3501 bytes "HyperXCmd.h"
| 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 0b 48 79 70 65 72 58 | 43 6d 64 2e 68 00 00 00 |..HyperX|Cmd.h...|
|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 0d ad 00 | 00 00 00 9d 3e 23 88 9d |........|....>#..|
|00000060| 86 ac 7f 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 2f 2a 0d 09 48 79 70 65 | 72 58 43 6d 64 2e 68 20 |/*..Hype|rXCmd.h |
|00000090| 20 44 65 66 69 6e 69 74 | 69 6f 6e 73 20 66 6f 72 | Definit|ions for|
|000000a0| 20 63 61 6c 6c 69 6e 67 | 20 61 6c 6c 20 73 74 61 | calling| all sta|
|000000b0| 6e 64 61 72 64 20 0d 09 | 48 79 70 65 72 43 61 72 |ndard ..|HyperCar|
|000000c0| 64 20 63 61 6c 6c 62 61 | 63 6b 20 72 6f 75 74 69 |d callba|ck routi|
|000000d0| 6e 65 73 20 66 72 6f 6d | 20 43 2e 0d 09 a9 41 70 |nes from| C....Ap|
|000000e0| 70 6c 65 20 43 6f 6d 70 | 75 74 65 72 2c 20 49 6e |ple Comp|uter, In|
|000000f0| 63 2e 20 31 39 38 37 0d | 09 41 6c 6c 20 52 69 67 |c. 1987.|.All Rig|
|00000100| 68 74 73 20 52 65 73 65 | 72 76 65 64 2e 0d 0d 09 |hts Rese|rved....|
|00000110| 53 65 65 20 43 46 6c 61 | 73 68 2e 43 20 66 6f 72 |See CFla|sh.C for|
|00000120| 20 61 6e 20 65 78 61 6d | 70 6c 65 20 6f 66 20 68 | an exam|ple of h|
|00000130| 6f 77 20 74 6f 20 69 6e | 63 6c 75 64 65 20 74 68 |ow to in|clude th|
|00000140| 69 73 20 6d 6f 64 75 6c | 65 20 69 6e 20 79 6f 75 |is modul|e in you|
|00000150| 72 20 0d 09 43 20 70 72 | 6f 67 72 61 6d 2e 0d 2a |r ..C pr|ogram..*|
|00000160| 2f 0d 0d 23 69 6e 63 6c | 75 64 65 20 3c 4d 61 63 |/..#incl|ude <Mac|
|00000170| 54 79 70 65 73 2e 68 3e | 0d 0d 74 79 70 65 64 65 |Types.h>|..typede|
|00000180| 66 20 73 74 72 75 63 74 | 20 58 43 6d 64 42 6c 6f |f struct| XCmdBlo|
|00000190| 63 6b 20 7b 0d 09 73 68 | 6f 72 74 09 70 61 72 61 |ck {..sh|ort.para|
|000001a0| 6d 43 6f 75 6e 74 3b 20 | 20 20 20 20 0d 20 20 20 |mCount; | . |
|000001b0| 20 48 61 6e 64 6c 65 20 | 20 70 61 72 61 6d 73 5b | Handle | params[|
|000001c0| 31 36 5d 3b 0d 20 20 20 | 20 48 61 6e 64 6c 65 20 |16];. | Handle |
|000001d0| 20 72 65 74 75 72 6e 56 | 61 6c 75 65 3b 20 20 20 | returnV|alue; |
|000001e0| 20 20 20 0d 20 20 20 20 | 42 6f 6f 6c 65 61 6e 09 | . |Boolean.|
|000001f0| 70 61 73 73 46 6c 61 67 | 3b 20 0d 20 20 20 20 20 |passFlag|; . |
|00000200| 20 0d 20 20 20 20 76 6f | 69 64 09 28 2a 65 6e 74 | . vo|id.(*ent|
|00000210| 72 79 50 6f 69 6e 74 29 | 28 29 3b 20 20 20 20 2f |ryPoint)|(); /|
|00000220| 2a 20 74 6f 20 63 61 6c | 6c 20 62 61 63 6b 20 74 |* to cal|l back t|
|00000230| 6f 20 48 79 70 65 72 43 | 61 72 64 20 2a 2f 0d 20 |o HyperC|ard */. |
|00000240| 20 20 20 73 68 6f 72 74 | 09 72 65 71 75 65 73 74 | short|.request|
|00000250| 3b 20 20 0d 20 20 20 20 | 73 68 6f 72 74 09 72 65 |; . |short.re|
|00000260| 73 75 6c 74 3b 20 20 0d | 20 20 20 20 6c 6f 6e 67 |sult; .| long|
|00000270| 09 69 6e 41 72 67 73 5b | 38 5d 3b 0d 20 20 20 20 |.inArgs[|8];. |
|00000280| 6c 6f 6e 67 09 6f 75 74 | 41 72 67 73 5b 34 5d 3b |long.out|Args[4];|
|00000290| 0d 20 20 20 7d 20 58 43 | 6d 64 42 6c 6f 63 6b 2c |. } XC|mdBlock,|
|000002a0| 20 2a 58 43 6d 64 42 6c | 6f 63 6b 50 74 72 3b 0d | *XCmdBl|ockPtr;.|
|000002b0| 0d 74 79 70 65 64 65 66 | 20 75 6e 73 69 67 6e 65 |.typedef| unsigne|
|000002c0| 64 20 63 68 61 72 20 53 | 74 72 33 31 5b 33 32 5d |d char S|tr31[32]|
|000002d0| 3b 0d 2f 2a 0d 74 79 70 | 65 64 65 66 20 73 74 72 |;./*.typ|edef str|
|000002e0| 75 63 74 20 53 74 72 33 | 31 20 7b 0d 09 63 68 61 |uct Str3|1 {..cha|
|000002f0| 72 09 67 75 74 73 5b 33 | 32 5d 3b 0d 09 7d 20 53 |r.guts[3|2];..} S|
|00000300| 74 72 33 31 2c 20 2a 53 | 74 72 33 31 50 74 72 3b |tr31, *S|tr31Ptr;|
|00000310| 0d 2a 2f 0d 0d 65 6e 75 | 6d 20 7b 0d 09 78 72 65 |.*/..enu|m {..xre|
|00000320| 73 53 75 63 63 20 3d 20 | 30 2c 0d 09 78 72 65 73 |sSucc = |0,..xres|
|00000330| 46 61 69 6c 2c 0d 09 78 | 72 65 73 4e 6f 74 49 6d |Fail,..x|resNotIm|
|00000340| 70 0d 7d 3b 0d 0d 2f 2a | 20 72 65 71 75 65 73 74 |p.};../*| request|
|00000350| 20 63 6f 64 65 73 20 2a | 2f 0d 65 6e 75 6d 20 7b | codes *|/.enum {|
|00000360| 20 20 0d 09 78 72 65 71 | 53 65 6e 64 43 61 72 64 | ..xreq|SendCard|
|00000370| 4d 65 73 73 61 67 65 20 | 3d 20 31 2c 0d 09 78 72 |Message |= 1,..xr|
|00000380| 65 71 45 76 61 6c 45 78 | 70 72 2c 0d 09 78 72 65 |eqEvalEx|pr,..xre|
|00000390| 71 53 74 72 69 6e 67 4c | 65 6e 67 74 68 2c 0d 09 |qStringL|ength,..|
|000003a0| 78 72 65 71 53 74 72 69 | 6e 67 4d 61 74 63 68 2c |xreqStri|ngMatch,|
|000003b0| 0d 09 78 72 65 71 53 65 | 6e 64 48 43 4d 65 73 73 |..xreqSe|ndHCMess|
|000003c0| 61 67 65 2c 0d 09 78 72 | 65 71 5a 65 72 6f 42 79 |age,..xr|eqZeroBy|
|000003d0| 74 65 73 2c 0d 09 78 72 | 65 71 50 61 73 54 6f 5a |tes,..xr|eqPasToZ|
|000003e0| 65 72 6f 2c 0d 09 78 72 | 65 71 5a 65 72 6f 54 6f |ero,..xr|eqZeroTo|
|000003f0| 50 61 73 2c 0d 09 78 72 | 65 71 53 74 72 54 6f 4c |Pas,..xr|eqStrToL|
|00000400| 6f 6e 67 2c 0d 09 78 72 | 65 71 53 74 72 54 6f 4e |ong,..xr|eqStrToN|
|00000410| 75 6d 2c 0d 09 78 72 65 | 71 53 74 72 54 6f 42 6f |um,..xre|qStrToBo|
|00000420| 6f 6c 2c 0d 09 78 72 65 | 71 53 74 72 54 6f 45 78 |ol,..xre|qStrToEx|
|00000430| 74 2c 0d 09 78 72 65 71 | 4c 6f 6e 67 54 6f 53 74 |t,..xreq|LongToSt|
|00000440| 72 2c 0d 09 78 72 65 71 | 4e 75 6d 54 6f 53 74 72 |r,..xreq|NumToStr|
|00000450| 2c 0d 09 78 72 65 71 4e | 75 6d 54 6f 48 65 78 2c |,..xreqN|umToHex,|
|00000460| 0d 09 78 72 65 71 42 6f | 6f 6c 54 6f 53 74 72 2c |..xreqBo|olToStr,|
|00000470| 0d 09 78 72 65 71 45 78 | 74 54 6f 53 74 72 2c 0d |..xreqEx|tToStr,.|
|00000480| 09 78 72 65 71 47 65 74 | 47 6c 6f 62 61 6c 2c 0d |.xreqGet|Global,.|
|00000490| 09 78 72 65 71 53 65 74 | 47 6c 6f 62 61 6c 2c 0d |.xreqSet|Global,.|
|000004a0| 09 78 72 65 71 47 65 74 | 46 69 65 6c 64 42 79 4e |.xreqGet|FieldByN|
|000004b0| 61 6d 65 2c 0d 09 78 72 | 65 71 47 65 74 46 69 65 |ame,..xr|eqGetFie|
|000004c0| 6c 64 42 79 4e 75 6d 2c | 0d 09 78 72 65 71 47 65 |ldByNum,|..xreqGe|
|000004d0| 74 46 69 65 6c 64 42 79 | 49 44 2c 20 0d 09 78 72 |tFieldBy|ID, ..xr|
|000004e0| 65 71 53 65 74 46 69 65 | 6c 64 42 79 4e 61 6d 65 |eqSetFie|ldByName|
|000004f0| 2c 0d 09 78 72 65 71 53 | 65 74 46 69 65 6c 64 42 |,..xreqS|etFieldB|
|00000500| 79 4e 75 6d 2c 20 0d 09 | 78 72 65 71 53 65 74 46 |yNum, ..|xreqSetF|
|00000510| 69 65 6c 64 42 79 49 44 | 2c 0d 09 78 72 65 71 53 |ieldByID|,..xreqS|
|00000520| 74 72 69 6e 67 45 71 75 | 61 6c 2c 20 0d 09 78 72 |tringEqu|al, ..xr|
|00000530| 65 71 52 65 74 75 72 6e | 54 6f 50 61 73 2c 0d 09 |eqReturn|ToPas,..|
|00000540| 78 72 65 71 53 63 61 6e | 54 6f 52 65 74 75 72 6e |xreqScan|ToReturn|
|00000550| 2c 0d 09 78 72 65 71 53 | 63 61 6e 54 6f 5a 65 72 |,..xreqS|canToZer|
|00000560| 6f 20 3d 20 33 39 20 20 | 20 2f 2a 20 77 61 73 20 |o = 39 | /* was |
|00000570| 73 75 70 70 6f 73 65 20 | 74 6f 20 62 65 20 32 39 |suppose |to be 29|
|00000580| 21 20 20 4f 6f 70 73 21 | 20 2a 2f 0d 7d 3b 0d 0d |! Oops!| */.};..|
|00000590| 0d 2f 2a 20 46 6f 72 77 | 61 72 64 20 64 65 66 69 |./* Forw|ard defi|
|000005a0| 6e 69 74 69 6f 6e 73 20 | 6f 66 20 67 6c 75 65 20 |nitions |of glue |
|000005b0| 72 6f 75 74 69 6e 65 73 | 2e 20 20 4d 61 69 6e 20 |routines|. Main |
|000005c0| 70 72 6f 67 72 61 6d 20 | 0d 09 6d 75 73 74 20 69 |program |..must i|
|000005d0| 6e 63 6c 75 64 65 20 58 | 43 6d 64 47 6c 75 65 2e |nclude X|CmdGlue.|
|000005e0| 69 6e 63 2e 63 2e 20 20 | 53 65 65 20 58 43 6d 64 |inc.c. |See XCmd|
|000005f0| 47 6c 75 65 2e 69 6e 63 | 2e 63 20 66 6f 72 20 0d |Glue.inc|.c for .|
|00000600| 09 64 6f 63 75 6d 65 6e | 74 61 74 69 6f 6e 20 6f |.documen|tation o|
|00000610| 66 20 65 61 63 68 20 72 | 6f 75 74 69 6e 65 2e 20 |f each r|outine. |
|00000620| 20 2a 2f 0d 0d 74 79 70 | 65 64 65 66 20 76 6f 69 | */..typ|edef voi|
|00000630| 64 20 28 2a 4d 79 50 72 | 6f 63 50 74 72 29 20 28 |d (*MyPr|ocPtr) (|
|00000640| 29 3b 0d 0d 70 61 73 63 | 61 6c 20 76 6f 69 64 09 |);..pasc|al void.|
|00000650| 09 53 65 6e 64 43 61 72 | 64 4d 65 73 73 61 67 65 |.SendCar|dMessage|
|00000660| 28 58 43 6d 64 42 6c 6f | 63 6b 50 74 72 2c 20 53 |(XCmdBlo|ckPtr, S|
|00000670| 74 72 69 6e 67 50 74 72 | 20 6d 73 67 29 3b 0d 70 |tringPtr| msg);.p|
|00000680| 61 73 63 61 6c 20 48 61 | 6e 64 6c 65 09 45 76 61 |ascal Ha|ndle.Eva|
|00000690| 6c 45 78 70 72 28 58 43 | 6d 64 42 6c 6f 63 6b 50 |lExpr(XC|mdBlockP|
|000006a0| 74 72 2c 20 53 74 72 69 | 6e 67 50 74 72 20 65 78 |tr, Stri|ngPtr ex|
|000006b0| 70 72 29 3b 0d 70 61 73 | 63 61 6c 20 6c 6f 6e 67 |pr);.pas|cal long|
|000006c0| 09 09 53 74 72 69 6e 67 | 4c 65 6e 67 74 68 28 58 |..String|Length(X|
|000006d0| 43 6d 64 42 6c 6f 63 6b | 50 74 72 2c 20 53 74 72 |CmdBlock|Ptr, Str|
|000006e0| 69 6e 67 50 74 72 20 73 | 74 72 50 74 72 29 3b 0d |ingPtr s|trPtr);.|
|000006f0| 70 61 73 63 61 6c 20 50 | 74 72 09 09 53 74 72 69 |pascal P|tr..Stri|
|00000700| 6e 67 4d 61 74 63 68 28 | 58 43 6d 64 42 6c 6f 63 |ngMatch(|XCmdBloc|
|00000710| 6b 50 74 72 2c 20 53 74 | 72 69 6e 67 50 74 72 20 |kPtr, St|ringPtr |
|00000720| 70 61 74 74 65 72 6e 2c | 20 50 74 72 20 74 61 72 |pattern,| Ptr tar|
|00000730| 67 65 74 29 3b 0d 70 61 | 73 63 61 6c 20 76 6f 69 |get);.pa|scal voi|
|00000740| 64 09 09 5a 65 72 6f 42 | 79 74 65 73 28 58 43 6d |d..ZeroB|ytes(XCm|
|00000750| 64 42 6c 6f 63 6b 50 74 | 72 20 2c 50 74 72 09 64 |dBlockPt|r ,Ptr.d|
|00000760| 73 74 50 74 72 2c 20 6c | 6f 6e 67 20 6c 6f 6e 67 |stPtr, l|ong long|
|00000770| 43 6f 75 6e 74 29 3b 0d | 70 61 73 63 61 6c 20 48 |Count);.|pascal H|
|00000780| 61 6e 64 6c 65 09 50 61 | 73 54 6f 5a 65 72 6f 28 |andle.Pa|sToZero(|
|00000790| 58 43 6d 64 42 6c 6f 63 | 6b 50 74 72 2c 20 53 74 |XCmdBloc|kPtr, St|
|000007a0| 72 69 6e 67 50 74 72 20 | 70 61 73 53 74 72 29 3b |ringPtr |pasStr);|
|000007b0| 0d 70 61 73 63 61 6c 20 | 76 6f 69 64 09 09 5a 65 |.pascal |void..Ze|
|000007c0| 72 6f 54 6f 50 61 73 28 | 58 43 6d 64 42 6c 6f 63 |roToPas(|XCmdBloc|
|000007d0| 6b 50 74 72 2c 20 75 6e | 73 69 67 6e 65 64 20 63 |kPtr, un|signed c|
|000007e0| 68 61 72 20 20 2a 7a 65 | 72 6f 53 74 72 2c 20 53 |har *ze|roStr, S|
|000007f0| 74 72 69 6e 67 50 74 72 | 20 70 61 73 53 74 72 29 |tringPtr| pasStr)|
|00000800| 3b 0d 70 61 73 63 61 6c | 20 6c 6f 6e 67 09 09 53 |;.pascal| long..S|
|00000810| 74 72 54 6f 4c 6f 6e 67 | 28 58 43 6d 64 42 6c 6f |trToLong|(XCmdBlo|
|00000820| 63 6b 50 74 72 2c 20 75 | 6e 73 69 67 6e 65 64 20 |ckPtr, u|nsigned |
|00000830| 63 68 61 72 20 20 2a 20 | 73 74 72 50 74 72 29 3b |char * |strPtr);|
|00000840| 0d 70 61 73 63 61 6c 20 | 6c 6f 6e 67 09 09 53 74 |.pascal |long..St|
|00000850| 72 54 6f 4e 75 6d 28 58 | 43 6d 64 42 6c 6f 63 6b |rToNum(X|CmdBlock|
|00000860| 50 74 72 2c 20 75 6e 73 | 69 67 6e 65 64 20 63 68 |Ptr, uns|igned ch|
|00000870| 61 72 20 20 2a 73 74 72 | 29 3b 0d 70 61 73 63 61 |ar *str|);.pasca|
|00000880| 6c 20 42 6f 6f 6c 65 61 | 6e 09 53 74 72 54 6f 42 |l Boolea|n.StrToB|
|00000890| 6f 6f 6c 28 58 43 6d 64 | 42 6c 6f 63 6b 50 74 72 |ool(XCmd|BlockPtr|
|000008a0| 2c 75 6e 73 69 67 6e 65 | 64 20 63 68 61 72 20 20 |,unsigne|d char |
|000008b0| 2a 73 74 72 29 3b 0d 70 | 61 73 63 61 6c 20 76 6f |*str);.p|ascal vo|
|000008c0| 69 64 09 09 53 74 72 54 | 6f 45 78 74 28 58 43 6d |id..StrT|oExt(XCm|
|000008d0| 64 42 6c 6f 63 6b 50 74 | 72 2c 75 6e 73 69 67 6e |dBlockPt|r,unsign|
|000008e0| 65 64 20 63 68 61 72 20 | 20 2a 73 74 72 2c 20 64 |ed char | *str, d|
|000008f0| 6f 75 62 6c 65 20 2a 6d | 79 65 78 74 29 3b 0d 70 |ouble *m|yext);.p|
|00000900| 61 73 63 61 6c 20 76 6f | 69 64 09 09 4c 6f 6e 67 |ascal vo|id..Long|
|00000910| 54 6f 53 74 72 28 58 43 | 6d 64 42 6c 6f 63 6b 50 |ToStr(XC|mdBlockP|
|00000920| 74 72 2c 20 6c 6f 6e 67 | 20 70 6f 73 4e 75 6d 2c |tr, long| posNum,|
|00000930| 20 75 6e 73 69 67 6e 65 | 64 20 63 68 61 72 20 20 | unsigne|d char |
|00000940| 2a 6d 79 73 74 72 29 3b | 0d 70 61 73 63 61 6c 20 |*mystr);|.pascal |
|00000950| 76 6f 69 64 09 09 4e 75 | 6d 54 6f 53 74 72 28 58 |void..Nu|mToStr(X|
|00000960| 43 6d 64 42 6c 6f 63 6b | 50 74 72 2c 20 6c 6f 6e |CmdBlock|Ptr, lon|
|00000970| 67 20 6e 75 6d 2c 20 75 | 6e 73 69 67 6e 65 64 20 |g num, u|nsigned |
|00000980| 63 68 61 72 20 20 2a 6d | 79 73 74 72 29 3b 0d 70 |char *m|ystr);.p|
|00000990| 61 73 63 61 6c 20 76 6f | 69 64 09 09 4e 75 6d 54 |ascal vo|id..NumT|
|000009a0| 6f 48 65 78 28 58 43 6d | 64 42 6c 6f 63 6b 50 74 |oHex(XCm|dBlockPt|
|000009b0| 72 2c 20 6c 6f 6e 67 20 | 6e 75 6d 2c 20 73 68 6f |r, long |num, sho|
|000009c0| 72 74 20 6e 44 69 67 69 | 74 73 2c 20 75 6e 73 69 |rt nDigi|ts, unsi|
|000009d0| 67 6e 65 64 20 63 68 61 | 72 20 20 2a 6d 79 73 74 |gned cha|r *myst|
|000009e0| 72 29 3b 0d 70 61 73 63 | 61 6c 20 76 6f 69 64 09 |r);.pasc|al void.|
|000009f0| 09 42 6f 6f 6c 54 6f 53 | 74 72 28 58 43 6d 64 42 |.BoolToS|tr(XCmdB|
|00000a00| 6c 6f 63 6b 50 74 72 2c | 20 42 6f 6f 6c 65 61 6e |lockPtr,| Boolean|
|00000a10| 20 62 6f 6f 6c 2c 20 75 | 6e 73 69 67 6e 65 64 20 | bool, u|nsigned |
|00000a20| 63 68 61 72 20 20 2a 6d | 79 73 74 72 29 3b 0d 70 |char *m|ystr);.p|
|00000a30| 61 73 63 61 6c 20 76 6f | 69 64 09 09 45 78 74 54 |ascal vo|id..ExtT|
|00000a40| 6f 53 74 72 28 58 43 6d | 64 42 6c 6f 63 6b 50 74 |oStr(XCm|dBlockPt|
|00000a50| 72 2c 20 64 6f 75 62 6c | 65 20 2a 6d 79 65 78 74 |r, doubl|e *myext|
|00000a60| 2c 20 75 6e 73 69 67 6e | 65 64 20 63 68 61 72 20 |, unsign|ed char |
|00000a70| 20 2a 6d 79 73 74 72 29 | 3b 0d 70 61 73 63 61 6c | *mystr)|;.pascal|
|00000a80| 20 48 61 6e 64 6c 65 09 | 47 65 74 47 6c 6f 62 61 | Handle.|GetGloba|
|00000a90| 6c 28 58 43 6d 64 42 6c | 6f 63 6b 50 74 72 2c 20 |l(XCmdBl|ockPtr, |
|00000aa0| 53 74 72 69 6e 67 50 74 | 72 20 67 6c 6f 62 4e 61 |StringPt|r globNa|
|00000ab0| 6d 65 29 3b 0d 70 61 73 | 63 61 6c 20 76 6f 69 64 |me);.pas|cal void|
|00000ac0| 09 09 53 65 74 47 6c 6f | 62 61 6c 28 58 43 6d 64 |..SetGlo|bal(XCmd|
|00000ad0| 42 6c 6f 63 6b 50 74 72 | 2c 20 53 74 72 69 6e 67 |BlockPtr|, String|
|00000ae0| 50 74 72 20 67 6c 6f 62 | 4e 61 6d 65 2c 20 48 61 |Ptr glob|Name, Ha|
|00000af0| 6e 64 6c 65 20 67 6c 6f | 62 56 61 6c 75 65 29 3b |ndle glo|bValue);|
|00000b00| 0d 70 61 73 63 61 6c 20 | 48 61 6e 64 6c 65 09 47 |.pascal |Handle.G|
|00000b10| 65 74 46 69 65 6c 64 42 | 79 4e 61 6d 65 28 58 43 |etFieldB|yName(XC|
|00000b20| 6d 64 42 6c 6f 63 6b 50 | 74 72 2c 20 42 6f 6f 6c |mdBlockP|tr, Bool|
|00000b30| 65 61 6e 20 63 61 72 64 | 46 69 65 6c 64 46 6c 61 |ean card|FieldFla|
|00000b40| 67 2c 20 53 74 72 69 6e | 67 50 74 72 20 66 69 65 |g, Strin|gPtr fie|
|00000b50| 6c 64 4e 61 6d 65 29 3b | 0d 70 61 73 63 61 6c 20 |ldName);|.pascal |
|00000b60| 48 61 6e 64 6c 65 09 47 | 65 74 46 69 65 6c 64 42 |Handle.G|etFieldB|
|00000b70| 79 4e 75 6d 28 58 43 6d | 64 42 6c 6f 63 6b 50 74 |yNum(XCm|dBlockPt|
|00000b80| 72 2c 20 42 6f 6f 6c 65 | 61 6e 20 63 61 72 64 46 |r, Boole|an cardF|
|00000b90| 69 65 6c 64 46 6c 61 67 | 2c 20 73 68 6f 72 74 20 |ieldFlag|, short |
|00000ba0| 66 69 65 6c 64 4e 75 6d | 29 3b 0d 70 61 73 63 61 |fieldNum|);.pasca|
|00000bb0| 6c 20 48 61 6e 64 6c 65 | 09 47 65 74 46 69 65 6c |l Handle|.GetFiel|
|00000bc0| 64 42 79 49 44 28 58 43 | 6d 64 42 6c 6f 63 6b 50 |dByID(XC|mdBlockP|
|00000bd0| 74 72 2c 42 6f 6f 6c 65 | 61 6e 20 63 61 72 64 46 |tr,Boole|an cardF|
|00000be0| 69 65 6c 64 46 6c 61 67 | 2c 20 73 68 6f 72 74 20 |ieldFlag|, short |
|00000bf0| 66 69 65 6c 64 49 44 29 | 3b 0d 70 61 73 63 61 6c |fieldID)|;.pascal|
|00000c00| 20 76 6f 69 64 09 09 53 | 65 74 46 69 65 6c 64 42 | void..S|etFieldB|
|00000c10| 79 4e 61 6d 65 28 58 43 | 6d 64 42 6c 6f 63 6b 50 |yName(XC|mdBlockP|
|00000c20| 74 72 2c 20 42 6f 6f 6c | 65 61 6e 20 63 61 72 64 |tr, Bool|ean card|
|00000c30| 46 69 65 6c 64 46 6c 61 | 67 2c 20 53 74 72 69 6e |FieldFla|g, Strin|
|00000c40| 67 50 74 72 20 66 69 65 | 6c 64 4e 61 6d 65 2c 20 |gPtr fie|ldName, |
|00000c50| 48 61 6e 64 6c 65 20 66 | 69 65 6c 64 56 61 6c 29 |Handle f|ieldVal)|
|00000c60| 3b 0d 70 61 73 63 61 6c | 20 76 6f 69 64 09 09 53 |;.pascal| void..S|
|00000c70| 65 74 46 69 65 6c 64 42 | 79 4e 75 6d 28 58 43 6d |etFieldB|yNum(XCm|
|00000c80| 64 42 6c 6f 63 6b 50 74 | 72 2c 20 42 6f 6f 6c 65 |dBlockPt|r, Boole|
|00000c90| 61 6e 20 63 61 72 64 46 | 69 65 6c 64 46 6c 61 67 |an cardF|ieldFlag|
|00000ca0| 2c 20 73 68 6f 72 74 20 | 66 69 65 6c 64 4e 75 6d |, short |fieldNum|
|00000cb0| 2c 48 61 6e 64 6c 65 20 | 66 69 65 6c 64 56 61 6c |,Handle |fieldVal|
|00000cc0| 29 3b 0d 70 61 73 63 61 | 6c 20 76 6f 69 64 09 09 |);.pasca|l void..|
|00000cd0| 53 65 74 46 69 65 6c 64 | 42 79 49 44 28 58 43 6d |SetField|ByID(XCm|
|00000ce0| 64 42 6c 6f 63 6b 50 74 | 72 2c 20 42 6f 6f 6c 65 |dBlockPt|r, Boole|
|00000cf0| 61 6e 20 63 61 72 64 46 | 69 65 6c 64 46 6c 61 67 |an cardF|ieldFlag|
|00000d00| 2c 20 73 68 6f 72 74 20 | 66 69 65 6c 64 49 44 2c |, short |fieldID,|
|00000d10| 48 61 6e 64 6c 65 20 66 | 69 65 6c 64 56 61 6c 29 |Handle f|ieldVal)|
|00000d20| 3b 0d 70 61 73 63 61 6c | 20 42 6f 6f 6c 65 61 6e |;.pascal| Boolean|
|00000d30| 09 53 74 72 69 6e 67 45 | 71 75 61 6c 28 58 43 6d |.StringE|qual(XCm|
|00000d40| 64 42 6c 6f 63 6b 50 74 | 72 2c 20 75 6e 73 69 67 |dBlockPt|r, unsig|
|00000d50| 6e 65 64 20 63 68 61 72 | 20 20 2a 73 74 72 31 2c |ned char| *str1,|
|00000d60| 20 75 6e 73 69 67 6e 65 | 64 20 63 68 61 72 20 20 | unsigne|d char |
|00000d70| 2a 73 74 72 32 29 3b 0d | 70 61 73 63 61 6c 20 76 |*str2);.|pascal v|
|00000d80| 6f 69 64 09 09 52 65 74 | 75 72 6e 54 6f 50 61 73 |oid..Ret|urnToPas|
|00000d90| 28 58 43 6d 64 42 6c 6f | 63 6b 50 74 72 2c 20 50 |(XCmdBlo|ckPtr, P|
|00000da0| 74 72 20 7a 65 72 6f 53 | 74 72 2c 20 53 74 72 69 |tr zeroS|tr, Stri|
|00000db0| 6e 67 50 74 72 20 70 61 | 73 53 74 72 29 3b 0d 70 |ngPtr pa|sStr);.p|
|00000dc0| 61 73 63 61 6c 20 76 6f | 69 64 09 09 53 63 61 6e |ascal vo|id..Scan|
|00000dd0| 54 6f 52 65 74 75 72 6e | 28 58 43 6d 64 42 6c 6f |ToReturn|(XCmdBlo|
|00000de0| 63 6b 50 74 72 2c 20 50 | 74 72 20 2a 73 63 61 6e |ckPtr, P|tr *scan|
|00000df0| 48 6e 64 6c 29 3b 0d 70 | 61 73 63 61 6c 20 76 6f |Hndl);.p|ascal vo|
|00000e00| 69 64 09 09 53 63 61 6e | 54 6f 5a 65 72 6f 28 58 |id..Scan|ToZero(X|
|00000e10| 43 6d 64 42 6c 6f 63 6b | 50 74 72 2c 20 50 74 72 |CmdBlock|Ptr, Ptr|
|00000e20| 20 2a 73 63 61 6e 48 6e | 64 6c 29 3b 0d 00 00 00 | *scanHn|dl);....|
|00000e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+
