/ Developer CD Series 1999 …ember: Reference Library / Apple Developer Reference Library (December 1999) (Disk 1).iso / pc / technical documentation / develop / develop issue 25 / develop issue 25 code / display manager sample.sea / Display Manager Sample / Source / utils.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 07 75 74 69 6c 73 2e | 63 00 00 00 00 00 00 00 |..utils.|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 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 10 e5 00 | 00 01 9a ac fc 5b de ac |........|.....[..|
|00000060| fc 5b de 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.[......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 6c ab 00 00 |........|....l...|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 0d 23 0d 23 09 09 75 74 |********|.#.#..ut|
|000000d0| 69 6c 73 2e 63 0d 23 0d | 23 09 09 54 68 69 73 20 |ils.c.#.|#..This |
|000000e0| 73 65 67 6d 65 6e 74 20 | 68 61 6e 64 6c 65 73 20 |segment |handles |
|000000f0| 66 69 6c 65 20 70 61 72 | 73 69 6e 67 2c 20 61 6e |file par|sing, an|
|00000100| 64 20 62 61 73 69 63 20 | 75 74 69 6c 69 74 79 20 |d basic |utility |
|00000110| 66 75 6e 63 74 69 6f 6e | 73 2e 0d 23 0d 23 09 09 |function|s..#.#..|
|00000120| 41 75 74 68 6f 72 3a 20 | 4d 69 63 68 61 65 6c 20 |Author: |Michael |
|00000130| 4d 61 72 69 6e 6b 6f 76 | 69 63 68 0d 23 09 09 09 |Marinkov|ich.#...|
|00000140| 09 41 70 70 6c 65 20 44 | 65 76 65 6c 6f 70 65 72 |.Apple D|eveloper|
|00000150| 20 54 65 63 68 6e 69 63 | 61 6c 20 53 75 70 70 6f | Technic|al Suppo|
|00000160| 72 74 0d 23 0d 23 0d 23 | 09 09 4d 6f 64 69 66 69 |rt.#.#.#|..Modifi|
|00000170| 63 61 74 69 6f 6e 20 48 | 69 73 74 6f 72 79 3a 20 |cation H|istory: |
|00000180| 0d 23 0d 23 09 09 09 36 | 2f 34 2f 39 35 09 09 4d |.#.#...6|/4/95..M|
|00000190| 57 4d 20 09 49 6e 69 74 | 69 61 6c 20 63 6f 64 69 |WM .Init|ial codi|
|000001a0| 6e 67 09 09 09 09 09 20 | 0d 23 09 09 09 31 30 2f |ng..... |.#...10/|
|000001b0| 31 32 2f 39 35 09 4d 57 | 4d 09 09 63 6c 65 61 6e |12/95.MW|M..clean|
|000001c0| 65 64 20 75 70 0d 23 0d | 23 09 09 43 6f 70 79 72 |ed up.#.|#..Copyr|
|000001d0| 69 67 68 74 20 a9 20 31 | 39 39 32 2d 39 35 20 41 |ight . 1|992-95 A|
|000001e0| 70 70 6c 65 20 43 6f 6d | 70 75 74 65 72 2c 20 49 |pple Com|puter, I|
|000001f0| 6e 63 2e 2c 20 41 6c 6c | 20 52 69 67 68 74 73 20 |nc., All| Rights |
|00000200| 52 65 73 65 72 76 65 64 | 0d 23 0d 23 0d 2a 2a 2a |Reserved|.#.#.***|
|00000210| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000220| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000230| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000250| 2a 2a 2a 2a 2f 0d 0d 23 | 69 6e 63 6c 75 64 65 20 |****/..#|include |
|00000260| 3c 45 76 65 6e 74 73 2e | 68 3e 0d 23 69 6e 63 6c |<Events.|h>.#incl|
|00000270| 75 64 65 20 3c 54 6f 6f | 6c 55 74 69 6c 73 2e 68 |ude <Too|lUtils.h|
|00000280| 3e 0d 23 69 6e 63 6c 75 | 64 65 20 3c 47 65 73 74 |>.#inclu|de <Gest|
|00000290| 61 6c 74 2e 68 3e 0d 23 | 69 6e 63 6c 75 64 65 20 |alt.h>.#|include |
|000002a0| 3c 4f 53 55 74 69 6c 73 | 2e 68 3e 0d 23 69 6e 63 |<OSUtils|.h>.#inc|
|000002b0| 6c 75 64 65 20 3c 53 74 | 61 6e 64 61 72 64 46 69 |lude <St|andardFi|
|000002c0| 6c 65 2e 68 3e 0d 0d 23 | 69 6e 63 6c 75 64 65 20 |le.h>..#|include |
|000002d0| 22 41 70 70 2e 68 22 0d | 23 69 6e 63 6c 75 64 65 |"App.h".|#include|
|000002e0| 20 22 50 72 6f 74 6f 2e | 68 22 0d 0d 0d 2f 2f 2d | "Proto.|h"...//-|
|000002f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000330| 2d 2d 2d 2d 2d 0d 2f 2f | 0d 2f 2f 09 44 6f 4f 70 |-----.//|.//.DoOp|
|00000340| 65 6e 4e 65 77 20 2d 20 | 71 75 65 72 79 20 75 73 |enNew - |query us|
|00000350| 65 72 20 66 6f 72 20 6e | 65 77 20 66 69 6c 65 20 |er for n|ew file |
|00000360| 6f 66 20 74 79 70 65 20 | 27 50 49 43 54 27 2e 20 |of type |'PICT'. |
|00000370| 4f 70 65 6e 20 69 74 20 | 61 6e 64 20 0d 2f 2f 09 |Open it |and .//.|
|00000380| 09 09 09 64 69 73 70 6c | 61 79 20 69 6e 20 61 20 |...displ|ay in a |
|00000390| 6e 65 77 20 77 69 6e 64 | 6f 77 2e 0d 2f 2f 0d 2f |new wind|ow..//./|
|000003a0| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|000003b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003e0| 2d 2d 2d 2d 2d 2d 2d 0d | 0d 76 6f 69 64 20 44 6f |-------.|.void Do|
|000003f0| 4f 70 65 6e 4e 65 77 28 | 76 6f 69 64 29 0d 7b 0d |OpenNew(|void).{.|
|00000400| 09 4f 53 45 72 72 09 09 | 09 09 09 65 72 72 3b 0d |.OSErr..|...err;.|
|00000410| 09 50 69 63 48 61 6e 64 | 6c 65 09 09 09 09 70 69 |.PicHand|le....pi|
|00000420| 63 74 3b 0d 09 53 74 61 | 6e 64 61 72 64 46 69 6c |ct;..Sta|ndardFil|
|00000430| 65 52 65 70 6c 79 09 09 | 72 65 70 6c 79 3b 0d 09 |eReply..|reply;..|
|00000440| 53 46 54 79 70 65 4c 69 | 73 74 09 09 20 09 09 74 |SFTypeLi|st.. ..t|
|00000450| 79 70 65 4c 69 73 74 3b | 0d 09 4f 53 54 79 70 65 |ypeList;|..OSType|
|00000460| 09 09 09 09 09 74 79 70 | 65 20 3d 20 27 50 49 43 |.....typ|e = 'PIC|
|00000470| 54 27 3b 0d 09 57 69 6e | 64 6f 77 52 65 66 09 09 |T';..Win|dowRef..|
|00000480| 09 09 77 69 6e 64 6f 77 | 3b 0d 09 52 65 63 74 09 |..window|;..Rect.|
|00000490| 09 09 09 09 62 6f 75 6e | 64 73 3b 0d 09 52 65 63 |....boun|ds;..Rec|
|000004a0| 74 09 09 09 09 09 73 63 | 72 65 65 6e 52 65 63 74 |t.....sc|reenRect|
|000004b0| 3b 0d 09 73 68 6f 72 74 | 09 09 09 09 09 6e 75 6d |;..short|.....num|
|000004c0| 54 79 70 65 73 3b 0d 09 | 44 6f 63 48 6e 64 09 09 |Types;..|DocHnd..|
|000004d0| 09 09 09 64 6f 63 3b 0d | 0d 09 6e 75 6d 54 79 70 |...doc;.|..numTyp|
|000004e0| 65 73 20 3d 20 31 3b 0d | 09 74 79 70 65 4c 69 73 |es = 1;.|.typeLis|
|000004f0| 74 5b 30 5d 20 3d 20 74 | 79 70 65 3b 0d 09 53 74 |t[0] = t|ype;..St|
|00000500| 61 6e 64 61 72 64 47 65 | 74 46 69 6c 65 28 6e 69 |andardGe|tFile(ni|
|00000510| 6c 2c 20 6e 75 6d 54 79 | 70 65 73 2c 20 28 75 6e |l, numTy|pes, (un|
|00000520| 73 69 67 6e 65 64 20 6c | 6f 6e 67 20 2a 29 26 74 |signed l|ong *)&t|
|00000530| 79 70 65 4c 69 73 74 2c | 20 26 72 65 70 6c 79 29 |ypeList,| &reply)|
|00000540| 3b 0d 09 69 66 20 28 20 | 72 65 70 6c 79 2e 73 66 |;..if ( |reply.sf|
|00000550| 47 6f 6f 64 20 29 7b 0d | 09 09 70 69 63 74 20 3d |Good ){.|..pict =|
|00000560| 20 52 65 61 64 46 69 6c | 65 28 72 65 70 6c 79 2e | ReadFil|e(reply.|
|00000570| 73 66 46 69 6c 65 29 3b | 0d 09 09 69 66 20 28 70 |sfFile);|...if (p|
|00000580| 69 63 74 20 21 3d 20 6e | 69 6c 29 20 7b 0d 09 09 |ict != n|il) {...|
|00000590| 09 62 6f 75 6e 64 73 20 | 3d 20 28 2a 2a 70 69 63 |.bounds |= (**pic|
|000005a0| 74 29 2e 70 69 63 46 72 | 61 6d 65 3b 0d 09 09 09 |t).picFr|ame;....|
|000005b0| 5a 65 72 6f 52 65 63 74 | 28 26 62 6f 75 6e 64 73 |ZeroRect|(&bounds|
|000005c0| 29 3b 0d 09 09 09 4f 66 | 66 73 65 74 52 65 63 74 |);....Of|fsetRect|
|000005d0| 28 26 62 6f 75 6e 64 73 | 2c 20 32 2c 20 47 65 74 |(&bounds|, 2, Get|
|000005e0| 4d 42 61 72 48 65 69 67 | 68 74 28 29 20 2a 20 32 |MBarHeig|ht() * 2|
|000005f0| 29 3b 0d 09 09 09 62 6f | 75 6e 64 73 2e 72 69 67 |);....bo|unds.rig|
|00000600| 68 74 20 2b 3d 20 6b 53 | 63 72 6f 6c 6c 57 69 64 |ht += kS|crollWid|
|00000610| 74 68 3b 0d 09 09 09 62 | 6f 75 6e 64 73 2e 62 6f |th;....b|ounds.bo|
|00000620| 74 74 6f 6d 20 2b 3d 20 | 6b 53 63 72 6f 6c 6c 57 |ttom += |kScrollW|
|00000630| 69 64 74 68 3b 0d 09 09 | 09 73 63 72 65 65 6e 52 |idth;...|.screenR|
|00000640| 65 63 74 20 3d 20 71 64 | 2e 73 63 72 65 65 6e 42 |ect = qd|.screenB|
|00000650| 69 74 73 2e 62 6f 75 6e | 64 73 3b 0d 09 09 09 69 |its.boun|ds;....i|
|00000660| 66 20 28 62 6f 75 6e 64 | 73 2e 72 69 67 68 74 20 |f (bound|s.right |
|00000670| 3e 20 73 63 72 65 65 6e | 52 65 63 74 2e 72 69 67 |> screen|Rect.rig|
|00000680| 68 74 29 20 0d 09 09 09 | 09 62 6f 75 6e 64 73 2e |ht) ....|.bounds.|
|00000690| 72 69 67 68 74 20 3d 20 | 73 63 72 65 65 6e 52 65 |right = |screenRe|
|000006a0| 63 74 2e 72 69 67 68 74 | 3b 0d 09 09 09 69 66 20 |ct.right|;....if |
|000006b0| 28 62 6f 75 6e 64 73 2e | 62 6f 74 74 6f 6d 20 3e |(bounds.|bottom >|
|000006c0| 20 73 63 72 65 65 6e 52 | 65 63 74 2e 62 6f 74 74 | screenR|ect.bott|
|000006d0| 6f 6d 29 20 0d 09 09 09 | 09 62 6f 75 6e 64 73 2e |om) ....|.bounds.|
|000006e0| 62 6f 74 74 6f 6d 20 3d | 20 73 63 72 65 65 6e 52 |bottom =| screenR|
|000006f0| 65 63 74 2e 62 6f 74 74 | 6f 6d 3b 0d 0d 09 09 09 |ect.bott|om;.....|
|00000700| 77 69 6e 64 6f 77 20 3d | 20 43 72 65 61 74 65 57 |window =| CreateW|
|00000710| 69 6e 64 6f 77 28 6e 69 | 6c 2c 20 6e 69 6c 2c 20 |indow(ni|l, nil, |
|00000720| 26 62 6f 75 6e 64 73 2c | 20 72 65 70 6c 79 2e 73 |&bounds,| reply.s|
|00000730| 66 46 69 6c 65 2e 6e 61 | 6d 65 2c 20 66 61 6c 73 |fFile.na|me, fals|
|00000740| 65 2c 0d 09 09 09 09 09 | 09 09 09 20 20 7a 6f 6f |e,......|...  zoo|
|00000750| 6d 44 6f 63 50 72 6f 63 | 2c 20 6b 44 6f 63 4b 69 |mDocProc|, kDocKi|
|00000760| 6e 64 2c 20 28 57 69 6e | 64 6f 77 50 74 72 29 2d |nd, (Win|dowPtr)-|
|00000770| 31 2c 20 74 72 75 65 2c | 20 6e 69 6c 20 29 3b 0d |1, true,| nil );.|
|00000780| 0d 09 09 09 69 66 20 28 | 77 69 6e 64 6f 77 20 21 |....if (|window !|
|00000790| 3d 20 6e 69 6c 29 20 7b | 0d 09 09 09 09 64 6f 63 |= nil) {|.....doc|
|000007a0| 20 3d 20 28 44 6f 63 48 | 6e 64 29 47 65 74 57 52 | = (DocH|nd)GetWR|
|000007b0| 65 66 43 6f 6e 28 77 69 | 6e 64 6f 77 29 3b 0d 09 |efCon(wi|ndow);..|
|000007c0| 09 09 09 69 66 20 28 64 | 6f 63 20 21 3d 20 6e 69 |...if (d|oc != ni|
|000007d0| 6c 29 0d 09 09 09 09 09 | 28 2a 2a 64 6f 63 29 2e |l)......|(**doc).|
|000007e0| 77 6f 72 6c 64 20 3d 20 | 50 69 63 74 54 6f 57 6f |world = |PictToWo|
|000007f0| 72 6c 64 28 70 69 63 74 | 2c 20 26 65 72 72 29 3b |rld(pict|, &err);|
|00000800| 0d 09 09 09 09 09 69 66 | 20 28 28 2a 2a 64 6f 63 |......if| ((**doc|
|00000810| 29 2e 77 6f 72 6c 64 20 | 3d 3d 20 6e 69 6c 20 7c |).world |== nil ||
|00000820| 7c 20 65 72 72 20 21 3d | 20 6e 6f 45 72 72 29 20 || err !=| noErr) |
|00000830| 7b 0d 09 09 09 09 09 09 | 4b 69 6c 6c 50 69 63 74 |{.......|KillPict|
|00000840| 75 72 65 28 70 69 63 74 | 29 3b 0d 09 09 09 09 09 |ure(pict|);......|
|00000850| 09 52 65 6d 6f 76 65 57 | 69 6e 64 6f 77 28 77 69 |.RemoveW|indow(wi|
|00000860| 6e 64 6f 77 29 3b 0d 09 | 09 09 09 09 09 48 61 6e |ndow);..|.....Han|
|00000870| 64 6c 65 45 72 72 6f 72 | 28 65 72 72 2c 20 66 61 |dleError|(err, fa|
|00000880| 6c 73 65 29 3b 0d 09 09 | 09 09 09 7d 0d 09 09 09 |lse);...|...}....|
|00000890| 09 09 65 6c 73 65 0d 09 | 09 09 09 09 09 41 64 6a |..else..|.....Adj|
|000008a0| 75 73 74 53 63 72 6f 6c | 6c 62 61 72 73 28 77 69 |ustScrol|lbars(wi|
|000008b0| 6e 64 6f 77 2c 74 72 75 | 65 29 3b 0d 0d 09 09 09 |ndow,tru|e);.....|
|000008c0| 7d 0d 09 09 09 69 66 20 | 28 70 69 63 74 20 21 3d |}....if |(pict !=|
|000008d0| 20 6e 69 6c 29 0d 09 09 | 09 09 4b 69 6c 6c 50 69 | nil)...|..KillPi|
|000008e0| 63 74 75 72 65 28 70 69 | 63 74 29 3b 0d 09 09 7d |cture(pi|ct);...}|
|000008f0| 09 09 09 09 09 09 09 20 | 20 0d 09 7d 0d 09 0d 7d |....... | ..}...}|
|00000900| 0d 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...//---|--------|
|00000910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 0d 2f |--------|---.//./|
|00000950| 2f 09 52 65 61 64 46 69 | 6c 65 20 2d 20 6f 70 65 |/.ReadFi|le - ope|
|00000960| 6e 20 61 6e 64 20 72 65 | 61 64 20 64 69 73 6b 20 |n and re|ad disk |
|00000970| 64 61 74 61 2c 20 72 65 | 74 75 72 6e 69 6e 67 20 |data, re|turning |
|00000980| 50 49 43 54 2e 0d 2f 2f | 09 09 09 09 0d 2f 2f 0d |PICT..//|.....//.|
|00000990| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|000009a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009d0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0d 50 69 63 48 61 6e |--------|..PicHan|
|000009e0| 64 6c 65 20 52 65 61 64 | 46 69 6c 65 28 46 53 53 |dle Read|File(FSS|
|000009f0| 70 65 63 20 73 70 65 63 | 29 0d 7b 0d 09 4f 53 45 |pec spec|).{..OSE|
|00000a00| 72 72 09 09 09 09 09 65 | 72 72 3b 0d 09 50 69 63 |rr.....e|rr;..Pic|
|00000a10| 48 61 6e 64 6c 65 09 09 | 09 09 70 69 63 74 3b 0d |Handle..|..pict;.|
|00000a20| 09 6c 6f 6e 67 09 09 09 | 09 09 70 69 63 74 53 69 |.long...|..pictSi|
|00000a30| 7a 65 3b 0d 09 6c 6f 6e | 67 09 09 09 09 09 66 69 |ze;..lon|g.....fi|
|00000a40| 6c 65 53 69 7a 65 3b 0d | 09 73 68 6f 72 74 09 09 |leSize;.|.short..|
|00000a50| 09 09 09 72 65 66 4e 75 | 6d 3b 0d 0d 09 53 65 74 |...refNu|m;...Set|
|00000a60| 43 75 72 73 6f 72 28 2a | 47 65 74 43 75 72 73 6f |Cursor(*|GetCurso|
|00000a70| 72 28 77 61 74 63 68 43 | 75 72 73 6f 72 29 29 3b |r(watchC|ursor));|
|00000a80| 09 09 09 2f 2f 20 73 65 | 74 20 74 68 65 20 63 75 |...// se|t the cu|
|00000a90| 72 73 6f 72 20 74 6f 20 | 61 20 77 61 74 63 68 20 |rsor to |a watch |
|00000aa0| 77 68 69 6c 65 20 62 75 | 73 79 0d 09 0d 09 65 72 |while bu|sy....er|
|00000ab0| 72 20 3d 20 46 53 70 4f | 70 65 6e 44 46 28 20 26 |r = FSpO|penDF( &|
|00000ac0| 73 70 65 63 2c 20 66 73 | 52 64 57 72 53 68 50 65 |spec, fs|RdWrShPe|
|00000ad0| 72 6d 2c 20 26 72 65 66 | 4e 75 6d 20 29 3b 0d 09 |rm, &ref|Num );..|
|00000ae0| 69 66 20 28 20 65 72 72 | 20 3d 3d 20 6e 6f 45 72 |if ( err| == noEr|
|00000af0| 72 20 29 20 7b 0d 09 09 | 65 72 72 20 3d 20 47 65 |r ) {...|err = Ge|
|00000b00| 74 45 4f 46 28 20 72 65 | 66 4e 75 6d 2c 20 26 66 |tEOF( re|fNum, &f|
|00000b10| 69 6c 65 53 69 7a 65 20 | 29 3b 0d 09 09 69 66 20 |ileSize |);...if |
|00000b20| 28 20 65 72 72 20 3d 3d | 20 6e 6f 45 72 72 20 29 |( err ==| noErr )|
|00000b30| 20 7b 0d 09 09 09 65 72 | 72 20 3d 20 53 65 74 46 | {....er|r = SetF|
|00000b40| 50 6f 73 28 72 65 66 4e | 75 6d 2c 20 66 73 46 72 |Pos(refN|um, fsFr|
|00000b50| 6f 6d 4d 61 72 6b 2c 20 | 35 31 32 29 3b 20 20 20 |omMark, |512);   |
|00000b60| 2f 2f 20 73 65 74 20 70 | 6f 73 69 74 69 6f 6e 20 |// set p|osition |
|00000b70| 74 6f 20 6f 75 72 20 70 | 69 63 74 75 72 65 20 64 |to our p|icture d|
|00000b80| 61 74 61 0d 09 09 09 69 | 66 20 28 20 65 72 72 20 |ata....i|f ( err |
|00000b90| 3d 3d 20 6e 6f 45 72 72 | 20 29 20 7b 0d 09 09 09 |== noErr| ) {....|
|00000ba0| 09 70 69 63 74 53 69 7a | 65 20 3d 20 66 69 6c 65 |.pictSiz|e = file|
|00000bb0| 53 69 7a 65 20 2d 20 35 | 31 32 3b 0d 09 09 09 09 |Size - 5|12;.....|
|00000bc0| 70 69 63 74 20 3d 20 28 | 50 69 63 48 61 6e 64 6c |pict = (|PicHandl|
|00000bd0| 65 29 4e 65 77 48 61 6e | 64 6c 65 28 70 69 63 74 |e)NewHan|dle(pict|
|00000be0| 53 69 7a 65 29 3b 0d 09 | 09 09 09 65 72 72 20 3d |Size);..|...err =|
|00000bf0| 20 4d 65 6d 45 72 72 6f | 72 28 29 3b 0d 0d 09 09 | MemErro|r();....|
|00000c00| 09 09 69 66 20 28 20 65 | 72 72 20 3d 3d 20 6e 6f |..if ( e|rr == no|
|00000c10| 45 72 72 20 26 26 20 70 | 69 63 74 20 21 3d 20 6e |Err && p|ict != n|
|00000c20| 69 6c 20 29 20 7b 0d 09 | 09 09 09 09 48 4c 6f 63 |il ) {..|....HLoc|
|00000c30| 6b 28 28 48 61 6e 64 6c | 65 29 20 70 69 63 74 29 |k((Handl|e) pict)|
|00000c40| 3b 0d 09 09 09 09 09 65 | 72 72 20 3d 20 46 53 52 |;......e|rr = FSR|
|00000c50| 65 61 64 28 72 65 66 4e | 75 6d 2c 20 26 70 69 63 |ead(refN|um, &pic|
|00000c60| 74 53 69 7a 65 2c 20 2a | 70 69 63 74 29 3b 09 09 |tSize, *|pict);..|
|00000c70| 2f 2f 20 72 65 61 64 20 | 69 6e 20 74 68 65 20 70 |// read |in the p|
|00000c80| 69 63 74 20 64 61 74 61 | 0d 09 09 09 09 09 48 55 |ict data|......HU|
|00000c90| 6e 6c 6f 63 6b 28 28 48 | 61 6e 64 6c 65 29 20 70 |nlock((H|andle) p|
|00000ca0| 69 63 74 29 3b 0d 09 09 | 09 09 7d 0d 09 09 09 7d |ict);...|..}....}|
|00000cb0| 0d 09 09 7d 0d 09 0d 09 | 09 46 53 43 6c 6f 73 65 |...}....|.FSClose|
|00000cc0| 28 20 72 65 66 4e 75 6d | 20 29 3b 09 09 09 2f 2f |( refNum| );...//|
|00000cd0| 20 63 6c 6f 73 65 20 74 | 68 65 20 66 69 6c 65 0d | close t|he file.|
|00000ce0| 09 09 53 65 74 43 75 72 | 73 6f 72 28 20 26 71 64 |..SetCur|sor( &qd|
|00000cf0| 2e 61 72 72 6f 77 20 29 | 3b 09 09 2f 2f 20 73 65 |.arrow )|;..// se|
|00000d00| 74 20 63 75 72 73 6f 72 | 20 62 61 63 6b 20 74 6f |t cursor| back to|
|00000d10| 20 61 72 72 6f 77 0d 09 | 7d 0d 09 0d 09 69 66 20 | arrow..|}....if |
|00000d20| 28 65 72 72 20 21 3d 20 | 6e 6f 45 72 72 29 0d 09 |(err != |noErr)..|
|00000d30| 09 70 69 63 74 20 3d 20 | 6e 69 6c 3b 0d 09 0d 09 |.pict = |nil;....|
|00000d40| 72 65 74 75 72 6e 20 70 | 69 63 74 3b 0d 0d 7d 0d |return p|ict;..}.|
|00000d50| 09 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...//---|--------|
|00000d60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 0d 2f |--------|---.//./|
|00000da0| 2f 09 5a 65 72 6f 52 65 | 63 74 20 2d 20 7a 65 72 |/.ZeroRe|ct - zer|
|00000db0| 6f 20 74 68 65 20 74 6f | 70 2d 6c 65 66 74 20 70 |o the to|p-left p|
|00000dc0| 6f 69 6e 74 73 20 6f 66 | 20 61 20 72 65 63 74 0d |oints of| a rect.|
|00000dd0| 2f 2f 09 09 09 09 0d 2f | 2f 0d 2f 2f 2d 2d 2d 2d |//...../|/.//----|
|00000de0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e20| 2d 2d 0d 0d 76 6f 69 64 | 20 5a 65 72 6f 52 65 63 |--..void| ZeroRec|
|00000e30| 74 28 52 65 63 74 20 2a | 72 29 0d 7b 0d 09 52 65 |t(Rect *|r).{..Re|
|00000e40| 63 74 09 09 7a 72 3b 0d | 09 0d 09 7a 72 20 3d 20 |ct..zr;.|...zr = |
|00000e50| 2a 72 3b 0d 09 0d 09 69 | 66 20 28 7a 72 2e 6c 65 |*r;....i|f (zr.le|
|00000e60| 66 74 20 3c 20 30 29 0d | 09 09 4f 66 66 73 65 74 |ft < 0).|..Offset|
|00000e70| 52 65 63 74 28 26 7a 72 | 2c 7a 72 2e 6c 65 66 74 |Rect(&zr|,zr.left|
|00000e80| 2c 30 29 3b 0d 09 69 66 | 20 28 7a 72 2e 74 6f 70 |,0);..if| (zr.top|
|00000e90| 20 3c 20 30 29 0d 09 09 | 4f 66 66 73 65 74 52 65 | < 0)...|OffsetRe|
|00000ea0| 63 74 28 26 7a 72 2c 30 | 2c 7a 72 2e 74 6f 70 29 |ct(&zr,0|,zr.top)|
|00000eb0| 3b 0d 09 0d 09 4f 66 66 | 73 65 74 52 65 63 74 28 |;....Off|setRect(|
|00000ec0| 26 7a 72 2c 2d 7a 72 2e | 6c 65 66 74 2c 2d 7a 72 |&zr,-zr.|left,-zr|
|00000ed0| 2e 74 6f 70 29 3b 0d 09 | 0d 09 2a 72 20 3d 20 7a |.top);..|..*r = z|
|00000ee0| 72 3b 0d 0d 7d 20 0d 0d | 0d 2f 2f 2d 2d 2d 2d 2d |r;..} ..|.//-----|
|00000ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f30| 2d 0d 2f 2f 0d 2f 2f 09 | 70 73 74 72 63 70 79 20 |-.//.//.|pstrcpy |
|00000f40| 2d 20 70 61 73 63 61 6c | 20 73 74 72 69 6e 67 20 |- pascal| string |
|00000f50| 63 6f 70 79 0d 2f 2f 09 | 09 09 09 0d 2f 2f 0d 2f |copy.//.|....//./|
|00000f60| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|00000f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000fa0| 2d 2d 2d 2d 2d 2d 2d 0d | 0d 76 6f 69 64 20 70 73 |-------.|.void ps|
|00000fb0| 74 72 63 70 79 28 53 74 | 72 69 6e 67 50 74 72 20 |trcpy(St|ringPtr |
|00000fc0| 64 73 74 2c 20 53 74 72 | 69 6e 67 50 74 72 20 73 |dst, Str|ingPtr s|
|00000fd0| 72 63 29 0d 7b 0d 09 73 | 68 6f 72 74 09 63 3b 0d |rc).{..s|hort.c;.|
|00000fe0| 09 0d 09 66 6f 72 20 28 | 63 20 3d 20 2a 73 72 63 |...for (|c = *src|
|00000ff0| 3b 20 63 20 3e 20 2d 31 | 3b 20 63 2d 2d 29 0d 09 |; c > -1|; c--)..|
|00001000| 09 64 73 74 5b 63 5d 20 | 3d 20 73 72 63 5b 63 5d |.dst[c] |= src[c]|
|00001010| 3b 0d 7d 0d 0d 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |;.}...//|--------|
|00001020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|00001060| 2f 0d 2f 2f 09 70 73 74 | 72 63 61 74 20 2d 20 70 |/.//.pst|rcat - p|
|00001070| 61 73 63 61 6c 20 73 74 | 72 69 6e 67 20 63 6f 6e |ascal st|ring con|
|00001080| 63 61 74 0d 2f 2f 09 09 | 09 09 0d 2f 2f 0d 2f 2f |cat.//..|...//.//|
|00001090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010d0| 2d 2d 2d 2d 2d 2d 0d 0d | 76 6f 69 64 20 70 73 74 |------..|void pst|
|000010e0| 72 63 61 74 28 53 74 72 | 69 6e 67 50 74 72 20 64 |rcat(Str|ingPtr d|
|000010f0| 73 74 2c 20 53 74 72 69 | 6e 67 50 74 72 20 73 72 |st, Stri|ngPtr sr|
|00001100| 63 29 0d 7b 0d 09 0d 09 | 73 68 6f 72 74 09 63 3b |c).{....|short.c;|
|00001110| 0d 0d 09 66 6f 72 20 28 | 63 20 3d 20 31 3b 20 63 |...for (|c = 1; c|
|00001120| 20 3c 20 73 72 63 5b 30 | 5d 20 2b 20 31 3b 20 63 | < src[0|] + 1; c|
|00001130| 2b 2b 29 0d 09 09 64 73 | 74 5b 64 73 74 5b 30 5d |++)...ds|t[dst[0]|
|00001140| 20 2b 20 63 5d 20 3d 20 | 73 72 63 5b 63 5d 3b 0d | + c] = |src[c];.|
|00001150| 09 64 73 74 5b 30 5d 20 | 2b 3d 20 73 72 63 5b 30 |.dst[0] |+= src[0|
|00001160| 5d 3b 0d 7d 0d 00 00 00 | 00 00 00 00 00 00 00 00 |];.}....|........|
|00001170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001180| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00001190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000011a0| 00 00 00 bb ac 61 7b ea | 12 4d 57 20 43 2f 43 2b |.....a{.|.MW C/C+|
|000011b0| 07 75 74 69 6c 73 2e 63 | 02 00 00 00 54 45 58 54 |.utils.c|....TEXT|
|000011c0| 43 57 49 45 01 00 00 00 | 01 c0 00 00 00 00 03 71 |CWIE....|.......q|
|000011d0| 00 00 54 45 58 54 43 57 | 49 45 01 00 00 00 01 c0 |..TEXTCW|IE......|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 ac a4 83 9d 00 00 | 10 e5 00 00 01 9a 4b b7 |........|......K.|
|00001200| 11 53 74 75 66 66 49 74 | 20 45 78 70 61 6e 64 65 |.StuffIt| Expande|
|00001210| 72 aa 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |r.......|........|
|00001220| 00 00 00 01 00 00 00 bb | ac 62 b8 c7 0a 43 53 44 |........|.b...CSD|
|00001230| 65 6d 6f 2e 36 38 4b 00 | 00 00 00 00 00 00 00 00 |emo.68K.|........|
|00001240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00001250| 00 00 00 bb ac 76 a8 49 | 0b 43 6f 6d 70 61 63 74 |.....v.I|.Compact|
|00001260| 20 50 72 6f 43 20 31 2e | 32 2e 32 00 00 00 00 00 | ProC 1.|2.2.....|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 bb |........|........|
|00001280| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00001290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012a0| 00 00 00 00 00 00 00 03 | 00 04 00 a0 00 18 02 69 |........|.......i|
|000012b0| 02 77 00 a0 00 18 02 69 | 02 77 ac fc 23 bf 00 00 |.w.....i|.w..#...|
|000012c0| 08 7e 00 00 08 7e 00 00 | 0e 57 01 00 00 00 00 04 |.~...~..|.W......|
|000012d0| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|000012e0| 00 00 00 46 00 cc 28 d4 | 2a 3c 00 00 00 1c 00 46 |...F..(.|*<.....F|
|000012f0| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00001300| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00001310| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00001320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+