/ MacWorld 1999 July / Macworld (1999-07).dmg / Shareware World / Info / For Developers / Mops 3.4.sea / Mops ƒ / zStruct

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 07 7a 53 74 72 75 63 | 74 00 00 00 00 00 00 00 |..zStruc|t.......|
|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 53 45 | 54 01 00 00 00 00 00 00 |.TEXTMSE|T.......|
|00000050| 00 00 00 00 00 06 c7 00 | 00 01 7d b2 ae f2 ac b2 |........|..}.....|
|00000060| ae f2 ac 00 00 06 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 2a 08 00 00 |........|....*...|
|00000080| 28 2a 0d 4d 6f 73 74 20 | 6f 66 20 74 68 65 20 53 |(*.Most |of the S|
|00000090| 74 72 75 63 74 20 63 6c | 61 73 73 65 73 20 61 72 |truct cl|asses ar|
|000000a0| 65 20 69 6e 20 70 53 74 | 72 75 63 74 2e 20 20 48 |e in pSt|ruct.  H|
|000000b0| 65 72 65 20 77 65 20 6a | 75 73 74 20 68 61 76 65 |ere we j|ust have|
|000000c0| 20 61 20 63 6f 75 70 6c | 65 20 6f 66 20 0d 63 6c | a coupl|e of .cl|
|000000d0| 61 73 73 65 73 20 74 68 | 61 74 20 77 65 20 63 6f |asses th|at we co|
|000000e0| 75 6c 64 6e 27 74 20 70 | 75 74 20 69 6e 20 70 53 |uldn't p|ut in pS|
|000000f0| 74 72 75 63 74 2c 20 73 | 69 6e 63 65 20 74 68 65 |truct, s|ince the|
|00000100| 79 20 6e 65 65 64 20 72 | 65 6c 6f 63 21 0d 2a 29 |y need r|eloc!.*)|
|00000110| 0d 0d 0d 5c 20 58 2d 41 | 52 52 41 59 20 63 61 6e |...\ X-A|RRAY can|
|00000120| 20 65 78 65 63 75 74 65 | 20 69 74 73 20 65 6c 65 | execute| its ele|
|00000130| 6d 65 6e 74 73 2e 0d 0d | 3a 63 6c 61 73 73 09 58 |ments...|:class.X|
|00000140| 2d 41 52 52 41 59 20 20 | 73 75 70 65 72 7b 20 61 |-ARRAY  |super{ a|
|00000150| 72 72 61 79 20 7d 0d 0d | 3a 6d 20 54 4f 3a 20 20 |rray }..|:m TO:  |
|00000160| 28 20 69 6e 64 65 78 20 | 2d 2d 20 29 09 5e 65 6c |( index |-- ).^el|
|00000170| 65 6d 3a 20 73 75 70 65 | 72 20 20 72 65 6c 6f 63 |em: supe|r  reloc|
|00000180| 21 20 20 3b 6d 0d 0d 3a | 6d 20 45 58 45 43 3a 20 |!  ;m..:|m EXEC: |
|00000190| 20 28 20 69 6e 64 65 78 | 20 2d 2d 20 29 0d 5c 09 | ( index| -- ).\.|
|000001a0| 69 6e 6c 69 6e 65 7b 20 | 5e 65 6c 65 6d 20 40 61 |inline{ |^elem @a|
|000001b0| 62 73 20 65 78 65 63 75 | 74 65 7d 20 20 3b 6d 0d |bs execu|te}  ;m.|
|000001c0| 09 69 6e 6c 69 6e 65 7b | 20 5e 65 6c 65 6d 20 20 |.inline{| ^elem  |
|000001d0| 28 65 78 5f 72 61 29 20 | 7d 20 20 3b 6d 0d 0d 3a |(ex_ra) |}  ;m..:|
|000001e0| 6d 20 46 49 4c 4c 3a 09 | 09 5c 20 28 20 78 74 20 |m FILL:.|.\ ( xt |
|000001f0| 2d 2d 20 29 0d 09 6c 69 | 6d 69 74 20 4e 49 46 20 |-- )..li|mit NIF |
|00000200| 20 64 72 6f 70 20 20 45 | 58 49 54 20 20 54 48 45 | drop  E|XIT  THE|
|00000210| 4e 09 09 5c 20 4f 75 74 | 20 69 66 20 6e 6f 20 65 |N..\ Out| if no e|
|00000220| 6c 65 6d 65 6e 74 73 0d | 09 69 64 78 62 61 73 65 |lements.|.idxbase|
|00000230| 20 20 74 75 63 6b 20 20 | 72 65 6c 6f 63 21 20 20 |  tuck  |reloc!  |
|00000240| 20 20 40 20 20 66 69 6c | 6c 3a 20 73 75 70 65 72 |  @  fil|l: super|
|00000250| 20 20 3b 6d 0d 0d 3a 6d | 20 50 55 54 3a 09 09 09 |  ;m..:m| PUT:...|
|00000260| 5c 20 28 20 78 74 30 20 | 2e 2e 2e 20 78 74 28 4e |\ ( xt0 |... xt(N|
|00000270| 2d 31 29 20 4e 20 2d 2d | 20 29 0d 09 6c 69 6d 69 |-1) N --| )..limi|
|00000280| 74 20 20 30 45 58 49 54 | 09 09 09 09 5c 20 4f 75 |t  0EXIT|....\ Ou|
|00000290| 74 20 69 66 20 6e 6f 20 | 65 6c 65 6d 65 6e 74 73 |t if no |elements|
|000002a0| 0d 09 66 61 6c 73 65 20 | 2d 3e 20 72 65 6c 6f 63 |..false |-> reloc|
|000002b0| 43 68 6b 3f 09 09 09 5c | 20 4d 61 79 20 67 65 74 |Chk?...\| May get|
|000002c0| 20 75 73 65 64 20 69 6e | 20 69 6e 73 74 61 6e 74 | used in| instant|
|000002d0| 69 61 74 69 6e 67 20 65 | 78 70 6f 72 74 65 64 20 |iating e|xported |
|000002e0| 6f 62 6a 73 0d 09 6c 69 | 6d 69 74 20 3f 23 78 74 |objs..li|mit ?#xt|
|000002f0| 73 0d 09 69 64 78 62 61 | 73 65 20 20 64 75 70 20 |s..idxba|se  dup |
|00000300| 20 6c 69 6d 69 74 20 31 | 2d 20 20 34 2a 20 20 2b | limit 1|-  4*  +|
|00000310| 0d 09 44 4f 20 20 69 20 | 72 65 6c 6f 63 21 20 20 |..DO  i |reloc!  |
|00000320| 2d 34 20 2b 4c 4f 4f 50 | 0d 09 74 72 75 65 20 2d |-4 +LOOP|..true -|
|00000330| 3e 20 72 65 6c 6f 63 43 | 68 6b 3f 20 20 3b 6d 0d |> relocC|hk?  ;m.|
|00000340| 0d 3a 6d 20 41 43 54 49 | 4f 4e 53 3a 09 09 5c 20 |.:m ACTI|ONS:..\ |
|00000350| 41 20 73 79 6e 6f 6e 79 | 6d 20 66 6f 72 20 70 75 |A synony|m for pu|
|00000360| 74 3a 2e 20 20 41 20 6d | 6f 72 65 20 61 70 70 72 |t:.  A m|ore appr|
|00000370| 6f 70 72 69 61 74 65 20 | 6e 61 6d 65 20 74 6f 20 |opriate |name to |
|00000380| 75 73 65 20 69 6e 0d 09 | 09 09 09 5c 20 73 75 62 |use in..|...\ sub|
|00000390| 2d 63 6c 61 73 73 65 73 | 20 73 75 63 68 20 61 73 |-classes| such as|
|000003a0| 20 64 69 61 6c 6f 67 73 | 2e 0d 09 70 75 74 3a 20 | dialogs|...put: |
|000003b0| 73 65 6c 66 20 20 3b 6d | 0d 0d 70 72 69 76 61 74 |self  ;m|..privat|
|000003c0| 65 0d 0d 3a 6d 20 50 72 | 69 6e 74 4e 78 74 73 3a |e..:m Pr|intNxts:|
|000003d0| 09 5c 20 28 20 6e 20 2d | 2d 20 29 0d 09 30 20 3f |.\ ( n -|- )..0 ?|
|000003e0| 64 6f 20 20 69 20 5e 65 | 6c 65 6d 3a 20 73 65 6c |do  i ^e|lem: sel|
|000003f0| 66 20 20 40 61 62 73 20 | 20 63 72 20 2e 69 64 20 |f  @abs | cr .id |
|00000400| 20 6c 6f 6f 70 20 20 3b | 6d 0d 0d 70 75 62 6c 69 | loop  ;|m..publi|
|00000410| 63 0d 0d 3a 6d 20 50 52 | 49 4e 54 3a 09 09 6c 69 |c..:m PR|INT:..li|
|00000420| 6d 69 74 20 20 70 72 69 | 6e 74 4e 78 74 73 3a 20 |mit  pri|ntNxts: |
|00000430| 73 65 6c 66 20 20 3b 6d | 0d 0d 3a 6d 20 43 4c 41 |self  ;m|..:m CLA|
|00000440| 53 53 49 4e 49 54 3a 09 | 5b 27 5d 20 6e 75 6c 6c |SSINIT:.|['] null|
|00000450| 20 20 66 69 6c 6c 3a 20 | 73 65 6c 66 20 20 3b 6d |  fill: |self  ;m|
|00000460| 0d 0d 3b 63 6c 61 73 73 | 0d 0d 0d 5c 20 58 2d 43 |..;class|...\ X-C|
|00000470| 4f 4c 20 69 73 20 61 20 | 63 6f 6c 6c 65 63 74 69 |OL is a |collecti|
|00000480| 6f 6e 20 6f 66 20 65 78 | 65 63 75 74 69 6f 6e 20 |on of ex|ecution |
|00000490| 74 6f 6b 65 6e 73 2e 0d | 0d 3a 63 6c 61 73 73 09 |tokens..|.:class.|
|000004a0| 58 2d 43 4f 4c 09 73 75 | 70 65 72 7b 20 20 28 63 |X-COL.su|per{  (c|
|000004b0| 6f 6c 29 20 20 78 2d 61 | 72 72 61 79 20 20 7d 0d |ol)  x-a|rray  }.|
|000004c0| 0d 3a 6d 20 20 52 45 4d | 4f 56 45 58 54 3a 09 5c |.:m  REM|OVEXT:.\|
|000004d0| 20 28 20 78 74 20 2d 2d | 20 29 0d 09 66 61 6c 73 | ( xt --| )..fals|
|000004e0| 65 20 2d 3e 20 72 65 6c | 6f 63 43 68 6b 3f 20 20 |e -> rel|ocChk?  |
|000004f0| 70 61 64 20 72 65 6c 6f | 63 21 20 20 74 72 75 65 |pad relo|c!  true|
|00000500| 20 2d 3e 20 72 65 6c 6f | 63 43 68 6b 3f 0d 09 70 | -> relo|cChk?..p|
|00000510| 61 64 20 40 20 20 69 6e | 64 65 78 6f 66 3a 20 73 |ad @  in|dexof: s|
|00000520| 65 6c 66 20 20 30 45 58 | 49 54 0d 09 72 65 6d 6f |elf  0EX|IT..remo|
|00000530| 76 65 3a 20 73 65 6c 66 | 20 20 3b 6d 0d 0d 3a 6d |ve: self|  ;m..:m|
|00000540| 20 20 50 52 49 4e 54 3a | 0d 09 67 65 74 3a 20 73 |  PRINT:|..get: s|
|00000550| 69 7a 65 20 20 70 72 69 | 6e 74 4e 58 74 73 3a 20 |ize  pri|ntNXts: |
|00000560| 73 65 6c 66 20 20 3b 6d | 0d 0d 3b 63 6c 61 73 73 |self  ;m|..;class|
|00000570| 0d 0d 0d 3a 20 43 48 4b | 4b 45 59 0d 09 63 72 20 |...: CHK|KEY..cr |
|00000580| 09 74 79 70 65 23 20 31 | 38 39 09 09 09 5c 20 22 |.type# 1|89...\ "|
|00000590| 70 61 75 73 65 64 20 2d | 20 3c 73 70 61 63 65 3e |paused -| <space>|
|000005a0| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 2e 2e 2e 22 | to cont|inue..."|
|000005b0| 0d 09 63 72 09 09 09 09 | 09 09 5c 20 30 31 46 65 |..cr....|..\ 01Fe|
|000005c0| 62 39 34 20 44 42 48 20 | 20 41 64 64 20 63 72 2e |b94 DBH | Add cr.|
|000005d0| 20 20 42 65 74 74 65 72 | 20 66 6f 72 20 54 57 2e |  Better| for TW.|
|000005e0| 0d 09 28 6b 65 79 29 20 | 20 63 72 20 20 30 20 2d |..(key) | cr  0 -|
|000005f0| 3e 20 6f 75 74 20 20 62 | 6c 20 3d 20 20 6e 69 66 |> out  b|l =  nif|
|00000600| 20 20 63 72 20 64 65 63 | 69 6d 61 6c 20 61 62 6f |  cr dec|imal abo|
|00000610| 72 74 20 20 74 68 65 6e | 20 20 3b 0d 0d 0d 3a 20 |rt  then|  ;...: |
|00000620| 3f 50 0d 09 73 6c 65 65 | 70 74 69 63 6b 73 20 20 |?P..slee|pticks  |
|00000630| 30 20 2d 3e 20 73 6c 65 | 65 70 74 69 63 6b 73 0d |0 -> sle|epticks.|
|00000640| 09 3f 74 65 72 6d 69 6e | 61 6c 0d 09 73 77 61 70 |.?termin|al..swap|
|00000650| 20 2d 3e 20 73 6c 65 65 | 70 74 69 63 6b 73 0d 09 | -> slee|pticks..|
|00000660| 4e 49 46 20 20 70 61 75 | 73 65 20 20 45 58 49 54 |NIF  pau|se  EXIT|
|00000670| 20 20 54 48 45 4e 09 09 | 5c 20 4e 6f 20 6b 65 79 |  THEN..|\ No key|
|00000680| 20 68 69 74 20 2d 20 6a | 75 73 74 20 64 6f 20 64 | hit - j|ust do d|
|00000690| 65 66 61 75 6c 74 20 50 | 41 55 53 45 0d 09 28 6b |efault P|AUSE..(k|
|000006a0| 65 79 29 20 64 72 6f 70 | 20 20 63 68 6b 4b 65 79 |ey) drop|  chkKey|
|000006b0| 20 20 3b 0d 0d 3a 20 50 | 0d 09 73 6c 65 65 70 74 |  ;..: P|..sleept|
|000006c0| 69 63 6b 73 20 20 30 20 | 2d 3e 20 73 6c 65 65 70 |icks  0 |-> sleep|
|000006d0| 74 69 63 6b 73 0d 09 3f | 74 65 72 6d 69 6e 61 6c |ticks..?|terminal|
|000006e0| 20 20 64 72 6f 70 0d 09 | 2d 3e 20 73 6c 65 65 70 |  drop..|-> sleep|
|000006f0| 74 69 63 6b 73 20 20 3b | 0d 0d 27 20 70 09 09 2d |ticks  ;|..' p..-|
|00000700| 3e 20 70 61 75 73 65 09 | 09 09 5c 20 54 68 69 73 |> pause.|..\ This|
|00000710| 20 77 69 6c 6c 20 62 65 | 20 69 6d 70 72 6f 76 65 | will be| improve|
|00000720| 64 20 77 68 65 6e 20 45 | 76 65 6e 74 73 20 69 73 |d when E|vents is|
|00000730| 20 6c 6f 61 64 65 64 0d | 27 20 3f 70 09 2d 3e 20 | loaded.|' ?p.-> |
|00000740| 3f 70 61 75 73 65 0d 00 | 00 00 00 00 00 00 00 00 |?pause..|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 01 00 00 00 01 42 | 00 00 00 42 00 00 00 3b |.......B|...B...;|
|00000790| 59 45 52 4b 43 4f 4d 20 | 01 00 00 00 00 00 00 00 |YERKCOM |........|
|000007a0| 39 00 01 00 0b 01 59 45 | 52 4b 54 45 58 54 01 00 |9.....YE|RKTEXT..|
|000007b0| 07 7a 53 74 72 75 63 74 | 02 00 00 00 50 61 72 74 |.zStruct|....Part|
|000007c0| 53 49 54 21 00 00 00 00 | 00 00 00 00 00 01 82 a6 |SIT!....|........|
|000007d0| 00 00 50 61 72 74 53 49 | 54 21 00 00 00 00 00 00 |..PartSI|T!......|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 b3 66 c2 83 00 00 | 00 00 00 00 01 7d 41 42 |...f....|.....}AB|
|00000800| 42 20 ff ff a4 b7 2a f7 | 00 00 00 17 0a 6d 69 6e |B ....*.|.....min|
|00000810| 69 70 6c 61 79 65 72 20 | 50 44 53 00 00 00 00 00 |iplayer |PDS.....|
|00000820| 00 00 00 00 00 00 00 00 | 00 00 00 00 07 02 45 58 |........|......EX|
|00000830| 54 52 ff ff a7 50 ab af | 00 00 00 17 08 51 45 31 |TR...P..|.....QE1|
|00000840| 32 2e 73 65 61 65 72 20 | 50 44 53 00 00 00 00 00 |2.seaer |PDS.....|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 07 02 4d 43 |........|......MC|
|00000860| 41 53 ff ff 9d e1 79 bc | 00 00 00 20 0a 4d 63 41 |AS....y.|... .McA|
|00000870| 73 73 65 6d 62 6c 79 20 | 50 44 53 00 00 00 00 00 |ssembly |PDS.....|
|00000880| 00 00 00 3e 00 00 03 ea | 00 00 04 f1 00 00 00 00 |...>....|........|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 91 |........|........|
|000008b0| 00 00 00 91 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 01 00 00 00 | 01 42 00 00 00 42 00 00 |........|.B...B..|
|000008d0| 00 3b 02 35 1c 28 2c 70 | 00 00 00 1c 00 32 00 00 |.;.5.(,p|.....2..|
|000008e0| 4d 49 46 4f 00 00 00 0a | 00 80 00 00 00 00 00 00 |MIFO....|........|
|000008f0| 02 35 1e 28 08 4d 69 73 | 63 49 6e 66 6f 00 00 00 |.5.(.Mis|cInfo...|
+--------+-------------------------+-------------------------+--------+--------+