home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / apps / accounts next >
ArcFS Archive  |  1995-09-30  |  58.4 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: ArcFS Archive (archive/arcFS).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 10 05 00 00 70 05 00 00 |Archive.|....p...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|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 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 41 63 63 6f 75 6e | 74 73 00 00 ff ff ff ff |.!Accoun|ts......|
|00000070| 44 fd ff ff 8a a5 04 fa | 00 00 00 00 ff ff ff ff |D.......|........|
|00000080| ec 04 00 80 82 21 42 6f | 6f 74 00 00 c6 53 82 01 |.....!Bo|ot...S..|
|00000090| 58 00 00 00 44 eb ff ff | 8e 39 a3 3d 03 00 89 7b |X...D...|.9.=...{|
|000000a0| 58 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 00 |X...$...|.!Help..|
|000000b0| c6 53 82 01 11 05 00 00 | 44 ff ff ff 49 16 b5 3d |.S......|D...I..=|
|000000c0| 03 00 c9 97 11 05 00 00 | a0 00 00 00 82 21 52 75 |........|.....!Ru|
|000000d0| 6e 00 04 00 c6 53 82 01 | b4 00 00 00 44 eb ff ff |n....S..|....D...|
|000000e0| 00 2c a3 3d 03 00 28 0d | b4 00 00 00 d5 05 00 00 |.,.=..(.|........|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 82 01 d8 02 00 00 |.!Sprite|s.......|
|00000100| 44 f9 ff ff 04 03 a3 3d | 03 00 7d bc d8 02 00 00 |D......=|..}.....|
|00000110| ad 06 00 00 82 41 00 00 | c3 00 04 00 c6 53 82 01 |.....A..|.....S..|
|00000120| ff ff ff ff 44 fd ff ff | dd a6 04 fa 00 00 00 00 |....D...|........|
|00000130| ff ff ff ff 88 02 00 80 | 82 41 64 64 00 00 00 00 |........|.Add....|
|00000140| 00 00 00 00 60 12 00 00 | 44 fb ff ff 63 d2 aa 3d |....`...|D...c..=|
|00000150| 03 00 47 95 60 12 00 00 | a9 09 00 00 82 44 65 6c |..G.`...|.....Del|
|00000160| 65 74 65 00 00 00 00 00 | 6a 13 00 00 42 fb ff ff |ete.....|j...B...|
|00000170| a7 21 7d 10 03 00 bf ae | 6a 13 00 00 2d 1c 00 00 |.!}.....|j...-...|
|00000180| 82 46 6f 72 77 61 72 64 | 00 00 00 00 45 11 00 00 |.Forward|....E...|
|00000190| 42 fb ff ff 6a 19 7d 10 | 03 00 e5 31 45 11 00 00 |B...j.}.|...1E...|
|000001a0| bb 2f 00 00 82 48 65 6c | 70 00 00 00 00 00 00 00 |./...Hel|p.......|
|000001b0| c9 01 00 00 42 fb ff ff | f1 0b 7d 10 03 00 bc 52 |....B...|..}....R|
|000001c0| c9 01 00 00 24 41 00 00 | 82 4d 65 6e 75 00 00 00 |....$A..|.Menu...|
|000001d0| 00 00 00 00 7a 04 00 00 | 44 fb ff ff bf 41 ad 3d |....z...|D....A.=|
|000001e0| 03 00 0b 03 7a 04 00 00 | 11 43 00 00 82 4e 61 6d |....z...|.C...Nam|
|000001f0| 65 73 00 00 00 00 00 00 | 25 10 00 00 42 fb ff ff |es......|%...B...|
|00000200| 43 1d 7d 10 03 00 c6 7f | 25 10 00 00 af 47 00 00 |C.}.....|%....G..|
|00000210| 82 53 68 6f 77 00 00 00 | 00 00 00 00 21 16 00 00 |.Show...|....!...|
|00000220| 44 fb ff ff b6 e7 4e 2f | 03 00 ba 37 21 16 00 00 |D.....N/|...7!...|
|00000230| f8 57 00 00 82 53 68 6f | 77 5f 4f 6c 64 00 00 00 |.W...Sho|w_Old...|
|00000240| 25 16 00 00 42 fb ff ff | 8f d6 58 b9 03 00 dc cd |%...B...|..X.....|
|00000250| 25 16 00 00 3d 6e 00 00 | 82 53 6f 72 74 00 00 00 |%...=n..|.Sort...|
|00000260| 00 00 00 00 5c 12 00 00 | 42 fb ff ff 1d 66 1b 14 |....\...|B....f..|
|00000270| 03 00 5b dd 5c 12 00 00 | 86 84 00 00 82 53 74 61 |..[.\...|.....Sta|
|00000280| 74 65 00 00 00 00 00 00 | ae 13 00 00 42 fb ff ff |te......|....B...|
|00000290| d6 25 7d 10 03 00 ef be | ae 13 00 00 06 97 00 00 |.%}.....|........|
|000002a0| 82 53 5f 4f 72 64 65 72 | 00 00 00 00 a9 14 00 00 |.S_Order|........|
|000002b0| 44 fb ff ff ed 26 ae 3d | 03 00 3d ce a9 14 00 00 |D....&.=|..=.....|
|000002c0| d8 aa 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 b4 00 00 00 | 82 44 00 00 c3 00 04 00 |........|.D......|
|000002f0| c6 53 82 01 ff ff ff ff | 44 fd ff ff 2c a9 04 fa |.S......|D...,...|
|00000300| 00 00 00 00 ff ff ff ff | 18 03 00 80 82 41 63 63 |........|.....Acc|
|00000310| 6f 75 6e 74 00 00 00 00 | 22 00 00 00 44 fd ff ff |ount....|"...D...|
|00000320| 5e 19 b7 3d 03 00 c4 1d | 22 00 00 00 a5 bf 00 00 |^..=....|".......|
|00000330| 82 53 5f 4f 72 64 65 72 | 73 00 00 00 20 01 00 00 |.S_Order|s... ...|
|00000340| 44 ff ff ff 6c d1 b4 3d | 03 00 6d eb 20 01 00 00 |D...l..=|..m. ...|
|00000350| eb bf 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 b4 00 00 00 | 82 44 52 32 00 00 04 00 |........|.DR2....|
|00000380| c6 53 82 01 ff ff ff ff | 44 fd ff ff 65 a9 04 fa |.S......|D...e...|
|00000390| 00 00 00 00 ff ff ff ff | a8 03 00 80 82 42 00 00 |........|.....B..|
|000003a0| 00 00 00 00 00 00 00 00 | ff ff ff ff 44 fd ff ff |........|....D...|
|000003b0| 6e a9 04 fa 00 00 00 00 | ff ff ff ff 84 03 00 80 |n.......|........|
|000003c0| 00 00 00 00 c3 00 04 00 | c6 53 82 01 3a 00 00 00 |........|.S..:...|
|000003d0| 42 eb ff ff 25 fe 77 58 | 03 0c c4 e8 34 00 00 00 |B...%.wX|....4...|
|000003e0| 8c c6 23 02 00 00 00 00 | 00 00 00 00 00 00 00 00 |..#.....|........|
|000003f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000400| 00 00 00 00 b4 00 00 00 | 82 46 00 00 c3 00 04 00 |........|.F......|
|00000410| c6 53 82 01 ff ff ff ff | 44 fd ff ff 77 a9 04 fa |.S......|D...w...|
|00000420| 00 00 00 00 ff ff ff ff | 14 04 00 80 82 48 65 6c |........|.....Hel|
|00000430| 70 00 00 00 00 00 00 00 | 7e 0e 00 00 42 fd ff ff |p.......|~...B...|
|00000440| e0 59 7d 10 03 00 f4 63 | 7e 0e 00 00 2f c1 00 00 |.Y}....c|~.../...|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| b4 00 00 00 82 48 69 73 | 74 6f 72 79 00 53 82 01 |.....His|tory.S..|
|00000480| 98 0b 00 00 44 ff ff ff | 82 d6 b4 3d 03 00 d3 ec |....D...|...=....|
|00000490| 98 0b 00 00 d1 cf 00 00 | 82 4e 00 00 c3 00 04 00 |........|.N......|
|000004a0| c6 53 82 01 ff ff ff ff | 44 fd ff ff c0 a9 04 fa |.S......|D.......|
|000004b0| 00 00 00 00 ff ff ff ff | a4 04 00 80 82 41 63 63 |........|.....Acc|
|000004c0| 6f 75 6e 74 00 00 00 00 | 43 01 00 00 43 fd ff ff |ount....|C...C...|
|000004d0| f9 43 58 1e 33 00 c3 9a | 43 01 00 00 8d db 00 00 |.CX.3...|C.......|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| b4 00 00 00 82 4f 75 74 | 50 75 74 00 c6 53 82 01 |.....Out|Put..S..|
|00000510| 45 07 00 00 44 f8 fa ff | 3a ad 6b 34 03 00 68 67 |E...D...|:.k4..hg|
|00000520| 45 07 00 00 f4 dc 00 00 | 00 00 00 00 c3 00 04 00 |E.......|........|
|00000530| c6 53 82 01 3a 00 00 00 | 42 eb ff ff 25 fe 77 58 |.S..:...|B...%.wX|
|00000540| 03 0c c4 e8 34 00 00 00 | 8c c6 23 02 00 00 00 00 |....4...|..#.....|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 b4 00 00 00 |........|........|
|00000570| 46 69 6c 65 44 61 74 61 | 82 21 42 6f 6f 74 00 00 |FileData|.!Boot..|
|00000580| c6 53 82 01 58 00 00 00 | 44 eb ff ff 8e 39 a3 3d |.S..X...|D....9.=|
|00000590| 03 00 89 7b 49 66 20 22 | 3c 41 63 63 6f 75 6e 74 |...{If "|<Account|
|000005a0| 73 24 44 69 72 3e 22 3d | 22 22 20 20 54 68 65 6e |s$Dir>"=|"" Then|
|000005b0| 20 53 65 74 20 41 63 63 | 6f 75 6e 74 73 24 44 69 | Set Acc|ounts$Di|
|000005c0| 72 20 3c 4f 62 65 79 24 | 44 69 72 3e 0a 49 63 6f |r <Obey$|Dir>.Ico|
|000005d0| 6e 53 70 72 69 74 65 73 | 20 3c 4f 62 65 79 24 44 |nSprites| <Obey$D|
|000005e0| 69 72 3e 2e 21 53 70 72 | 69 74 65 73 46 69 6c 65 |ir>.!Spr|itesFile|
|000005f0| 44 61 74 61 82 21 48 65 | 6c 70 00 00 c6 53 82 01 |Data.!He|lp...S..|
|00000600| 11 05 00 00 44 ff ff ff | 49 16 b5 3d 03 00 c9 97 |....D...|I..=....|
|00000610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000620| 20 20 20 20 41 63 63 6f | 75 6e 74 73 20 49 49 0a | Acco|unts II.|
|00000630| 0a 20 20 20 20 20 20 20 | 20 20 20 20 28 63 29 20 |. | (c) |
|00000640| 31 39 38 39 20 42 65 74 | 65 6c 67 65 75 73 65 20 |1989 Bet|elgeuse |
|00000650| 43 6f 6d 70 75 74 69 6e | 67 0a 0a 20 20 20 20 20 |Computin|g.. |
|00000660| 20 20 20 20 20 20 20 20 | 56 65 72 73 69 6f 6e 20 | |Version |
|00000670| 31 2e 30 20 4e 6f 76 20 | 31 36 74 68 20 31 39 39 |1.0 Nov |16th 199|
|00000680| 32 0a 0a 41 63 63 6f 75 | 6e 74 73 20 49 49 20 69 |2..Accou|nts II i|
|00000690| 73 20 61 20 76 65 72 79 | 20 62 61 73 69 63 20 61 |s a very| basic a|
|000006a0| 63 63 6f 75 6e 74 69 6e | 67 20 70 61 63 6b 61 67 |ccountin|g packag|
|000006b0| 65 20 73 75 69 74 61 62 | 6c 65 0a 66 6f 72 20 73 |e suitab|le.for s|
|000006c0| 69 6d 70 6c 65 20 68 6f | 6d 65 20 61 63 63 6f 75 |imple ho|me accou|
|000006d0| 6e 74 73 2e 20 49 74 20 | 67 69 76 65 73 20 63 6f |nts. It |gives co|
|000006e0| 6e 74 72 6f 6c 20 6f 76 | 65 72 20 6d 75 6c 74 69 |ntrol ov|er multi|
|000006f0| 70 6c 65 0a 27 73 75 62 | 2d 61 63 63 6f 75 6e 74 |ple.'sub|-account|
|00000700| 73 27 20 77 68 69 63 68 | 20 61 72 65 20 70 72 6f |s' which| are pro|
|00000710| 67 72 61 6d 6d 61 62 6c | 65 20 74 6f 20 61 6c 6c |grammabl|e to all|
|00000720| 6f 77 20 66 61 69 72 6c | 79 0a 74 69 67 68 74 20 |ow fairl|y.tight |
|00000730| 63 6f 6e 74 72 6f 6c 20 | 6f 76 65 72 20 65 78 70 |control |over exp|
|00000740| 65 6e 73 65 73 2e 0a 0a | 53 6f 6d 65 20 68 65 6c |enses...|Some hel|
|00000750| 70 20 69 6e 66 6f 72 6d | 61 74 69 6f 6e 20 69 73 |p inform|ation is|
|00000760| 20 61 76 61 69 6c 61 62 | 6c 65 20 66 72 6f 6d 20 | availab|le from |
|00000770| 77 69 74 68 69 6e 20 74 | 68 65 0a 70 72 6f 67 72 |within t|he.progr|
|00000780| 61 6d 20 77 68 69 63 68 | 20 73 68 6f 75 6c 64 20 |am which| should |
|00000790| 65 78 70 6c 61 69 6e 20 | 61 6c 6c 20 6f 66 20 74 |explain |all of t|
|000007a0| 68 65 20 66 65 61 74 75 | 72 65 73 0a 61 6e 64 20 |he featu|res.and |
|000007b0| 68 6f 77 20 74 6f 20 75 | 73 65 20 74 68 65 6d 2e |how to u|se them.|
|000007c0| 0a 0a 46 75 72 74 68 65 | 72 20 69 6e 66 6f 72 6d |..Furthe|r inform|
|000007d0| 61 74 69 6f 6e 20 6f 6e | 20 63 68 61 6e 67 65 73 |ation on| changes|
|000007e0| 20 65 74 63 20 63 61 6e | 20 62 65 20 66 6f 75 6e | etc can| be foun|
|000007f0| 64 20 69 6e 20 74 68 65 | 0a 48 69 73 74 6f 72 79 |d in the|.History|
|00000800| 20 66 69 6c 65 2e 0a 0a | 54 68 69 73 20 70 72 6f | file...|This pro|
|00000810| 67 72 61 6d 20 69 73 20 | 46 72 65 65 77 61 72 65 |gram is |Freeware|
|00000820| 20 2d 20 74 68 65 20 61 | 75 74 68 6f 72 20 72 65 | - the a|uthor re|
|00000830| 74 61 69 6e 73 20 74 68 | 65 0a 63 6f 70 79 72 69 |tains th|e.copyri|
|00000840| 67 68 74 20 62 75 74 20 | 69 74 20 6d 61 79 20 62 |ght but |it may b|
|00000850| 65 20 63 6f 70 69 65 64 | 20 61 6e 64 20 64 69 73 |e copied| and dis|
|00000860| 74 72 69 62 75 74 65 64 | 20 66 72 65 65 6c 79 0a |tributed| freely.|
|00000870| 69 6e 63 6c 75 64 69 6e | 67 20 73 74 6f 72 61 67 |includin|g storag|
|00000880| 65 20 6f 6e 20 62 75 6c | 6c 65 74 69 6e 20 62 6f |e on bul|letin bo|
|00000890| 61 72 64 73 20 61 6e 64 | 20 69 6e 66 6f 72 6d 61 |ards and| informa|
|000008a0| 74 69 6f 6e 0a 73 65 72 | 76 65 72 73 2e 0a 0a 49 |tion.ser|vers...I|
|000008b0| 66 20 61 6e 79 6f 6e 65 | 20 77 61 6e 74 73 20 74 |f anyone| wants t|
|000008c0| 6f 20 6d 61 6b 65 20 63 | 68 61 6e 67 65 73 2f 69 |o make c|hanges/i|
|000008d0| 6d 70 72 6f 76 65 6d 65 | 6e 74 73 20 74 68 65 79 |mproveme|nts they|
|000008e0| 20 61 72 65 0a 66 72 65 | 65 20 74 6f 20 64 6f 20 | are.fre|e to do |
|000008f0| 73 6f 20 62 75 74 20 49 | 20 77 6f 75 6c 64 20 61 |so but I| would a|
|00000900| 70 70 72 65 63 69 61 74 | 65 20 61 20 63 6f 70 79 |ppreciat|e a copy|
|00000910| 20 6f 66 20 61 6e 79 0a | 69 6d 70 72 6f 76 65 6d | of any.|improvem|
|00000920| 65 6e 74 73 20 73 6f 20 | 74 68 65 79 20 63 61 6e |ents so |they can|
|00000930| 20 62 65 20 69 6e 63 6c | 75 64 65 64 20 69 6e 20 | be incl|uded in |
|00000940| 61 6e 79 20 66 75 74 75 | 72 65 0a 72 65 6c 65 61 |any futu|re.relea|
|00000950| 73 65 2e 0a 0a 41 6e 79 | 20 70 72 6f 64 75 63 74 |se...Any| product|
|00000960| 20 64 65 72 69 76 65 64 | 20 66 72 6f 6d 20 74 68 | derived| from th|
|00000970| 69 73 20 63 6f 64 65 20 | 6d 61 79 20 6e 6f 74 20 |is code |may not |
|00000980| 73 6f 6c 64 20 6f 72 0a | 75 73 65 64 20 69 6e 20 |sold or.|used in |
|00000990| 61 6e 79 20 77 61 79 20 | 66 6f 72 20 66 69 6e 61 |any way |for fina|
|000009a0| 6e 63 69 61 6c 20 67 61 | 69 6e 20 77 69 74 68 6f |ncial ga|in witho|
|000009b0| 75 74 20 74 68 65 0a 63 | 6f 6d 70 6c 65 74 65 20 |ut the.c|omplete |
|000009c0| 61 67 72 65 65 6d 65 6e | 74 20 6f 66 20 74 68 65 |agreemen|t of the|
|000009d0| 20 61 75 74 68 6f 72 2e | 0a 0a 4e 6f 20 67 75 61 | author.|..No gua|
|000009e0| 72 61 6e 74 65 65 20 69 | 73 20 67 69 76 65 6e 20 |rantee i|s given |
|000009f0| 28 65 78 70 72 65 73 73 | 20 6f 72 20 69 6d 70 6c |(express| or impl|
|00000a00| 69 65 64 29 20 6f 66 20 | 74 68 65 0a 73 75 69 74 |ied) of |the.suit|
|00000a10| 61 62 69 6c 69 74 79 20 | 6f 66 20 74 68 69 73 20 |ability |of this |
|00000a20| 70 72 6f 67 72 61 6d 20 | 66 6f 72 20 61 6e 79 20 |program |for any |
|00000a30| 70 75 72 70 6f 73 65 20 | 77 68 61 74 73 6f 65 76 |purpose |whatsoev|
|00000a40| 65 72 2e 0a 54 68 65 20 | 61 75 74 68 6f 72 20 74 |er..The |author t|
|00000a50| 61 6b 65 73 20 6e 6f 20 | 72 65 73 70 6f 6e 73 69 |akes no |responsi|
|00000a60| 62 69 6c 69 74 79 20 66 | 6f 72 20 61 6e 79 20 6c |bility f|or any l|
|00000a70| 6f 73 73 20 6f 72 0a 69 | 6e 63 6f 76 65 6e 69 65 |oss or.i|ncovenie|
|00000a80| 6e 63 65 20 63 61 75 73 | 65 64 20 62 79 20 75 73 |nce caus|ed by us|
|00000a90| 69 6e 67 20 74 68 69 73 | 20 70 72 6f 67 72 61 6d |ing this| program|
|00000aa0| 2e 0a 0a 41 74 20 74 68 | 65 20 74 69 6d 65 20 6f |...At th|e time o|
|00000ab0| 66 20 77 72 69 74 69 6e | 67 20 74 68 65 20 61 75 |f writin|g the au|
|00000ac0| 74 68 6f 72 20 63 61 6e | 20 62 65 20 63 6f 6e 74 |thor can| be cont|
|00000ad0| 61 63 74 65 64 0a 76 69 | 61 20 65 6d 61 69 6c 20 |acted.vi|a email |
|00000ae0| 61 74 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |at the f|ollowing|
|00000af0| 20 61 64 64 72 65 73 73 | 3a 0a 0a 20 20 20 20 20 | address|:.. |
|00000b00| 20 20 20 61 6a 64 68 40 | 62 6e 72 2e 63 6f 2e 75 | ajdh@|bnr.co.u|
|00000b10| 6b 0a 0a 41 6e 64 72 65 | 77 20 48 75 72 6c 65 79 |k..Andre|w Hurley|
|00000b20| 0a 46 69 6c 65 44 61 74 | 61 82 21 52 75 6e 00 04 |.FileDat|a.!Run..|
|00000b30| 00 c6 53 82 01 b4 00 00 | 00 44 eb ff ff 00 2c a3 |..S.....|.D....,.|
|00000b40| 3d 03 00 28 0d 0a 53 65 | 74 20 41 63 63 6f 75 6e |=..(..Se|t Accoun|
|00000b50| 74 73 24 44 69 72 20 20 | 3c 4f 62 65 79 24 44 69 |ts$Dir |<Obey$Di|
|00000b60| 72 3e 0a 53 65 74 20 50 | 72 69 6e 74 65 72 73 24 |r>.Set P|rinters$|
|00000b70| 50 61 74 68 20 3c 4f 62 | 65 79 24 44 69 72 3e 2e |Path <Ob|ey$Dir>.|
|00000b80| 2c 52 65 73 6f 75 72 63 | 65 73 3a 24 2e 52 65 73 |,Resourc|es:$.Res|
|00000b90| 6f 75 72 63 65 73 2e 50 | 72 69 6e 74 65 72 73 2e |ources.P|rinters.|
|00000ba0| 0a 0a 44 49 52 20 3c 41 | 63 63 6f 75 6e 74 73 24 |..DIR <A|ccounts$|
|00000bb0| 44 69 72 3e 0a 0a 49 63 | 6f 6e 53 70 72 69 74 65 |Dir>..Ic|onSprite|
|00000bc0| 73 20 3c 4f 62 65 79 24 | 44 69 72 3e 2e 21 53 70 |s <Obey$|Dir>.!Sp|
|00000bd0| 72 69 74 65 73 0a 0a 46 | 58 31 33 38 2c 30 2c 31 |rites..F|X138,0,1|
|00000be0| 32 34 0a 0a 42 41 53 49 | 43 20 2d 63 68 61 69 6e |24..BASI|C -chain|
|00000bf0| 20 41 2e 4d 65 6e 75 0a | 0a 46 69 6c 65 44 61 74 | A.Menu.|.FileDat|
|00000c00| 61 82 21 53 70 72 69 74 | 65 73 00 82 01 d8 02 00 |a.!Sprit|es......|
|00000c10| 00 44 f9 ff ff 04 03 a3 | 3d 03 00 7d bc 01 00 00 |.D......|=..}....|
|00000c20| 00 10 00 00 00 dc 02 00 | 00 cc 02 00 00 21 61 63 |........|.....!ac|
|00000c30| 63 6f 75 6e 74 73 00 00 | 00 03 00 00 00 10 00 00 |counts..|........|
|00000c40| 00 00 00 00 00 1f 00 00 | 00 ac 00 00 00 bc 01 00 |........|........|
|00000c50| 00 23 00 00 00 00 ff ff | ff 00 ff ff ff 00 dd dd |.#......|........|
|00000c60| dd 00 dd dd dd 00 bb bb | bb 00 bb bb bb 00 99 99 |........|........|
|00000c70| 99 00 99 99 99 00 77 77 | 77 00 77 77 77 00 55 55 |......ww|w.www.UU|
|00000c80| 55 00 55 55 55 00 33 33 | 33 00 33 33 33 00 00 00 |U.UUU.33|3.333...|
|00000c90| 00 00 00 00 00 00 00 44 | 99 00 00 44 99 00 ee ee |.......D|...D....|
|00000ca0| 00 00 ee ee 00 00 00 cc | 00 00 00 cc 00 00 dd 00 |........|........|
|00000cb0| 00 00 dd 00 00 00 ee ee | bb 00 ee ee bb 00 55 88 |........|......U.|
|00000cc0| 00 00 55 88 00 00 ff bb | 00 00 ff bb 00 00 00 bb |..U.....|........|
|00000cd0| ff 00 00 bb ff 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 11 11 11 00 00 |........|........|
|00000cf0| 00 00 00 00 00 00 00 00 | 00 20 74 77 56 65 56 02 |........|. twVeV.|
|00000d00| 00 00 00 00 00 00 00 00 | 00 73 77 14 00 20 76 57 |........|.sw.. vW|
|00000d10| 01 00 00 00 00 00 00 00 | 30 77 47 00 00 72 77 77 |........|0wG..rww|
|00000d20| 03 00 00 00 00 00 00 00 | 50 77 27 00 00 51 77 36 |........|Pw'..Qw6|
|00000d30| 00 00 00 00 00 00 00 00 | 60 77 27 00 00 00 00 00 |........|`w'.....|
|00000d40| 00 00 00 00 00 00 00 00 | 60 77 27 00 00 00 00 00 |........|`w'.....|
|00000d50| 00 00 00 00 00 00 31 33 | 63 77 57 33 33 13 00 00 |......13|cwW33...|
|00000d60| 00 00 00 00 00 00 32 33 | 43 77 77 33 33 13 00 00 |......23|Cww33...|
|00000d70| 00 00 00 00 00 00 00 00 | 10 76 67 01 00 00 00 00 |........|.vg.....|
|00000d80| 00 00 00 00 00 00 00 00 | 00 73 67 01 00 00 00 00 |........|.sg.....|
|00000d90| 00 00 00 00 00 00 00 00 | 00 74 47 00 00 00 00 10 |........|.tG.....|
|00000da0| 00 00 00 00 00 20 66 66 | 66 77 17 00 00 00 00 73 |..... ff|fw.....s|
|00000db0| 06 00 00 00 00 50 17 00 | 51 77 77 57 55 55 75 67 |.....P..|QwwWUUug|
|00000dc0| 03 00 00 00 00 10 65 55 | 76 14 42 76 77 77 57 13 |......eU|v.BvwwW.|
|00000dd0| 00 00 00 00 00 00 10 11 | 01 00 00 00 10 01 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 ff ff ff 00 00 |........|........|
|00000e00| 00 00 00 00 00 00 00 00 | 00 f0 ff ff ff ff ff 0f |........|........|
|00000e10| 00 00 00 00 00 00 00 00 | 00 ff ff ff 00 f0 ff ff |........|........|
|00000e20| 0f 00 00 00 00 00 00 00 | f0 ff ff 00 00 ff ff ff |........|........|
|00000e30| 0f 00 00 00 00 00 00 00 | f0 ff ff 00 00 ff ff ff |........|........|
|00000e40| 00 00 00 00 00 00 00 00 | f0 ff ff 00 00 00 00 00 |........|........|
|00000e50| 00 00 00 00 00 00 00 00 | f0 ff ff 00 00 00 00 00 |........|........|
|00000e60| 00 00 00 00 00 00 ff ff | ff ff ff ff ff ff 00 00 |........|........|
|00000e70| 00 00 00 00 00 00 ff ff | ff ff ff ff ff ff 00 00 |........|........|
|00000e80| 00 00 00 00 00 00 00 00 | f0 ff ff 0f 00 00 00 00 |........|........|
|00000e90| 00 00 00 00 00 00 00 00 | 00 ff ff 0f 00 00 00 00 |........|........|
|00000ea0| 00 00 00 00 00 00 00 00 | 00 ff ff 00 00 00 00 f0 |........|........|
|00000eb0| 00 00 00 00 00 f0 ff ff | ff ff ff 00 00 00 00 ff |........|........|
|00000ec0| 0f 00 00 00 00 f0 ff 00 | ff ff ff ff ff ff ff ff |........|........|
|00000ed0| 0f 00 00 00 00 f0 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000ee0| 00 00 00 00 00 00 f0 ff | 0f 00 00 00 f0 0f 00 00 |........|........|
|00000ef0| 00 00 00 00 00 46 69 6c | 65 44 61 74 61 82 41 64 |.....Fil|eData.Ad|
|00000f00| 64 00 00 00 00 00 00 00 | 00 60 12 00 00 44 fb ff |d.......|.`...D..|
|00000f10| ff 63 d2 aa 3d 03 00 47 | 95 0d 00 0a 1b f4 20 41 |.c..=..G|...... A|
|00000f20| 63 63 6f 75 6e 74 73 20 | 49 49 2d 20 41 64 64 20 |ccounts |II- Add |
|00000f30| 49 74 65 6d 0d 00 14 18 | f4 20 28 43 29 20 31 39 |Item....|. (C) 19|
|00000f40| 38 39 20 41 2e 20 48 75 | 72 6c 65 79 0d 00 1e 1a |89 A. Hu|rley....|
|00000f50| f4 20 42 65 74 65 6c 67 | 65 75 73 65 20 43 6f 6d |. Betelg|euse Com|
|00000f60| 70 75 74 69 6e 67 0d 00 | 28 11 de 20 49 6e 74 53 |puting..|(.. IntS|
|00000f70| 70 61 63 65 25 20 34 0d | 00 32 11 de 20 45 6e 74 |pace% 4.|.2.. Ent|
|00000f80| 25 28 32 35 36 2c 31 29 | 0d 00 37 11 de 20 41 63 |%(256,1)|..7.. Ac|
|00000f90| 63 24 28 32 35 36 2c 31 | 29 0d 00 38 16 79 65 61 |c$(256,1|)..8.yea|
|00000fa0| 72 25 3d bb 28 c1 91 24 | 2c 31 34 2c 32 29 29 0d |r%=.(..$|,14,2)).|
|00000fb0| 00 39 11 c8 8e 20 c1 91 | 24 2c 38 2c 33 29 20 ca |.9... ..|$,8,3) .|
|00000fc0| 0d 00 3a 16 c9 20 22 4a | 61 6e 22 20 3a 20 6d 6f |..:.. "J|an" : mo|
|00000fd0| 6e 74 68 25 3d 31 0d 00 | 3b 16 c9 20 22 46 65 62 |nth%=1..|;.. "Feb|
|00000fe0| 22 20 3a 20 6d 6f 6e 74 | 68 25 3d 32 0d 00 3c 16 |" : mont|h%=2..<.|
|00000ff0| c9 20 22 4d 61 72 22 20 | 3a 20 6d 6f 6e 74 68 25 |. "Mar" |: month%|
|00001000| 3d 33 0d 00 3d 16 c9 20 | 22 41 70 72 22 20 3a 20 |=3..=.. |"Apr" : |
|00001010| 6d 6f 6e 74 68 25 3d 34 | 0d 00 3e 16 c9 20 22 4d |month%=4|..>.. "M|
|00001020| 61 79 22 20 3a 20 6d 6f | 6e 74 68 25 3d 35 0d 00 |ay" : mo|nth%=5..|
|00001030| 3f 16 c9 20 22 4a 75 6e | 22 20 3a 20 6d 6f 6e 74 |?.. "Jun|" : mont|
|00001040| 68 25 3d 36 0d 00 40 16 | c9 20 22 4a 75 6c 22 20 |h%=6..@.|. "Jul" |
|00001050| 3a 20 6d 6f 6e 74 68 25 | 3d 37 0d 00 41 16 c9 20 |: month%|=7..A.. |
|00001060| 22 41 75 67 22 20 3a 20 | 6d 6f 6e 74 68 25 3d 38 |"Aug" : |month%=8|
|00001070| 0d 00 42 16 c9 20 22 53 | 65 70 22 20 3a 20 6d 6f |..B.. "S|ep" : mo|
|00001080| 6e 74 68 25 3d 39 0d 00 | 43 17 c9 20 22 4f 63 74 |nth%=9..|C.. "Oct|
|00001090| 22 20 3a 20 6d 6f 6e 74 | 68 25 3d 31 30 0d 00 44 |" : mont|h%=10..D|
|000010a0| 17 c9 20 22 4e 6f 76 22 | 20 3a 20 6d 6f 6e 74 68 |.. "Nov"| : month|
|000010b0| 25 3d 31 31 0d 00 45 17 | c9 20 22 44 65 63 22 20 |%=11..E.|. "Dec" |
|000010c0| 3a 20 6d 6f 6e 74 68 25 | 3d 31 32 0d 00 46 0e 7f |: month%|=12..F..|
|000010d0| 20 6d 6f 6e 74 68 25 3d | 30 0d 00 47 05 cb 0d 00 | month%=|0..G....|
|000010e0| 48 14 64 61 79 25 3d bb | 28 c1 91 24 2c 35 2c 32 |H.day%=.|(..$,5,2|
|000010f0| 29 29 0d 00 49 25 44 61 | 74 65 25 3d 79 65 61 72 |))..I%Da|te%=year|
|00001100| 25 2a 31 30 30 30 30 2b | 6d 6f 6e 74 68 25 2a 31 |%*10000+|month%*1|
|00001110| 30 30 2b 64 61 79 25 0d | 00 4b 21 44 65 74 61 69 |00+day%.|.K!Detai|
|00001120| 6c 24 3d 22 4e 6f 20 44 | 65 74 61 69 6c 73 20 44 |l$="No D|etails D|
|00001130| 65 66 69 6e 65 64 21 22 | 0d 00 50 0e 45 6e 74 72 |efined!"|..P.Entr|
|00001140| 69 65 73 25 3d 31 0d 00 | 5a 0a 43 68 71 25 3d 30 |ies%=1..|Z.Chq%=0|
|00001150| 0d 00 64 06 eb 37 0d 00 | 69 0c 2a 46 58 32 32 30 |..d..7..|i.*FX220|
|00001160| 2c 34 0d 00 6a 0a 2a 46 | 58 34 2c 31 0d 00 6e 28 |,4..j.*F|X4,1..n(|
|00001170| f1 bd 31 35 37 3b bd 31 | 34 31 3b 22 81 20 20 20 |..157;.1|41;". |
|00001180| 20 20 20 20 20 20 20 20 | 41 63 63 6f 75 6e 74 73 | |Accounts|
|00001190| 20 49 49 22 0d 00 78 28 | f1 bd 31 35 37 3b bd 31 | II"..x(|..157;.1|
|000011a0| 34 31 3b 22 81 20 20 20 | 20 20 20 20 20 20 20 20 |41;". | |
|000011b0| 41 63 63 6f 75 6e 74 73 | 20 49 49 22 0d 00 82 2e |Accounts| II"....|
|000011c0| f1 bd 31 35 37 3b 22 86 | 20 20 20 28 43 29 20 31 |..157;".| (C) 1|
|000011d0| 39 38 39 20 20 42 65 74 | 65 6c 67 65 75 73 65 20 |989 Bet|elgeuse |
|000011e0| 43 6f 6d 70 75 74 69 6e | 67 22 0d 00 87 05 f1 0d |Computin|g"......|
|000011f0| 00 8c 25 f1 bd 31 34 31 | 3b 22 85 20 20 20 20 20 |..%..141|;". |
|00001200| 20 20 20 20 41 64 64 20 | 54 72 61 6e 73 61 63 74 | Add |Transact|
|00001210| 69 6f 6e 22 0d 00 96 25 | f1 bd 31 34 31 3b 22 85 |ion"...%|..141;".|
|00001220| 20 20 20 20 20 20 20 20 | 20 41 64 64 20 54 72 61 | | Add Tra|
|00001230| 6e 73 61 63 74 69 6f 6e | 22 0d 00 a0 11 ef 32 38 |nsaction|".....28|
|00001240| 2c 30 2c 32 34 2c 33 39 | 2c 36 0d 00 be 0a f2 53 |,0,24,39|,6.....S|
|00001250| 65 74 55 70 0d 00 c8 25 | f1 27 22 83 45 6e 74 65 |etUp...%|.'".Ente|
|00001260| 72 20 44 61 74 65 87 3a | 22 3b 3a 44 61 74 65 25 |r Date.:|";:Date%|
|00001270| 3d a4 47 65 74 44 61 74 | 65 0d 00 d2 30 f1 27 22 |=.GetDat|e...0.'"|
|00001280| 83 45 6e 74 65 72 20 44 | 65 74 61 69 6c 73 87 3a |.Enter D|etails.:|
|00001290| 22 3b 3a 44 65 74 61 69 | 6c 24 3d a4 47 65 74 53 |";:Detai|l$=.GetS|
|000012a0| 74 72 69 6e 67 28 32 30 | 29 0d 00 dc 2e f1 27 22 |tring(20|).....'"|
|000012b0| 83 45 6e 74 65 72 20 43 | 68 71 20 4e 6f 2e 20 2f |.Enter C|hq No. /|
|000012c0| 20 54 79 70 65 87 3a 22 | 3b 3a 43 68 71 25 3d a4 | Type.:"|;:Chq%=.|
|000012d0| 47 65 74 54 79 70 65 0d | 00 eb 08 42 25 3d 30 0d |GetType.|...B%=0.|
|000012e0| 00 f0 12 41 25 3d 30 3a | f5 20 41 25 3d 41 25 2b |...A%=0:|. A%=A%+|
|000012f0| 31 0d 00 f5 1c ef 31 30 | 2c 31 30 2c 31 30 2c 31 |1.....10|,10,10,1|
|00001300| 30 2c 31 31 2c 31 31 2c | 31 31 2c 31 31 0d 00 fa |0,11,11,|11,11...|
|00001310| 48 f1 27 22 83 41 63 63 | 6f 75 6e 74 20 3f 87 3a |H.'".Acc|ount ?.:|
|00001320| 22 3b 3a 45 6e 74 25 28 | 41 25 2c 30 29 3d a4 47 |";:Ent%(|A%,0)=.G|
|00001330| 65 74 41 63 63 3a f1 22 | 83 41 6d 6f 75 6e 74 87 |etAcc:."|.Amount.|
|00001340| 3a 22 3b 3a 45 6e 74 25 | 28 41 25 2c 31 29 3d a4 |:";:Ent%|(A%,1)=.|
|00001350| 47 65 74 41 6d 0d 00 ff | 14 42 25 3d 42 25 2b 45 |GetAm...|.B%=B%+E|
|00001360| 6e 74 25 28 41 25 2c 31 | 29 0d 01 04 26 e7 20 41 |nt%(A%,1|)...&. A|
|00001370| 25 3e 31 20 f1 22 82 54 | 6f 74 61 6c 20 3a 22 3b |%>1 .".T|otal :";|
|00001380| a4 44 69 73 41 6d 28 42 | 25 29 3b bd 31 33 3b 0d |.DisAm(B|%);.13;.|
|00001390| 01 0e 1e fd 20 41 63 63 | 24 28 45 6e 74 25 28 41 |.... Acc|$(Ent%(A|
|000013a0| 25 2c 30 29 2c 31 29 3d | 22 53 4e 44 22 0d 01 13 |%,0),1)=|"SND"...|
|000013b0| 0f 45 6e 74 72 69 65 73 | 25 3d 41 25 0d 01 18 1b |.Entries|%=A%....|
|000013c0| f1 27 22 86 49 73 20 74 | 68 69 73 20 63 6f 72 72 |.'".Is t|his corr|
|000013d0| 65 63 74 20 3f 22 3b 0d | 01 22 2b 41 25 3d a5 3a |ect ?";.|."+A%=.:|
|000013e0| e7 20 41 25 3c 3e 97 28 | 22 59 22 29 20 80 20 41 |. A%<>.(|"Y") . A|
|000013f0| 25 3c 3e 97 28 22 79 22 | 29 20 db 3a e5 20 8d 64 |%<>.("y"|) .:. .d|
|00001400| 48 40 0d 01 2c 1f f2 4f | 70 65 6e 54 6f 45 6e 64 |H@..,..O|penToEnd|
|00001410| 3a f2 57 72 69 74 65 45 | 6e 74 72 79 3a d9 23 46 |:.WriteE|ntry:.#F|
|00001420| 25 0d 01 36 14 f1 27 22 | 86 41 6e 79 20 6d 6f 72 |%..6..'"|.Any mor|
|00001430| 65 20 3f 22 3b 0d 01 40 | 29 41 25 3d a5 3a e7 20 |e ?";..@|)A%=.:. |
|00001440| 41 25 3d 97 28 22 59 22 | 29 20 84 20 41 25 3d 97 |A%=.("Y"|) . A%=.|
|00001450| 28 22 79 22 29 20 db 3a | e5 20 8d 64 48 40 0d 01 |("y") .:|. .dH@..|
|00001460| 4a 0d d7 22 41 2e 4d 65 | 6e 75 22 0d 03 e8 10 dd |J.."A.Me|nu".....|
|00001470| f2 57 72 69 74 65 45 6e | 74 72 79 0d 03 ed 08 ea |.WriteEn|try.....|
|00001480| 20 4c 25 0d 03 fc 12 f2 | 49 6e 74 4f 75 74 28 44 | L%.....|IntOut(D|
|00001490| 61 74 65 25 29 0d 04 06 | 1a f2 53 74 72 69 6e 67 |ate%)...|..String|
|000014a0| 4f 75 74 28 44 65 74 61 | 69 6c 24 2c 32 30 29 0d |Out(Deta|il$,20).|
|000014b0| 04 10 11 f2 49 6e 74 4f | 75 74 28 43 68 71 25 29 |....IntO|ut(Chq%)|
|000014c0| 0d 04 1a 17 f2 53 68 6f | 72 74 4f 75 74 28 45 6e |.....Sho|rtOut(En|
|000014d0| 74 72 69 65 73 25 29 0d | 04 24 15 e3 20 4c 25 3d |tries%).|.$.. L%=|
|000014e0| 31 20 b8 20 45 6e 74 72 | 69 65 73 25 0d 04 2e 19 |1 . Entr|ies%....|
|000014f0| f2 53 68 6f 72 74 4f 75 | 74 28 45 6e 74 25 28 4c |.ShortOu|t(Ent%(L|
|00001500| 25 2c 30 29 29 0d 04 38 | 17 f2 49 6e 74 4f 75 74 |%,0))..8|..IntOut|
|00001510| 28 45 6e 74 25 28 4c 25 | 2c 31 29 29 0d 04 42 05 |(Ent%(L%|,1))..B.|
|00001520| ed 0d 04 56 05 e1 0d 04 | b0 12 dd f2 53 68 6f 72 |...V....|....Shor|
|00001530| 74 4f 75 74 28 41 25 29 | 0d 04 ba 13 d5 23 46 25 |tOut(A%)|.....#F%|
|00001540| 2c 28 41 25 20 80 20 32 | 35 35 29 0d 04 c4 05 e1 |,(A% . 2|55).....|
|00001550| 0d 05 14 16 dd f2 53 74 | 72 69 6e 67 4f 75 74 28 |......St|ringOut(|
|00001560| 41 24 2c 42 25 29 0d 05 | 1e 08 ea 20 41 25 0d 05 |A$,B%)..|... A%..|
|00001570| 28 0f e3 20 41 25 3d 31 | 20 b8 20 42 25 0d 05 32 |(.. A%=1| . B%..2|
|00001580| 2b e7 20 41 25 3c 3d a9 | 28 41 24 29 20 d5 23 46 |+. A%<=.|(A$) .#F|
|00001590| 25 2c 97 28 c1 41 24 2c | 41 25 2c 31 29 29 20 8b |%,.(.A$,|A%,1)) .|
|000015a0| 20 d5 23 46 25 2c 33 32 | 0d 05 3c 05 ed 0d 05 46 | .#F%,32|..<....F|
|000015b0| 05 e1 0d 05 78 10 dd f2 | 49 6e 74 4f 75 74 28 41 |....x...|IntOut(A|
|000015c0| 25 29 0d 05 7d 11 21 49 | 6e 74 53 70 61 63 65 25 |%)..}.!I|ntSpace%|
|000015d0| 3d 41 25 0d 05 82 13 d5 | 23 46 25 2c 3f 49 6e 74 |=A%.....|#F%,?Int|
|000015e0| 53 70 61 63 65 25 0d 05 | 8c 14 d5 23 46 25 2c 49 |Space%..|...#F%,I|
|000015f0| 6e 74 53 70 61 63 65 25 | 3f 31 0d 05 96 14 d5 23 |ntSpace%|?1.....#|
|00001600| 46 25 2c 49 6e 74 53 70 | 61 63 65 25 3f 32 0d 05 |F%,IntSp|ace%?2..|
|00001610| a0 14 d5 23 46 25 2c 49 | 6e 74 53 70 61 63 65 25 |...#F%,I|ntSpace%|
|00001620| 3f 33 0d 05 aa 05 e1 0d | 05 dc 0b dd a4 49 6e 74 |?3......|.....Int|
|00001630| 49 6e 0d 05 e6 13 3f 49 | 6e 74 53 70 61 63 65 25 |In....?I|ntSpace%|
|00001640| 3d 9a 23 46 25 0d 05 f0 | 14 49 6e 74 53 70 61 63 |=.#F%...|.IntSpac|
|00001650| 65 25 3f 31 3d 9a 23 46 | 25 0d 05 fa 14 49 6e 74 |e%?1=.#F|%....Int|
|00001660| 53 70 61 63 65 25 3f 32 | 3d 9a 23 46 25 0d 06 04 |Space%?2|=.#F%...|
|00001670| 14 49 6e 74 53 70 61 63 | 65 25 3f 33 3d 9a 23 46 |.IntSpac|e%?3=.#F|
|00001680| 25 0d 06 0e 0f 3d 21 49 | 6e 74 53 70 61 63 65 25 |%....=!I|ntSpace%|
|00001690| 0d 06 40 12 dd a4 53 74 | 72 69 6e 67 49 6e 28 42 |..@...St|ringIn(B|
|000016a0| 25 29 0d 06 4a 0b ea 20 | 41 24 2c 41 25 0d 06 54 |%)..J.. |A$,A%..T|
|000016b0| 0f e3 20 41 25 3d 31 20 | b8 20 42 25 0d 06 5e 11 |.. A%=1 |. B%..^.|
|000016c0| 41 24 3d 41 24 2b bd 28 | 9a 23 46 25 29 0d 06 68 |A$=A$+.(|.#F%)..h|
|000016d0| 05 ed 0d 06 72 07 3d 41 | 24 0d 06 a4 0d dd a4 53 |....r.=A|$......S|
|000016e0| 68 6f 72 74 49 6e 0d 06 | ae 09 3d 9a 23 46 25 0d |hortIn..|..=.#F%.|
|000016f0| 07 08 0f dd f2 52 65 61 | 64 45 6e 74 72 79 0d 07 |.....Rea|dEntry..|
|00001700| 12 08 ea 20 4c 25 0d 07 | 1c 10 44 61 74 65 25 3d |... L%..|..Date%=|
|00001710| a4 49 6e 74 49 6e 0d 07 | 26 19 44 65 74 61 69 6c |.IntIn..|&.Detail|
|00001720| 24 3d a4 53 74 72 69 6e | 67 49 6e 28 32 30 29 0d |$=.Strin|gIn(20).|
|00001730| 07 30 0f 43 68 71 25 3d | a4 49 6e 74 49 6e 0d 07 |.0.Chq%=|.IntIn..|
|00001740| 3a 15 45 6e 74 72 69 65 | 73 25 3d a4 53 68 6f 72 |:.Entrie|s%=.Shor|
|00001750| 74 49 6e 0d 07 44 15 e3 | 20 4c 25 3d 31 20 b8 20 |tIn..D..| L%=1 . |
|00001760| 45 6e 74 72 69 65 73 25 | 0d 07 4e 17 45 6e 74 25 |Entries%|..N.Ent%|
|00001770| 28 4c 25 2c 30 29 3d a4 | 53 68 6f 72 74 49 6e 0d |(L%,0)=.|ShortIn.|
|00001780| 07 58 15 45 6e 74 25 28 | 4c 25 2c 31 29 3d a4 49 |.X.Ent%(|L%,1)=.I|
|00001790| 6e 74 49 6e 0d 07 62 05 | ed 0d 07 6c 05 e1 0d 07 |ntIn..b.|...l....|
|000017a0| d0 0f dd f2 4f 70 65 6e | 54 6f 45 6e 64 0d 07 e4 |....Open|ToEnd...|
|000017b0| 15 46 25 3d ad 28 22 44 | 2e 41 63 63 6f 75 6e 74 |.F%=.("D|.Account|
|000017c0| 22 29 0d 07 ee 0d cf 23 | 46 25 3d a2 23 46 25 0d |").....#|F%=.#F%.|
|000017d0| 07 f8 05 e1 0d 08 34 0c | f2 53 6b 69 70 4f 6e 65 |......4.|.SkipOne|
|000017e0| 0d 08 3e 08 ea 20 41 25 | 0d 08 48 10 cf 23 46 25 |..>.. A%|..H..#F%|
|000017f0| 3d 8f 23 46 25 2b 32 38 | 0d 08 52 0f 41 25 3d a4 |=.#F%+28|..R.A%=.|
|00001800| 53 68 6f 72 74 49 6e 0d | 08 5c 12 cf 23 46 25 3d |ShortIn.|.\..#F%=|
|00001810| 8f 23 46 25 2b 35 2a 41 | 25 0d 08 66 05 e1 0d 08 |.#F%+5*A|%..f....|
|00001820| 98 0b dd f2 53 65 74 55 | 70 0d 08 a2 08 ea 20 41 |....SetU|p..... A|
|00001830| 25 0d 08 ac 15 46 25 3d | 8e 28 22 4e 2e 41 63 63 |%....F%=|.("N.Acc|
|00001840| 6f 75 6e 74 22 29 0d 08 | b6 14 6e 75 6d 61 63 63 |ount")..|..numacc|
|00001850| 25 3d a4 53 68 6f 72 74 | 49 6e 0d 08 c0 14 e3 20 |%=.Short|In..... |
|00001860| 41 25 3d 31 20 b8 20 6e | 75 6d 61 63 63 25 0d 08 |A%=1 . n|umacc%..|
|00001870| ca 1c 41 63 63 24 28 41 | 25 2c 30 29 3d a4 53 74 |..Acc$(A|%,0)=.St|
|00001880| 72 69 6e 67 49 6e 28 32 | 30 29 0d 08 d4 1b 41 63 |ringIn(2|0)....Ac|
|00001890| 63 24 28 41 25 2c 31 29 | 3d a4 53 74 72 69 6e 67 |c$(A%,1)|=.String|
|000018a0| 49 6e 28 33 29 0d 08 de | 05 ed 0d 08 e8 08 d9 23 |In(3)...|.......#|
|000018b0| 46 25 0d 08 f2 05 e1 0d | 08 fc 0d dd a4 47 65 74 |F%......|.....Get|
|000018c0| 44 61 74 65 0d 09 06 12 | ea 20 41 24 2c 44 54 24 |Date....|. A$,DT$|
|000018d0| 2c 41 25 2c 42 25 0d 09 | 07 19 44 54 24 3d c2 22 |,A%,B%..|..DT$=."|
|000018e0| 30 30 22 2b c3 28 44 61 | 74 65 25 29 2c 36 29 0d |00"+.(Da|te%),6).|
|000018f0| 09 08 2c 41 24 3d c1 44 | 54 24 2c 35 2c 32 29 2b |..,A$=.D|T$,5,2)+|
|00001900| 22 2f 22 2b c1 44 54 24 | 2c 33 2c 32 29 2b 22 2f |"/"+.DT$|,3,2)+"/|
|00001910| 22 2b c1 44 54 24 2c 31 | 2c 32 29 0d 09 10 1a f1 |"+.DT$,1|,2).....|
|00001920| 20 41 24 3b 3a ef 38 2c | 38 2c 38 2c 38 2c 38 2c | A$;:.8,|8,8,8,8,|
|00001930| 38 2c 38 2c 38 0d 09 1a | 04 0d 09 24 0a 42 25 3d |8,8,8...|...$.B%=|
|00001940| 31 3a f5 0d 09 2e 08 41 | 25 3d a5 0d 09 38 5a e7 |1:.....A|%=...8Z.|
|00001950| 20 41 25 3e 34 37 20 80 | 20 41 25 3c 35 38 20 80 | A%>47 .| A%<58 .|
|00001960| 20 42 25 3c 39 20 41 24 | 3d a4 4f 76 65 72 74 79 | B%<9 A$|=.Overty|
|00001970| 70 65 28 41 24 2c 42 25 | 2c bd 28 41 25 29 29 3a |pe(A$,B%|,.(A%)):|
|00001980| ef 20 41 25 3a 42 25 3d | 42 25 2b 31 3a e7 20 42 |. A%:B%=|B%+1:. B|
|00001990| 25 3d 33 20 84 20 42 25 | 3d 36 20 42 25 3d 42 25 |%=3 . B%|=6 B%=B%|
|000019a0| 2b 31 3a ef 39 0d 09 42 | 42 e7 20 28 41 25 3d 31 |+1:.9..B|B. (A%=1|
|000019b0| 33 36 20 84 20 41 25 3d | 31 32 37 29 20 80 20 42 |36 . A%=|127) . B|
|000019c0| 25 3e 31 20 42 25 3d 42 | 25 2d 31 3a ef 38 3a e7 |%>1 B%=B|%-1:.8:.|
|000019d0| 20 42 25 3d 33 20 84 20 | 42 25 3d 36 20 42 25 3d | B%=3 . |B%=6 B%=|
|000019e0| 42 25 2d 31 3a ef 38 0d | 09 4c 4a e7 20 28 41 25 |B%-1:.8.|.LJ. (A%|
|000019f0| 3d 33 32 20 84 20 41 25 | 3d 31 33 35 20 84 20 41 |=32 . A%|=135 . A|
|00001a00| 25 3d 31 33 37 29 20 80 | 20 42 25 3c 39 20 ef 39 |%=137) .| B%<9 .9|
|00001a10| 3a 42 25 3d 42 25 2b 31 | 3a e7 20 42 25 3d 33 20 |:B%=B%+1|:. B%=3 |
|00001a20| 84 20 42 25 3d 36 20 42 | 25 3d 42 25 2b 31 3a ef |. B%=6 B|%=B%+1:.|
|00001a30| 39 0d 09 56 12 fd 41 25 | 3d 31 33 20 84 20 41 25 |9..V..A%|=13 . A%|
|00001a40| 3d 32 37 0d 09 5b 0a ef | 31 33 2c 31 30 0d 09 60 |=27..[..|13,10..`|
|00001a50| 32 3d bb 28 c1 41 24 2c | 31 2c 32 29 29 2b 31 30 |2=.(.A$,|1,2))+10|
|00001a60| 30 2a bb 28 c1 41 24 2c | 34 2c 32 29 29 2b 31 30 |0*.(.A$,|4,2))+10|
|00001a70| 30 30 30 2a bb 28 c1 41 | 24 2c 37 2c 32 29 29 0d |000*.(.A|$,7,2)).|
|00001a80| 09 6a 18 dd a4 4f 76 65 | 72 74 79 70 65 28 41 24 |.j...Ove|rtype(A$|
|00001a90| 2c 42 25 2c 43 24 29 0d | 09 74 1f 3d c0 41 24 2c |,B%,C$).|.t.=.A$,|
|00001aa0| 42 25 2d 31 29 2b 43 24 | 2b c1 41 24 2c 42 25 2b |B%-1)+C$|+.A$,B%+|
|00001ab0| a9 28 43 24 29 29 0d 09 | 75 16 dd a4 49 6e 73 65 |.(C$))..|u...Inse|
|00001ac0| 72 74 28 41 24 2c 42 25 | 2c 43 24 29 0d 09 76 19 |rt(A$,B%|,C$)..v.|
|00001ad0| 3d c0 41 24 2c 42 25 2d | 31 29 2b 43 24 2b c1 41 |=.A$,B%-|1)+C$+.A|
|00001ae0| 24 2c 42 25 29 0d 09 7e | 12 dd a4 47 65 74 53 74 |$,B%)..~|...GetSt|
|00001af0| 72 69 6e 67 28 6e 29 0d | 09 88 11 ea 20 53 24 2c |ring(n).|.... S$,|
|00001b00| 41 25 2c 42 25 2c 50 25 | 0d 09 92 15 53 24 3d 22 |A%,B%,P%|....S$="|
|00001b10| 22 3a 42 25 3d 30 3a 50 | 25 3d 31 3a f5 0d 09 9c |":B%=0:P|%=1:....|
|00001b20| 08 41 25 3d a5 0d 09 a6 | 7a e7 20 41 25 3e 33 31 |.A%=....|z. A%>31|
|00001b30| 20 80 20 41 25 3c 31 32 | 37 20 80 20 42 25 3c 6e | . A%<12|7 . B%<n|
|00001b40| 20 53 24 3d a4 49 6e 73 | 65 72 74 28 53 24 2c 50 | S$=.Ins|ert(S$,P|
|00001b50| 25 2c bd 28 41 25 29 29 | 3a ef 41 25 3a 41 25 3d |%,.(A%))|:.A%:A%=|
|00001b60| b1 2b 31 30 30 2a bc 3a | f1 c1 53 24 2c 50 25 2b |.+100*.:|..S$,P%+|
|00001b70| 31 29 2b 22 20 22 3a f1 | 8a 41 25 20 83 20 31 30 |1)+" ":.|.A% . 10|
|00001b80| 30 2c 41 25 20 81 20 31 | 30 30 29 3b 22 22 3b 3a |0,A% . 1|00);"";:|
|00001b90| 42 25 3d 42 25 2b 31 3a | 50 25 3d 50 25 2b 31 0d |B%=B%+1:|P%=P%+1.|
|00001ba0| 09 b0 20 e7 20 41 25 3d | 31 33 37 20 80 20 50 25 |.. . A%=|137 . P%|
|00001bb0| 3c 3d 42 25 20 ef 39 3a | 50 25 3d 50 25 2b 31 0d |<=B% .9:|P%=P%+1.|
|00001bc0| 09 ba 1e e7 20 41 25 3d | 31 33 36 20 80 20 50 25 |.... A%=|136 . P%|
|00001bd0| 3e 31 20 ef 38 3a 50 25 | 3d 50 25 2d 31 0d 09 c4 |>1 .8:P%|=P%-1...|
|00001be0| 60 e7 20 41 25 3d 31 33 | 35 20 80 20 50 25 3c 3d |`. A%=13|5 . P%<=|
|00001bf0| 42 25 20 53 24 3d a4 44 | 65 6c 65 74 65 28 53 24 |B% S$=.D|elete(S$|
|00001c00| 2c 50 25 29 3a 41 25 3d | b1 2b 31 30 30 2a bc 3a |,P%):A%=|.+100*.:|
|00001c10| f1 c1 53 24 2c 50 25 29 | 2b 22 20 22 3a f1 8a 41 |..S$,P%)|+" ":..A|
|00001c20| 25 20 83 20 31 30 30 2c | 41 25 20 81 20 31 30 30 |% . 100,|A% . 100|
|00001c30| 29 3b 22 22 3b 3a 42 25 | 3d 42 25 2d 31 0d 09 ce |);"";:B%|=B%-1...|
|00001c40| 69 e7 20 41 25 3d 31 32 | 37 20 80 20 50 25 3e 31 |i. A%=12|7 . P%>1|
|00001c50| 20 50 25 3d 50 25 2d 31 | 3a 53 24 3d a4 44 65 6c | P%=P%-1|:S$=.Del|
|00001c60| 65 74 65 28 53 24 2c 50 | 25 29 3a ef 38 3a 41 25 |ete(S$,P|%):.8:A%|
|00001c70| 3d b1 2b 31 30 30 2a bc | 3a f1 c1 53 24 2c 50 25 |=.+100*.|:..S$,P%|
|00001c80| 29 2b 22 20 22 3a f1 8a | 41 25 20 83 20 31 30 30 |)+" ":..|A% . 100|
|00001c90| 2c 41 25 20 81 20 31 30 | 30 29 3b 22 22 3b 3a 42 |,A% . 10|0);"";:B|
|00001ca0| 25 3d 42 25 2d 31 0d 09 | d8 12 fd 41 25 3d 31 33 |%=B%-1..|...A%=13|
|00001cb0| 20 84 20 41 25 3d 32 37 | 0d 09 d9 15 e7 20 41 25 | . A%=27|..... A%|
|00001cc0| 3d 32 37 20 d7 22 41 2e | 4d 65 6e 75 22 0d 09 dd |=27 ."A.|Menu"...|
|00001cd0| 0a ef 31 33 2c 31 30 0d | 09 e2 07 3d 53 24 0d 09 |..13,10.|...=S$..|
|00001ce0| ec 13 dd a4 44 65 6c 65 | 74 65 28 41 24 2c 42 25 |....Dele|te(A$,B%|
|00001cf0| 29 0d 09 f6 18 3d c0 41 | 24 2c 42 25 2d 31 29 2b |)....=.A|$,B%-1)+|
|00001d00| c1 41 24 2c 42 25 2b 31 | 29 0d 0a 28 0d dd a4 47 |.A$,B%+1|)..(...G|
|00001d10| 65 74 54 79 70 65 0d 0a | 32 14 ea 20 41 24 2c 41 |etType..|2.. A$,A|
|00001d20| 25 2c 42 24 2c 58 25 2c | 59 25 0d 0a 33 0d 58 25 |%,B$,X%,|Y%..3.X%|
|00001d30| 3d b1 3a 59 25 3d bc 0d | 0a 3c 14 41 24 3d a4 47 |=.:Y%=..|.<.A$=.G|
|00001d40| 65 74 53 74 72 69 6e 67 | 28 36 29 0d 0a 46 22 e7 |etString|(6)..F".|
|00001d50| 20 c0 41 24 2c 31 29 3c | 3e 22 30 22 20 80 20 bb | .A$,1)<|>"0" . .|
|00001d60| 28 41 24 29 3d 30 20 e5 | 20 8d 44 5a 4a 0d 0a 50 |(A$)=0 .| .DZJ..P|
|00001d70| 0a 3d bb 28 41 24 29 0d | 0a 5a 11 f7 20 8d 74 4c |.=.(A$).|.Z.. .tL|
|00001d80| 4a 3a 41 25 3d 30 3a f5 | 0d 0a 64 10 f3 20 42 24 |J:A%=0:.|..d.. B$|
|00001d90| 3a 41 25 3d 41 25 2d 31 | 0d 0a 6e 18 fd 20 41 24 |:A%=A%-1|..n.. A$|
|00001da0| 3d 42 24 20 84 20 42 24 | 3d 22 5f 45 4e 44 5f 22 |=B$ . B$|="_END_"|
|00001db0| 0d 0a 78 1a e7 20 42 24 | 3c 3e 22 5f 45 4e 44 5f |..x.. B$|<>"_END_|
|00001dc0| 22 20 3d 41 25 20 8b 20 | ef 37 0d 0a 79 14 ef 39 |" =A% . |.7..y..9|
|00001dd0| 3a f7 20 8d 74 4c 4a 3a | f5 3a f3 20 42 24 0d 0a |:. .tLJ:|.:. B$..|
|00001de0| 7a 1b e7 20 42 24 3c 3e | 22 5f 45 4e 44 5f 22 20 |z.. B$<>|"_END_" |
|00001df0| f1 42 24 3b 22 20 20 22 | 3b 0d 0a 7b 30 fd 20 42 |.B$;" "|;..{0. B|
|00001e00| 24 3d 22 5f 45 4e 44 5f | 22 3a f1 8a 58 25 2c 59 |$="_END_|":..X%,Y|
|00001e10| 25 29 3b 22 20 20 20 20 | 20 20 22 3b 3a ef 38 2c |%);" | ";:.8,|
|00001e20| 38 2c 38 2c 38 2c 38 2c | 38 0d 0a 7c 0f 41 25 3d |8,8,8,8,|8..|.A%=|
|00001e30| a4 47 65 74 54 79 70 65 | 0d 0a 7d 14 ef 39 3a f7 |.GetType|..}..9:.|
|00001e40| 20 8d 74 4c 4a 3a f5 3a | f3 20 42 24 0d 0a 7e 1b | .tLJ:.:|. B$..~.|
|00001e50| e7 20 42 24 3c 3e 22 5f | 45 4e 44 5f 22 20 f1 22 |. B$<>"_|END_" ."|
|00001e60| 20 20 20 20 20 22 3b 0d | 0a 7f 0f fd 42 24 3d 22 | ";.|....B$="|
|00001e70| 5f 45 4e 44 5f 22 0d 0a | 82 0f f1 8a 58 25 2c 59 |_END_"..|....X%,Y|
|00001e80| 25 29 3b 22 22 0d 0a 83 | 07 3d 41 25 0d 0a 8c 29 |%);""...|.=A%...)|
|00001e90| dc 20 22 53 54 4f 22 2c | 22 44 44 42 22 2c 22 42 |. "STO",|"DDB","B|
|00001ea0| 43 43 22 2c 22 41 54 4d | 22 2c 22 49 4e 54 22 2c |CC","ATM|","INT",|
|00001eb0| 22 52 45 4d 22 0d 0a 96 | 0d dc 20 22 5f 45 4e 44 |"REM"...|.. "_END|
|00001ec0| 5f 22 0d 0a a0 0c dd a4 | 47 65 74 41 63 63 0d 0a |_"......|GetAcc..|
|00001ed0| aa 14 ea 20 41 24 2c 41 | 25 2c 58 25 2c 59 25 2c |... A$,A|%,X%,Y%,|
|00001ee0| 42 25 0d 0a af 0d 58 25 | 3d b1 3a 59 25 3d bc 0d |B%....X%|=.:Y%=..|
|00001ef0| 0a b4 14 41 24 3d a4 47 | 65 74 53 74 72 69 6e 67 |...A$=.G|etString|
|00001f00| 28 33 29 0d 0a be 2e 41 | 25 3d 30 3a f5 3a 41 25 |(3)....A|%=0:.:A%|
|00001f10| 3d 41 25 2b 31 3a fd 41 | 24 3d 41 63 63 24 28 41 |=A%+1:.A|$=Acc$(A|
|00001f20| 25 2c 31 29 20 84 20 41 | 25 3d 6e 75 6d 61 63 63 |%,1) . A|%=numacc|
|00001f30| 25 0d 0a c8 1e e7 20 41 | 24 3d 41 63 63 24 28 41 |%..... A|$=Acc$(A|
|00001f40| 25 2c 31 29 20 3d 41 25 | 20 8b 20 ef 37 2c 39 0d |%,1) =A%| . .7,9.|
|00001f50| 0a d2 30 41 25 3d 30 3a | f5 3a 41 25 3d 41 25 2b |..0A%=0:|.:A%=A%+|
|00001f60| 31 3a f1 41 63 63 24 28 | 41 25 2c 31 29 3b 22 20 |1:.Acc$(|A%,1);" |
|00001f70| 20 22 3b 3a fd 41 25 3d | 6e 75 6d 61 63 63 25 0d | ";:.A%=|numacc%.|
|00001f80| 0a dc 1a f1 8a 58 25 2c | 59 25 29 3b 22 20 20 20 |.....X%,|Y%);" |
|00001f90| 22 3b 3a ef 38 2c 38 2c | 38 0d 0a e6 0e 42 25 3d |";:.8,8,|8....B%=|
|00001fa0| a4 47 65 74 41 63 63 0d | 0a f0 28 41 25 3d 30 3a |.GetAcc.|..(A%=0:|
|00001fb0| f5 3a 41 25 3d 41 25 2b | 31 3a f1 22 20 20 20 20 |.:A%=A%+|1:." |
|00001fc0| 20 22 3b 3a fd 41 25 3d | 6e 75 6d 61 63 63 25 0d | ";:.A%=|numacc%.|
|00001fd0| 0a fa 0f f1 8a 58 25 2c | 59 25 29 3b 22 22 0d 0b |.....X%,|Y%);""..|
|00001fe0| 04 07 3d 42 25 0d 0b 0e | 0b dd a4 47 65 74 41 6d |..=B%...|...GetAm|
|00001ff0| 0d 0b 18 14 ea 20 41 24 | 2c 41 25 2c 58 25 2c 59 |..... A$|,A%,X%,Y|
|00002000| 25 2c 42 25 0d 0b 1d 0d | 58 25 3d b1 3a 59 25 3d |%,B%....|X%=.:Y%=|
|00002010| bc 0d 0b 22 15 41 24 3d | a4 47 65 74 53 74 72 69 |...".A$=|.GetStri|
|00002020| 6e 67 28 32 30 29 0d 0b | 2c 18 e7 20 a7 22 30 30 |ng(20)..|,.. ."00|
|00002030| 2e 30 30 22 2c 41 24 29 | 3c 3e 30 20 3d 30 0d 0b |.00",A$)|<>0 =0..|
|00002040| 37 3e e3 20 42 25 3d 31 | 20 b8 20 a9 28 41 24 29 |7>. B%=1| . .(A$)|
|00002050| 3a e7 20 a7 22 2e 2a 2b | 2d 2f 20 28 29 30 31 32 |:. .".*+|-/ ()012|
|00002060| 33 34 35 36 37 38 39 22 | 2c c1 41 24 2c 42 25 2c |3456789"|,.A$,B%,|
|00002070| 31 29 29 3d 30 20 41 24 | 3d 22 58 22 0d 0b 38 05 |1))=0 A$|="X"..8.|
|00002080| ed 0d 0b 39 1e e7 20 41 | 24 3c 3e 22 58 22 20 3d |...9.. A|$<>"X" =|
|00002090| a4 69 6e 74 28 a0 28 41 | 24 29 2a 31 30 30 29 0d |.int(.(A|$)*100).|
|000020a0| 0b 40 2b ef 37 3a f1 8a | 58 25 2c 59 25 29 3b c4 |.@+.7:..|X%,Y%);.|
|000020b0| 32 30 2c 22 20 22 29 3b | 8a 58 25 2c 59 25 29 3b |20," ");|.X%,Y%);|
|000020c0| 22 22 3b 3a e5 20 8d 54 | 62 4b 0d 0b 4a 0f dd a4 |"";:. .T|bK..J...|
|000020d0| 44 69 73 41 6d 28 41 25 | 29 0d 0b 4b 08 ea 20 41 |DisAm(A%|)..K.. A|
|000020e0| 24 0d 0b 54 0f 41 24 3d | c3 28 94 28 41 25 29 29 |$..T.A$=|.(.(A%))|
|000020f0| 0d 0b 55 18 e7 20 a9 28 | 41 24 29 3d 31 20 41 24 |..U.. .(|A$)=1 A$|
|00002100| 3d 22 30 30 22 2b 41 24 | 0d 0b 56 17 e7 20 a9 28 |="00"+A$|..V.. .(|
|00002110| 41 24 29 3d 32 20 41 24 | 3d 22 30 22 2b 41 24 0d |A$)=2 A$|="0"+A$.|
|00002120| 0b 57 23 e7 20 41 25 3e | 3d 30 20 41 24 3d 22 86 |.W#. A%>|=0 A$=".|
|00002130| 2b 22 2b 41 24 20 8b 20 | 41 24 3d 22 81 2d 22 2b |+"+A$ . |A$=".-"+|
|00002140| 41 24 0d 0b 5e 1c 3d c0 | 41 24 2c a9 28 41 24 29 |A$..^.=.|A$,.(A$)|
|00002150| 2d 32 29 2b 22 2e 22 2b | c2 41 24 2c 32 29 0d 0b |-2)+"."+|.A$,2)..|
|00002160| 68 0c dd a4 69 6e 74 28 | 41 29 0d 0b 72 0d 3d a8 |h...int(|A)..r.=.|
|00002170| 28 41 2b 30 2e 31 29 0d | ff 46 69 6c 65 44 61 74 |(A+0.1).|.FileDat|
|00002180| 61 82 44 65 6c 65 74 65 | 00 00 00 00 00 6a 13 00 |a.Delete|.....j..|
|00002190| 00 42 fb ff ff a7 21 7d | 10 03 00 bf ae 0d 00 0a |.B....!}|........|
|000021a0| 1e f4 20 41 63 63 6f 75 | 6e 74 73 20 49 49 2d 20 |.. Accou|nts II- |
|000021b0| 44 65 6c 65 74 65 20 49 | 74 65 6d 0d 00 14 18 f4 |Delete I|tem.....|
|000021c0| 20 28 43 29 20 31 39 38 | 39 20 41 2e 20 48 75 72 | (C) 198|9 A. Hur|
|000021d0| 6c 65 79 0d 00 1e 1a f4 | 20 42 65 74 65 6c 67 65 |ley.....| Betelge|
|000021e0| 75 73 65 20 43 6f 6d 70 | 75 74 69 6e 67 0d 00 28 |use Comp|uting..(|
|000021f0| 11 de 20 49 6e 74 53 70 | 61 63 65 25 20 34 0d 00 |.. IntSp|ace% 4..|
|00002200| 32 11 de 20 45 6e 74 25 | 28 32 35 36 2c 31 29 0d |2.. Ent%|(256,1).|
|00002210| 00 37 11 de 20 41 63 63 | 24 28 32 35 36 2c 31 29 |.7.. Acc|$(256,1)|
|00002220| 0d 00 38 12 de 20 73 69 | 7a 65 73 25 28 32 30 30 |..8.. si|zes%(200|
|00002230| 30 29 0d 00 3c 10 44 61 | 74 65 25 3d 38 39 30 33 |0)..<.Da|te%=8903|
|00002240| 32 31 0d 00 46 21 44 65 | 74 61 69 6c 24 3d 22 4e |21..F!De|tail$="N|
|00002250| 6f 20 44 65 74 61 69 6c | 73 20 44 65 66 69 6e 65 |o Detail|s Define|
|00002260| 64 21 22 0d 00 50 0e 45 | 6e 74 72 69 65 73 25 3d |d!"..P.E|ntries%=|
|00002270| 31 0d 00 5a 0a 43 68 71 | 25 3d 30 0d 00 64 06 eb |1..Z.Chq|%=0..d..|
|00002280| 37 0d 00 69 0c 2a 46 58 | 32 32 30 2c 34 0d 00 6a |7..i.*FX|220,4..j|
|00002290| 0a 2a 46 58 34 2c 31 0d | 00 6e 28 f1 bd 31 35 37 |.*FX4,1.|.n(..157|
|000022a0| 3b bd 31 34 31 3b 22 81 | 20 20 20 20 20 20 20 20 |;.141;".| |
|000022b0| 20 20 20 41 63 63 6f 75 | 6e 74 73 20 49 49 22 0d | Accou|nts II".|
|000022c0| 00 78 28 f1 bd 31 35 37 | 3b bd 31 34 31 3b 22 81 |.x(..157|;.141;".|
|000022d0| 20 20 20 20 20 20 20 20 | 20 20 20 41 63 63 6f 75 | | Accou|
|000022e0| 6e 74 73 20 49 49 22 0d | 00 82 2e f1 bd 31 35 37 |nts II".|.....157|
|000022f0| 3b 22 86 20 20 20 28 43 | 29 20 31 39 38 39 20 20 |;". (C|) 1989 |
|00002300| 42 65 74 65 6c 67 65 75 | 73 65 20 43 6f 6d 70 75 |Betelgeu|se Compu|
|00002310| 74 69 6e 67 22 0d 00 87 | 05 f1 0d 00 8c 27 f1 bd |ting"...|.....'..|
|00002320| 31 34 31 3b 22 85 20 20 | 20 20 20 20 20 20 44 65 |141;". | De|
|00002330| 6c 65 74 65 20 54 72 61 | 6e 73 61 63 74 69 6f 6e |lete Tra|nsaction|
|00002340| 22 0d 00 96 27 f1 bd 31 | 34 31 3b 22 85 20 20 20 |"...'..1|41;". |
|00002350| 20 20 20 20 20 44 65 6c | 65 74 65 20 54 72 61 6e | Del|ete Tran|
|00002360| 73 61 63 74 69 6f 6e 22 | 0d 00 a0 11 ef 32 38 2c |saction"|.....28,|
|00002370| 30 2c 32 34 2c 33 39 2c | 36 0d 00 be 0a f2 53 65 |0,24,39,|6.....Se|
|00002380| 74 55 70 0d 00 c8 15 46 | 25 3d ad 28 22 44 2e 41 |tUp....F|%=.("D.A|
|00002390| 63 63 6f 75 6e 74 22 29 | 0d 00 d2 13 4e 25 3d 2d |ccount")|....N%=-|
|000023a0| 31 3a f5 3a 4e 25 3d 4e | 25 2b 31 0d 00 dc 0e f2 |1:.:N%=N|%+1.....|
|000023b0| 52 65 61 64 45 6e 74 72 | 79 0d 00 e6 1c 73 69 7a |ReadEntr|y....siz|
|000023c0| 65 73 25 28 4e 25 29 3d | 32 39 2b 45 6e 74 72 69 |es%(N%)=|29+Entri|
|000023d0| 65 73 25 2a 35 0d 00 f0 | 0a fd 20 c5 23 46 25 0d |es%*5...|.. .#F%.|
|000023e0| 00 f5 18 cf 23 46 25 3d | 8f 23 46 25 2d 73 69 7a |....#F%=|.#F%-siz|
|000023f0| 65 73 25 28 4e 25 29 0d | 00 fa 05 f5 0d 01 04 0e |es%(N%).|........|
|00002400| f2 52 65 61 64 45 6e 74 | 72 79 0d 01 0e 23 f2 44 |.ReadEnt|ry...#.D|
|00002410| 69 73 70 45 6e 74 72 79 | 3a cf 23 46 25 3d 8f 23 |ispEntry|:.#F%=.#|
|00002420| 46 25 2d 73 69 7a 65 73 | 25 28 4e 25 29 0d 01 18 |F%-sizes|%(N%)...|
|00002430| 23 f1 27 22 85 55 70 2c | 20 44 6f 77 6e 2c 20 54 |#.'".Up,| Down, T|
|00002440| 6f 67 67 6c 65 2c 20 45 | 73 63 22 3a 49 25 3d a5 |oggle, E|sc":I%=.|
|00002450| 0d 01 22 49 e7 20 49 25 | 3d 97 28 22 54 22 29 20 |.."I. I%|=.("T") |
|00002460| 84 20 49 25 3d 97 28 22 | 74 22 29 20 44 61 74 65 |. I%=.("|t") Date|
|00002470| 25 3d 2d 44 61 74 65 25 | 3a f2 57 72 69 74 65 45 |%=-Date%|:.WriteE|
|00002480| 6e 74 72 79 3a cf 23 46 | 25 3d 8f 23 46 25 2d 73 |ntry:.#F|%=.#F%-s|
|00002490| 69 7a 65 73 25 28 4e 25 | 29 0d 01 2c 5c e7 20 28 |izes%(N%|)..,\. (|
|000024a0| 49 25 3d 97 28 22 44 22 | 29 20 84 20 49 25 3d 97 |I%=.("D"|) . I%=.|
|000024b0| 28 22 64 22 29 20 84 20 | 49 25 3d 31 33 38 29 20 |("d") . |I%=138) |
|000024c0| 80 20 8f 23 46 25 2b 73 | 69 7a 65 73 25 28 4e 25 |. .#F%+s|izes%(N%|
|000024d0| 29 3c a2 23 46 25 20 4e | 25 3d 4e 25 2b 31 3a cf |)<.#F% N|%=N%+1:.|
|000024e0| 23 46 25 3d 8f 23 46 25 | 2b 73 69 7a 65 73 25 28 |#F%=.#F%|+sizes%(|
|000024f0| 4e 25 2d 31 29 0d 01 36 | 4a e7 20 28 49 25 3d 97 |N%-1)..6|J. (I%=.|
|00002500| 28 22 55 22 29 20 84 20 | 49 25 3d 97 28 22 75 22 |("U") . |I%=.("u"|
|00002510| 29 20 84 20 49 25 3d 31 | 33 39 29 20 80 20 4e 25 |) . I%=1|39) . N%|
|00002520| 3e 30 20 4e 25 3d 4e 25 | 2d 31 3a cf 23 46 25 3d |>0 N%=N%|-1:.#F%=|
|00002530| 8f 23 46 25 2d 73 69 7a | 65 73 25 28 4e 25 29 0d |.#F%-siz|es%(N%).|
|00002540| 01 3b 27 ef 31 31 3a f1 | 22 20 20 20 20 20 20 20 |.;'.11:.|" |
|00002550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002560| 22 3b 3a ef 31 33 0d 01 | 40 23 fd 20 49 25 3d 97 |";:.13..|@#. I%=.|
|00002570| 28 22 45 22 29 20 84 20 | 49 25 3d 97 28 22 65 22 |("E") . |I%=.("e"|
|00002580| 29 20 84 20 49 25 3d 32 | 37 0d 01 45 08 d9 23 46 |) . I%=2|7..E..#F|
|00002590| 25 0d 01 4a 2b f1 27 27 | 22 85 54 6f 20 63 6f 6d |%..J+.''|".To com|
|000025a0| 70 6c 65 74 65 20 64 65 | 6c 65 74 69 6f 6e 73 20 |plete de|letions |
|000025b0| 64 6f 20 61 82 53 6f 72 | 74 85 2e 22 0d 01 54 0d |do a.Sor|t.."..T.|
|000025c0| d7 22 41 2e 4d 65 6e 75 | 22 0d 03 e8 10 dd f2 57 |."A.Menu|"......W|
|000025d0| 72 69 74 65 45 6e 74 72 | 79 0d 03 ed 08 ea 20 4c |riteEntr|y..... L|
|000025e0| 25 0d 03 fc 12 f2 49 6e | 74 4f 75 74 28 44 61 74 |%.....In|tOut(Dat|
|000025f0| 65 25 29 0d 04 06 1a f2 | 53 74 72 69 6e 67 4f 75 |e%).....|StringOu|
|00002600| 74 28 44 65 74 61 69 6c | 24 2c 32 30 29 0d 04 10 |t(Detail|$,20)...|
|00002610| 11 f2 49 6e 74 4f 75 74 | 28 43 68 71 25 29 0d 04 |..IntOut|(Chq%)..|
|00002620| 1a 17 f2 53 68 6f 72 74 | 4f 75 74 28 45 6e 74 72 |...Short|Out(Entr|
|00002630| 69 65 73 25 29 0d 04 24 | 15 e3 20 4c 25 3d 31 20 |ies%)..$|.. L%=1 |
|00002640| b8 20 45 6e 74 72 69 65 | 73 25 0d 04 2e 19 f2 53 |. Entrie|s%.....S|
|00002650| 68 6f 72 74 4f 75 74 28 | 45 6e 74 25 28 4c 25 2c |hortOut(|Ent%(L%,|
|00002660| 30 29 29 0d 04 38 17 f2 | 49 6e 74 4f 75 74 28 45 |0))..8..|IntOut(E|
|00002670| 6e 74 25 28 4c 25 2c 31 | 29 29 0d 04 42 05 ed 0d |nt%(L%,1|))..B...|
|00002680| 04 56 05 e1 0d 04 b0 12 | dd f2 53 68 6f 72 74 4f |.V......|..ShortO|
|00002690| 75 74 28 41 25 29 0d 04 | ba 13 d5 23 46 25 2c 28 |ut(A%)..|...#F%,(|
|000026a0| 41 25 20 80 20 32 35 35 | 29 0d 04 c4 05 e1 0d 05 |A% . 255|).......|
|000026b0| 14 16 dd f2 53 74 72 69 | 6e 67 4f 75 74 28 41 24 |....Stri|ngOut(A$|
|000026c0| 2c 42 25 29 0d 05 1e 08 | ea 20 41 25 0d 05 28 0f |,B%)....|. A%..(.|
|000026d0| e3 20 41 25 3d 31 20 b8 | 20 42 25 0d 05 32 2b e7 |. A%=1 .| B%..2+.|
|000026e0| 20 41 25 3c 3d a9 28 41 | 24 29 20 d5 23 46 25 2c | A%<=.(A|$) .#F%,|
|000026f0| 97 28 c1 41 24 2c 41 25 | 2c 31 29 29 20 8b 20 d5 |.(.A$,A%|,1)) . .|
|00002700| 23 46 25 2c 33 32 0d 05 | 3c 05 ed 0d 05 46 05 e1 |#F%,32..|<....F..|
|00002710| 0d 05 78 10 dd f2 49 6e | 74 4f 75 74 28 41 25 29 |..x...In|tOut(A%)|
|00002720| 0d 05 7d 11 21 49 6e 74 | 53 70 61 63 65 25 3d 41 |..}.!Int|Space%=A|
|00002730| 25 0d 05 82 13 d5 23 46 | 25 2c 3f 49 6e 74 53 70 |%.....#F|%,?IntSp|
|00002740| 61 63 65 25 0d 05 8c 14 | d5 23 46 25 2c 49 6e 74 |ace%....|.#F%,Int|
|00002750| 53 70 61 63 65 25 3f 31 | 0d 05 96 14 d5 23 46 25 |Space%?1|.....#F%|
|00002760| 2c 49 6e 74 53 70 61 63 | 65 25 3f 32 0d 05 a0 14 |,IntSpac|e%?2....|
|00002770| d5 23 46 25 2c 49 6e 74 | 53 70 61 63 65 25 3f 33 |.#F%,Int|Space%?3|
|00002780| 0d 05 aa 05 e1 0d 05 dc | 0b dd a4 49 6e 74 49 6e |........|...IntIn|
|00002790| 0d 05 e6 13 3f 49 6e 74 | 53 70 61 63 65 25 3d 9a |....?Int|Space%=.|
|000027a0| 23 46 25 0d 05 f0 14 49 | 6e 74 53 70 61 63 65 25 |#F%....I|ntSpace%|
|000027b0| 3f 31 3d 9a 23 46 25 0d | 05 fa 14 49 6e 74 53 70 |?1=.#F%.|...IntSp|
|000027c0| 61 63 65 25 3f 32 3d 9a | 23 46 25 0d 06 04 14 49 |ace%?2=.|#F%....I|
|000027d0| 6e 74 53 70 61 63 65 25 | 3f 33 3d 9a 23 46 25 0d |ntSpace%|?3=.#F%.|
|000027e0| 06 0e 0f 3d 21 49 6e 74 | 53 70 61 63 65 25 0d 06 |...=!Int|Space%..|
|000027f0| 40 12 dd a4 53 74 72 69 | 6e 67 49 6e 28 42 25 29 |@...Stri|ngIn(B%)|
|00002800| 0d 06 4a 0b ea 20 41 24 | 2c 41 25 0d 06 54 0f e3 |..J.. A$|,A%..T..|
|00002810| 20 41 25 3d 31 20 b8 20 | 42 25 0d 06 5e 11 41 24 | A%=1 . |B%..^.A$|
|00002820| 3d 41 24 2b bd 28 9a 23 | 46 25 29 0d 06 68 05 ed |=A$+.(.#|F%)..h..|
|00002830| 0d 06 72 07 3d 41 24 0d | 06 a4 0d dd a4 53 68 6f |..r.=A$.|.....Sho|
|00002840| 72 74 49 6e 0d 06 ae 09 | 3d 9a 23 46 25 0d 07 08 |rtIn....|=.#F%...|
|00002850| 0f dd f2 52 65 61 64 45 | 6e 74 72 79 0d 07 12 08 |...ReadE|ntry....|
|00002860| ea 20 4c 25 0d 07 1c 10 | 44 61 74 65 25 3d a4 49 |. L%....|Date%=.I|
|00002870| 6e 74 49 6e 0d 07 26 19 | 44 65 74 61 69 6c 24 3d |ntIn..&.|Detail$=|
|00002880| a4 53 74 72 69 6e 67 49 | 6e 28 32 30 29 0d 07 30 |.StringI|n(20)..0|
|00002890| 0f 43 68 71 25 3d a4 49 | 6e 74 49 6e 0d 07 3a 15 |.Chq%=.I|ntIn..:.|
|000028a0| 45 6e 74 72 69 65 73 25 | 3d a4 53 68 6f 72 74 49 |Entries%|=.ShortI|
|000028b0| 6e 0d 07 44 15 e3 20 4c | 25 3d 31 20 b8 20 45 6e |n..D.. L|%=1 . En|
|000028c0| 74 72 69 65 73 25 0d 07 | 4e 17 45 6e 74 25 28 4c |tries%..|N.Ent%(L|
|000028d0| 25 2c 30 29 3d a4 53 68 | 6f 72 74 49 6e 0d 07 58 |%,0)=.Sh|ortIn..X|
|000028e0| 15 45 6e 74 25 28 4c 25 | 2c 31 29 3d a4 49 6e 74 |.Ent%(L%|,1)=.Int|
|000028f0| 49 6e 0d 07 62 05 ed 0d | 07 6c 05 e1 0d 07 d0 0f |In..b...|.l......|
|00002900| dd f2 4f 70 65 6e 54 6f | 45 6e 64 0d 07 e4 15 46 |..OpenTo|End....F|
|00002910| 25 3d ad 28 22 44 2e 41 | 63 63 6f 75 6e 74 22 29 |%=.("D.A|ccount")|
|00002920| 0d 07 ee 0d cf 23 46 25 | 3d a2 23 46 25 0d 07 f8 |.....#F%|=.#F%...|
|00002930| 05 e1 0d 08 34 0c f2 53 | 6b 69 70 4f 6e 65 0d 08 |....4..S|kipOne..|
|00002940| 3e 08 ea 20 41 25 0d 08 | 48 10 cf 23 46 25 3d 8f |>.. A%..|H..#F%=.|
|00002950| 23 46 25 2b 32 38 0d 08 | 52 0f 41 25 3d a4 53 68 |#F%+28..|R.A%=.Sh|
|00002960| 6f 72 74 49 6e 0d 08 5c | 12 cf 23 46 25 3d 8f 23 |ortIn..\|..#F%=.#|
|00002970| 46 25 2b 35 2a 41 25 0d | 08 66 05 e1 0d 08 98 0b |F%+5*A%.|.f......|
|00002980| dd f2 53 65 74 55 70 0d | 08 a2 08 ea 20 41 25 0d |..SetUp.|.... A%.|
|00002990| 08 ac 15 46 25 3d 8e 28 | 22 4e 2e 41 63 63 6f 75 |...F%=.(|"N.Accou|
|000029a0| 6e 74 22 29 0d 08 b6 14 | 6e 75 6d 61 63 63 25 3d |nt")....|numacc%=|
|000029b0| a4 53 68 6f 72 74 49 6e | 0d 08 c0 14 e3 20 41 25 |.ShortIn|..... A%|
|000029c0| 3d 31 20 b8 20 6e 75 6d | 61 63 63 25 0d 08 ca 1c |=1 . num|acc%....|
|000029d0| 41 63 63 24 28 41 25 2c | 30 29 3d a4 53 74 72 69 |Acc$(A%,|0)=.Stri|
|000029e0| 6e 67 49 6e 28 32 30 29 | 0d 08 d4 1b 41 63 63 24 |ngIn(20)|....Acc$|
|000029f0| 28 41 25 2c 31 29 3d a4 | 53 74 72 69 6e 67 49 6e |(A%,1)=.|StringIn|
|00002a00| 28 33 29 0d 08 de 05 ed | 0d 08 e8 08 d9 23 46 25 |(3).....|.....#F%|
|00002a10| 0d 08 f2 05 e1 0d 08 fc | 0d dd a4 47 65 74 44 61 |........|...GetDa|
|00002a20| 74 65 0d 09 06 0e ea 20 | 41 24 2c 41 25 2c 42 25 |te..... |A$,A%,B%|
|00002a30| 0d 09 10 21 f1 22 30 30 | 2f 30 30 2f 30 30 22 3b |...!."00|/00/00";|
|00002a40| 3a ef 38 2c 38 2c 38 2c | 38 2c 38 2c 38 2c 38 2c |:.8,8,8,|8,8,8,8,|
|00002a50| 38 0d 09 1a 11 41 24 3d | 22 30 30 2f 30 30 2f 30 |8....A$=|"00/00/0|
|00002a60| 30 22 0d 09 24 0a 42 25 | 3d 31 3a f5 0d 09 2e 08 |0"..$.B%|=1:.....|
|00002a70| 41 25 3d a5 0d 09 38 5a | e7 20 41 25 3e 34 37 20 |A%=...8Z|. A%>47 |
|00002a80| 80 20 41 25 3c 35 38 20 | 80 20 42 25 3c 39 20 41 |. A%<58 |. B%<9 A|
|00002a90| 24 3d a4 4f 76 65 72 74 | 79 70 65 28 41 24 2c 42 |$=.Overt|ype(A$,B|
|00002aa0| 25 2c bd 28 41 25 29 29 | 3a ef 20 41 25 3a 42 25 |%,.(A%))|:. A%:B%|
|00002ab0| 3d 42 25 2b 31 3a e7 20 | 42 25 3d 33 20 84 20 42 |=B%+1:. |B%=3 . B|
|00002ac0| 25 3d 36 20 42 25 3d 42 | 25 2b 31 3a ef 39 0d 09 |%=6 B%=B|%+1:.9..|
|00002ad0| 42 42 e7 20 28 41 25 3d | 31 33 36 20 84 20 41 25 |BB. (A%=|136 . A%|
|00002ae0| 3d 31 32 37 29 20 80 20 | 42 25 3e 31 20 42 25 3d |=127) . |B%>1 B%=|
|00002af0| 42 25 2d 31 3a ef 38 3a | e7 20 42 25 3d 33 20 84 |B%-1:.8:|. B%=3 .|
|00002b00| 20 42 25 3d 36 20 42 25 | 3d 42 25 2d 31 3a ef 38 | B%=6 B%|=B%-1:.8|
|00002b10| 0d 09 4c 4a e7 20 28 41 | 25 3d 33 32 20 84 20 41 |..LJ. (A|%=32 . A|
|00002b20| 25 3d 31 33 35 20 84 20 | 41 25 3d 31 33 37 29 20 |%=135 . |A%=137) |
|00002b30| 80 20 42 25 3c 39 20 ef | 39 3a 42 25 3d 42 25 2b |. B%<9 .|9:B%=B%+|
|00002b40| 31 3a e7 20 42 25 3d 33 | 20 84 20 42 25 3d 36 20 |1:. B%=3| . B%=6 |
|00002b50| 42 25 3d 42 25 2b 31 3a | ef 39 0d 09 56 12 fd 41 |B%=B%+1:|.9..V..A|
|00002b60| 25 3d 31 33 20 84 20 41 | 25 3d 32 37 0d 09 5b 0a |%=13 . A|%=27..[.|
|00002b70| ef 31 33 2c 31 30 0d 09 | 60 32 3d bb 28 c1 41 24 |.13,10..|`2=.(.A$|
|00002b80| 2c 31 2c 32 29 29 2b 31 | 30 30 2a bb 28 c1 41 24 |,1,2))+1|00*.(.A$|
|00002b90| 2c 34 2c 32 29 29 2b 31 | 30 30 30 30 2a bb 28 c1 |,4,2))+1|0000*.(.|
|00002ba0| 41 24 2c 37 2c 32 29 29 | 0d 09 6a 18 dd a4 4f 76 |A$,7,2))|..j...Ov|
|00002bb0| 65 72 74 79 70 65 28 41 | 24 2c 42 25 2c 43 24 29 |ertype(A|$,B%,C$)|
|00002bc0| 0d 09 74 1f 3d c0 41 24 | 2c 42 25 2d 31 29 2b 43 |..t.=.A$|,B%-1)+C|
|00002bd0| 24 2b c1 41 24 2c 42 25 | 2b a9 28 43 24 29 29 0d |$+.A$,B%|+.(C$)).|
|00002be0| 09 75 16 dd a4 49 6e 73 | 65 72 74 28 41 24 2c 42 |.u...Ins|ert(A$,B|
|00002bf0| 25 2c 43 24 29 0d 09 76 | 19 3d c0 41 24 2c 42 25 |%,C$)..v|.=.A$,B%|
|00002c00| 2d 31 29 2b 43 24 2b c1 | 41 24 2c 42 25 29 0d 09 |-1)+C$+.|A$,B%)..|
|00002c10| 7e 12 dd a4 47 65 74 53 | 74 72 69 6e 67 28 6e 29 |~...GetS|tring(n)|
|00002c20| 0d 09 88 11 ea 20 53 24 | 2c 41 25 2c 42 25 2c 50 |..... S$|,A%,B%,P|
|00002c30| 25 0d 09 92 15 53 24 3d | 22 22 3a 42 25 3d 30 3a |%....S$=|"":B%=0:|
|00002c40| 50 25 3d 31 3a f5 0d 09 | 9c 08 41 25 3d a5 0d 09 |P%=1:...|..A%=...|
|00002c50| a6 7a e7 20 41 25 3e 33 | 31 20 80 20 41 25 3c 31 |.z. A%>3|1 . A%<1|
|00002c60| 32 37 20 80 20 42 25 3c | 6e 20 53 24 3d a4 49 6e |27 . B%<|n S$=.In|
|00002c70| 73 65 72 74 28 53 24 2c | 50 25 2c bd 28 41 25 29 |sert(S$,|P%,.(A%)|
|00002c80| 29 3a ef 41 25 3a 41 25 | 3d b1 2b 31 30 30 2a bc |):.A%:A%|=.+100*.|
|00002c90| 3a f1 c1 53 24 2c 50 25 | 2b 31 29 2b 22 20 22 3a |:..S$,P%|+1)+" ":|
|00002ca0| f1 8a 41 25 20 83 20 31 | 30 30 2c 41 25 20 81 20 |..A% . 1|00,A% . |
|00002cb0| 31 30 30 29 3b 22 22 3b | 3a 42 25 3d 42 25 2b 31 |100);"";|:B%=B%+1|
|00002cc0| 3a 50 25 3d 50 25 2b 31 | 0d 09 b0 20 e7 20 41 25 |:P%=P%+1|... . A%|
|00002cd0| 3d 31 33 37 20 80 20 50 | 25 3c 3d 42 25 20 ef 39 |=137 . P|%<=B% .9|
|00002ce0| 3a 50 25 3d 50 25 2b 31 | 0d 09 ba 1e e7 20 41 25 |:P%=P%+1|..... A%|
|00002cf0| 3d 31 33 36 20 80 20 50 | 25 3e 31 20 ef 38 3a 50 |=136 . P|%>1 .8:P|
|00002d00| 25 3d 50 25 2d 31 0d 09 | c4 60 e7 20 41 25 3d 31 |%=P%-1..|.`. A%=1|
|00002d10| 33 35 20 80 20 50 25 3c | 3d 42 25 20 53 24 3d a4 |35 . P%<|=B% S$=.|
|00002d20| 44 65 6c 65 74 65 28 53 | 24 2c 50 25 29 3a 41 25 |Delete(S|$,P%):A%|
|00002d30| 3d b1 2b 31 30 30 2a bc | 3a f1 c1 53 24 2c 50 25 |=.+100*.|:..S$,P%|
|00002d40| 29 2b 22 20 22 3a f1 8a | 41 25 20 83 20 31 30 30 |)+" ":..|A% . 100|
|00002d50| 2c 41 25 20 81 20 31 30 | 30 29 3b 22 22 3b 3a 42 |,A% . 10|0);"";:B|
|00002d60| 25 3d 42 25 2d 31 0d 09 | ce 69 e7 20 41 25 3d 31 |%=B%-1..|.i. A%=1|
|00002d70| 32 37 20 80 20 50 25 3e | 31 20 50 25 3d 50 25 2d |27 . P%>|1 P%=P%-|
|00002d80| 31 3a 53 24 3d a4 44 65 | 6c 65 74 65 28 53 24 2c |1:S$=.De|lete(S$,|
|00002d90| 50 25 29 3a ef 38 3a 41 | 25 3d b1 2b 31 30 30 2a |P%):.8:A|%=.+100*|
|00002da0| bc 3a f1 c1 53 24 2c 50 | 25 29 2b 22 20 22 3a f1 |.:..S$,P|%)+" ":.|
|00002db0| 8a 41 25 20 83 20 31 30 | 30 2c 41 25 20 81 20 31 |.A% . 10|0,A% . 1|
|00002dc0| 30 30 29 3b 22 22 3b 3a | 42 25 3d 42 25 2d 31 0d |00);"";:|B%=B%-1.|
|00002dd0| 09 d8 12 fd 41 25 3d 31 | 33 20 84 20 41 25 3d 32 |....A%=1|3 . A%=2|
|00002de0| 37 0d 09 dd 0a ef 31 33 | 2c 31 30 0d 09 e2 07 3d |7.....13|,10....=|
|00002df0| 53 24 0d 09 ec 13 dd a4 | 44 65 6c 65 74 65 28 41 |S$......|Delete(A|
|00002e00| 24 2c 42 25 29 0d 09 f6 | 18 3d c0 41 24 2c 42 25 |$,B%)...|.=.A$,B%|
|00002e10| 2d 31 29 2b c1 41 24 2c | 42 25 2b 31 29 0d 0a 28 |-1)+.A$,|B%+1)..(|
|00002e20| 0d dd a4 47 65 74 54 79 | 70 65 0d 0a 32 14 ea 20 |...GetTy|pe..2.. |
|00002e30| 41 24 2c 41 25 2c 42 24 | 2c 58 25 2c 59 25 0d 0a |A$,A%,B$|,X%,Y%..|
|00002e40| 33 0d 58 25 3d b1 3a 59 | 25 3d bc 0d 0a 3c 14 41 |3.X%=.:Y|%=...<.A|
|00002e50| 24 3d a4 47 65 74 53 74 | 72 69 6e 67 28 36 29 0d |$=.GetSt|ring(6).|
|00002e60| 0a 46 22 e7 20 c0 41 24 | 2c 31 29 3c 3e 22 30 22 |.F". .A$|,1)<>"0"|
|00002e70| 20 80 20 bb 28 41 24 29 | 3d 30 20 e5 20 8d 44 5a | . .(A$)|=0 . .DZ|
|00002e80| 4a 0d 0a 50 0a 3d bb 28 | 41 24 29 0d 0a 5a 11 f7 |J..P.=.(|A$)..Z..|
|00002e90| 20 8d 74 4c 4a 3a 41 25 | 3d 30 3a f5 0d 0a 64 10 | .tLJ:A%|=0:...d.|
|00002ea0| f3 20 42 24 3a 41 25 3d | 41 25 2d 31 0d 0a 6e 18 |. B$:A%=|A%-1..n.|
|00002eb0| fd 20 41 24 3d 42 24 20 | 84 20 42 24 3d 22 5f 45 |. A$=B$ |. B$="_E|
|00002ec0| 4e 44 5f 22 0d 0a 78 1a | e7 20 42 24 3c 3e 22 5f |ND_"..x.|. B$<>"_|
|00002ed0| 45 4e 44 5f 22 20 3d 41 | 25 20 8b 20 ef 37 0d 0a |END_" =A|% . .7..|
|00002ee0| 79 14 ef 39 3a f7 20 8d | 74 4c 4a 3a f5 3a f3 20 |y..9:. .|tLJ:.:. |
|00002ef0| 42 24 0d 0a 7a 1b e7 20 | 42 24 3c 3e 22 5f 45 4e |B$..z.. |B$<>"_EN|
|00002f00| 44 5f 22 20 f1 42 24 3b | 22 20 20 22 3b 0d 0a 7b |D_" .B$;|" ";..{|
|00002f10| 30 fd 20 42 24 3d 22 5f | 45 4e 44 5f 22 3a f1 8a |0. B$="_|END_":..|
|00002f20| 58 25 2c 59 25 29 3b 22 | 20 20 20 20 20 20 22 3b |X%,Y%);"| ";|
|00002f30| 3a ef 38 2c 38 2c 38 2c | 38 2c 38 2c 38 0d 0a 7c |:.8,8,8,|8,8,8..||
|00002f40| 0f 41 25 3d a4 47 65 74 | 54 79 70 65 0d 0a 7d 14 |.A%=.Get|Type..}.|
|00002f50| ef 39 3a f7 20 8d 74 4c | 4a 3a f5 3a f3 20 42 24 |.9:. .tL|J:.:. B$|
|00002f60| 0d 0a 7e 1b e7 20 42 24 | 3c 3e 22 5f 45 4e 44 5f |..~.. B$|<>"_END_|
|00002f70| 22 20 f1 22 20 20 20 20 | 20 22 3b 0d 0a 7f 0f fd |" ." | ";.....|
|00002f80| 42 24 3d 22 5f 45 4e 44 | 5f 22 0d 0a 82 0f f1 8a |B$="_END|_"......|
|00002f90| 58 25 2c 59 25 29 3b 22 | 22 0d 0a 83 07 3d 41 25 |X%,Y%);"|"....=A%|
|00002fa0| 0d 0a 8c 29 dc 20 22 53 | 54 4f 22 2c 22 44 44 42 |...). "S|TO","DDB|
|00002fb0| 22 2c 22 42 43 43 22 2c | 22 41 54 4d 22 2c 22 49 |","BCC",|"ATM","I|
|00002fc0| 4e 54 22 2c 22 52 45 4d | 22 0d 0a 96 0d dc 20 22 |NT","REM|"..... "|
|00002fd0| 5f 45 4e 44 5f 22 0d 0a | a0 0c dd a4 47 65 74 41 |_END_"..|....GetA|
|00002fe0| 63 63 0d 0a aa 14 ea 20 | 41 24 2c 41 25 2c 58 25 |cc..... |A$,A%,X%|
|00002ff0| 2c 59 25 2c 42 25 0d 0a | af 0d 58 25 3d b1 3a 59 |,Y%,B%..|..X%=.:Y|
|00003000| 25 3d bc 0d 0a b4 14 41 | 24 3d a4 47 65 74 53 74 |%=.....A|$=.GetSt|
|00003010| 72 69 6e 67 28 33 29 0d | 0a be 2e 41 25 3d 30 3a |ring(3).|...A%=0:|
|00003020| f5 3a 41 25 3d 41 25 2b | 31 3a fd 41 24 3d 41 63 |.:A%=A%+|1:.A$=Ac|
|00003030| 63 24 28 41 25 2c 31 29 | 20 84 20 41 25 3d 6e 75 |c$(A%,1)| . A%=nu|
|00003040| 6d 61 63 63 25 0d 0a c8 | 1e e7 20 41 24 3d 41 63 |macc%...|.. A$=Ac|
|00003050| 63 24 28 41 25 2c 31 29 | 20 3d 41 25 20 8b 20 ef |c$(A%,1)| =A% . .|
|00003060| 37 2c 39 0d 0a d2 30 41 | 25 3d 30 3a f5 3a 41 25 |7,9...0A|%=0:.:A%|
|00003070| 3d 41 25 2b 31 3a f1 41 | 63 63 24 28 41 25 2c 31 |=A%+1:.A|cc$(A%,1|
|00003080| 29 3b 22 20 20 22 3b 3a | fd 41 25 3d 6e 75 6d 61 |);" ";:|.A%=numa|
|00003090| 63 63 25 0d 0a dc 1a f1 | 8a 58 25 2c 59 25 29 3b |cc%.....|.X%,Y%);|
|000030a0| 22 20 20 20 22 3b 3a ef | 38 2c 38 2c 38 0d 0a e6 |" ";:.|8,8,8...|
|000030b0| 0e 42 25 3d a4 47 65 74 | 41 63 63 0d 0a f0 28 41 |.B%=.Get|Acc...(A|
|000030c0| 25 3d 30 3a f5 3a 41 25 | 3d 41 25 2b 31 3a f1 22 |%=0:.:A%|=A%+1:."|
|000030d0| 20 20 20 20 20 22 3b 3a | fd 41 25 3d 6e 75 6d 61 | ";:|.A%=numa|
|000030e0| 63 63 25 0d 0a fa 0f f1 | 8a 58 25 2c 59 25 29 3b |cc%.....|.X%,Y%);|
|000030f0| 22 22 0d 0b 04 07 3d 42 | 25 0d 0b 0e 0b dd a4 47 |""....=B|%......G|
|00003100| 65 74 41 6d 0d 0b 18 14 | ea 20 41 24 2c 41 25 2c |etAm....|. A$,A%,|
|00003110| 58 25 2c 59 25 2c 42 25 | 0d 0b 1d 0d 58 25 3d b1 |X%,Y%,B%|....X%=.|
|00003120| 3a 59 25 3d bc 0d 0b 22 | 15 41 24 3d a4 47 65 74 |:Y%=..."|.A$=.Get|
|00003130| 53 74 72 69 6e 67 28 32 | 30 29 0d 0b 2c 18 e7 20 |String(2|0)..,.. |
|00003140| a7 22 30 30 2e 30 30 22 | 2c 41 24 29 3c 3e 30 20 |."00.00"|,A$)<>0 |
|00003150| 3d 30 0d 0b 37 3e e3 20 | 42 25 3d 31 20 b8 20 a9 |=0..7>. |B%=1 . .|
|00003160| 28 41 24 29 3a e7 20 a7 | 22 2e 2a 2b 2d 2f 20 28 |(A$):. .|".*+-/ (|
|00003170| 29 30 31 32 33 34 35 36 | 37 38 39 22 2c c1 41 24 |)0123456|789",.A$|
|00003180| 2c 42 25 2c 31 29 29 3d | 30 20 41 24 3d 22 58 22 |,B%,1))=|0 A$="X"|
|00003190| 0d 0b 38 05 ed 0d 0b 39 | 1e e7 20 41 24 3c 3e 22 |..8....9|.. A$<>"|
|000031a0| 58 22 20 3d a4 69 6e 74 | 28 a0 28 41 24 29 2a 31 |X" =.int|(.(A$)*1|
|000031b0| 30 30 29 0d 0b 40 2b ef | 37 3a f1 8a 58 25 2c 59 |00)..@+.|7:..X%,Y|
|000031c0| 25 29 3b c4 32 30 2c 22 | 20 22 29 3b 8a 58 25 2c |%);.20,"| ");.X%,|
|000031d0| 59 25 29 3b 22 22 3b 3a | e5 20 8d 54 62 4b 0d 0b |Y%);"";:|. .TbK..|
|000031e0| 4a 0f dd a4 44 69 73 41 | 6d 28 41 25 29 0d 0b 4b |J...DisA|m(A%)..K|
|000031f0| 08 ea 20 41 24 0d 0b 54 | 0f 41 24 3d c3 28 94 28 |.. A$..T|.A$=.(.(|
|00003200| 41 25 29 29 0d 0b 55 18 | e7 20 a9 28 41 24 29 3d |A%))..U.|. .(A$)=|
|00003210| 31 20 41 24 3d 22 30 30 | 22 2b 41 24 0d 0b 56 17 |1 A$="00|"+A$..V.|
|00003220| e7 20 a9 28 41 24 29 3d | 32 20 41 24 3d 22 30 22 |. .(A$)=|2 A$="0"|
|00003230| 2b 41 24 0d 0b 57 23 e7 | 20 41 25 3e 3d 30 20 41 |+A$..W#.| A%>=0 A|
|00003240| 24 3d 22 86 2b 22 2b 41 | 24 20 8b 20 41 24 3d 22 |$=".+"+A|$ . A$="|
|00003250| 81 2d 22 2b 41 24 0d 0b | 5e 1c 3d c0 41 24 2c a9 |.-"+A$..|^.=.A$,.|
|00003260| 28 41 24 29 2d 32 29 2b | 22 2e 22 2b c2 41 24 2c |(A$)-2)+|"."+.A$,|
|00003270| 32 29 0d 0b 68 0c dd a4 | 69 6e 74 28 41 29 0d 0b |2)..h...|int(A)..|
|00003280| 72 0d 3d a8 28 41 2b 30 | 2e 31 29 0d 0b 7c 11 dd |r.=.(A+0|.1)..|..|
|00003290| a4 44 69 73 44 61 74 65 | 28 44 25 29 0d 0b 81 0b |.DisDate|(D%)....|
|000032a0| ea 20 41 25 2c 41 24 0d | 0b 86 15 41 25 3d 44 25 |. A%,A$.|...A%=D%|
|000032b0| 20 81 20 31 30 30 3a 41 | 24 3d 22 22 0d 0b 88 3b | . 100:A|$=""...;|
|000032c0| e7 20 44 25 20 83 20 31 | 30 30 3c 31 30 20 41 24 |. D% . 1|00<10 A$|
|000032d0| 3d 41 24 2b 22 30 22 2b | c3 28 44 25 20 83 20 31 |=A$+"0"+|.(D% . 1|
|000032e0| 30 30 29 20 8b 20 41 24 | 3d 41 24 2b c3 28 44 25 |00) . A$|=A$+.(D%|
|000032f0| 20 83 20 31 30 30 29 0d | 0b 8a 0d 41 24 3d 41 24 | . 100).|...A$=A$|
|00003300| 2b 22 2f 22 0d 0b 8c 3b | e7 20 41 25 20 83 20 31 |+"/"...;|. A% . 1|
|00003310| 30 30 3c 31 30 20 41 24 | 3d 41 24 2b 22 30 22 2b |00<10 A$|=A$+"0"+|
|00003320| c3 28 41 25 20 83 20 31 | 30 30 29 20 8b 20 41 24 |.(A% . 1|00) . A$|
|00003330| 3d 41 24 2b c3 28 41 25 | 20 83 20 31 30 30 29 0d |=A$+.(A%| . 100).|
|00003340| 0b 8e 0d 41 24 3d 41 24 | 2b 22 2f 22 0d 0b 90 3b |...A$=A$|+"/"...;|
|00003350| e7 20 41 25 20 81 20 31 | 30 30 3c 31 30 20 41 24 |. A% . 1|00<10 A$|
|00003360| 3d 41 24 2b 22 30 22 2b | c3 28 41 25 20 81 20 31 |=A$+"0"+|.(A% . 1|
|00003370| 30 30 29 20 8b 20 41 24 | 3d 41 24 2b c3 28 41 25 |00) . A$|=A$+.(A%|
|00003380| 20 81 20 31 30 30 29 0d | 0b 9a 07 3d 41 24 0d 0b | . 100).|...=A$..|
|00003390| b8 0f dd f2 44 69 73 70 | 45 6e 74 72 79 0d 0b c2 |....Disp|Entry...|
|000033a0| 0b ea 20 41 25 2c 54 25 | 0d 0b cc 3c f1 27 22 82 |.. A%,T%|...<.'".|
|000033b0| 44 61 74 65 20 3a 87 22 | 3b 3a e7 20 44 61 74 65 |Date :."|;:. Date|
|000033c0| 25 3c 30 20 f1 22 88 44 | 65 6c 65 74 65 64 20 21 |%<0 .".D|eleted !|
|000033d0| 22 20 8b 20 f1 a4 44 69 | 73 44 61 74 65 28 44 61 |" . ..Di|sDate(Da|
|000033e0| 74 65 25 29 0d 0b d6 1a | f1 22 82 44 65 74 61 69 |te%)....|.".Detai|
|000033f0| 6c 73 20 3a 87 22 3b 44 | 65 74 61 69 6c 24 0d 0b |ls :.";D|etail$..|
|00003400| e0 26 f1 22 82 54 79 70 | 65 2f 43 68 71 2e 4e 6f |.&.".Typ|e/Chq.No|
|00003410| 2e 20 3a 87 22 3b a4 44 | 69 73 54 79 70 65 28 43 |. :.";.D|isType(C|
|00003420| 68 71 25 29 0d 0b ea 2d | 4c 25 3d 30 3a e3 20 41 |hq%)...-|L%=0:. A|
|00003430| 25 3d 31 20 b8 20 45 6e | 74 72 69 65 73 25 3a 4c |%=1 . En|tries%:L|
|00003440| 25 3d 4c 25 2b 45 6e 74 | 25 28 41 25 2c 31 29 3a |%=L%+Ent|%(A%,1):|
|00003450| ed 0d 0b f4 1b f1 22 82 | 54 6f 74 61 6c 20 3a 87 |......".|Total :.|
|00003460| 22 3b a4 44 69 73 41 6d | 28 4c 25 29 0d 0b fe 05 |";.DisAm|(L%)....|
|00003470| e1 0d 0c 08 11 dd a4 44 | 69 73 54 79 70 65 28 4e |.......D|isType(N|
|00003480| 25 29 0d 0c 12 0b ea 20 | 41 25 2c 41 24 0d 0c 1c |%)..... |A%,A$...|
|00003490| 1f e7 20 4e 25 3e 3d 30 | 20 3d c2 22 30 30 30 30 |.. N%>=0| =."0000|
|000034a0| 30 30 22 2b c3 28 4e 25 | 29 2c 36 29 0d 0c 26 0f |00"+.(N%|),6)..&.|
|000034b0| f7 20 8d 74 4c 4a 3a 41 | 25 3d 30 0d 0c 30 0d f5 |. .tLJ:A|%=0..0..|
|000034c0| 3a 41 25 3d 41 25 2d 31 | 0d 0c 3a 08 f3 20 41 24 |:A%=A%-1|..:.. A$|
|000034d0| 0d 0c 44 18 fd 20 41 25 | 3d 4e 25 20 84 20 41 24 |..D.. A%|=N% . A$|
|000034e0| 3d 22 5f 45 4e 44 5f 22 | 0d 0c 4e 1d e7 20 41 24 |="_END_"|..N.. A$|
|000034f0| 3d 22 5f 45 4e 44 5f 22 | 20 3d 22 58 58 58 22 20 |="_END_"| ="XXX" |
|00003500| 8b 20 3d 41 24 0d ff 46 | 69 6c 65 44 61 74 61 82 |. =A$..F|ileData.|
|00003510| 46 6f 72 77 61 72 64 00 | 00 00 00 45 11 00 00 42 |Forward.|...E...B|
|00003520| fb ff ff 6a 19 7d 10 03 | 00 e5 31 0d 00 0a 20 f4 |...j.}..|..1... .|
|00003530| 20 41 63 63 6f 75 6e 74 | 73 20 49 49 2d 20 42 72 | Account|s II- Br|
|00003540| 69 6e 67 20 46 6f 72 77 | 61 72 64 0d 00 14 18 f4 |ing Forw|ard.....|
|00003550| 20 28 43 29 20 31 39 38 | 39 20 41 2e 20 48 75 72 | (C) 198|9 A. Hur|
|00003560| 6c 65 79 0d 00 1e 1a f4 | 20 42 65 74 65 6c 67 65 |ley.....| Betelge|
|00003570| 75 73 65 20 43 6f 6d 70 | 75 74 69 6e 67 0d 00 28 |use Comp|uting..(|
|00003580| 11 de 20 49 6e 74 53 70 | 61 63 65 25 20 34 0d 00 |.. IntSp|ace% 4..|
|00003590| 32 11 de 20 45 6e 74 25 | 28 32 35 36 2c 31 29 0d |2.. Ent%|(256,1).|
|000035a0| 00 37 11 de 20 41 63 63 | 24 28 32 35 36 2c 31 29 |.7.. Acc|$(256,1)|
|000035b0| 0d 00 38 0f de 20 42 61 | 6c 25 28 32 35 36 29 0d |..8.. Ba|l%(256).|
|000035c0| 00 39 1d e3 20 41 25 3d | 30 20 b8 20 32 35 36 3a |.9.. A%=|0 . 256:|
|000035d0| 42 61 6c 25 28 41 25 29 | 3d 30 3a ed 0d 00 3c 10 |Bal%(A%)|=0:...<.|
|000035e0| 44 61 74 65 25 3d 38 39 | 30 33 32 31 0d 00 46 21 |Date%=89|0321..F!|
|000035f0| 44 65 74 61 69 6c 24 3d | 22 4e 6f 20 44 65 74 61 |Detail$=|"No Deta|
|00003600| 69 6c 73 20 44 65 66 69 | 6e 65 64 21 22 0d 00 50 |ils Defi|ned!"..P|
|00003610| 0e 45 6e 74 72 69 65 73 | 25 3d 31 0d 00 5a 0a 43 |.Entries|%=1..Z.C|
|00003620| 68 71 25 3d 30 0d 00 64 | 06 eb 37 0d 00 69 0c 2a |hq%=0..d|..7..i.*|
|00003630| 46 58 32 32 30 2c 34 0d | 00 6a 0a 2a 46 58 34 2c |FX220,4.|.j.*FX4,|
|00003640| 31 0d 00 6e 28 f1 bd 31 | 35 37 3b bd 31 34 31 3b |1..n(..1|57;.141;|
|00003650| 22 81 20 20 20 20 20 20 | 20 20 20 20 20 41 63 63 |". | Acc|
|00003660| 6f 75 6e 74 73 20 49 49 | 22 0d 00 78 28 f1 bd 31 |ounts II|"..x(..1|
|00003670| 35 37 3b bd 31 34 31 3b | 22 81 20 20 20 20 20 20 |57;.141;|". |
|00003680| 20 20 20 20 20 41 63 63 | 6f 75 6e 74 73 20 49 49 | Acc|ounts II|
|00003690| 22 0d 00 82 2e f1 bd 31 | 35 37 3b 22 86 20 20 20 |"......1|57;". |
|000036a0| 28 43 29 20 31 39 38 39 | 20 20 42 65 74 65 6c 67 |(C) 1989| Betelg|
|000036b0| 65 75 73 65 20 43 6f 6d | 70 75 74 69 6e 67 22 0d |euse Com|puting".|
|000036c0| 00 87 05 f1 0d 00 8c 24 | f1 bd 31 34 31 3b 22 85 |.......$|..141;".|
|000036d0| 20 20 20 20 20 20 20 20 | 20 20 42 72 69 6e 67 20 | | Bring |
|000036e0| 46 6f 72 77 61 72 64 22 | 0d 00 96 24 f1 bd 31 34 |Forward"|...$..14|
|000036f0| 31 3b 22 85 20 20 20 20 | 20 20 20 20 20 20 42 72 |1;". | Br|
|00003700| 69 6e 67 20 46 6f 72 77 | 61 72 64 22 0d 00 a0 11 |ing Forw|ard"....|
|00003710| ef 32 38 2c 30 2c 32 34 | 2c 33 39 2c 36 0d 00 be |.28,0,24|,39,6...|
|00003720| 0a f2 53 65 74 55 70 0d | 00 c8 2c f1 27 22 82 55 |..SetUp.|..,.'".U|
|00003730| 70 64 61 74 65 20 74 6f | 20 77 68 61 74 20 64 61 |pdate to| what da|
|00003740| 74 65 20 3f 87 22 3b 3a | 44 25 3d a4 47 65 74 44 |te ?.";:|D%=.GetD|
|00003750| 61 74 65 0d 00 d2 23 f1 | 27 22 83 41 72 65 20 79 |ate...#.|'".Are y|
|00003760| 6f 75 20 73 75 72 65 20 | 3f 20 28 59 2f 4e 29 22 |ou sure |? (Y/N)"|
|00003770| 3b 3a 41 25 3d a5 0d 00 | d7 05 f1 0d 00 dc 38 e7 |;:A%=...|......8.|
|00003780| 20 41 25 3c 3e 97 28 22 | 59 22 29 20 80 20 41 25 | A%<>.("|Y") . A%|
|00003790| 3c 3e 97 28 22 79 22 29 | 20 f1 27 22 81 51 75 69 |<>.("y")| .'".Qui|
|000037a0| 74 20 75 70 64 61 74 65 | 22 3a d7 22 41 2e 4d 65 |t update|":."A.Me|
|000037b0| 6e 75 22 0d 00 e6 15 46 | 25 3d ad 28 22 44 2e 41 |nu"....F|%=.("D.A|
|000037c0| 63 63 6f 75 6e 74 22 29 | 0d 00 f0 05 f5 0d 00 fa |ccount")|........|
|000037d0| 16 50 25 3d 8f 23 46 25 | 3a f2 52 65 61 64 45 6e |.P%=.#F%|:.ReadEn|
|000037e0| 74 72 79 0d 00 fc 1b e7 | 20 44 61 74 65 25 3c 30 |try.....| Date%<0|
|000037f0| 20 80 20 c5 23 46 25 20 | e5 20 8d 54 4e 41 0d 00 | . .#F% |. .TNA..|
|00003800| ff 14 e7 20 44 61 74 65 | 25 3c 30 20 e5 20 8d 64 |... Date|%<0 . .d|
|00003810| 7a 40 0d 01 04 21 e7 20 | 44 61 74 65 25 3c 3d 44 |z@...!. |Date%<=D|
|00003820| 25 20 8c 20 cf 23 46 25 | 3d 50 25 3a f2 55 70 64 |% . .#F%|=P%:.Upd|
|00003830| 61 74 65 0d 01 0e 0a fd | 20 c5 23 46 25 0d 01 18 |ate.....| .#F%...|
|00003840| 08 d9 23 46 25 0d 01 22 | 0e f2 4f 70 65 6e 54 6f |..#F%.."|..OpenTo|
|00003850| 45 6e 64 0d 01 2c 34 e3 | 20 41 25 3d 30 20 b8 20 |End..,4.| A%=0 . |
|00003860| 32 35 36 3a 45 6e 74 25 | 28 41 25 2c 30 29 3d 41 |256:Ent%|(A%,0)=A|
|00003870| 25 3a 45 6e 74 25 28 41 | 25 2c 31 29 3d 42 61 6c |%:Ent%(A|%,1)=Bal|
|00003880| 25 28 41 25 29 3a ed 0d | 01 36 0c 44 61 74 65 25 |%(A%):..|.6.Date%|
|00003890| 3d 44 25 0d 01 3b 0b 43 | 68 71 25 3d 2d 35 0d 01 |=D%..;.C|hq%=-5..|
|000038a0| 40 1d 44 65 74 61 69 6c | 24 3d 22 42 72 6f 75 67 |@.Detail|$="Broug|
|000038b0| 68 74 20 46 6f 72 77 61 | 72 64 22 0d 01 4a 14 45 |ht Forwa|rd"..J.E|
|000038c0| 6e 74 72 69 65 73 25 3d | 6e 75 6d 61 63 63 25 0d |ntries%=|numacc%.|
|000038d0| 01 54 0f f2 57 72 69 74 | 65 45 6e 74 72 79 0d 01 |.T..Writ|eEntry..|
|000038e0| 5e 08 d9 23 46 25 0d 01 | 63 20 f1 27 22 82 54 6f |^..#F%..|c .'".To|
|000038f0| 20 63 6f 6d 70 6c 65 74 | 65 20 2c 20 64 6f 20 61 | complet|e , do a|
|00003900| 86 53 4f 52 54 22 0d 01 | 68 0d d7 22 41 2e 4d 65 |.SORT"..|h.."A.Me|
|00003910| 6e 75 22 0d 01 90 0c dd | f2 55 70 64 61 74 65 0d |nu".....|.Update.|
|00003920| 01 9a 08 ea 20 41 25 0d | 01 a4 15 e3 20 41 25 3d |.... A%.|.... A%=|
|00003930| 31 20 b8 20 45 6e 74 72 | 69 65 73 25 0d 01 ae 30 |1 . Entr|ies%...0|
|00003940| 42 61 6c 25 28 45 6e 74 | 25 28 41 25 2c 30 29 29 |Bal%(Ent|%(A%,0))|
|00003950| 3d 42 61 6c 25 28 45 6e | 74 25 28 41 25 2c 30 29 |=Bal%(En|t%(A%,0)|
|00003960| 29 2b 45 6e 74 25 28 41 | 25 2c 31 29 0d 01 b8 05 |)+Ent%(A|%,1)....|
|00003970| ed 0d 01 c2 1c 44 61 74 | 65 25 3d 2d 44 61 74 65 |.....Dat|e%=-Date|
|00003980| 25 3a f2 57 72 69 74 65 | 45 6e 74 72 79 0d 01 cc |%:.Write|Entry...|
|00003990| 05 e1 0d 03 e7 05 e0 0d | 03 e8 10 dd f2 57 72 69 |........|.....Wri|
|000039a0| 74 65 45 6e 74 72 79 0d | 03 ed 08 ea 20 4c 25 0d |teEntry.|.... L%.|
|000039b0| 03 fc 12 f2 49 6e 74 4f | 75 74 28 44 61 74 65 25 |....IntO|ut(Date%|
|000039c0| 29 0d 04 06 1a f2 53 74 | 72 69 6e 67 4f 75 74 28 |).....St|ringOut(|
|000039d0| 44 65 74 61 69 6c 24 2c | 32 30 29 0d 04 10 11 f2 |Detail$,|20).....|
|000039e0| 49 6e 74 4f 75 74 28 43 | 68 71 25 29 0d 04 1a 17 |IntOut(C|hq%)....|
|000039f0| f2 53 68 6f 72 74 4f 75 | 74 28 45 6e 74 72 69 65 |.ShortOu|t(Entrie|
|00003a00| 73 25 29 0d 04 24 15 e3 | 20 4c 25 3d 31 20 b8 20 |s%)..$..| L%=1 . |
|00003a10| 45 6e 74 72 69 65 73 25 | 0d 04 2e 19 f2 53 68 6f |Entries%|.....Sho|
|00003a20| 72 74 4f 75 74 28 45 6e | 74 25 28 4c 25 2c 30 29 |rtOut(En|t%(L%,0)|
|00003a30| 29 0d 04 38 17 f2 49 6e | 74 4f 75 74 28 45 6e 74 |)..8..In|tOut(Ent|
|00003a40| 25 28 4c 25 2c 31 29 29 | 0d 04 42 05 ed 0d 04 56 |%(L%,1))|..B....V|
|00003a50| 05 e1 0d 04 b0 12 dd f2 | 53 68 6f 72 74 4f 75 74 |........|ShortOut|
|00003a60| 28 41 25 29 0d 04 ba 13 | d5 23 46 25 2c 28 41 25 |(A%)....|.#F%,(A%|
|00003a70| 20 80 20 32 35 35 29 0d | 04 c4 05 e1 0d 05 14 16 | . 255).|........|
|00003a80| dd f2 53 74 72 69 6e 67 | 4f 75 74 28 41 24 2c 42 |..String|Out(A$,B|
|00003a90| 25 29 0d 05 1e 08 ea 20 | 41 25 0d 05 28 0f e3 20 |%)..... |A%..(.. |
|00003aa0| 41 25 3d 31 20 b8 20 42 | 25 0d 05 32 2b e7 20 41 |A%=1 . B|%..2+. A|
|00003ab0| 25 3c 3d a9 28 41 24 29 | 20 d5 23 46 25 2c 97 28 |%<=.(A$)| .#F%,.(|
|00003ac0| c1 41 24 2c 41 25 2c 31 | 29 29 20 8b 20 d5 23 46 |.A$,A%,1|)) . .#F|
|00003ad0| 25 2c 33 32 0d 05 3c 05 | ed 0d 05 46 05 e1 0d 05 |%,32..<.|...F....|
|00003ae0| 78 10 dd f2 49 6e 74 4f | 75 74 28 41 25 29 0d 05 |x...IntO|ut(A%)..|
|00003af0| 7d 11 21 49 6e 74 53 70 | 61 63 65 25 3d 41 25 0d |}.!IntSp|ace%=A%.|
|00003b00| 05 82 13 d5 23 46 25 2c | 3f 49 6e 74 53 70 61 63 |....#F%,|?IntSpac|
|00003b10| 65 25 0d 05 8c 14 d5 23 | 46 25 2c 49 6e 74 53 70 |e%.....#|F%,IntSp|
|00003b20| 61 63 65 25 3f 31 0d 05 | 96 14 d5 23 46 25 2c 49 |ace%?1..|...#F%,I|
|00003b30| 6e 74 53 70 61 63 65 25 | 3f 32 0d 05 a0 14 d5 23 |ntSpace%|?2.....#|
|00003b40| 46 25 2c 49 6e 74 53 70 | 61 63 65 25 3f 33 0d 05 |F%,IntSp|ace%?3..|
|00003b50| aa 05 e1 0d 05 dc 0b dd | a4 49 6e 74 49 6e 0d 05 |........|.IntIn..|
|00003b60| e6 13 3f 49 6e 74 53 70 | 61 63 65 25 3d 9a 23 46 |..?IntSp|ace%=.#F|
|00003b70| 25 0d 05 f0 14 49 6e 74 | 53 70 61 63 65 25 3f 31 |%....Int|Space%?1|
|00003b80| 3d 9a 23 46 25 0d 05 fa | 14 49 6e 74 53 70 61 63 |=.#F%...|.IntSpac|
|00003b90| 65 25 3f 32 3d 9a 23 46 | 25 0d 06 04 14 49 6e 74 |e%?2=.#F|%....Int|
|00003ba0| 53 70 61 63 65 25 3f 33 | 3d 9a 23 46 25 0d 06 0e |Space%?3|=.#F%...|
|00003bb0| 0f 3d 21 49 6e 74 53 70 | 61 63 65 25 0d 06 40 12 |.=!IntSp|ace%..@.|
|00003bc0| dd a4 53 74 72 69 6e 67 | 49 6e 28 42 25 29 0d 06 |..String|In(B%)..|
|00003bd0| 4a 0b ea 20 41 24 2c 41 | 25 0d 06 54 0f e3 20 41 |J.. A$,A|%..T.. A|
|00003be0| 25 3d 31 20 b8 20 42 25 | 0d 06 5e 11 41 24 3d 41 |%=1 . B%|..^.A$=A|
|00003bf0| 24 2b bd 28 9a 23 46 25 | 29 0d 06 68 05 ed 0d 06 |$+.(.#F%|)..h....|
|00003c00| 72 07 3d 41 24 0d 06 a4 | 0d dd a4 53 68 6f 72 74 |r.=A$...|...Short|
|00003c10| 49 6e 0d 06 ae 09 3d 9a | 23 46 25 0d 07 08 0f dd |In....=.|#F%.....|
|00003c20| f2 52 65 61 64 45 6e 74 | 72 79 0d 07 12 08 ea 20 |.ReadEnt|ry..... |
|00003c30| 4c 25 0d 07 1c 10 44 61 | 74 65 25 3d a4 49 6e 74 |L%....Da|te%=.Int|
|00003c40| 49 6e 0d 07 26 19 44 65 | 74 61 69 6c 24 3d a4 53 |In..&.De|tail$=.S|
|00003c50| 74 72 69 6e 67 49 6e 28 | 32 30 29 0d 07 30 0f 43 |tringIn(|20)..0.C|
|00003c60| 68 71 25 3d a4 49 6e 74 | 49 6e 0d 07 3a 15 45 6e |hq%=.Int|In..:.En|
|00003c70| 74 72 69 65 73 25 3d a4 | 53 68 6f 72 74 49 6e 0d |tries%=.|ShortIn.|
|00003c80| 07 44 15 e3 20 4c 25 3d | 31 20 b8 20 45 6e 74 72 |.D.. L%=|1 . Entr|
|00003c90| 69 65 73 25 0d 07 4e 17 | 45 6e 74 25 28 4c 25 2c |ies%..N.|Ent%(L%,|
|00003ca0| 30 29 3d a4 53 68 6f 72 | 74 49 6e 0d 07 58 15 45 |0)=.Shor|tIn..X.E|
|00003cb0| 6e 74 25 28 4c 25 2c 31 | 29 3d a4 49 6e 74 49 6e |nt%(L%,1|)=.IntIn|
|00003cc0| 0d 07 62 05 ed 0d 07 6c | 05 e1 0d 07 d0 0f dd f2 |..b....l|........|
|00003cd0| 4f 70 65 6e 54 6f 45 6e | 64 0d 07 e4 15 46 25 3d |OpenToEn|d....F%=|
|00003ce0| ad 28 22 44 2e 41 63 63 | 6f 75 6e 74 22 29 0d 07 |.("D.Acc|ount")..|
|00003cf0| ee 0d cf 23 46 25 3d a2 | 23 46 25 0d 07 f8 05 e1 |...#F%=.|#F%.....|
|00003d00| 0d 08 34 0c f2 53 6b 69 | 70 4f 6e 65 0d 08 3e 08 |..4..Ski|pOne..>.|
|00003d10| ea 20 41 25 0d 08 48 10 | cf 23 46 25 3d 8f 23 46 |. A%..H.|.#F%=.#F|
|00003d20| 25 2b 32 38 0d 08 52 0f | 41 25 3d a4 53 68 6f 72 |%+28..R.|A%=.Shor|
|00003d30| 74 49 6e 0d 08 5c 12 cf | 23 46 25 3d 8f 23 46 25 |tIn..\..|#F%=.#F%|
|00003d40| 2b 35 2a 41 25 0d 08 66 | 05 e1 0d 08 98 0b dd f2 |+5*A%..f|........|
|00003d50| 53 65 74 55 70 0d 08 a2 | 08 ea 20 41 25 0d 08 ac |SetUp...|.. A%...|
|00003d60| 15 46 25 3d 8e 28 22 4e | 2e 41 63 63 6f 75 6e 74 |.F%=.("N|.Account|
|00003d70| 22 29 0d 08 b6 14 6e 75 | 6d 61 63 63 25 3d a4 53 |")....nu|macc%=.S|
|00003d80| 68 6f 72 74 49 6e 0d 08 | c0 14 e3 20 41 25 3d 31 |hortIn..|... A%=1|
|00003d90| 20 b8 20 6e 75 6d 61 63 | 63 25 0d 08 ca 1c 41 63 | . numac|c%....Ac|
|00003da0| 63 24 28 41 25 2c 30 29 | 3d a4 53 74 72 69 6e 67 |c$(A%,0)|=.String|
|00003db0| 49 6e 28 32 30 29 0d 08 | d4 1b 41 63 63 24 28 41 |In(20)..|..Acc$(A|
|00003dc0| 25 2c 31 29 3d a4 53 74 | 72 69 6e 67 49 6e 28 33 |%,1)=.St|ringIn(3|
|00003dd0| 29 0d 08 de 05 ed 0d 08 | e8 08 d9 23 46 25 0d 08 |).......|...#F%..|
|00003de0| f2 05 e1 0d 08 fc 0d dd | a4 47 65 74 44 61 74 65 |........|.GetDate|
|00003df0| 0d 09 06 0e ea 20 41 24 | 2c 41 25 2c 42 25 0d 09 |..... A$|,A%,B%..|
|00003e00| 10 21 f1 22 30 31 2f 30 | 31 2f 38 39 22 3b 3a ef |.!."01/0|1/89";:.|
|00003e10| 38 2c 38 2c 38 2c 38 2c | 38 2c 38 2c 38 2c 38 0d |8,8,8,8,|8,8,8,8.|
|00003e20| 09 1a 11 41 24 3d 22 30 | 31 2f 30 31 2f 38 39 22 |...A$="0|1/01/89"|
|00003e30| 0d 09 24 0a 42 25 3d 31 | 3a f5 0d 09 2e 08 41 25 |..$.B%=1|:.....A%|
|00003e40| 3d a5 0d 09 38 5a e7 20 | 41 25 3e 34 37 20 80 20 |=...8Z. |A%>47 . |
|00003e50| 41 25 3c 35 38 20 80 20 | 42 25 3c 39 20 41 24 3d |A%<58 . |B%<9 A$=|
|00003e60| a4 4f 76 65 72 74 79 70 | 65 28 41 24 2c 42 25 2c |.Overtyp|e(A$,B%,|
|00003e70| bd 28 41 25 29 29 3a ef | 20 41 25 3a 42 25 3d 42 |.(A%)):.| A%:B%=B|
|00003e80| 25 2b 31 3a e7 20 42 25 | 3d 33 20 84 20 42 25 3d |%+1:. B%|=3 . B%=|
|00003e90| 36 20 42 25 3d 42 25 2b | 31 3a ef 39 0d 09 42 42 |6 B%=B%+|1:.9..BB|
|00003ea0| e7 20 28 41 25 3d 31 33 | 36 20 84 20 41 25 3d 31 |. (A%=13|6 . A%=1|
|00003eb0| 32 37 29 20 80 20 42 25 | 3e 31 20 42 25 3d 42 25 |27) . B%|>1 B%=B%|
|00003ec0| 2d 31 3a ef 38 3a e7 20 | 42 25 3d 33 20 84 20 42 |-1:.8:. |B%=3 . B|
|00003ed0| 25 3d 36 20 42 25 3d 42 | 25 2d 31 3a ef 38 0d 09 |%=6 B%=B|%-1:.8..|
|00003ee0| 4c 4a e7 20 28 41 25 3d | 33 32 20 84 20 41 25 3d |LJ. (A%=|32 . A%=|
|00003ef0| 31 33 35 20 84 20 41 25 | 3d 31 33 37 29 20 80 20 |135 . A%|=137) . |
|00003f00| 42 25 3c 39 20 ef 39 3a | 42 25 3d 42 25 2b 31 3a |B%<9 .9:|B%=B%+1:|
|00003f10| e7 20 42 25 3d 33 20 84 | 20 42 25 3d 36 20 42 25 |. B%=3 .| B%=6 B%|
|00003f20| 3d 42 25 2b 31 3a ef 39 | 0d 09 56 12 fd 41 25 3d |=B%+1:.9|..V..A%=|
|00003f30| 31 33 20 84 20 41 25 3d | 32 37 0d 09 5b 0a ef 31 |13 . A%=|27..[..1|
|00003f40| 33 2c 31 30 0d 09 60 32 | 3d bb 28 c1 41 24 2c 31 |3,10..`2|=.(.A$,1|
|00003f50| 2c 32 29 29 2b 31 30 30 | 2a bb 28 c1 41 24 2c 34 |,2))+100|*.(.A$,4|
|00003f60| 2c 32 29 29 2b 31 30 30 | 30 30 2a bb 28 c1 41 24 |,2))+100|00*.(.A$|
|00003f70| 2c 37 2c 32 29 29 0d 09 | 6a 18 dd a4 4f 76 65 72 |,7,2))..|j...Over|
|00003f80| 74 79 70 65 28 41 24 2c | 42 25 2c 43 24 29 0d 09 |type(A$,|B%,C$)..|
|00003f90| 74 1f 3d c0 41 24 2c 42 | 25 2d 31 29 2b 43 24 2b |t.=.A$,B|%-1)+C$+|
|00003fa0| c1 41 24 2c 42 25 2b a9 | 28 43 24 29 29 0d 09 75 |.A$,B%+.|(C$))..u|
|00003fb0| 16 dd a4 49 6e 73 65 72 | 74 28 41 24 2c 42 25 2c |...Inser|t(A$,B%,|
|00003fc0| 43 24 29 0d 09 76 19 3d | c0 41 24 2c 42 25 2d 31 |C$)..v.=|.A$,B%-1|
|00003fd0| 29 2b 43 24 2b c1 41 24 | 2c 42 25 29 0d 09 7e 12 |)+C$+.A$|,B%)..~.|
|00003fe0| dd a4 47 65 74 53 74 72 | 69 6e 67 28 6e 29 0d 09 |..GetStr|ing(n)..|
|00003ff0| 88 11 ea 20 53 24 2c 41 | 25 2c 42 25 2c 50 25 0d |... S$,A|%,B%,P%.|
|00004000| 09 92 15 53 24 3d 22 22 | 3a 42 25 3d 30 3a 50 25 |...S$=""|:B%=0:P%|
|00004010| 3d 31 3a f5 0d 09 9c 08 | 41 25 3d a5 0d 09 a6 7a |=1:.....|A%=....z|
|00004020| e7 20 41 25 3e 33 31 20 | 80 20 41 25 3c 31 32 37 |. A%>31 |. A%<127|
|00004030| 20 80 20 42 25 3c 6e 20 | 53 24 3d a4 49 6e 73 65 | . B%<n |S$=.Inse|
|00004040| 72 74 28 53 24 2c 50 25 | 2c bd 28 41 25 29 29 3a |rt(S$,P%|,.(A%)):|
|00004050| ef 41 25 3a 41 25 3d b1 | 2b 31 30 30 2a bc 3a f1 |.A%:A%=.|+100*.:.|
|00004060| c1 53 24 2c 50 25 2b 31 | 29 2b 22 20 22 3a f1 8a |.S$,P%+1|)+" ":..|
|00004070| 41 25 20 83 20 31 30 30 | 2c 41 25 20 81 20 31 30 |A% . 100|,A% . 10|
|00004080| 30 29 3b 22 22 3b 3a 42 | 25 3d 42 25 2b 31 3a 50 |0);"";:B|%=B%+1:P|
|00004090| 25 3d 50 25 2b 31 0d 09 | b0 20 e7 20 41 25 3d 31 |%=P%+1..|. . A%=1|
|000040a0| 33 37 20 80 20 50 25 3c | 3d 42 25 20 ef 39 3a 50 |37 . P%<|=B% .9:P|
|000040b0| 25 3d 50 25 2b 31 0d 09 | ba 1e e7 20 41 25 3d 31 |%=P%+1..|... A%=1|
|000040c0| 33 36 20 80 20 50 25 3e | 31 20 ef 38 3a 50 25 3d |36 . P%>|1 .8:P%=|
|000040d0| 50 25 2d 31 0d 09 c4 60 | e7 20 41 25 3d 31 33 35 |P%-1...`|. A%=135|
|000040e0| 20 80 20 50 25 3c 3d 42 | 25 20 53 24 3d a4 44 65 | . P%<=B|% S$=.De|
|000040f0| 6c 65 74 65 28 53 24 2c | 50 25 29 3a 41 25 3d b1 |lete(S$,|P%):A%=.|
|00004100| 2b 31 30 30 2a bc 3a f1 | c1 53 24 2c 50 25 29 2b |+100*.:.|.S$,P%)+|
|00004110| 22 20 22 3a f1 8a 41 25 | 20 83 20 31 30 30 2c 41 |" ":..A%| . 100,A|
|00004120| 25 20 81 20 31 30 30 29 | 3b 22 22 3b 3a 42 25 3d |% . 100)|;"";:B%=|
|00004130| 42 25 2d 31 0d 09 ce 69 | e7 20 41 25 3d 31 32 37 |B%-1...i|. A%=127|
|00004140| 20 80 20 50 25 3e 31 20 | 50 25 3d 50 25 2d 31 3a | . P%>1 |P%=P%-1:|
|00004150| 53 24 3d a4 44 65 6c 65 | 74 65 28 53 24 2c 50 25 |S$=.Dele|te(S$,P%|
|00004160| 29 3a ef 38 3a 41 25 3d | b1 2b 31 30 30 2a bc 3a |):.8:A%=|.+100*.:|
|00004170| f1 c1 53 24 2c 50 25 29 | 2b 22 20 22 3a f1 8a 41 |..S$,P%)|+" ":..A|
|00004180| 25 20 83 20 31 30 30 2c | 41 25 20 81 20 31 30 30 |% . 100,|A% . 100|
|00004190| 29 3b 22 22 3b 3a 42 25 | 3d 42 25 2d 31 0d 09 d8 |);"";:B%|=B%-1...|
|000041a0| 12 fd 41 25 3d 31 33 20 | 84 20 41 25 3d 32 37 0d |..A%=13 |. A%=27.|
|000041b0| 09 d9 15 e7 20 41 25 3d | 32 37 20 d7 22 41 2e 4d |.... A%=|27 ."A.M|
|000041c0| 65 6e 75 22 0d 09 dd 0a | ef 31 33 2c 31 30 0d 09 |enu"....|.13,10..|
|000041d0| e2 07 3d 53 24 0d 09 ec | 13 dd a4 44 65 6c 65 74 |..=S$...|...Delet|
|000041e0| 65 28 41 24 2c 42 25 29 | 0d 09 f6 18 3d c0 41 24 |e(A$,B%)|....=.A$|
|000041f0| 2c 42 25 2d 31 29 2b c1 | 41 24 2c 42 25 2b 31 29 |,B%-1)+.|A$,B%+1)|
|00004200| 0d 0a 28 0d dd a4 47 65 | 74 54 79 70 65 0d 0a 32 |..(...Ge|tType..2|
|00004210| 14 ea 20 41 24 2c 41 25 | 2c 42 24 2c 58 25 2c 59 |.. A$,A%|,B$,X%,Y|
|00004220| 25 0d 0a 33 0d 58 25 3d | b1 3a 59 25 3d bc 0d 0a |%..3.X%=|.:Y%=...|
|00004230| 3c 14 41 24 3d a4 47 65 | 74 53 74 72 69 6e 67 28 |<.A$=.Ge|tString(|
|00004240| 36 29 0d 0a 46 22 e7 20 | c0 41 24 2c 31 29 3c 3e |6)..F". |.A$,1)<>|
|00004250| 22 30 22 20 80 20 bb 28 | 41 24 29 3d 30 20 e5 20 |"0" . .(|A$)=0 . |
|00004260| 8d 44 5a 4a 0d 0a 50 0a | 3d bb 28 41 24 29 0d 0a |.DZJ..P.|=.(A$)..|
|00004270| 5a 11 f7 20 8d 74 4c 4a | 3a 41 25 3d 30 3a f5 0d |Z.. .tLJ|:A%=0:..|
|00004280| 0a 64 10 f3 20 42 24 3a | 41 25 3d 41 25 2d 31 0d |.d.. B$:|A%=A%-1.|
|00004290| 0a 6e 18 fd 20 41 24 3d | 42 24 20 84 20 42 24 3d |.n.. A$=|B$ . B$=|
|000042a0| 22 5f 45 4e 44 5f 22 0d | 0a 78 1a e7 20 42 24 3c |"_END_".|.x.. B$<|
|000042b0| 3e 22 5f 45 4e 44 5f 22 | 20 3d 41 25 20 8b 20 ef |>"_END_"| =A% . .|
|000042c0| 37 0d 0a 79 14 ef 39 3a | f7 20 8d 74 4c 4a 3a f5 |7..y..9:|. .tLJ:.|
|000042d0| 3a f3 20 42 24 0d 0a 7a | 1b e7 20 42 24 3c 3e 22 |:. B$..z|.. B$<>"|
|000042e0| 5f 45 4e 44 5f 22 20 f1 | 42 24 3b 22 20 20 22 3b |_END_" .|B$;" ";|
|000042f0| 0d 0a 7b 30 fd 20 42 24 | 3d 22 5f 45 4e 44 5f 22 |..{0. B$|="_END_"|
|00004300| 3a f1 8a 58 25 2c 59 25 | 29 3b 22 20 20 20 20 20 |:..X%,Y%|);" |
|00004310| 20 22 3b 3a ef 38 2c 38 | 2c 38 2c 38 2c 38 2c 38 | ";:.8,8|,8,8,8,8|
|00004320| 0d 0a 7c 0f 41 25 3d a4 | 47 65 74 54 79 70 65 0d |..|.A%=.|GetType.|
|00004330| 0a 7d 14 ef 39 3a f7 20 | 8d 74 4c 4a 3a f5 3a f3 |.}..9:. |.tLJ:.:.|
|00004340| 20 42 24 0d 0a 7e 1b e7 | 20 42 24 3c 3e 22 5f 45 | B$..~..| B$<>"_E|
|00004350| 4e 44 5f 22 20 f1 22 20 | 20 20 20 20 22 3b 0d 0a |ND_" ." | ";..|
|00004360| 7f 0f fd 42 24 3d 22 5f | 45 4e 44 5f 22 0d 0a 82 |...B$="_|END_"...|
|00004370| 0f f1 8a 58 25 2c 59 25 | 29 3b 22 22 0d 0a 83 07 |...X%,Y%|);""....|
|00004380| 3d 41 25 0d 0a 8c 29 dc | 20 22 53 54 4f 22 2c 22 |=A%...).| "STO","|
|00004390| 44 44 42 22 2c 22 42 43 | 43 22 2c 22 41 54 4d 22 |DDB","BC|C","ATM"|
|000043a0| 2c 22 49 4e 54 22 2c 22 | 52 45 4d 22 0d 0a 96 0d |,"INT","|REM"....|
|000043b0| dc 20 22 5f 45 4e 44 5f | 22 0d 0a a0 0c dd a4 47 |. "_END_|"......G|
|000043c0| 65 74 41 63 63 0d 0a aa | 14 ea 20 41 24 2c 41 25 |etAcc...|.. A$,A%|
|000043d0| 2c 58 25 2c 59 25 2c 42 | 25 0d 0a af 0d 58 25 3d |,X%,Y%,B|%....X%=|
|000043e0| b1 3a 59 25 3d bc 0d 0a | b4 14 41 24 3d a4 47 65 |.:Y%=...|..A$=.Ge|
|000043f0| 74 53 74 72 69 6e 67 28 | 33 29 0d 0a be 2e 41 25 |tString(|3)....A%|
|00004400| 3d 30 3a f5 3a 41 25 3d | 41 25 2b 31 3a fd 41 24 |=0:.:A%=|A%+1:.A$|
|00004410| 3d 41 63 63 24 28 41 25 | 2c 31 29 20 84 20 41 25 |=Acc$(A%|,1) . A%|
|00004420| 3d 6e 75 6d 61 63 63 25 | 0d 0a c8 1e e7 20 41 24 |=numacc%|..... A$|
|00004430| 3d 41 63 63 24 28 41 25 | 2c 31 29 20 3d 41 25 20 |=Acc$(A%|,1) =A% |
|00004440| 8b 20 ef 37 2c 39 0d 0a | d2 30 41 25 3d 30 3a f5 |. .7,9..|.0A%=0:.|
|00004450| 3a 41 25 3d 41 25 2b 31 | 3a f1 41 63 63 24 28 41 |:A%=A%+1|:.Acc$(A|
|00004460| 25 2c 31 29 3b 22 20 20 | 22 3b 3a fd 41 25 3d 6e |%,1);" |";:.A%=n|
|00004470| 75 6d 61 63 63 25 0d 0a | dc 1a f1 8a 58 25 2c 59 |umacc%..|....X%,Y|
|00004480| 25 29 3b 22 20 20 20 22 | 3b 3a ef 38 2c 38 2c 38 |%);" "|;:.8,8,8|
|00004490| 0d 0a e6 0e 42 25 3d a4 | 47 65 74 41 63 63 0d 0a |....B%=.|GetAcc..|
|000044a0| f0 28 41 25 3d 30 3a f5 | 3a 41 25 3d 41 25 2b 31 |.(A%=0:.|:A%=A%+1|
|000044b0| 3a f1 22 20 20 20 20 20 | 22 3b 3a fd 41 25 3d 6e |:." |";:.A%=n|
|000044c0| 75 6d 61 63 63 25 0d 0a | fa 0f f1 8a 58 25 2c 59 |umacc%..|....X%,Y|
|000044d0| 25 29 3b 22 22 0d 0b 04 | 07 3d 42 25 0d 0b 0e 0b |%);""...|.=B%....|
|000044e0| dd a4 47 65 74 41 6d 0d | 0b 18 14 ea 20 41 24 2c |..GetAm.|.... A$,|
|000044f0| 41 25 2c 58 25 2c 59 25 | 2c 42 25 0d 0b 1d 0d 58 |A%,X%,Y%|,B%....X|
|00004500| 25 3d b1 3a 59 25 3d bc | 0d 0b 22 15 41 24 3d a4 |%=.:Y%=.|..".A$=.|
|00004510| 47 65 74 53 74 72 69 6e | 67 28 32 30 29 0d 0b 2c |GetStrin|g(20)..,|
|00004520| 18 e7 20 a7 22 30 30 2e | 30 30 22 2c 41 24 29 3c |.. ."00.|00",A$)<|
|00004530| 3e 30 20 3d 30 0d 0b 37 | 3e e3 20 42 25 3d 31 20 |>0 =0..7|>. B%=1 |
|00004540| b8 20 a9 28 41 24 29 3a | e7 20 a7 22 2e 2a 2b 2d |. .(A$):|. .".*+-|
|00004550| 2f 20 28 29 30 31 32 33 | 34 35 36 37 38 39 22 2c |/ ()0123|456789",|
|00004560| c1 41 24 2c 42 25 2c 31 | 29 29 3d 30 20 41 24 3d |.A$,B%,1|))=0 A$=|
|00004570| 22 58 22 0d 0b 38 05 ed | 0d 0b 39 1e e7 20 41 24 |"X"..8..|..9.. A$|
|00004580| 3c 3e 22 58 22 20 3d a4 | 69 6e 74 28 a0 28 41 24 |<>"X" =.|int(.(A$|
|00004590| 29 2a 31 30 30 29 0d 0b | 40 2b ef 37 3a f1 8a 58 |)*100)..|@+.7:..X|
|000045a0| 25 2c 59 25 29 3b c4 32 | 30 2c 22 20 22 29 3b 8a |%,Y%);.2|0," ");.|
|000045b0| 58 25 2c 59 25 29 3b 22 | 22 3b 3a e5 20 8d 54 62 |X%,Y%);"|";:. .Tb|
|000045c0| 4b 0d 0b 4a 0f dd a4 44 | 69 73 41 6d 28 41 25 29 |K..J...D|isAm(A%)|
|000045d0| 0d 0b 4b 08 ea 20 41 24 | 0d 0b 54 0f 41 24 3d c3 |..K.. A$|..T.A$=.|
|000045e0| 28 94 28 41 25 29 29 0d | 0b 55 18 e7 20 a9 28 41 |(.(A%)).|.U.. .(A|
|000045f0| 24 29 3d 31 20 41 24 3d | 22 30 30 22 2b 41 24 0d |$)=1 A$=|"00"+A$.|
|00004600| 0b 56 17 e7 20 a9 28 41 | 24 29 3d 32 20 41 24 3d |.V.. .(A|$)=2 A$=|
|00004610| 22 30 22 2b 41 24 0d 0b | 57 23 e7 20 41 25 3e 3d |"0"+A$..|W#. A%>=|
|00004620| 30 20 41 24 3d 22 86 2b | 22 2b 41 24 20 8b 20 41 |0 A$=".+|"+A$ . A|
|00004630| 24 3d 22 81 2d 22 2b 41 | 24 0d 0b 5e 1c 3d c0 41 |$=".-"+A|$..^.=.A|
|00004640| 24 2c a9 28 41 24 29 2d | 32 29 2b 22 2e 22 2b c2 |$,.(A$)-|2)+"."+.|
|00004650| 41 24 2c 32 29 0d 0b 68 | 0c dd a4 69 6e 74 28 41 |A$,2)..h|...int(A|
|00004660| 29 0d 0b 72 0d 3d a8 28 | 41 2b 30 2e 31 29 0d ff |)..r.=.(|A+0.1)..|
|00004670| 46 69 6c 65 44 61 74 61 | 82 48 65 6c 70 00 00 00 |FileData|.Help...|
|00004680| 00 00 00 00 c9 01 00 00 | 42 fb ff ff f1 0b 7d 10 |........|B.....}.|
|00004690| 03 00 bc 52 0d 00 0a 17 | f4 20 41 63 63 6f 75 6e |...R....|. Accoun|
|000046a0| 74 73 20 49 49 2d 20 48 | 65 6c 70 0d 00 14 18 f4 |ts II- H|elp.....|
|000046b0| 20 28 43 29 20 31 39 38 | 39 20 41 2e 20 48 75 72 | (C) 198|9 A. Hur|
|000046c0| 6c 65 79 0d 00 1e 1a f4 | 20 42 65 74 65 6c 67 65 |ley.....| Betelge|
|000046d0| 75 73 65 20 43 6f 6d 70 | 75 74 69 6e 67 0d 00 28 |use Comp|uting..(|
|000046e0| 06 eb 37 0d 00 69 0c 2a | 46 58 32 32 30 2c 34 0d |..7..i.*|FX220,4.|
|000046f0| 00 6a 0a 2a 46 58 34 2c | 31 0d 00 6e 28 f1 bd 31 |.j.*FX4,|1..n(..1|
|00004700| 35 37 3b bd 31 34 31 3b | 22 81 20 20 20 20 20 20 |57;.141;|". |
|00004710| 20 20 20 20 20 41 63 63 | 6f 75 6e 74 73 20 49 49 | Acc|ounts II|
|00004720| 22 0d 00 78 28 f1 bd 31 | 35 37 3b bd 31 34 31 3b |"..x(..1|57;.141;|
|00004730| 22 81 20 20 20 20 20 20 | 20 20 20 20 20 41 63 63 |". | Acc|
|00004740| 6f 75 6e 74 73 20 49 49 | 22 0d 00 82 2e f1 bd 31 |ounts II|"......1|
|00004750| 35 37 3b 22 86 20 20 20 | 28 43 29 20 31 39 38 39 |57;". |(C) 1989|
|00004760| 20 20 42 65 74 65 6c 67 | 65 75 73 65 20 43 6f 6d | Betelg|euse Com|
|00004770| 70 75 74 69 6e 67 22 0d | 00 87 05 f1 0d 00 8c 20 |puting".|....... |
|00004780| f1 bd 31 34 31 3b 22 85 | 20 20 20 20 20 20 20 20 |..141;".| |
|00004790| 20 20 20 20 20 20 20 48 | 65 6c 70 22 0d 00 96 20 | H|elp"... |
|000047a0| f1 bd 31 34 31 3b 22 85 | 20 20 20 20 20 20 20 20 |..141;".| |
|000047b0| 20 20 20 20 20 20 20 48 | 65 6c 70 22 0d 00 a0 11 | H|elp"....|
|000047c0| ef 32 38 2c 30 2c 32 34 | 2c 33 39 2c 36 0d 00 aa |.28,0,24|,39,6...|
|000047d0| 12 46 25 3d 8e 28 22 46 | 2e 48 65 6c 70 22 29 0d |.F%=.("F|.Help").|
|000047e0| 00 af 05 f5 0d 00 b4 0d | f5 3a 41 25 3d 9a 23 46 |........|.:A%=.#F|
|000047f0| 25 0d 00 b9 15 e7 20 41 | 25 3c 3e 97 28 22 7c 22 |%..... A|%<>.("|"|
|00004800| 29 20 ef 20 41 25 0d 00 | ba 0f e7 20 41 25 3d 31 |) . A%..|... A%=1|
|00004810| 33 20 ef 31 30 0d 00 be | 0f fd 20 41 25 3d 97 28 |3 .10...|.. A%=.(|
|00004820| 22 7c 22 29 0d 00 c8 0b | 41 25 3d 9a 23 46 25 0d |"|")....|A%=.#F%.|
|00004830| 00 cd 08 42 25 3d a5 0d | 00 d2 17 fd 20 41 25 3d |...B%=..|.... A%=|
|00004840| 97 28 22 7c 22 29 20 84 | 20 42 25 3d 32 37 0d 00 |.("|") .| B%=27..|
|00004850| dc 0d d7 22 41 2e 4d 65 | 6e 75 22 0d ff 46 69 6c |..."A.Me|nu"..Fil|
|00004860| 65 44 61 74 61 82 4d 65 | 6e 75 00 00 00 00 00 00 |eData.Me|nu......|
|00004870| 00 7a 04 00 00 44 fb ff | ff bf 41 ad 3d 03 00 0b |.z...D..|..A.=...|
|00004880| 03 0d 00 0a 17 f4 20 41 | 63 63 6f 75 6e 74 73 20 |...... A|ccounts |
|00004890| 49 49 2d 20 4d 65 6e 75 | 0d 00 14 18 f4 20 28 43 |II- Menu|..... (C|
|000048a0| 29 20 31 39 38 39 20 41 | 2e 20 48 75 72 6c 65 79 |) 1989 A|. Hurley|
|000048b0| 0d 00 1e 1a f4 20 42 65 | 74 65 6c 67 65 75 73 65 |..... Be|telgeuse|
|000048c0| 20 43 6f 6d 70 75 74 69 | 6e 67 0d 00 23 07 eb 20 | Computi|ng..#.. |
|000048d0| 37 0d 00 28 12 ef 32 38 | 2c 30 2c 35 2c 33 39 2c |7..(..28|,0,5,39,|
|000048e0| 30 3a db 0d 00 64 07 ef | 32 36 0d 00 69 0c 2a 46 |0:...d..|26..i.*F|
|000048f0| 58 32 32 30 2c 34 0d 00 | 6a 0a 2a 46 58 34 2c 31 |X220,4..|j.*FX4,1|
|00004900| 0d 00 6e 28 f1 bd 31 35 | 37 3b bd 31 34 31 3b 22 |..n(..15|7;.141;"|
|00004910| 81 20 20 20 20 20 20 20 | 20 20 20 20 41 63 63 6f |. | Acco|
|00004920| 75 6e 74 73 20 49 49 22 | 0d 00 78 28 f1 bd 31 35 |unts II"|..x(..15|
|00004930| 37 3b bd 31 34 31 3b 22 | 81 20 20 20 20 20 20 20 |7;.141;"|. |
|00004940| 20 20 20 20 41 63 63 6f | 75 6e 74 73 20 49 49 22 | Acco|unts II"|
|00004950| 0d 00 82 2e f1 bd 31 35 | 37 3b 22 86 20 20 20 28 |......15|7;". (|
|00004960| 43 29 20 31 39 38 39 20 | 20 42 65 74 65 6c 67 65 |C) 1989 | Betelge|
|00004970| 75 73 65 20 43 6f 6d 70 | 75 74 69 6e 67 22 0d 00 |use Comp|uting"..|
|00004980| 87 05 f1 0d 00 8c 20 f1 | bd 31 34 31 3b 22 85 20 |...... .|.141;". |
|00004990| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4d 65 | | Me|
|000049a0| 6e 75 22 0d 00 96 20 f1 | bd 31 34 31 3b 22 85 20 |nu"... .|.141;". |
|000049b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4d 65 | | Me|
|000049c0| 6e 75 22 0d 00 a0 11 ef | 32 38 2c 30 2c 32 34 2c |nu".....|28,0,24,|
|000049d0| 33 39 2c 36 0d 00 aa 1a | 46 25 3d 8e 28 22 44 2e |39,6....|F%=.("D.|
|000049e0| 41 63 63 6f 75 6e 74 22 | 29 3a d9 23 46 25 0d 00 |Account"|):.#F%..|
|000049f0| b4 21 e7 20 46 25 3d 30 | 20 46 25 3d ae 28 22 44 |.!. F%=0| F%=.("D|
|00004a00| 2e 41 63 63 6f 75 6e 74 | 22 29 3a d9 23 46 25 0d |.Account|"):.#F%.|
|00004a10| 00 b9 0b 46 25 3d a6 28 | 30 29 0d 00 be 13 e7 20 |...F%=.(|0)..... |
|00004a20| 46 25 3d 31 32 34 20 e5 | 20 8d 64 48 40 0d 00 c3 |F%=124 .| .dH@...|
|00004a30| 0b 2a 46 58 31 35 2c 31 | 0d 00 c4 0d 46 25 3d a6 |.*FX15,1|....F%=.|
|00004a40| 28 31 30 30 29 0d 00 c8 | 05 db 0d 00 d2 1e f1 20 |(100)...|....... |
|00004a50| 22 83 41 2e 82 41 64 64 | 20 54 72 61 6e 73 61 63 |".A..Add| Transac|
|00004a60| 74 69 6f 6e 28 73 29 22 | 0d 00 dc 1e f1 27 22 83 |tion(s)"|.....'".|
|00004a70| 42 2e 82 45 64 69 74 20 | 41 63 63 6f 75 6e 74 20 |B..Edit |Account |
|00004a80| 4e 61 6d 65 73 22 0d 00 | e6 25 f1 27 22 83 43 2e |Names"..|.%.'".C.|
|00004a90| 82 44 69 73 70 6c 61 79 | 20 53 74 61 74 65 20 6f |.Display| State o|
|00004aa0| 66 20 41 63 63 6f 75 6e | 74 73 22 0d 00 f0 21 f1 |f Accoun|ts"...!.|
|00004ab0| 27 22 83 44 2e 82 44 65 | 6c 65 74 65 20 54 72 61 |'".D..De|lete Tra|
|00004ac0| 6e 73 61 63 74 69 6f 6e | 28 73 29 22 0d 00 fa 25 |nsaction|(s)"...%|
|00004ad0| f1 27 22 83 45 2e 82 53 | 68 6f 77 20 4c 69 73 74 |.'".E..S|how List|
|00004ae0| 20 6f 66 20 54 72 61 6e | 73 61 63 74 69 6f 6e 73 | of Tran|sactions|
|00004af0| 22 0d 01 04 19 f1 27 22 | 83 46 2e 82 42 72 69 6e |".....'"|.F..Brin|
|00004b00| 67 20 46 6f 72 77 61 72 | 64 22 0d 01 0e 2b f1 27 |g Forwar|d"...+.'|
|00004b10| 22 83 47 2e 82 53 6f 72 | 74 20 69 6e 20 44 61 74 |".G..Sor|t in Dat|
|00004b20| 65 20 4f 72 64 65 72 20 | 28 61 6c 73 6f 20 70 75 |e Order |(also pu|
|00004b30| 72 67 65 29 22 0d 01 18 | 10 f1 27 22 83 48 2e 82 |rge)"...|..'".H..|
|00004b40| 48 65 6c 70 22 0d 01 1d | 1a f1 27 22 83 49 2e 82 |Help"...|..'".I..|
|00004b50| 53 74 61 6e 64 69 6e 67 | 20 4f 72 64 65 72 22 0d |Standing| Order".|
|00004b60| 01 22 22 f1 27 22 83 45 | 73 63 2e 82 4c 65 61 76 |."".'".E|sc..Leav|
|00004b70| 65 86 41 63 63 6f 75 6e | 74 73 20 49 49 20 20 22 |e.Accoun|ts II "|
|00004b80| 3b 0d 01 2c 08 46 24 3d | be 0d 01 31 26 e7 20 46 |;..,.F$=|...1&. F|
|00004b90| 24 3e 3d 22 61 22 20 80 | 20 46 24 3c 3d 22 7a 22 |$>="a" .| F$<="z"|
|00004ba0| 20 46 24 3d bd 28 97 28 | 46 24 29 2d 33 32 29 0d | F$=.(.(|F$)-32).|
|00004bb0| 01 33 08 f1 46 24 3b 0d | 01 36 15 e7 20 46 24 3d |.3..F$;.|.6.. F$=|
|00004bc0| 22 41 22 20 d7 22 41 2e | 41 64 64 22 0d 01 40 17 |"A" ."A.|Add"..@.|
|00004bd0| e7 20 46 24 3d 22 42 22 | 20 d7 22 41 2e 4e 61 6d |. F$="B"| ."A.Nam|
|00004be0| 65 73 22 0d 01 4a 17 e7 | 20 46 24 3d 22 43 22 20 |es"..J..| F$="C" |
|00004bf0| d7 22 41 2e 53 74 61 74 | 65 22 0d 01 54 18 e7 20 |."A.Stat|e"..T.. |
|00004c00| 46 24 3d 22 44 22 20 d7 | 22 41 2e 44 65 6c 65 74 |F$="D" .|"A.Delet|
|00004c10| 65 22 0d 01 5e 16 e7 20 | 46 24 3d 22 45 22 20 d7 |e"..^.. |F$="E" .|
|00004c20| 22 41 2e 53 68 6f 77 22 | 0d 01 68 19 e7 20 46 24 |"A.Show"|..h.. F$|
|00004c30| 3d 22 46 22 20 d7 22 41 | 2e 46 6f 72 77 61 72 64 |="F" ."A|.Forward|
|00004c40| 22 0d 01 72 16 e7 20 46 | 24 3d 22 47 22 20 d7 22 |"..r.. F|$="G" ."|
|00004c50| 41 2e 53 6f 72 74 22 0d | 01 7c 16 e7 20 46 24 3d |A.Sort".|.|.. F$=|
|00004c60| 22 48 22 20 d7 22 41 2e | 48 65 6c 70 22 0d 01 7c |"H" ."A.|Help"..||
|00004c70| 19 e7 20 46 24 3d 22 49 | 22 20 d7 22 41 2e 53 5f |.. F$="I|" ."A.S_|
|00004c80| 4f 72 64 65 72 22 0d 01 | 86 13 e7 20 46 24 3d bd |Order"..|... F$=.|
|00004c90| 32 37 20 e5 20 8d 64 74 | 41 0d 01 90 0d ef 37 2c |27 . .dt|A.....7,|
|00004ca0| 38 2c 33 32 2c 38 0d 01 | 9a 0a e5 20 8d 54 6c 41 |8,32,8..|... .TlA|
|00004cb0| 0d 01 f4 09 db 3a ef 32 | 36 0d 01 fe 1d f1 8a 30 |.....:.2|6......0|
|00004cc0| 2c 31 30 29 3b bd 31 34 | 31 3b 22 86 47 6f 6f 64 |,10);.14|1;".Good|
|00004cd0| 62 79 65 88 21 22 0d 02 | 08 1d f1 8a 30 2c 31 31 |bye.!"..|....0,11|
|00004ce0| 29 3b bd 31 34 31 3b 22 | 86 47 6f 6f 64 62 79 65 |);.141;"|.Goodbye|
|00004cf0| 88 21 22 0d 02 12 06 c8 | 98 0d ff 46 69 6c 65 44 |.!".....|...FileD|
|00004d00| 61 74 61 82 4e 61 6d 65 | 73 00 00 00 00 00 00 25 |ata.Name|s......%|
|00004d10| 10 00 00 42 fb ff ff 43 | 1d 7d 10 03 00 c6 7f 0d |...B...C|.}......|
|00004d20| 00 0a 25 f4 20 41 63 63 | 6f 75 6e 74 73 20 49 49 |..%. Acc|ounts II|
|00004d30| 2d 20 45 64 69 74 20 41 | 63 63 6f 75 6e 74 20 4e |- Edit A|ccount N|
|00004d40| 61 6d 65 73 0d 00 14 18 | f4 20 28 43 29 20 31 39 |ames....|. (C) 19|
|00004d50| 38 39 20 41 2e 20 48 75 | 72 6c 65 79 0d 00 1e 1a |89 A. Hu|rley....|
|00004d60| f4 20 42 65 74 65 6c 67 | 65 75 73 65 20 43 6f 6d |. Betelg|euse Com|
|00004d70| 70 75 74 69 6e 67 0d 00 | 28 11 de 20 49 6e 74 53 |puting..|(.. IntS|
|00004d80| 70 61 63 65 25 20 34 0d | 00 32 11 de 20 45 6e 74 |pace% 4.|.2.. Ent|
|00004d90| 25 28 32 35 36 2c 31 29 | 0d 00 37 11 de 20 41 63 |%(256,1)|..7.. Ac|
|00004da0| 63 24 28 32 35 36 2c 31 | 29 0d 00 3c 10 44 61 74 |c$(256,1|)..<.Dat|
|00004db0| 65 25 3d 38 39 30 33 32 | 31 0d 00 46 21 44 65 74 |e%=89032|1..F!Det|
|00004dc0| 61 69 6c 24 3d 22 4e 6f | 20 44 65 74 61 69 6c 73 |ail$="No| Details|
|00004dd0| 20 44 65 66 69 6e 65 64 | 21 22 0d 00 50 0e 45 6e | Defined|!"..P.En|
|00004de0| 74 72 69 65 73 25 3d 31 | 0d 00 5a 0a 43 68 71 25 |tries%=1|..Z.Chq%|
|00004df0| 3d 30 0d 00 64 06 eb 37 | 0d 00 69 0c 2a 46 58 32 |=0..d..7|..i.*FX2|
|00004e00| 32 30 2c 34 0d 00 6a 0a | 2a 46 58 34 2c 31 0d 00 |20,4..j.|*FX4,1..|
|00004e10| 6e 28 f1 bd 31 35 37 3b | bd 31 34 31 3b 22 81 20 |n(..157;|.141;". |
|00004e20| 20 20 20 20 20 20 20 20 | 20 20 41 63 63 6f 75 6e | | Accoun|
|00004e30| 74 73 20 49 49 22 0d 00 | 78 28 f1 bd 31 35 37 3b |ts II"..|x(..157;|
|00004e40| bd 31 34 31 3b 22 81 20 | 20 20 20 20 20 20 20 20 |.141;". | |
|00004e50| 20 20 41 63 63 6f 75 6e | 74 73 20 49 49 22 0d 00 | Accoun|ts II"..|
|00004e60| 82 2e f1 bd 31 35 37 3b | 22 86 20 20 20 28 43 29 |....157;|". (C)|
|00004e70| 20 31 39 38 39 20 20 42 | 65 74 65 6c 67 65 75 73 | 1989 B|etelgeus|
|00004e80| 65 20 43 6f 6d 70 75 74 | 69 6e 67 22 0d 00 87 05 |e Comput|ing"....|
|00004e90| f1 0d 00 8c 27 f1 bd 31 | 34 31 3b 22 85 20 20 20 |....'..1|41;". |
|00004ea0| 20 20 20 20 20 45 64 69 | 74 20 41 63 63 6f 75 6e | Edi|t Accoun|
|00004eb0| 74 20 4e 61 6d 65 73 22 | 0d 00 96 27 f1 bd 31 34 |t Names"|...'..14|
|00004ec0| 31 3b 22 85 20 20 20 20 | 20 20 20 20 45 64 69 74 |1;". | Edit|
|00004ed0| 20 41 63 63 6f 75 6e 74 | 20 4e 61 6d 65 73 22 0d | Account| Names".|
|00004ee0| 00 a0 11 ef 32 38 2c 30 | 2c 32 34 2c 33 39 2c 36 |....28,0|,24,39,6|
|00004ef0| 0d 00 aa 1a 46 25 3d 8e | 28 22 4e 2e 41 63 63 6f |....F%=.|("N.Acco|
|00004f00| 75 6e 74 22 29 3a d9 23 | 46 25 0d 00 b4 17 e7 20 |unt"):.#|F%..... |
|00004f10| 46 25 3d 30 20 f2 4d 61 | 6b 65 44 65 66 61 75 6c |F%=0 .Ma|keDefaul|
|00004f20| 74 0d 00 be 0a f2 53 65 | 74 55 70 0d 00 c3 0d 4c |t.....Se|tUp....L|
|00004f30| 69 6e 65 25 3d 2d 31 38 | 0d 00 c8 3a e3 20 48 25 |ine%=-18|...:. H%|
|00004f40| 3d 2d 31 37 20 b8 20 28 | 6e 75 6d 61 63 63 25 20 |=-17 . (|numacc% |
|00004f50| 81 20 32 29 2b 31 3a f2 | 44 69 73 70 6c 61 79 4c |. 2)+1:.|DisplayL|
|00004f60| 69 6e 65 28 48 25 29 3a | 4c 69 6e 65 25 3d 48 25 |ine(H%):|Line%=H%|
|00004f70| 3a ed 0d 00 d2 05 f5 0d | 00 dc 08 41 25 3d a5 0d |:.......|...A%=..|
|00004f80| 00 e6 3a e7 20 41 25 3d | 31 33 39 20 80 20 4c 69 |..:. A%=|139 . Li|
|00004f90| 6e 65 25 3e 31 20 f2 44 | 69 73 70 6c 61 79 4c 69 |ne%>1 .D|isplayLi|
|00004fa0| 6e 65 28 4c 69 6e 65 25 | 2d 31 29 3a 4c 69 6e 65 |ne(Line%|-1):Line|
|00004fb0| 25 3d 4c 69 6e 65 25 2d | 31 0d 00 f0 41 e7 20 41 |%=Line%-|1...A. A|
|00004fc0| 25 3d 31 33 38 20 80 20 | 4c 69 6e 65 25 3c 3d 6e |%=138 . |Line%<=n|
|00004fd0| 75 6d 61 63 63 25 20 f2 | 44 69 73 70 6c 61 79 4c |umacc% .|DisplayL|
|00004fe0| 69 6e 65 28 4c 69 6e 65 | 25 2b 31 29 3a 4c 69 6e |ine(Line|%+1):Lin|
|00004ff0| 65 25 3d 4c 69 6e 65 25 | 2b 31 0d 00 fa 27 e7 20 |e%=Line%|+1...'. |
|00005000| 41 25 3d 31 33 35 20 80 | 20 4c 69 6e 65 25 3c 32 |A%=135 .| Line%<2|
|00005010| 35 36 20 f2 43 68 61 6e | 67 65 28 4c 69 6e 65 25 |56 .Chan|ge(Line%|
|00005020| 29 0d 01 04 14 e7 20 41 | 25 3d 31 32 37 20 f2 44 |)..... A|%=127 .D|
|00005030| 65 6c 65 74 65 0d 01 2c | 0a fd 41 25 3d 32 37 0d |elete..,|..A%=27.|
|00005040| 01 36 15 46 25 3d ae 28 | 22 4e 2e 41 63 63 6f 75 |.6.F%=.(|"N.Accou|
|00005050| 6e 74 22 29 0d 01 40 16 | f2 53 68 6f 72 74 4f 75 |nt")..@.|.ShortOu|
|00005060| 74 28 6e 75 6d 61 63 63 | 25 29 0d 01 4a 14 e3 20 |t(numacc|%)..J.. |
|00005070| 41 25 3d 31 20 b8 20 6e | 75 6d 61 63 63 25 0d 01 |A%=1 . n|umacc%..|
|00005080| 54 1d f2 53 74 72 69 6e | 67 4f 75 74 28 41 63 63 |T..Strin|gOut(Acc|
|00005090| 24 28 41 25 2c 30 29 2c | 32 30 29 0d 01 5e 1c f2 |$(A%,0),|20)..^..|
|000050a0| 53 74 72 69 6e 67 4f 75 | 74 28 41 63 63 24 28 41 |StringOu|t(Acc$(A|
|000050b0| 25 2c 31 29 2c 33 29 0d | 01 68 05 ed 0d 01 72 08 |%,1),3).|.h....r.|
|000050c0| d9 23 46 25 0d 01 7c 0d | d7 22 41 2e 4d 65 6e 75 |.#F%..|.|."A.Menu|
|000050d0| 22 0d 03 e7 05 e0 0d 03 | e8 10 dd f2 57 72 69 74 |".......|....Writ|
|000050e0| 65 45 6e 74 72 79 0d 03 | ed 08 ea 20 4c 25 0d 03 |eEntry..|... L%..|
|000050f0| fc 12 f2 49 6e 74 4f 75 | 74 28 44 61 74 65 25 29 |...IntOu|t(Date%)|
|00005100| 0d 04 06 1a f2 53 74 72 | 69 6e 67 4f 75 74 28 44 |.....Str|ingOut(D|
|00005110| 65 74 61 69 6c 24 2c 32 | 30 29 0d 04 10 11 f2 49 |etail$,2|0).....I|
|00005120| 6e 74 4f 75 74 28 43 68 | 71 25 29 0d 04 1a 17 f2 |ntOut(Ch|q%).....|
|00005130| 53 68 6f 72 74 4f 75 74 | 28 45 6e 74 72 69 65 73 |ShortOut|(Entries|
|00005140| 25 29 0d 04 24 15 e3 20 | 4c 25 3d 31 20 b8 20 45 |%)..$.. |L%=1 . E|
|00005150| 6e 74 72 69 65 73 25 0d | 04 2e 19 f2 53 68 6f 72 |ntries%.|....Shor|
|00005160| 74 4f 75 74 28 45 6e 74 | 25 28 4c 25 2c 30 29 29 |tOut(Ent|%(L%,0))|
|00005170| 0d 04 38 17 f2 49 6e 74 | 4f 75 74 28 45 6e 74 25 |..8..Int|Out(Ent%|
|00005180| 28 4c 25 2c 31 29 29 0d | 04 42 05 ed 0d 04 56 05 |(L%,1)).|.B....V.|
|00005190| e1 0d 04 b0 12 dd f2 53 | 68 6f 72 74 4f 75 74 28 |.......S|hortOut(|
|000051a0| 41 25 29 0d 04 ba 13 d5 | 23 46 25 2c 28 41 25 20 |A%).....|#F%,(A% |
|000051b0| 80 20 32 35 35 29 0d 04 | c4 05 e1 0d 05 14 16 dd |. 255)..|........|
|000051c0| f2 53 74 72 69 6e 67 4f | 75 74 28 41 24 2c 42 25 |.StringO|ut(A$,B%|
|000051d0| 29 0d 05 1e 08 ea 20 41 | 25 0d 05 28 0f e3 20 41 |)..... A|%..(.. A|
|000051e0| 25 3d 31 20 b8 20 42 25 | 0d 05 32 2b e7 20 41 25 |%=1 . B%|..2+. A%|
|000051f0| 3c 3d a9 28 41 24 29 20 | d5 23 46 25 2c 97 28 c1 |<=.(A$) |.#F%,.(.|
|00005200| 41 24 2c 41 25 2c 31 29 | 29 20 8b 20 d5 23 46 25 |A$,A%,1)|) . .#F%|
|00005210| 2c 33 32 0d 05 3c 05 ed | 0d 05 46 05 e1 0d 05 78 |,32..<..|..F....x|
|00005220| 10 dd f2 49 6e 74 4f 75 | 74 28 41 25 29 0d 05 7d |...IntOu|t(A%)..}|
|00005230| 11 21 49 6e 74 53 70 61 | 63 65 25 3d 41 25 0d 05 |.!IntSpa|ce%=A%..|
|00005240| 82 13 d5 23 46 25 2c 3f | 49 6e 74 53 70 61 63 65 |...#F%,?|IntSpace|
|00005250| 25 0d 05 8c 14 d5 23 46 | 25 2c 49 6e 74 53 70 61 |%.....#F|%,IntSpa|
|00005260| 63 65 25 3f 31 0d 05 96 | 14 d5 23 46 25 2c 49 6e |ce%?1...|..#F%,In|
|00005270| 74 53 70 61 63 65 25 3f | 32 0d 05 a0 14 d5 23 46 |tSpace%?|2.....#F|
|00005280| 25 2c 49 6e 74 53 70 61 | 63 65 25 3f 33 0d 05 aa |%,IntSpa|ce%?3...|
|00005290| 05 e1 0d 05 dc 0b dd a4 | 49 6e 74 49 6e 0d 05 e6 |........|IntIn...|
|000052a0| 13 3f 49 6e 74 53 70 61 | 63 65 25 3d 9a 23 46 25 |.?IntSpa|ce%=.#F%|
|000052b0| 0d 05 f0 14 49 6e 74 53 | 70 61 63 65 25 3f 31 3d |....IntS|pace%?1=|
|000052c0| 9a 23 46 25 0d 05 fa 14 | 49 6e 74 53 70 61 63 65 |.#F%....|IntSpace|
|000052d0| 25 3f 32 3d 9a 23 46 25 | 0d 06 04 14 49 6e 74 53 |%?2=.#F%|....IntS|
|000052e0| 70 61 63 65 25 3f 33 3d | 9a 23 46 25 0d 06 0e 0f |pace%?3=|.#F%....|
|000052f0| 3d 21 49 6e 74 53 70 61 | 63 65 25 0d 06 40 12 dd |=!IntSpa|ce%..@..|
|00005300| a4 53 74 72 69 6e 67 49 | 6e 28 42 25 29 0d 06 4a |.StringI|n(B%)..J|
|00005310| 0b ea 20 41 24 2c 41 25 | 0d 06 54 0f e3 20 41 25 |.. A$,A%|..T.. A%|
|00005320| 3d 31 20 b8 20 42 25 0d | 06 5e 11 41 24 3d 41 24 |=1 . B%.|.^.A$=A$|
|00005330| 2b bd 28 9a 23 46 25 29 | 0d 06 68 05 ed 0d 06 72 |+.(.#F%)|..h....r|
|00005340| 07 3d 41 24 0d 06 a4 0d | dd a4 53 68 6f 72 74 49 |.=A$....|..ShortI|
|00005350| 6e 0d 06 ae 09 3d 9a 23 | 46 25 0d 07 08 0f dd f2 |n....=.#|F%......|
|00005360| 52 65 61 64 45 6e 74 72 | 79 0d 07 12 08 ea 20 4c |ReadEntr|y..... L|
|00005370| 25 0d 07 1c 10 44 61 74 | 65 25 3d a4 49 6e 74 49 |%....Dat|e%=.IntI|
|00005380| 6e 0d 07 26 19 44 65 74 | 61 69 6c 24 3d a4 53 74 |n..&.Det|ail$=.St|
|00005390| 72 69 6e 67 49 6e 28 32 | 30 29 0d 07 30 0f 43 68 |ringIn(2|0)..0.Ch|
|000053a0| 71 25 3d a4 49 6e 74 49 | 6e 0d 07 3a 15 45 6e 74 |q%=.IntI|n..:.Ent|
|000053b0| 72 69 65 73 25 3d a4 53 | 68 6f 72 74 49 6e 0d 07 |ries%=.S|hortIn..|
|000053c0| 44 15 e3 20 4c 25 3d 31 | 20 b8 20 45 6e 74 72 69 |D.. L%=1| . Entri|
|000053d0| 65 73 25 0d 07 4e 17 45 | 6e 74 25 28 4c 25 2c 30 |es%..N.E|nt%(L%,0|
|000053e0| 29 3d a4 53 68 6f 72 74 | 49 6e 0d 07 58 15 45 6e |)=.Short|In..X.En|
|000053f0| 74 25 28 4c 25 2c 31 29 | 3d a4 49 6e 74 49 6e 0d |t%(L%,1)|=.IntIn.|
|00005400| 07 62 05 ed 0d 07 6c 05 | e1 0d 07 d0 0f dd f2 4f |.b....l.|.......O|
|00005410| 70 65 6e 54 6f 45 6e 64 | 0d 07 e4 15 46 25 3d ad |penToEnd|....F%=.|
|00005420| 28 22 44 2e 41 63 63 6f | 75 6e 74 22 29 0d 07 ee |("D.Acco|unt")...|
|00005430| 0d cf 23 46 25 3d a2 23 | 46 25 0d 07 f8 05 e1 0d |..#F%=.#|F%......|
|00005440| 08 34 0c f2 53 6b 69 70 | 4f 6e 65 0d 08 3e 08 ea |.4..Skip|One..>..|
|00005450| 20 41 25 0d 08 48 10 cf | 23 46 25 3d 8f 23 46 25 | A%..H..|#F%=.#F%|
|00005460| 2b 32 38 0d 08 52 0f 41 | 25 3d a4 53 68 6f 72 74 |+28..R.A|%=.Short|
|00005470| 49 6e 0d 08 5c 12 cf 23 | 46 25 3d 8f 23 46 25 2b |In..\..#|F%=.#F%+|
|00005480| 35 2a 41 25 0d 08 66 05 | e1 0d 08 98 0b dd f2 53 |5*A%..f.|.......S|
|00005490| 65 74 55 70 0d 08 a2 08 | ea 20 41 25 0d 08 ac 15 |etUp....|. A%....|
|000054a0| 46 25 3d 8e 28 22 4e 2e | 41 63 63 6f 75 6e 74 22 |F%=.("N.|Account"|
|000054b0| 29 0d 08 b6 14 6e 75 6d | 61 63 63 25 3d a4 53 68 |)....num|acc%=.Sh|
|000054c0| 6f 72 74 49 6e 0d 08 c0 | 14 e3 20 41 25 3d 31 20 |ortIn...|.. A%=1 |
|000054d0| b8 20 6e 75 6d 61 63 63 | 25 0d 08 ca 1c 41 63 63 |. numacc|%....Acc|
|000054e0| 24 28 41 25 2c 30 29 3d | a4 53 74 72 69 6e 67 49 |$(A%,0)=|.StringI|
|000054f0| 6e 28 32 30 29 0d 08 d4 | 1b 41 63 63 24 28 41 25 |n(20)...|.Acc$(A%|
|00005500| 2c 31 29 3d a4 53 74 72 | 69 6e 67 49 6e 28 33 29 |,1)=.Str|ingIn(3)|
|00005510| 0d 08 de 05 ed 0d 08 e8 | 08 d9 23 46 25 0d 08 f2 |........|..#F%...|
|00005520| 05 e1 0d 08 fc 11 dd f2 | 4d 61 6b 65 44 65 66 61 |........|MakeDefa|
|00005530| 75 6c 74 0d 09 06 15 46 | 25 3d ae 28 22 4e 2e 41 |ult....F|%=.("N.A|
|00005540| 63 63 6f 75 6e 74 22 29 | 0d 09 10 10 f2 53 68 6f |ccount")|.....Sho|
|00005550| 72 74 4f 75 74 28 32 29 | 0d 09 1a 19 f2 53 74 72 |rtOut(2)|.....Str|
|00005560| 69 6e 67 4f 75 74 28 22 | 43 61 73 68 22 2c 32 30 |ingOut("|Cash",20|
|00005570| 29 0d 09 24 17 f2 53 74 | 72 69 6e 67 4f 75 74 28 |)..$..St|ringOut(|
|00005580| 22 43 53 48 22 2c 33 29 | 0d 09 2e 1d f2 53 74 72 |"CSH",3)|.....Str|
|00005590| 69 6e 67 4f 75 74 28 22 | 53 75 6e 64 72 69 65 73 |ingOut("|Sundries|
|000055a0| 22 2c 32 30 29 0d 09 38 | 17 f2 53 74 72 69 6e 67 |",20)..8|..String|
|000055b0| 4f 75 74 28 22 53 4e 44 | 22 2c 33 29 0d 09 42 08 |Out("SND|",3)..B.|
|000055c0| d9 23 46 25 0d 09 4c 05 | e1 0d 09 60 15 dd f2 44 |.#F%..L.|...`...D|
|000055d0| 69 73 70 6c 61 79 4c 69 | 6e 65 28 4e 25 29 0d 09 |isplayLi|ne(N%)..|
|000055e0| 65 2c e7 20 4c 69 6e 65 | 25 3e 30 20 80 20 4c 69 |e,. Line|%>0 . Li|
|000055f0| 6e 65 25 3c 3d 6e 75 6d | 61 63 63 25 20 f1 8a 30 |ne%<=num|acc% ..0|
|00005600| 2c 39 29 3b 22 20 20 82 | 22 3b 0d 09 66 23 e7 20 |,9);" .|";..f#. |
|00005610| 4c 69 6e 65 25 3d 6e 75 | 6d 61 63 63 25 2b 31 20 |Line%=nu|macc%+1 |
|00005620| f1 8a 30 2c 39 29 3b 22 | 83 2d 2d 22 3b 0d 09 6a |..0,9);"|.--";..j|
|00005630| 32 e7 20 4e 25 3e 4c 69 | 6e 65 25 20 f2 53 63 72 |2. N%>Li|ne% .Scr|
|00005640| 6f 6c 6c 55 70 3a f1 8a | 30 2c 31 38 29 3b 3a f2 |ollUp:..|0,18);:.|
|00005650| 4c 69 6e 65 50 72 69 6e | 74 28 4e 25 2b 39 29 0d |LinePrin|t(N%+9).|
|00005660| 09 74 33 e7 20 4e 25 3c | 4c 69 6e 65 25 20 f2 53 |.t3. N%<|Line% .S|
|00005670| 63 72 6f 6c 6c 44 6f 77 | 6e 3a f1 8a 30 2c 30 29 |crollDow|n:..0,0)|
|00005680| 3b 3a f2 4c 69 6e 65 50 | 72 69 6e 74 28 4e 25 2d |;:.LineP|rint(N%-|
|00005690| 39 29 0d 09 7e 37 e7 20 | 4e 25 3e 30 20 80 20 4e |9)..~7. |N%>0 . N|
|000056a0| 25 3c 3d 6e 75 6d 61 63 | 63 25 20 f1 8a 30 2c 39 |%<=numac|c% ..0,9|
|000056b0| 29 3b 22 86 22 3b bd 31 | 35 37 3b 22 84 22 3b 20 |);".";.1|57;"."; |
|000056c0| 8b 20 f1 8a 30 2c 39 29 | 3b 0d 09 83 27 e7 20 4e |. ..0,9)|;...'. N|
|000056d0| 25 3d 6e 75 6d 61 63 63 | 25 2b 31 20 f1 8a 30 2c |%=numacc|%+1 ..0,|
|000056e0| 39 29 3b 22 86 22 3b bd | 31 35 37 3b 22 87 22 3b |9);".";.|157;".";|
|000056f0| 0d 09 88 05 e1 0d 09 c4 | 0e dd f2 53 63 72 6f 6c |........|...Scrol|
|00005700| 6c 55 70 0d 09 ce 10 f1 | 8a 33 39 2c 31 38 29 3b |lUp.....|.39,18);|
|00005710| bd 39 3b 0d 09 d8 05 e1 | 0d 09 f6 10 dd f2 53 63 |.9;.....|......Sc|
|00005720| 72 6f 6c 6c 44 6f 77 6e | 0d 0a 00 0e f1 8a 30 2c |rollDown|......0,|
|00005730| 30 29 3b bd 38 3b 0d 0a | 0a 05 e1 0d 0a 28 13 dd |0);.8;..|.....(..|
|00005740| f2 4c 69 6e 65 50 72 69 | 6e 74 28 4e 25 29 0d 0a |.LinePri|nt(N%)..|
|00005750| 32 36 e7 20 4e 25 3c 31 | 20 f1 22 81 2b 2b 2b 2b |26. N%<1| .".++++|
|00005760| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 2b 2b 2b |++++++++|++++++++|
|00005770| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 2b 2b 2b |++++++++|++++++++|
|00005780| 2b 2b 22 3b 0d 0a 3c 47 | e7 20 4e 25 3d 6e 75 6d |++";..<G|. N%=num|
|00005790| 61 63 63 25 2b 31 20 80 | 20 4e 25 3c 32 35 36 20 |acc%+1 .| N%<256 |
|000057a0| f1 22 83 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 4e 65 |.".-----|----- Ne|
|000057b0| 77 20 41 63 63 6f 75 6e | 74 20 48 65 72 65 20 2d |w Accoun|t Here -|
|000057c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 22 3b 0d 0a 41 47 e7 |--------|-";..AG.|
|000057d0| 20 4e 25 3d 6e 75 6d 61 | 63 63 25 2b 31 20 80 20 | N%=numa|cc%+1 . |
|000057e0| 4e 25 3e 32 35 35 20 f1 | 22 83 2d 2d 2d 2d 2d 2d |N%>255 .|".------|
|000057f0| 2d 2d 2d 2d 2d 20 4e 6f | 20 4d 6f 72 65 20 53 70 |----- No| More Sp|
|00005800| 61 63 65 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ace ----|--------|
|00005810| 22 3b 0d 0a 46 3e e7 20 | 4e 25 3e 6e 75 6d 61 63 |";..F>. |N%>numac|
|00005820| 63 25 2b 31 20 f1 22 81 | 2b 2b 2b 2b 2b 2b 2b 2b |c%+1 .".|++++++++|
|00005830| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 2b 2b 2b |++++++++|++++++++|
|00005840| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 2b 22 3b |++++++++|++++++";|
|00005850| 0d 0a 50 42 e7 20 4e 25 | 3e 30 20 80 20 4e 25 3c |..PB. N%|>0 . N%<|
|00005860| 3d 6e 75 6d 61 63 63 25 | 20 f1 22 20 82 20 22 3b |=numacc%| ." . ";|
|00005870| 41 63 63 24 28 4e 25 2c | 31 29 3b 22 20 20 20 20 |Acc$(N%,|1);" |
|00005880| 20 20 20 20 20 22 3b 41 | 63 63 24 28 4e 25 2c 30 | ";A|cc$(N%,0|
|00005890| 29 3b 0d 0a 5a 05 e1 0d | 0a 8c 10 dd f2 43 68 61 |);..Z...|.....Cha|
|000058a0| 6e 67 65 28 4e 25 29 0d | 0a 96 c1 e7 20 4e 25 3e |nge(N%).|.... N%>|
|000058b0| 6e 75 6d 61 63 63 25 20 | 6e 75 6d 61 63 63 25 3d |numacc% |numacc%=|
|000058c0| 6e 75 6d 61 63 63 25 2b | 31 3a f1 8a 30 2c 31 30 |numacc%+|1:..0,10|
|000058d0| 29 3b 22 83 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 4e |);".----|------ N|
|000058e0| 65 77 20 41 63 63 6f 75 | 6e 74 20 48 65 72 65 20 |ew Accou|nt Here |
|000058f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 22 3b 3a f1 8a 30 |--------|--";:..0|
|00005900| 2c 39 29 3b 22 86 22 3b | bd 31 35 37 3b 22 84 58 |,9);".";|.157;".X|
|00005910| 58 58 20 20 20 20 20 20 | 20 20 20 78 78 78 78 78 |XX | xxxxx|
|00005920| 78 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |x | |
|00005930| 20 20 20 22 3b 3a 41 63 | 63 24 28 4e 25 2c 31 29 | ";:Ac|c$(N%,1)|
|00005940| 3d 22 58 58 58 22 3a 41 | 63 63 24 28 4e 25 2c 30 |="XXX":A|cc$(N%,0|
|00005950| 29 3d 22 78 78 78 78 78 | 78 20 20 20 20 20 20 20 |)="xxxxx|x |
|00005960| 20 20 20 20 20 20 20 22 | 0d 0a 9b 3f e7 20 4e 25 | "|...?. N%|
|00005970| 3d 32 35 35 20 f1 8a 30 | 2c 31 30 29 3b 22 83 2d |=255 ..0|,10);".-|
|00005980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 20 4e 6f 20 4d 6f |--------|-- No Mo|
|00005990| 72 65 20 53 70 61 63 65 | 20 2d 2d 2d 2d 2d 2d 2d |re Space| -------|
|000059a0| 2d 2d 2d 2d 2d 22 3b 0d | 0a a0 18 f1 8a 30 2c 39 |-----";.|.....0,9|
|000059b0| 29 3b 22 87 22 3b bd 31 | 35 37 3b 22 84 22 3b 0d |);".";.1|57;".";.|
|000059c0| 0a aa 05 f5 0d 0a b4 08 | 41 25 3d a5 0d 0a b5 26 |........|A%=....&|
|000059d0| e7 20 41 25 3d 31 32 37 | 20 41 25 3d 31 33 36 3a |. A%=127| A%=136:|
|000059e0| f2 45 64 69 74 4e 61 6d | 65 28 b1 2c 33 32 2c 4e |.EditNam|e(.,32,N|
|000059f0| 25 29 0d 0a b6 2e e7 20 | 41 25 3e 33 32 20 80 20 |%)..... |A%>32 . |
|00005a00| 41 25 3c 31 32 37 20 f2 | 45 64 69 74 4e 61 6d 65 |A%<127 .|EditName|
|00005a10| 28 b1 2c 41 25 2c 4e 25 | 29 3a 41 25 3d 31 33 37 |(.,A%,N%|):A%=137|
|00005a20| 0d 0a be 2c e7 20 41 25 | 3d 31 33 37 20 80 20 b1 |...,. A%|=137 . .|
|00005a30| 3c 33 34 20 ef 39 3a e7 | 20 b1 3e 35 20 80 20 b1 |<34 .9:.| .>5 . .|
|00005a40| 3c 31 35 20 f1 8a 31 35 | 2c 39 29 3b 0d 0a c8 2a |<15 ..15|,9);...*|
|00005a50| e7 20 41 25 3d 31 33 36 | 20 80 20 b1 3e 33 20 ef |. A%=136| . .>3 .|
|00005a60| 38 3a e7 20 b1 3c 31 35 | 20 80 20 b1 3e 35 20 f1 |8:. .<15| . .>5 .|
|00005a70| 8a 35 2c 39 29 3b 0d 0a | dc 1d fd 20 41 25 3d 31 |.5,9);..|... A%=1|
|00005a80| 33 20 84 20 41 25 3d 31 | 33 38 20 84 20 41 25 3d |3 . A%=1|38 . A%=|
|00005a90| 31 33 39 0d 0a e6 18 f1 | 8a 30 2c 39 29 3b 22 86 |139.....|.0,9);".|
|00005aa0| 22 3b bd 31 35 37 3b 22 | 84 22 3b 0d 0a eb 05 e1 |";.157;"|.";.....|
|00005ab0| 0d 0a f0 18 dd f2 45 64 | 69 74 4e 61 6d 65 28 50 |......Ed|itName(P|
|00005ac0| 25 2c 41 25 2c 4e 25 29 | 0d 0a fa 0c f1 bd 41 25 |%,A%,N%)|......A%|
|00005ad0| 3b bd 38 3b 0d 0b 04 3e | e7 20 50 25 3c 3d 35 20 |;.8;...>|. P%<=5 |
|00005ae0| 41 63 63 24 28 4e 25 2c | 31 29 3d c0 41 63 63 24 |Acc$(N%,|1)=.Acc$|
|00005af0| 28 4e 25 2c 31 29 2c 50 | 25 2d 33 29 2b bd 41 25 |(N%,1),P|%-3)+.A%|
|00005b00| 2b c2 41 63 63 24 28 4e | 25 2c 31 29 2c 35 2d 50 |+.Acc$(N|%,1),5-P|
|00005b10| 25 29 0d 0b 0e 41 e7 20 | 50 25 3e 3d 31 35 20 41 |%)...A. |P%>=15 A|
|00005b20| 63 63 24 28 4e 25 2c 30 | 29 3d c0 41 63 63 24 28 |cc$(N%,0|)=.Acc$(|
|00005b30| 4e 25 2c 30 29 2c 50 25 | 2d 31 35 29 2b bd 41 25 |N%,0),P%|-15)+.A%|
|00005b40| 2b c2 41 63 63 24 28 4e | 25 2c 30 29 2c 33 34 2d |+.Acc$(N|%,0),34-|
|00005b50| 50 25 29 0d 0b 18 05 e1 | 0d 0b 54 0c dd f2 44 65 |P%).....|..T...De|
|00005b60| 6c 65 74 65 0d 0b 59 08 | ea 20 41 25 0d 0b 5a 17 |lete..Y.|. A%..Z.|
|00005b70| e7 20 4c 69 6e 65 25 3d | 6e 75 6d 61 63 63 25 2b |. Line%=|numacc%+|
|00005b80| 31 20 e1 0d 0b 5b 30 e7 | 20 41 63 63 24 28 4c 69 |1 ...[0.| Acc$(Li|
|00005b90| 6e 65 25 2c 31 29 3d 22 | 58 58 58 22 20 80 20 4c |ne%,1)="|XXX" . L|
|00005ba0| 69 6e 65 25 3d 6e 75 6d | 61 63 63 25 20 e5 20 8d |ine%=num|acc% . .|
|00005bb0| 44 7c 4b 0d 0b 5e 3c f1 | 8a 30 2c 39 29 3b 22 81 |D|K..^<.|.0,9);".|
|00005bc0| 22 3b bd 31 35 37 3b 22 | 87 20 20 44 65 6c 65 74 |";.157;"|. Delet|
|00005bd0| 65 20 3a 20 41 72 65 20 | 79 6f 75 20 73 75 72 65 |e : Are |you sure|
|00005be0| 20 28 79 2f 6e 29 20 3f | 20 20 20 20 20 22 3b 0d | (y/n) ?| ";.|
|00005bf0| 0b 68 59 41 25 3d a5 3a | e7 20 41 25 3d 97 28 22 |.hYA%=.:|. A%=.("|
|00005c00| 59 22 29 20 84 20 41 25 | 3d 97 28 22 79 22 29 20 |Y") . A%|=.("y") |
|00005c10| 41 63 63 24 28 4c 69 6e | 65 25 2c 30 29 3d 22 78 |Acc$(Lin|e%,0)="x|
|00005c20| 78 78 78 78 78 20 20 20 | 20 20 20 20 20 20 20 20 |xxxxx | |
|00005c30| 20 20 20 22 3a 41 63 63 | 24 28 4c 69 6e 65 25 2c | ":Acc|$(Line%,|
|00005c40| 31 29 3d 22 58 58 58 22 | 0d 0b 72 40 f1 8a 30 2c |1)="XXX"|..r@..0,|
|00005c50| 39 29 3b 22 86 22 3b bd | 31 35 37 3b 22 84 22 3b |9);".";.|157;".";|
|00005c60| 41 63 63 24 28 4c 69 6e | 65 25 2c 31 29 3b 22 20 |Acc$(Lin|e%,1);" |
|00005c70| 20 20 20 20 20 20 20 20 | 22 3b 41 63 63 24 28 4c | |";Acc$(L|
|00005c80| 69 6e 65 25 2c 30 29 3b | 0d 0b 7c a7 e7 20 41 63 |ine%,0);|..|.. Ac|
|00005c90| 63 24 28 4c 69 6e 65 25 | 2c 31 29 3d 22 58 58 58 |c$(Line%|,1)="XXX|
|00005ca0| 22 20 80 20 4c 69 6e 65 | 25 3d 6e 75 6d 61 63 63 |" . Line|%=numacc|
|00005cb0| 25 20 6e 75 6d 61 63 63 | 25 3d 6e 75 6d 61 63 63 |% numacc|%=numacc|
|00005cc0| 25 2d 31 3a f1 8a 30 2c | 39 29 3b 22 86 22 3b bd |%-1:..0,|9);".";.|
|00005cd0| 31 35 37 3b 22 84 2d 2d | 2d 2d 2d 2d 2d 2d 20 4e |157;".--|------ N|
|00005ce0| 65 77 20 41 63 63 6f 75 | 6e 74 20 48 65 72 65 20 |ew Accou|nt Here |
|00005cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 22 3b 3a f1 8a 30 |--------|--";:..0|
|00005d00| 2c 31 30 29 3b 22 81 2b | 2b 2b 2b 2b 2b 2b 2b 2b |,10);".+|++++++++|
|00005d10| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 2b 2b 2b |++++++++|++++++++|
|00005d20| 2b 2b 2b 2b 2b 2b 2b 2b | 2b 2b 2b 2b 2b 22 3b 0d |++++++++|+++++";.|
|00005d30| 0b 81 0e f1 8a 33 2c 39 | 29 3b 22 22 3b 0d 0b 86 |.....3,9|);"";...|
|00005d40| 05 e1 0d ff 46 69 6c 65 | 44 61 74 61 82 53 68 6f |....File|Data.Sho|
|00005d50| 77 00 00 00 00 00 00 00 | 21 16 00 00 44 fb ff ff |w.......|!...D...|
|00005d60| b6 e7 4e 2f 03 00 ba 37 | 0d 00 0a 1c f4 20 41 63 |..N/...7|..... Ac|
|00005d70| 63 6f 75 6e 74 73 20 49 | 49 2d 20 53 68 6f 77 20 |counts I|I- Show |
|00005d80| 4c 69 73 74 0d 00 14 18 | f4 20 28 43 29 20 31 39 |List....|. (C) 19|
|00005d90| 38 39 20 41 2e 20 48 75 | 72 6c 65 79 0d 00 1e 1a |89 A. Hu|rley....|
|00005da0| f4 20 42 65 74 65 6c 67 | 65 75 73 65 20 43 6f 6d |. Betelg|euse Com|
|00005db0| 70 75 74 69 6e 67 0d 00 | 28 11 de 20 49 6e 74 53 |puting..|(.. IntS|
|00005dc0| 70 61 63 65 25 20 34 0d | 00 32 11 de 20 45 6e 74 |pace% 4.|.2.. Ent|
|00005dd0| 25 28 32 35 36 2c 31 29 | 0d 00 37 11 de 20 41 63 |%(256,1)|..7.. Ac|
|00005de0| 63 24 28 32 35 36 2c 31 | 29 0d 00 38 1e de 20 50 |c$(256,1|)..8.. P|
|00005df0| 6f 73 69 74 25 28 31 30 | 30 30 29 3a 50 6f 73 69 |osit%(10|00):Posi|
|00005e00| 74 25 28 30 29 3d 30 0d | 00 39 1a de 20 42 61 6c |t%(0)=0.|.9.. Bal|
|00005e10| 25 28 31 30 30 30 29 3a | 42 61 6c 25 28 30 29 3d |%(1000):|Bal%(0)=|
|00005e20| 30 0d 00 3c 10 44 61 74 | 65 25 3d 38 39 30 33 32 |0..<.Dat|e%=89032|
|00005e30| 31 0d 00 46 21 44 65 74 | 61 69 6c 24 3d 22 4e 6f |1..F!Det|ail$="No|
|00005e40| 20 44 65 74 61 69 6c 73 | 20 44 65 66 69 6e 65 64 | Details| Defined|
|00005e50| 21 22 0d 00 50 0e 45 6e | 74 72 69 65 73 25 3d 31 |!"..P.En|tries%=1|
|00005e60| 0d 00 5a 0a 43 68 71 25 | 3d 30 0d 00 64 06 eb 37 |..Z.Chq%|=0..d..7|
|00005e70| 0d 00 69 0c 2a 46 58 32 | 32 30 2c 34 0d 00 6a 0a |..i.*FX2|20,4..j.|
|00005e80| 2a 46 58 34 2c 31 0d 00 | 6e 28 f1 bd 31 35 37 3b |*FX4,1..|n(..157;|
|00005e90| bd 31 34 31 3b 22 81 20 | 20 20 20 20 20 20 20 20 |.141;". | |
|00005ea0| 20 20 41 63 63 6f 75 6e | 74 73 20 49 49 22 0d 00 | Accoun|ts II"..|
|00005eb0| 78 28 f1 bd 31 35 37 3b | bd 31 34 31 3b 22 81 20 |x(..157;|.141;". |
|00005ec0| 20 20 20 20 20 20 20 20 | 20 20 41 63 63 6f 75 6e | | Accoun|
|00005ed0| 74 73 20 49 49 22 0d 00 | 82 2e f1 bd 31 35 37 3b |ts II"..|....157;|
|00005ee0| 22 86 20 20 20 28 43 29 | 20 31 39 38 39 20 20 42 |". (C)| 1989 B|
|00005ef0| 65 74 65 6c 67 65 75 73 | 65 20 43 6f 6d 70 75 74 |etelgeus|e Comput|
|00005f00| 69 6e 67 22 0d 00 87 05 | f1 0d 00 8c 27 f1 bd 31 |ing"....|....'..1|
|00005f10| 34 31 3b 22 85 20 20 20 | 20 20 20 20 20 20 53 68 |41;". | Sh|
|00005f20| 6f 77 20 54 72 61 6e 73 | 61 63 74 69 6f 6e 73 22 |ow Trans|actions"|
|00005f30| 0d 00 96 27 f1 bd 31 34 | 31 3b 22 85 20 20 20 20 |...'..14|1;". |
|00005f40| 20 20 20 20 20 53 68 6f | 77 20 54 72 61 6e 73 61 | Sho|w Transa|
|00005f50| 63 74 69 6f 6e 73 22 0d | 00 a0 11 ef 32 38 2c 30 |ctions".|....28,0|
|00005f60| 2c 32 34 2c 33 39 2c 36 | 0d 00 be 0a f2 53 65 74 |,24,39,6|.....Set|
|00005f70| 55 70 0d 00 c8 15 46 25 | 3d 8e 28 22 44 2e 41 63 |Up....F%|=.("D.Ac|
|00005f80| 63 6f 75 6e 74 22 29 0d | 00 d2 13 4e 25 3d 2d 31 |count").|...N%=-1|
|00005f90| 3a f5 3a 4e 25 3d 4e 25 | 2b 31 0d 00 dc 0e f2 52 |:.:N%=N%|+1.....R|
|00005fa0| 65 61 64 45 6e 74 72 79 | 0d 00 dd 33 e7 20 44 61 |eadEntry|...3. Da|
|00005fb0| 74 65 25 3c 30 20 80 20 | c5 23 46 25 20 50 6f 73 |te%<0 . |.#F% Pos|
|00005fc0| 69 74 25 28 4e 25 29 3d | 8f 23 46 25 3a 4e 25 3d |it%(N%)=|.#F%:N%=|
|00005fd0| 4e 25 2d 31 3a e5 20 8d | 64 70 40 0d 00 e1 24 e7 |N%-1:. .|dp@...$.|
|00005fe0| 20 44 61 74 65 25 3c 30 | 20 50 6f 73 69 74 25 28 | Date%<0| Posit%(|
|00005ff0| 4e 25 29 3d 8f 23 46 25 | 3a e5 20 8d 64 5c 40 0d |N%)=.#F%|:. .d\@.|
|00006000| 00 e6 15 50 6f 73 69 74 | 25 28 4e 25 2b 31 29 3d |...Posit|%(N%+1)=|
|00006010| 8f 23 46 25 0d 00 eb 1c | 42 61 6c 25 28 4e 25 2b |.#F%....|Bal%(N%+|
|00006020| 31 29 3d 42 61 6c 25 28 | 4e 25 29 2b 74 6f 74 25 |1)=Bal%(|N%)+tot%|
|00006030| 0d 00 f0 0a fd 20 c5 23 | 46 25 0d 00 f5 22 54 25 |..... .#|F%..."T%|
|00006040| 3d 4e 25 3a e7 20 4e 25 | 3e 3d 31 38 20 4e 25 3d |=N%:. N%|>=18 N%=|
|00006050| 4e 25 2d 31 38 20 8b 20 | 4e 25 3d 30 0d 00 fa 05 |N%-18 . |N%=0....|
|00006060| f5 0d 01 04 13 f2 53 63 | 72 65 65 6e 46 75 6c 6c |......Sc|reenFull|
|00006070| 28 4e 25 29 0d 01 0e 08 | 41 25 3d a5 0d 01 18 15 |(N%)....|A%=.....|
|00006080| e7 20 41 25 3d 31 33 39 | 20 4e 25 3d 4e 25 2d 31 |. A%=139| N%=N%-1|
|00006090| 30 0d 01 22 29 e7 20 41 | 25 3d 31 33 38 20 4e 25 |0.."). A|%=138 N%|
|000060a0| 3d 4e 25 2b 31 30 3a e7 | 20 4e 25 2b 31 38 3e 54 |=N%+10:.| N%+18>T|
|000060b0| 25 20 4e 25 3d 54 25 2d | 31 38 0d 01 2c 0f e7 20 |% N%=T%-|18..,.. |
|000060c0| 4e 25 3c 30 20 4e 25 3d | 30 0d 01 31 1b e7 20 41 |N%<0 N%=|0..1.. A|
|000060d0| 25 3d 36 34 20 f2 44 75 | 6d 70 53 63 72 65 65 6e |%=64 .Du|mpScreen|
|000060e0| 28 4e 25 29 0d 01 36 0b | fd 20 41 25 3d 32 37 0d |(N%)..6.|. A%=27.|
|000060f0| 01 40 08 d9 23 46 25 0d | 01 4a 0d d7 22 41 2e 4d |.@..#F%.|.J.."A.M|
|00006100| 65 6e 75 22 0d 01 90 14 | dd f2 53 63 72 65 65 6e |enu"....|..Screen|
|00006110| 46 75 6c 6c 28 41 25 29 | 0d 01 9a 0a ea 20 42 25 |Full(A%)|..... B%|
|00006120| 3a db 0d 01 a4 13 e3 20 | 42 25 3d 41 25 20 b8 20 |:...... |B%=A% . |
|00006130| 41 25 2b 31 38 0d 01 ae | 16 e7 20 42 25 3e 54 25 |A%+18...|.. B%>T%|
|00006140| 20 f1 22 22 3a e5 20 8d | 64 6a 41 0d 01 b8 1e cf | ."":. .|djA.....|
|00006150| 23 46 25 3d 50 6f 73 69 | 74 25 28 42 25 29 3a f2 |#F%=Posi|t%(B%):.|
|00006160| 52 65 61 64 45 6e 74 72 | 79 0d 01 c2 75 f1 8a 30 |ReadEntr|y...u..0|
|00006170| 29 3b c0 a4 44 69 73 44 | 61 74 65 28 44 61 74 65 |);..DisD|ate(Date|
|00006180| 25 29 2c 35 29 3b 22 20 | 22 3b c0 44 65 74 61 69 |%),5);" |";.Detai|
|00006190| 6c 24 2c 31 32 29 3b c2 | 22 20 20 20 20 20 20 20 |l$,12);.|" |
|000061a0| 20 20 20 22 2b a4 44 69 | 73 41 6d 28 74 6f 74 25 | "+.Di|sAm(tot%|
|000061b0| 29 2c 31 30 29 3b c2 22 | 20 20 20 20 20 20 20 20 |),10);."| |
|000061c0| 20 20 22 2b a4 44 69 73 | 41 6d 28 42 61 6c 25 28 | "+.Dis|Am(Bal%(|
|000061d0| 42 25 29 2b 74 6f 74 25 | 29 2c 31 31 29 3b 0d 01 |B%)+tot%|),11);..|
|000061e0| ea 05 ed 0d 01 ef 05 e1 | 0d 01 f4 14 dd f2 44 75 |........|......Du|
|000061f0| 6d 70 53 63 72 65 65 6e | 28 41 25 29 0d 01 fe 08 |mpScreen|(A%)....|
|00006200| ea 20 42 25 0d 02 08 13 | ef 32 38 2c 33 39 2c 32 |. B%....|.28,39,2|
|00006210| 30 2c 33 39 2c 32 30 0d | 02 12 11 2a 53 50 4f 4f |0,39,20.|...*SPOO|
|00006220| 4c 20 4f 75 74 50 75 74 | 0d 02 17 1c f1 bd 28 26 |L OutPut|......(&|
|00006230| 31 66 29 3b 22 30 37 30 | 30 30 30 30 30 33 30 35 |1f);"070|00000305|
|00006240| 38 30 30 22 0d 02 18 1d | f1 bd 28 26 31 66 29 3b |800"....|..(&1f);|
|00006250| 22 31 22 3b bd 28 26 31 | 66 29 3b bd 28 26 31 66 |"1";.(&1|f);.(&1f|
|00006260| 29 0d 02 18 1d f1 bd 28 | 26 31 66 29 3b 22 32 22 |)......(|&1f);"2"|
|00006270| 3b bd 28 26 31 66 29 3b | bd 28 26 31 66 29 0d 02 |;.(&1f);|.(&1f)..|
|00006280| 19 16 f1 bd 28 26 31 66 | 29 3b 22 46 30 31 31 30 |....(&1f|);"F0110|
|00006290| 30 33 30 22 0d 02 1c 17 | f1 bd 28 26 31 66 29 3b |030"....|..(&1f);|
|000062a0| 22 39 5b 2e 2e 2e 5d 32 | 30 31 22 0d 02 26 21 f1 |"9[...]2|01"..&!.|
|000062b0| 22 54 72 61 6e 73 61 63 | 74 69 6f 6e 20 42 6f 6f |"Transac|tion Boo|
|000062c0| 6b 20 3a 20 22 3b 3a 2a | 54 49 4d 45 0d 02 3a 6f |k : ";:*|TIME..:o|
|000062d0| f1 27 22 20 20 44 61 74 | 65 22 3b 8a 31 30 29 3b |.'" Dat|e";.10);|
|000062e0| 22 44 65 74 61 69 6c 73 | 22 3b 8a 33 31 29 3b 22 |"Details|";.31);"|
|000062f0| 54 79 70 65 2f 4e 6f 2e | 22 3b 8a 34 32 29 3b 22 |Type/No.|";.42);"|
|00006300| 20 20 20 20 20 20 20 20 | 20 44 65 62 69 74 22 3b | | Debit";|
|00006310| 8a 35 37 29 3b 22 20 20 | 20 20 20 20 20 20 43 72 |.57);" | Cr|
|00006320| 65 64 69 74 22 3b 8a 37 | 32 29 3b 22 20 20 20 20 |edit";.7|2);" |
|00006330| 20 20 20 42 61 6c 61 6e | 63 65 22 0d 02 44 05 f1 | Balan|ce"..D..|
|00006340| 0d 02 49 09 42 25 3d 41 | 25 0d 02 4e 05 f5 0d 02 |..I.B%=A|%..N....|
|00006350| 50 16 e7 20 42 25 3e 54 | 25 20 f1 22 22 3a e5 20 |P.. B%>T|% ."":. |
|00006360| 8d 44 76 42 0d 02 53 1e | cf 23 46 25 3d 50 6f 73 |.DvB..S.|.#F%=Pos|
|00006370| 69 74 25 28 42 25 29 3a | f2 52 65 61 64 45 6e 74 |it%(B%):|.ReadEnt|
|00006380| 72 79 0d 02 58 42 f1 8a | 30 29 3b a4 44 69 73 44 |ry..XB..|0);.DisD|
|00006390| 61 74 65 28 44 61 74 65 | 25 29 3b 8a 31 30 29 3b |ate(Date|%);.10);|
|000063a0| 44 65 74 61 69 6c 24 3b | 8a 33 32 29 3b c2 22 20 |Detail$;|.32);." |
|000063b0| 22 2b a4 44 69 73 54 79 | 70 65 28 43 68 71 25 29 |"+.DisTy|pe(Chq%)|
|000063c0| 2c 36 29 3b 0d 02 62 3c | e7 20 74 6f 74 25 3e 3d |,6);..b<|. tot%>=|
|000063d0| 30 20 f1 8a 35 37 29 3b | a4 44 75 6d 70 41 6d 28 |0 ..57);|.DumpAm(|
|000063e0| 74 6f 74 25 29 3b 20 8b | 20 f1 8a 34 32 29 3b a4 |tot%); .| ..42);.|
|000063f0| 44 75 6d 70 41 6d 28 94 | 28 74 6f 74 25 29 29 3b |DumpAm(.|(tot%));|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.