/ AmigActive 4 / AACD04.ISO / AACD / Programming / CanDo / Decks1 / CanDoV2 / Tutorial2

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 4f 52 4d 00 00 15 c4 | 44 45 43 4b 41 4e 4e 4f |FORM....|DECKANNO|
|00000010| 00 00 00 10 41 56 2d 31 | 20 54 6f 6b 65 6e 73 20 |....AV-1| Tokens |
|00000020| 56 33 00 00 4e 41 4d 45 | 00 00 00 0c 54 65 73 74 |V3..NAME|....Test|
|00000030| 44 72 69 76 65 32 00 00 | 52 45 53 4f 00 00 15 8c |Drive2..|RESO....|
|00000040| 00 00 c3 a1 43 41 52 44 | 23 31 00 00 c3 99 55 73 |....CARD|#1....Us|
|00000050| 65 72 57 69 6e 64 6f 77 | 00 00 82 06 00 00 00 14 |erWindow|........|
|00000060| 00 00 02 79 00 54 02 80 | 01 08 00 00 01 08 00 00 |...y.T..|........|
|00000070| 00 00 00 2e 00 00 02 5b | 00 55 01 80 00 13 43 61 |.......[|.U....Ca|
|00000080| 6e 44 6f 3a 49 6d 61 67 | 65 73 2f 4d 6f 76 69 65 |nDo:Imag|es/Movie|
|00000090| 42 61 63 6b 64 72 6f 70 | 2e 69 6c 62 6d 00 00 00 |Backdrop|.ilbm...|
|000000a0| 00 10 00 00 02 86 00 56 | 01 80 00 03 00 00 00 00 |.......V|........|
|000000b0| 00 18 00 00 02 61 00 57 | 03 80 01 08 00 00 01 08 |.....a.W|........|
|000000c0| 00 01 81 08 00 00 00 00 | 00 10 00 00 02 8a 00 58 |........|.......X|
|000000d0| 01 80 01 04 00 0e 00 00 | 00 12 00 00 02 89 00 59 |........|.......Y|
|000000e0| 01 80 04 04 00 05 10 00 | 00 00 00 16 00 00 02 88 |........|........|
|000000f0| 00 5a 02 00 00 04 80 00 | 00 00 81 04 00 01 82 17 |.Z......|........|
|00000100| 00 00 00 0c 00 00 00 7f | 00 01 00 00 82 0a c3 84 |........|........|
|00000110| 50 72 65 76 69 6f 75 73 | 20 42 75 74 74 6f 6e 00 |Previous| Button.|
|00000120| 82 06 00 00 00 14 00 00 | 02 79 00 62 02 80 01 08 |........|.y.b....|
|00000130| 00 0f 01 08 00 32 00 00 | 00 28 00 00 02 68 00 63 |.....2..|.(...h.c|
|00000140| 01 80 00 13 43 61 6e 44 | 6f 3a 42 72 75 73 68 65 |....CanD|o:Brushe|
|00000150| 73 2f 6c 65 66 74 31 2e | 67 72 61 62 00 00 00 00 |s/left1.|grab....|
|00000160| 00 28 00 00 02 58 00 64 | 01 80 00 13 43 61 6e 44 |.(...X.d|....CanD|
|00000170| 6f 3a 42 72 75 73 68 65 | 73 2f 6c 65 66 74 32 2e |o:Brushe|s/left2.|
|00000180| 67 72 61 62 00 00 00 00 | 00 28 00 00 02 7d 00 65 |grab....|.(...}.e|
|00000190| 01 80 00 13 43 61 6e 44 | 6f 3a 42 72 75 73 68 65 |....CanD|o:Brushe|
|000001a0| 73 2f 6c 65 66 74 31 2e | 67 72 61 62 00 00 00 00 |s/left1.|grab....|
|000001b0| 00 12 00 00 02 5e 00 66 | 01 00 00 04 80 00 00 00 |.....^.f|........|
|000001c0| 82 20 00 00 00 1e 00 00 | 00 14 00 01 01 00 00 13 |. ......|........|
|000001d0| 50 72 65 76 69 6f 75 73 | 20 45 6e 74 72 79 00 00 |Previous| Entry..|
|000001e0| 82 0a c3 84 4e 65 78 74 | 20 42 75 74 74 6f 6e 00 |....Next| Button.|
|000001f0| 82 06 00 00 00 14 00 00 | 02 79 00 6e 02 80 01 08 |........|.y.n....|
|00000200| 00 3c 01 08 00 32 00 00 | 00 28 00 00 02 68 00 6f |.<...2..|.(...h.o|
|00000210| 01 80 00 13 43 61 6e 44 | 6f 3a 42 72 75 73 68 65 |....CanD|o:Brushe|
|00000220| 73 2f 72 69 67 68 74 31 | 2e 67 72 61 62 00 00 00 |s/right1|.grab...|
|00000230| 00 28 00 00 02 58 00 70 | 01 80 00 13 43 61 6e 44 |.(...X.p|....CanD|
|00000240| 6f 3a 42 72 75 73 68 65 | 73 2f 72 69 67 68 74 32 |o:Brushe|s/right2|
|00000250| 2e 67 72 61 62 00 00 00 | 00 28 00 00 02 7d 00 71 |.grab...|.(...}.q|
|00000260| 01 80 00 13 43 61 6e 44 | 6f 3a 42 72 75 73 68 65 |....CanD|o:Brushe|
|00000270| 73 2f 72 69 67 68 74 31 | 2e 67 72 61 62 00 00 00 |s/right1|.grab...|
|00000280| 00 12 00 00 02 5e 00 72 | 01 00 00 04 80 00 00 00 |.....^.r|........|
|00000290| 82 20 00 00 00 1a 00 00 | 00 14 00 01 01 00 00 13 |. ......|........|
|000002a0| 4e 65 78 74 20 45 6e 74 | 72 79 00 00 82 0a c3 85 |Next Ent|ry......|
|000002b0| 41 64 64 20 42 75 74 74 | 6f 6e 00 00 82 06 00 00 |Add Butt|on......|
|000002c0| 00 14 00 00 02 79 00 7a | 02 80 01 08 00 14 01 08 |.....y.z|........|
|000002d0| 00 4b 00 00 00 18 00 00 | 02 65 00 7b 02 80 00 03 |.K......|.e.{....|
|000002e0| 74 6f 70 61 7a 00 01 08 | 00 08 00 00 00 18 00 00 |topaz...|........|
|000002f0| 02 81 00 7c 03 80 01 04 | 01 00 81 08 00 02 81 08 |...|....|........|
|00000300| 00 03 00 00 00 18 00 00 | 02 84 00 7d 03 80 01 08 |........|...}....|
|00000310| 00 03 81 08 00 00 81 04 | 00 01 00 00 00 16 00 00 |........|........|
|00000320| 02 83 00 7e 01 80 00 03 | 20 20 41 64 64 20 20 00 |...~....|  Add  .|
|00000330| 00 00 00 18 00 00 02 5c | 00 7f 03 80 01 04 00 10 |.......\|........|
|00000340| 81 08 00 01 81 08 00 02 | 00 00 00 10 00 00 02 67 |........|.......g|
|00000350| 00 80 01 80 01 04 00 02 | 00 00 00 12 00 00 02 5e |........|.......^|
|00000360| 00 81 01 00 00 04 80 00 | 00 00 82 20 00 00 00 18 |........|... ....|
|00000370| 00 00 00 14 00 01 01 00 | 00 13 41 64 64 20 45 6e |........|..Add En|
|00000380| 74 72 79 00 82 0a c3 8c | 2e 4e 61 6d 65 00 82 06 |try.....|.Name...|
|00000390| 00 00 00 14 00 00 02 79 | 00 89 02 80 01 08 00 e6 |.......y|........|
|000003a0| 01 08 00 34 00 00 00 14 | 00 00 02 7f 00 8a 02 80 |...4....|........|
|000003b0| 01 08 01 40 01 08 00 08 | 00 00 00 12 00 00 02 6f |...@....|.......o|
|000003c0| 00 8b 01 80 00 04 80 00 | 00 00 00 00 00 10 00 00 |........|........|
|000003d0| 02 73 00 8c 01 80 01 08 | 00 28 00 00 00 10 00 00 |.s......|.(......|
|000003e0| 02 6d 00 8d 01 80 00 03 | 00 00 00 00 00 18 00 00 |.m......|........|
|000003f0| 02 5c 00 8e 03 00 01 04 | 00 80 81 08 00 01 81 08 |.\......|........|
|00000400| 00 02 82 0a c3 8b 2e 4e | 75 6d 62 65 72 00 82 06 |.......N|umber...|
|00000410| 00 00 00 14 00 00 02 79 | 00 93 02 80 01 08 00 e6 |.......y|........|
|00000420| 01 08 00 46 00 00 00 14 | 00 00 02 7f 00 94 02 80 |...F....|........|
|00000430| 01 08 00 50 01 08 00 08 | 00 00 00 12 00 00 02 6f |...P....|.......o|
|00000440| 00 95 01 80 00 04 80 00 | 00 00 00 00 00 10 00 00 |........|........|
|00000450| 02 73 00 96 01 80 01 08 | 00 0a 00 00 00 16 00 00 |.s......|........|
|00000460| 02 71 00 97 02 80 01 08 | 00 00 00 08 7f ff ff ff |.q......|........|
|00000470| 00 00 00 10 00 00 02 6a | 00 98 01 80 01 08 00 00 |.......j|........|
|00000480| 00 00 00 18 00 00 02 5c | 00 99 03 00 01 04 00 80 |.......\|........|
|00000490| 81 08 00 01 81 08 00 02 | 82 0a c3 86 2e 44 65 73 |........|.....Des|
|000004a0| 63 72 69 70 74 69 6f 6e | 00 00 82 06 00 00 00 14 |cription|........|
|000004b0| 00 00 02 79 00 9e 02 80 | 01 08 00 e6 01 08 00 58 |...y....|.......X|
|000004c0| 00 00 00 14 00 00 02 7f | 00 9f 02 80 01 08 01 40 |........|.......@|
|000004d0| 01 08 00 40 00 00 00 18 | 00 00 02 65 00 a0 02 80 |...@....|...e....|
|000004e0| 00 03 74 6f 70 61 7a 00 | 01 08 00 08 00 00 00 1a |..topaz.|........|
|000004f0| 00 00 02 81 00 a1 03 80 | 00 04 80 00 00 00 81 08 |........|........|
|00000500| 00 02 81 08 00 03 00 00 | 00 18 00 00 02 84 00 a2 |........|........|
|00000510| 03 80 01 08 00 01 81 08 | 00 00 81 04 00 02 00 00 |........|........|
|00000520| 00 18 00 00 02 5c 00 a3 | 03 80 01 04 00 80 81 08 |.....\..|........|
|00000530| 00 01 81 08 00 02 00 00 | 00 20 00 00 02 74 00 a4 |........|. ...t..|
|00000540| 01 80 00 13 44 65 73 63 | 72 69 70 74 69 6f 6e 20 |....Desc|ription |
|00000550| 2d 20 44 6f 63 00 00 00 | 00 10 00 00 02 7c 00 a5 |- Doc...|.....|..|
|00000560| 01 80 01 04 00 02 00 00 | 00 10 00 00 02 6e 00 a6 |........|.....n..|
|00000570| 01 00 01 04 00 02 82 0a | c3 8c 53 65 61 72 63 68 |........|..Search|
|00000580| 46 69 65 6c 64 00 82 06 | 00 00 00 14 00 00 02 79 |Field...|.......y|
|00000590| 00 ab 02 80 01 08 00 e6 | 01 08 00 a5 00 00 00 14 |........|........|
|000005a0| 00 00 02 7f 00 ac 02 80 | 01 08 01 40 01 08 00 08 |........|...@....|
|000005b0| 00 00 00 12 00 00 02 6f | 00 ad 01 80 00 04 80 00 |.......o|........|
|000005c0| 00 00 00 00 00 10 00 00 | 02 73 00 ae 01 80 01 08 |........|.s......|
|000005d0| 00 28 00 00 00 10 00 00 | 02 6d 00 af 01 80 00 03 |.(......|.m......|
|000005e0| 00 00 00 00 00 18 00 00 | 02 5c 00 b0 03 00 01 04 |........|.\......|
|000005f0| 00 01 81 08 00 01 81 08 | 00 02 82 20 00 00 00 42 |........|... ...B|
|00000600| 00 00 00 14 00 01 03 80 | 00 13 53 65 61 72 63 68 |........|..Search|
|00000610| 20 46 6f 72 20 45 6e 74 | 72 79 00 00 80 02 54 65 | For Ent|ry....Te|
|00000620| 78 74 46 72 6f 6d 28 22 | 53 65 61 72 63 68 46 69 |xtFrom("|SearchFi|
|00000630| 65 6c 64 22 29 00 80 03 | 2e 4e 61 6d 65 00 00 00 |eld")...|.Name...|
|00000640| 00 20 00 00 00 a8 00 02 | 02 00 00 13 53 65 61 72 |. ......|....Sear|
|00000650| 63 68 46 69 65 6c 64 00 | 00 02 4f 4e 00 00 82 0a |chField.|..ON....|
|00000660| c3 8d 53 61 76 65 00 00 | 82 06 00 00 00 1a 00 00 |..Save..|........|
|00000670| 02 5a 00 b9 02 80 01 04 | 00 01 00 03 50 72 6f 6a |.Z......|....Proj|
|00000680| 65 63 74 00 00 00 00 18 | 00 00 02 65 00 ba 02 80 |ect.....|...e....|
|00000690| 00 03 74 6f 70 61 7a 00 | 01 08 00 08 00 00 00 1a |..topaz.|........|
|000006a0| 00 00 02 81 00 bb 03 80 | 00 04 80 00 00 00 81 08 |........|........|
|000006b0| 00 02 81 08 00 03 00 00 | 00 18 00 00 02 84 00 bc |........|........|
|000006c0| 03 80 01 08 00 00 81 08 | 00 01 81 04 00 01 00 00 |........|........|
|000006d0| 00 14 00 00 02 83 00 bd | 01 80 00 03 53 61 76 65 |........|....Save|
|000006e0| 00 00 00 00 00 10 00 00 | 02 75 00 be 01 80 01 04 |........|.u......|
|000006f0| 00 01 00 00 00 10 00 00 | 02 67 00 bf 01 80 01 04 |........|.g......|
|00000700| 00 02 00 00 00 10 00 00 | 02 7e 00 c0 01 00 00 03 |........|.~......|
|00000710| 53 00 82 0f 00 00 00 1c | 00 00 00 14 00 01 01 00 |S.......|........|
|00000720| 00 13 53 61 76 65 20 44 | 61 74 61 62 61 73 65 00 |..Save D|atabase.|
|00000730| 82 0a c3 8d 4c 6f 61 64 | 00 00 82 06 00 00 00 1a |....Load|........|
|00000740| 00 00 02 5a 00 c8 02 80 | 01 04 00 01 00 03 50 72 |...Z....|......Pr|
|00000750| 6f 6a 65 63 74 00 00 00 | 00 18 00 00 02 65 00 c9 |oject...|.....e..|
|00000760| 02 80 00 03 74 6f 70 61 | 7a 00 01 08 00 08 00 00 |....topa|z.......|
|00000770| 00 1a 00 00 02 81 00 ca | 03 80 00 04 80 00 00 00 |........|........|
|00000780| 81 08 00 02 81 08 00 03 | 00 00 00 18 00 00 02 84 |........|........|
|00000790| 00 cb 03 80 01 08 00 00 | 81 08 00 01 81 04 00 01 |........|........|
|000007a0| 00 00 00 14 00 00 02 83 | 00 cc 01 80 00 03 4c 6f |........|......Lo|
|000007b0| 61 64 00 00 00 00 00 10 | 00 00 02 75 00 cd 01 80 |ad......|...u....|
|000007c0| 01 04 00 01 00 00 00 10 | 00 00 02 67 00 ce 01 80 |........|...g....|
|000007d0| 01 04 00 02 00 00 00 10 | 00 00 02 7e 00 cf 01 00 |........|...~....|
|000007e0| 00 03 4c 00 82 0f 00 00 | 00 1c 00 00 00 14 00 01 |..L.....|........|
|000007f0| 01 00 00 13 4c 6f 61 64 | 20 44 61 74 61 62 61 73 |....Load| Databas|
|00000800| 65 00 82 0a c3 8d 53 6f | 72 74 00 00 82 06 00 00 |e.....So|rt......|
|00000810| 00 1a 00 00 02 5a 00 d7 | 02 80 01 04 00 01 00 03 |.....Z..|........|
|00000820| 4f 70 74 69 6f 6e 73 00 | 00 00 00 18 00 00 02 65 |Options.|.......e|
|00000830| 00 d8 02 80 00 03 74 6f | 70 61 7a 00 01 08 00 08 |......to|paz.....|
|00000840| 00 00 00 1a 00 00 02 81 | 00 d9 03 80 00 04 80 00 |........|........|
|00000850| 00 00 81 08 00 02 81 08 | 00 03 00 00 00 18 00 00 |........|........|
|00000860| 02 84 00 da 03 80 01 08 | 00 00 81 08 00 01 81 04 |........|........|
|00000870| 00 01 00 00 00 14 00 00 | 02 83 00 db 01 80 00 03 |........|........|
|00000880| 53 6f 72 74 00 00 00 00 | 00 10 00 00 02 75 00 dc |Sort....|.....u..|
|00000890| 01 80 01 04 00 01 00 00 | 00 10 00 00 02 67 00 dd |........|.....g..|
|000008a0| 01 80 01 04 00 02 00 00 | 00 10 00 00 02 7e 00 de |........|.....~..|
|000008b0| 01 00 00 03 00 00 82 0f | 00 00 00 24 00 00 00 14 |........|...$....|
|000008c0| 00 01 02 00 00 13 53 6f | 72 74 20 44 61 74 61 42 |......So|rt DataB|
|000008d0| 61 73 65 00 80 03 2e 4e | 61 6d 65 00 82 0a c3 8d |ase....N|ame.....|
|000008e0| 44 65 6c 65 74 65 00 00 | 82 06 00 00 00 1a 00 00 |Delete..|........|
|000008f0| 02 5a 00 e6 02 80 01 04 | 00 01 00 03 4f 70 74 69 |.Z......|....Opti|
|00000900| 6f 6e 73 00 00 00 00 18 | 00 00 02 65 00 e7 02 80 |ons.....|...e....|
|00000910| 00 03 74 6f 70 61 7a 00 | 01 08 00 08 00 00 00 1a |..topaz.|........|
|00000920| 00 00 02 81 00 e8 03 80 | 00 04 80 00 00 00 81 08 |........|........|
|00000930| 00 02 81 08 00 03 00 00 | 00 18 00 00 02 84 00 e9 |........|........|
|00000940| 03 80 01 08 00 00 81 08 | 00 01 81 04 00 01 00 00 |........|........|
|00000950| 00 16 00 00 02 83 00 ea | 01 80 00 03 44 65 6c 65 |........|....Dele|
|00000960| 74 65 00 00 00 00 00 10 | 00 00 02 75 00 eb 01 80 |te......|...u....|
|00000970| 01 04 00 01 00 00 00 10 | 00 00 02 67 00 ec 01 80 |........|...g....|
|00000980| 01 04 00 02 00 00 00 10 | 00 00 02 7e 00 ed 01 00 |........|...~....|
|00000990| 00 03 00 00 82 0f 00 00 | 00 1c 00 00 00 14 00 01 |........|........|
|000009a0| 01 00 00 13 44 65 6c 65 | 74 65 20 45 6e 74 72 79 |....Dele|te Entry|
|000009b0| 00 00 82 0a 82 02 00 00 | 00 26 00 00 00 53 00 01 |........|.&...S..|
|000009c0| 01 80 00 02 44 61 74 61 | 46 69 6c 65 20 3d 20 22 |....Data|File = "|
|000009d0| 54 65 73 74 44 42 2e 44 | 41 54 22 00 00 00 00 1c |TestDB.D|AT".....|
|000009e0| 00 00 00 14 00 02 01 00 | 00 13 4c 6f 61 64 20 44 |........|..Load D|
|000009f0| 61 74 61 62 61 73 65 00 | 82 0a c2 29 44 69 73 70 |atabase.|...)Disp|
|00000a00| 6c 61 79 20 45 6e 74 72 | 79 00 00 00 00 34 00 00 |lay Entr|y....4..|
|00000a10| 00 29 00 01 02 84 00 20 | 44 61 74 61 42 61 73 65 |.)..... |DataBase|
|00000a20| 5b 49 6e 64 65 78 5d 00 | 10 00 09 09 09 09 3b 20 |[Index].|......; |
|00000a30| 64 69 73 70 6c 61 79 20 | 45 6e 74 72 79 00 00 00 |display |Entry...|
|00000a40| 00 22 00 00 00 b6 00 02 | 01 00 00 02 22 45 6e 74 |."......|...."Ent|
|00000a50| 72 79 20 23 22 20 7c 7c | 20 49 6e 64 65 78 00 00 |ry #" ||| Index..|
|00000a60| c2 29 41 64 64 20 45 6e | 74 72 79 00 00 00 00 46 |.)Add En|try....F|
|00000a70| 00 00 00 53 00 01 02 84 | 00 02 44 61 74 61 42 61 |...S....|..DataBa|
|00000a80| 73 65 5b 49 6e 64 65 78 | 5d 20 3d 20 47 65 74 44 |se[Index|] = GetD|
|00000a90| 42 4f 42 6a 65 63 74 73 | 00 00 10 00 09 3b 20 73 |BOBjects|.....; s|
|00000aa0| 61 76 65 20 63 75 72 72 | 65 6e 74 20 65 6e 74 72 |ave curr|ent entr|
|00000ab0| 79 00 00 00 00 40 00 00 | 00 53 00 02 02 84 00 02 |y....@..|.S......|
|00000ac0| 49 6e 64 65 78 20 3d 20 | 49 6e 64 65 78 20 2b 20 |Index = |Index + |
|00000ad0| 31 00 10 00 09 09 09 09 | 3b 20 69 6e 73 65 72 74 |1.......|; insert|
|00000ae0| 20 69 74 20 61 74 20 6e | 65 78 74 20 69 6e 64 65 | it at n|ext inde|
|00000af0| 78 00 00 00 00 38 00 00 | 00 db 00 03 03 84 00 20 |x....8..|....... |
|00000b00| 44 61 74 61 42 61 73 65 | 00 00 00 02 49 6e 64 65 |DataBase|....Inde|
|00000b10| 78 00 10 00 09 09 3b 20 | 6d 61 6b 65 20 73 70 61 |x.....; |make spa|
|00000b20| 63 65 20 66 6f 72 20 69 | 74 00 00 00 00 1c 00 00 |ce for i|t.......|
|00000b30| 00 14 00 04 01 00 00 13 | 44 69 73 70 6c 61 79 20 |........|Display |
|00000b40| 45 6e 74 72 79 00 c2 29 | 44 65 6c 65 74 65 20 45 |Entry..)|Delete E|
|00000b50| 6e 74 72 79 00 00 00 00 | 00 38 00 00 00 dc 00 01 |ntry....|.8......|
|00000b60| 03 84 00 20 44 61 74 61 | 42 61 73 65 00 00 00 02 |... Data|Base....|
|00000b70| 49 6e 64 65 78 00 10 00 | 09 09 09 3b 20 64 65 6c |Index...|...; del|
|00000b80| 65 74 65 20 74 68 69 73 | 20 64 75 64 65 00 00 00 |ete this| dude...|
|00000b90| 00 52 00 00 00 41 00 02 | 02 84 00 02 56 61 72 54 |.R...A..|....VarT|
|00000ba0| 79 70 65 28 44 61 74 61 | 42 61 73 65 5b 49 6e 64 |ype(Data|Base[Ind|
|00000bb0| 65 78 5d 29 20 3d 20 22 | 4e 6f 74 68 69 6e 67 22 |ex]) = "|Nothing"|
|00000bc0| 00 00 10 00 09 3b 20 63 | 68 65 63 6b 20 69 66 20 |.....; c|heck if |
|00000bd0| 6c 61 73 74 28 65 6e 64 | 29 20 65 6e 74 72 79 00 |last(end|) entry.|
|00000be0| 00 00 00 4e 00 00 00 53 | 00 03 02 84 00 02 49 6e |...N...S|......In|
|00000bf0| 64 65 78 20 3d 20 4c 61 | 73 74 41 72 72 61 79 49 |dex = La|stArrayI|
|00000c00| 6e 64 65 78 28 44 61 74 | 61 42 61 73 65 29 00 00 |ndex(Dat|aBase)..|
|00000c10| 10 00 3b 20 66 69 6e 64 | 20 6e 65 77 20 6c 61 73 |..; find| new las|
|00000c20| 74 28 65 6e 64 29 20 65 | 6e 74 72 79 00 00 00 00 |t(end) e|ntry....|
|00000c30| 00 0c 00 00 00 22 00 04 | 00 80 00 00 00 1c 00 00 |....."..|........|
|00000c40| 00 14 00 05 01 00 00 13 | 44 69 73 70 6c 61 79 20 |........|Display |
|00000c50| 45 6e 74 72 79 00 c2 29 | 4c 6f 61 64 20 44 61 74 |Entry..)|Load Dat|
|00000c60| 61 62 61 73 65 00 00 00 | 00 36 00 00 00 12 00 01 |abase...|.6......|
|00000c70| 02 84 00 20 44 61 74 61 | 42 61 73 65 00 00 10 00 |... Data|Base....|
|00000c80| 09 09 09 09 09 09 09 3b | 20 67 65 74 20 72 69 64 |.......;| get rid|
|00000c90| 20 6f 66 20 63 75 72 72 | 65 6e 74 00 00 00 00 40 | of curr|ent....@|
|00000ca0| 00 00 00 41 00 02 02 84 | 00 02 45 78 69 73 74 73 |...A....|..Exists|
|00000cb0| 28 44 61 74 61 46 69 6c | 65 29 00 00 10 00 09 09 |(DataFil|e)......|
|00000cc0| 09 09 09 09 09 3b 20 63 | 68 65 63 6b 20 69 66 20 |.....; c|heck if |
|00000cd0| 66 69 6c 65 20 65 78 69 | 73 74 73 00 00 00 00 3e |file exi|sts....>|
|00000ce0| 00 00 00 53 00 03 02 84 | 00 02 44 61 74 61 42 61 |...S....|..DataBa|
|00000cf0| 73 65 20 3d 20 4c 6f 61 | 64 56 61 72 69 61 62 6c |se = Loa|dVariabl|
|00000d00| 65 28 44 61 74 61 46 69 | 6c 65 29 00 10 00 09 3b |e(DataFi|le)....;|
|00000d10| 20 6c 6f 61 64 20 69 74 | 00 00 00 00 00 3e 00 00 | load it|.....>..|
|00000d20| 00 42 00 04 01 84 10 00 | 09 3b 74 68 69 73 20 73 |.B......|.;this s|
|00000d30| 69 6d 70 6c 65 20 65 78 | 61 6d 70 6c 65 20 64 6f |imple ex|ample do|
|00000d40| 65 73 20 6e 6f 74 68 69 | 6e 67 20 66 6f 72 20 61 |es nothi|ng for a|
|00000d50| 6e 20 65 72 72 6f 72 00 | 00 00 00 3e 00 00 00 22 |n error.|...>..."|
|00000d60| 00 05 01 84 10 00 09 3b | 79 6f 75 20 63 61 6e 20 |.......;|you can |
|00000d70| 64 6f 20 73 6f 6d 65 74 | 68 69 6e 67 20 6c 69 6b |do somet|hing lik|
|00000d80| 65 20 64 69 73 70 6c 61 | 79 20 61 20 72 65 71 75 |e displa|y a requ|
|00000d90| 65 73 74 65 72 00 00 00 | 00 0c 00 00 00 22 00 06 |ester...|....."..|
|00000da0| 00 80 00 00 00 48 00 00 | 00 53 00 07 02 84 00 02 |.....H..|.S......|
|00000db0| 49 6e 64 65 78 20 3d 20 | 46 69 72 73 74 41 72 72 |Index = |FirstArr|
|00000dc0| 61 79 49 6e 64 65 78 28 | 44 61 74 61 42 61 73 65 |ayIndex(|DataBase|
|00000dd0| 29 00 10 00 09 09 3b 20 | 67 6f 20 74 6f 20 66 69 |).....; |go to fi|
|00000de0| 72 73 74 20 65 6e 74 72 | 79 00 00 00 00 1c 00 00 |rst entr|y.......|
|00000df0| 00 14 00 08 01 00 00 13 | 44 69 73 70 6c 61 79 20 |........|Display |
|00000e00| 45 6e 74 72 79 00 c2 29 | 4e 65 78 74 20 45 6e 74 |Entry..)|Next Ent|
|00000e10| 72 79 00 00 00 00 00 40 | 00 00 00 53 00 01 02 84 |ry.....@|...S....|
|00000e20| 00 02 44 61 74 61 42 61 | 73 65 5b 49 6e 64 65 78 |..DataBa|se[Index|
|00000e30| 5d 20 3d 20 47 65 74 44 | 42 4f 42 6a 65 63 74 73 |] = GetD|BOBjects|
|00000e40| 00 00 10 00 09 09 09 3b | 20 53 61 76 65 20 45 6e |.......;| Save En|
|00000e50| 74 72 79 00 00 00 00 50 | 00 00 00 53 00 02 02 84 |try....P|...S....|
|00000e60| 00 02 49 6e 64 65 78 20 | 3d 20 4e 65 78 74 41 72 |..Index |= NextAr|
|00000e70| 72 61 79 49 6e 64 65 78 | 28 44 61 74 61 42 61 73 |rayIndex|(DataBas|
|00000e80| 65 2c 49 6e 64 65 78 29 | 00 00 10 00 09 3b 20 4c |e,Index)|.....; L|
|00000e90| 6f 6f 6b 20 66 6f 72 20 | 4e 65 78 74 20 65 6e 74 |ook for |Next ent|
|00000ea0| 72 79 00 00 00 00 00 3a | 00 00 00 41 00 03 02 84 |ry.....:|...A....|
|00000eb0| 00 02 4e 6f 74 20 53 65 | 61 72 63 68 46 6f 75 6e |..Not Se|archFoun|
|00000ec0| 64 00 10 00 09 09 09 09 | 09 09 09 3b 20 43 68 65 |d.......|...; Che|
|00000ed0| 63 6b 20 69 66 20 61 74 | 20 65 6e 64 00 00 00 00 |ck if at| end....|
|00000ee0| 00 46 00 00 00 53 00 04 | 02 84 00 02 49 6e 64 65 |.F...S..|....Inde|
|00000ef0| 78 20 3d 20 46 69 72 73 | 74 41 72 72 61 79 49 6e |x = Firs|tArrayIn|
|00000f00| 64 65 78 28 44 61 74 61 | 42 61 73 65 29 00 10 00 |dex(Data|Base)...|
|00000f10| 09 3b 20 67 6f 20 74 6f | 20 66 69 72 73 74 20 6f |.; go to| first o|
|00000f20| 6e 65 00 00 00 00 00 0c | 00 00 00 22 00 05 00 80 |ne......|..."....|
|00000f30| 00 00 00 1c 00 00 00 14 | 00 06 01 00 00 13 44 69 |........|......Di|
|00000f40| 73 70 6c 61 79 20 45 6e | 74 72 79 00 c2 29 50 72 |splay En|try..)Pr|
|00000f50| 65 76 69 6f 75 73 20 45 | 6e 74 72 79 00 00 00 00 |evious E|ntry....|
|00000f60| 00 42 00 00 00 53 00 01 | 02 84 00 02 44 61 74 61 |.B...S..|....Data|
|00000f70| 42 61 73 65 5b 49 6e 64 | 65 78 5d 20 3d 20 47 65 |Base[Ind|ex] = Ge|
|00000f80| 74 44 42 4f 42 6a 65 63 | 74 73 00 00 10 00 09 09 |tDBOBjec|ts......|
|00000f90| 09 09 3b 20 73 61 76 65 | 20 65 6e 74 72 79 00 00 |..; save| entry..|
|00000fa0| 00 00 00 4e 00 00 00 53 | 00 02 02 84 00 02 49 6e |...N...S|......In|
|00000fb0| 64 65 78 20 3d 20 50 72 | 65 76 69 6f 75 73 41 72 |dex = Pr|eviousAr|
|00000fc0| 72 61 79 49 6e 64 65 78 | 28 44 61 74 61 42 61 73 |rayIndex|(DataBas|
|00000fd0| 65 2c 49 6e 64 65 78 29 | 00 00 10 00 09 3b 20 66 |e,Index)|.....; f|
|00000fe0| 69 6e 64 20 70 72 65 76 | 69 6f 75 73 00 00 00 00 |ind prev|ious....|
|00000ff0| 00 36 00 00 00 41 00 03 | 02 84 00 02 4e 6f 74 20 |.6...A..|....Not |
|00001000| 53 65 61 72 63 68 46 6f | 75 6e 64 00 10 00 09 09 |SearchFo|und.....|
|00001010| 09 09 09 09 09 09 3b 20 | 69 66 20 6e 6f 74 20 6f |......; |if not o|
|00001020| 6e 65 00 00 00 00 00 46 | 00 00 00 53 00 04 02 84 |ne.....F|...S....|
|00001030| 00 02 49 6e 64 65 78 20 | 3d 20 4c 61 73 74 41 72 |..Index |= LastAr|
|00001040| 72 61 79 49 6e 64 65 78 | 28 44 61 74 61 42 61 73 |rayIndex|(DataBas|
|00001050| 65 29 00 00 10 00 09 09 | 3b 20 67 6f 20 74 6f 20 |e)......|; go to |
|00001060| 6c 61 73 74 20 6f 6e 65 | 00 00 00 00 00 0c 00 00 |last one|........|
|00001070| 00 22 00 05 00 80 00 00 | 00 1c 00 00 00 14 00 06 |."......|........|
|00001080| 01 00 00 13 44 69 73 70 | 6c 61 79 20 45 6e 74 72 |....Disp|lay Entr|
|00001090| 79 00 c2 29 53 61 76 65 | 20 44 61 74 61 62 61 73 |y..)Save| Databas|
|000010a0| 65 00 00 00 00 48 00 00 | 00 53 00 01 02 84 00 02 |e....H..|.S......|
|000010b0| 44 61 74 61 42 61 73 65 | 5b 49 6e 64 65 78 5d 20 |DataBase|[Index] |
|000010c0| 3d 20 47 65 74 44 42 4f | 62 6a 65 63 74 73 00 00 |= GetDBO|bjects..|
|000010d0| 10 00 09 09 3b 20 73 61 | 76 65 20 63 75 72 72 65 |....; sa|ve curre|
|000010e0| 6e 74 20 65 6e 74 72 79 | 00 00 00 00 00 34 00 00 |nt entry|.....4..|
|000010f0| 00 d8 00 02 03 84 00 20 | 44 61 74 61 42 61 73 65 |....... |DataBase|
|00001100| 00 00 00 02 44 61 74 61 | 46 69 6c 65 00 00 10 00 |....Data|File....|
|00001110| 09 09 09 3b 20 73 61 76 | 65 20 69 74 00 00 00 00 |...; sav|e it....|
|00001120| 00 46 00 00 00 42 00 03 | 01 84 10 00 20 3b 74 68 |.F...B..|.... ;th|
|00001130| 69 73 20 73 69 6d 70 6c | 65 20 65 78 61 6d 70 6c |is simpl|e exampl|
|00001140| 65 20 64 6f 65 73 20 6e | 6f 74 20 64 6f 20 61 6e |e does n|ot do an|
|00001150| 79 74 68 69 6e 67 20 66 | 6f 72 20 61 6e 20 65 72 |ything f|or an er|
|00001160| 72 6f 72 00 00 00 00 48 | 00 00 00 22 00 04 01 04 |ror....H|..."....|
|00001170| 10 00 09 3b 68 6f 77 65 | 76 65 72 2c 20 79 6f 75 |...;howe|ver, you|
|00001180| 20 63 61 6e 20 64 6f 20 | 73 6f 6d 65 74 68 69 6e | can do |somethin|
|00001190| 67 20 6c 69 6b 65 20 64 | 69 73 70 6c 61 79 20 61 |g like d|isplay a|
|000011a0| 20 72 65 71 75 65 73 74 | 65 72 00 00 c2 29 53 6f | request|er...)So|
|000011b0| 72 74 20 44 61 74 61 42 | 61 73 65 00 00 00 00 24 |rt DataB|ase....$|
|000011c0| 00 00 00 75 00 01 01 84 | 10 00 20 3b 20 41 52 47 |...u....|.. ; ARG|
|000011d0| 31 20 3d 20 22 53 6f 72 | 74 20 6b 65 79 22 00 00 |1 = "Sor|t key"..|
|000011e0| 00 00 00 36 00 00 00 75 | 00 02 01 84 10 00 20 3b |...6...u|...... ;|
|000011f0| 20 65 78 61 6d 70 6c 65 | 20 2d 20 44 6f 20 22 53 | example| - Do "S|
|00001200| 6f 72 74 20 44 61 74 61 | 42 61 73 65 22 2c 22 2e |ort Data|Base",".|
|00001210| 4e 61 6d 65 22 00 00 00 | 00 0c 00 00 00 75 00 03 |Name"...|.....u..|
|00001220| 00 80 00 00 00 40 00 00 | 00 53 00 04 02 84 00 02 |.....@..|.S......|
|00001230| 44 61 74 61 42 61 73 65 | 5b 49 6e 64 65 78 5d 20 |DataBase|[Index] |
|00001240| 3d 20 47 65 74 44 42 4f | 42 6a 65 63 74 73 00 00 |= GetDBO|Bjects..|
|00001250| 10 00 09 09 3b 20 53 61 | 76 65 20 45 6e 74 72 79 |....; Sa|ve Entry|
|00001260| 00 00 00 00 00 34 00 00 | 00 da 00 05 04 84 00 20 |.....4..|....... |
|00001270| 44 61 74 61 42 61 73 65 | 00 00 81 04 00 28 80 02 |DataBase|.....(..|
|00001280| 41 52 47 31 00 00 10 00 | 09 3b 20 53 6f 72 74 20 |ARG1....|.; Sort |
|00001290| 44 61 74 61 00 00 00 00 | 00 46 00 00 00 53 00 06 |Data....|.F...S..|
|000012a0| 02 84 00 02 49 6e 64 65 | 78 20 3d 20 46 69 72 73 |....Inde|x = Firs|
|000012b0| 74 41 72 72 61 79 49 6e | 64 65 78 28 44 61 74 61 |tArrayIn|dex(Data|
|000012c0| 42 61 73 65 29 00 10 00 | 09 3b 20 67 6f 20 74 6f |Base)...|.; go to|
|000012d0| 20 66 69 72 73 74 20 6f | 6e 65 00 00 00 00 00 1c | first o|ne......|
|000012e0| 00 00 00 14 00 07 01 00 | 00 13 44 69 73 70 6c 61 |........|..Displa|
|000012f0| 79 20 45 6e 74 72 79 00 | c2 29 53 65 61 72 63 68 |y Entry.|.)Search|
|00001300| 20 46 6f 72 20 45 6e 74 | 72 79 00 00 00 00 00 26 | For Ent|ry.....&|
|00001310| 00 00 00 75 00 01 01 84 | 10 00 3b 20 41 52 47 31 |...u....|..; ARG1|
|00001320| 20 3d 20 22 53 65 61 72 | 63 68 20 56 61 6c 75 65 | = "Sear|ch Value|
|00001330| 22 00 00 00 00 24 00 00 | 00 75 00 02 01 84 10 00 |"....$..|.u......|
|00001340| 3b 20 41 52 47 32 20 3d | 20 22 53 65 61 72 63 68 |; ARG2 =| "Search|
|00001350| 20 4b 65 79 22 00 00 00 | 00 40 00 00 00 75 00 03 | Key"...|.@...u..|
|00001360| 01 84 10 00 3b 20 65 78 | 61 6d 70 6c 65 20 2d 20 |....; ex|ample - |
|00001370| 44 6f 20 22 53 65 61 72 | 63 68 20 46 6f 72 20 45 |Do "Sear|ch For E|
|00001380| 6e 74 72 79 22 2c 22 48 | 65 6e 72 79 22 2c 22 2e |ntry","H|enry",".|
|00001390| 4e 61 6d 65 22 00 00 00 | 00 0c 00 00 00 75 00 04 |Name"...|.....u..|
|000013a0| 00 80 00 00 00 40 00 00 | 00 53 00 05 02 84 00 02 |.....@..|.S......|
|000013b0| 44 61 74 61 42 61 73 65 | 5b 49 6e 64 65 78 5d 20 |DataBase|[Index] |
|000013c0| 3d 20 47 65 74 44 42 4f | 42 6a 65 63 74 73 00 00 |= GetDBO|Bjects..|
|000013d0| 10 00 09 09 09 3b 20 53 | 61 76 65 20 45 6e 74 72 |.....; S|ave Entr|
|000013e0| 79 00 00 00 00 10 00 00 | 00 2a 00 06 01 80 01 04 |y.......|.*......|
|000013f0| 00 03 00 00 00 4a 00 00 | 00 53 00 07 02 84 00 02 |.....J..|.S......|
|00001400| 4f 6c 64 49 6e 64 65 78 | 20 3d 20 49 6e 64 65 78 |OldIndex| = Index|
|00001410| 00 00 10 00 20 3b 73 61 | 76 65 20 69 6e 64 65 78 |.... ;sa|ve index|
|00001420| 20 69 6e 20 63 61 73 65 | 20 41 72 67 31 20 69 73 | in case| Arg1 is|
|00001430| 20 6e 6f 74 20 66 6f 75 | 6e 64 00 00 00 00 00 5a | not fou|nd.....Z|
|00001440| 00 00 00 53 00 08 02 84 | 00 02 49 6e 64 65 78 20 |...S....|..Index |
|00001450| 3d 20 53 65 61 72 63 68 | 41 72 72 61 79 28 44 61 |= Search|Array(Da|
|00001460| 74 61 42 61 73 65 2c 41 | 72 67 31 2c 41 72 67 32 |taBase,A|rg1,Arg2|
|00001470| 2c 49 6e 64 65 78 2b 31 | 29 00 10 00 09 3b 20 73 |,Index+1|)....; s|
|00001480| 65 61 72 63 68 20 66 72 | 6f 6d 20 6e 65 78 74 20 |earch fr|om next |
|00001490| 69 6e 64 65 78 00 00 00 | 00 3c 00 00 00 41 00 09 |index...|.<...A..|
|000014a0| 02 84 00 02 4e 6f 74 20 | 53 65 61 72 63 68 46 6f |....Not |SearchFo|
|000014b0| 75 6e 64 00 10 00 09 09 | 09 09 09 09 09 3b 20 43 |und.....|.....; C|
|000014c0| 68 65 63 6b 20 69 66 20 | 66 6f 75 6e 64 20 69 74 |heck if |found it|
|000014d0| 00 00 00 00 00 52 00 00 | 00 53 00 0a 02 84 00 02 |.....R..|.S......|
|000014e0| 49 6e 64 65 78 20 3d 20 | 53 65 61 72 63 68 41 72 |Index = |SearchAr|
|000014f0| 72 61 79 28 44 61 74 61 | 42 61 73 65 2c 41 72 67 |ray(Data|Base,Arg|
|00001500| 31 2c 41 72 67 32 29 00 | 10 00 09 3b 20 73 65 61 |1,Arg2).|...; sea|
|00001510| 72 63 68 20 66 72 6f 6d | 20 62 65 67 69 6e 6e 69 |rch from| beginni|
|00001520| 6e 67 00 00 00 00 00 1e | 00 00 00 41 00 0b 01 80 |ng......|...A....|
|00001530| 00 02 4e 6f 74 20 53 65 | 61 72 63 68 46 6f 75 6e |..Not Se|archFoun|
|00001540| 64 00 00 00 00 44 00 00 | 00 53 00 0c 02 84 00 02 |d....D..|.S......|
|00001550| 49 6e 64 65 78 20 3d 20 | 4f 6c 64 49 6e 64 65 78 |Index = |OldIndex|
|00001560| 00 00 10 00 09 3b 6e 6f | 74 20 66 6f 75 6e 64 20 |.....;no|t found |
|00001570| 2d 20 67 6f 74 6f 20 6f | 72 69 67 69 6e 61 6c 20 |- goto o|riginal |
|00001580| 69 6e 64 65 78 00 00 00 | 00 0c 00 00 00 22 00 0d |index...|....."..|
|00001590| 00 80 00 00 00 0c 00 00 | 00 22 00 0e 00 80 00 00 |........|."......|
|000015a0| 00 2e 00 00 00 14 00 0f | 02 04 00 13 44 69 73 70 |........|....Disp|
|000015b0| 6c 61 79 20 45 6e 74 72 | 79 00 10 00 20 3b 20 44 |lay Entr|y... ; D|
|000015c0| 69 73 70 6c 61 79 20 69 | 74 21 00 00             |isplay i|t!..    |
+--------+-------------------------+-------------------------+--------+--------+