B2
FILE INFORMATION
FILENAME(S): B2
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 18:12:59
APPEARS ON: 1 disk(s)
FILE HASH
0c7206b15d170ac4e6997d7490eb26ca2077f5e2fccad7a40d75b5925d2552cc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NOVEMBER DISK | B2 | PRG | Sailor, Ganheden | 28 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 10 30 10 02 00 58 B2 31 3A 8F 20 4D 41 4B 45 |..0...X.1:. MAKE|
00000010: 20 58 3D 30 20 46 4F 52 20 54 41 50 45 2C 4F 52 | X=0 FOR TAPE,OR|
00000020: 20 58 3D 31 20 54 4F 20 55 53 45 20 44 49 53 4B | X=1 TO USE DISK|
00000030: 00 72 10 03 00 54 24 B2 22 93 20 20 1E 12 20 92 |.r...T$.". .. .|
00000040: 2A 12 20 92 20 C2 D5 C4 C7 C5 D4 C5 C5 D2 20 12 |*. . ......... .|
00000050: 20 92 2A 12 20 92 1F 22 3A 99 C7 28 31 34 29 3B | .*. ..":..(14);|
00000060: 3A 97 33 36 38 37 38 2C 31 35 3A 53 B2 33 36 38 |:.36878,15:S.368|
00000070: 37 34 00 AB 10 04 00 86 41 24 28 31 31 29 2C 41 |74......A$(11),A|
00000080: 28 31 31 29 2C 42 25 28 31 31 29 3A 96 20 A5 52 |(11),B%(11):. .R|
00000090: 28 58 29 B2 B5 28 58 AC 31 30 30 AA 2E 35 29 AD |(X)..(X.100..5).|
000000A0: 31 30 30 3A 99 54 24 3A 99 3A 99 00 CD 10 05 00 |100:.T$:.:......|
000000B0: 99 3A 99 3A 85 22 D4 4F 44 41 59 27 53 20 C4 41 |.:.:.".ODAY'S .A|
000000C0: 54 45 22 3B 44 44 24 3A 99 3A 89 32 30 00 EF 10 |TE";DD$:.:.20...|
000000D0: 06 00 99 54 24 3A 99 22 C4 41 54 45 3A 22 44 24 |...T$:.".ATE:"D$|
000000E0: 3A 99 22 CC 41 53 54 20 C1 4D 54 3A 24 22 41 00 |:.".AST .MT:$"A.|
000000F0: 24 11 07 00 8D 31 32 3A 99 3A 81 52 B2 31 A4 39 |$....12:.:.R.1.9|
00000100: 3A 99 22 1C 22 52 22 9D 2E 2E 1E 22 41 24 28 52 |:."."R"...."A$(R|
00000110: 29 22 2E 2E 24 1F 22 A3 42 25 28 52 29 29 41 28 |)"..$.".B%(R))A(|
00000120: 52 29 3A 82 00 4D 11 08 00 99 22 1C 31 30 2E 2E |R):..M....".10..|
00000130: 1E 22 41 24 28 31 30 29 22 2E 2E 24 1F 22 A3 42 |."A$(10)"..$.".B|
00000140: 25 28 31 30 29 29 41 28 31 30 29 3A 99 00 77 11 |%(10))A(10):..w.|
00000150: 09 00 99 22 1C 31 31 2E 2E 1E 22 41 24 28 31 31 |...".11..."A$(11|
00000160: 29 22 2E 24 1F 22 A3 42 25 28 31 31 29 29 41 28 |)".$.".B%(11))A(|
00000170: 31 31 29 3A 99 3A 8E 00 9D 11 0A 00 97 53 2C 32 |11):.:.......S,2|
00000180: 31 32 3A 81 4D B2 31 A4 31 35 30 3A 82 3A 97 53 |12:.M.1.150:.:.S|
00000190: 2C 30 3A 81 4D B2 31 A4 31 30 30 3A 82 00 BA 11 |,0:.M.1.100:....|
000001A0: 0B 00 97 53 2C 32 30 31 3A 81 4D B2 31 A4 32 30 |...S,201:.M.1.20|
000001B0: 30 3A 82 3A 97 53 2C 30 3A 8E 00 C6 11 0C 00 81 |0:.:.S,0:.......|
000001C0: 52 B2 31 A4 31 31 00 F0 11 0D 00 8B B6 28 41 28 |R.1.11.......(A(|
000001D0: 52 29 29 B2 B1 31 A7 42 25 28 52 29 B2 31 36 AB |R))..1.B%(R).16.|
000001E0: C3 28 C4 28 B5 28 B6 28 41 28 52 29 29 29 29 29 |.(.(.(.(A(R)))))|
000001F0: 00 08 12 0E 00 8B B6 28 41 28 52 29 29 B3 31 A7 |.......(A(R)).1.|
00000200: 42 25 28 52 29 B2 31 35 00 10 12 0F 00 82 3A 8E |B%(R).15......:.|
00000210: 00 25 12 14 00 81 52 B2 31 A4 31 31 3A 87 41 24 |.%....R.1.11:.A$|
00000220: 28 52 29 3A 82 00 4D 12 15 00 83 22 C8 CF D5 D3 |(R):..M...."....|
00000230: 22 2C 22 D5 D4 C9 CC 22 2C 22 C9 CE D3 D5 22 2C |","....","....",|
00000240: 22 C2 C1 CE CB 22 2C 22 CD C3 2F D6 22 00 7C 12 |"....","../.".|.|
00000250: 16 00 83 22 D6 C1 C3 C1 22 2C 22 CD C5 C4 C9 22 |..."....","...."|
00000260: 2C 22 C2 CF CF CB 22 2C 22 C3 C8 C7 C5 22 2C 22 |,"....","....","|
00000270: CD C9 D3 C3 22 2C 22 C3 C8 C2 CB 22 00 85 12 19 |....","...."....|
00000280: 00 8D 32 35 30 00 AD 12 1C 00 8B 20 58 20 A7 20 |..250...... X . |
00000290: 9F 31 2C 38 2C 32 2C 22 30 3A 43 48 42 4B 46 49 |.1,8,2,"0:CHBKFI|
000002A0: 4C 45 2C 52 45 41 44 22 3A 89 20 33 37 00 E9 12 |LE,READ":. 37...|
000002B0: 1E 00 99 22 C9 4E 53 45 52 54 20 44 41 54 41 20 |...".NSERT DATA |
000002C0: 43 41 53 53 45 54 54 45 20 20 41 4E 44 20 52 45 |CASSETTE AND RE|
000002D0: 57 49 4E 44 20 54 4F 20 52 45 41 44 20 20 20 20 |WIND TO READ |
000002E0: 42 41 4C 41 4E 43 45 53 2E 00 04 13 1F 00 97 53 |BALANCES.......S|
000002F0: 2C 32 34 30 3A 81 4D B2 31 A4 33 30 30 3A 82 3A |,240:.M.1.300:.:|
00000300: 97 53 2C 30 00 1D 13 20 00 99 3A 99 22 D2 45 41 |.S,0... ..:.".EA|
00000310: 44 59 3F 2E 2E 2E D0 52 45 53 53 20 D9 00 2F 13 |DY?....RESS ../.|
00000320: 21 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 33 33 00 |!..A$:.A$."".33.|
00000330: 3D 13 22 00 8B 41 24 B2 22 4E 22 A7 80 00 4D 13 |=."..A$."N"...M.|
00000340: 23 00 8B 41 24 B3 B1 22 59 22 A7 33 30 00 63 13 |#..A$.."Y".30.c.|
00000350: 24 00 9F 31 2C 31 2C 30 2C 22 43 48 42 4B 46 49 |$..1,1,0,"CHBKFI|
00000360: 4C 45 22 00 82 13 25 00 81 52 B2 31 A4 31 31 3A |LE"...%..R.1.11:|
00000370: 84 31 2C 41 28 52 29 3A 82 3A 84 31 2C 44 24 3A |.1,A(R):.:.1,D$:|
00000380: A0 31 00 89 13 28 00 8D 36 00 B4 13 32 00 99 22 |.1...(..6...2.."|
00000390: D4 52 41 4E 53 41 43 54 49 4F 4E 3F 20 20 D9 2F |.RANSACTION? ./|
000003A0: CE 22 3A 97 53 2C 32 34 35 3A 81 4D B2 31 A4 32 |.":.S,245:.M.1.2|
000003B0: 30 30 3A 82 00 DF 13 33 00 97 53 2C 30 3A 81 4D |00:....3..S,0:.M|
000003C0: B2 31 A4 31 30 30 3A 82 3A 97 53 2C 32 33 35 3A |.1.100:.:.S,235:|
000003D0: 81 4D B2 31 A4 32 30 30 3A 82 3A 97 53 2C 30 00 |.M.1.200:.:.S,0.|
000003E0: F1 13 34 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 35 |..4..A$:.A$."".5|
000003F0: 32 00 00 14 35 00 8B 41 24 B2 22 59 22 A7 37 30 |2...5..A$."Y".70|
00000400: 00 10 14 36 00 8B 41 24 B2 22 4E 22 A7 31 38 30 |...6..A$."N".180|
00000410: 00 1F 14 37 00 8D 31 30 3A 81 52 B2 31 A4 33 00 |...7..10:.R.1.3.|
00000420: 4D 14 38 00 99 22 13 11 11 11 11 11 11 11 11 11 |M.8.."..........|
00000430: 11 11 11 11 11 11 11 11 22 A6 31 34 29 22 20 20 |........".14)" |
00000440: 20 22 3A 81 4D B2 31 A4 33 30 30 3A 82 00 7B 14 | ":.M.1.300:..{.|
00000450: 3A 00 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |:.."............|
00000460: 11 11 11 11 11 11 22 A6 31 34 29 22 D9 2F CE 22 |......".14)"./."|
00000470: 3A 81 4D B2 31 A4 33 30 30 3A 82 00 85 14 3B 00 |:.M.1.300:....;.|
00000480: 82 3A 89 35 32 00 9B 14 46 00 54 B2 54 AA 31 3A |.:.52...F.T.T.1:|
00000490: 8B 54 B2 31 A7 44 24 B2 44 44 24 00 C9 14 47 00 |.T.1.D$.DD$...G.|
000004A0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
000004B0: 11 11 11 11 CD 45 4E 55 3A 20 D4 3D 41 43 43 54 |.....ENU: .=ACCT|
000004C0: 20 D4 52 41 4E 53 46 45 52 00 E0 14 48 00 99 A6 | .RANSFER...H...|
000004D0: 36 29 22 C3 3D 57 52 49 54 45 20 C3 48 45 43 4B |6)".=WRITE .HECK|
000004E0: 00 F8 14 49 00 99 A6 36 29 22 C4 3D 4D 41 4B 45 |...I...6)".=MAKE|
000004F0: 20 C4 45 50 4F 53 49 54 00 0A 15 50 00 A1 41 24 | .EPOSIT...P..A$|
00000500: 3A 8B 41 24 B2 22 22 A7 38 30 00 1A 15 51 00 8B |:.A$."".80...Q..|
00000510: 41 24 B2 22 43 22 A7 31 30 30 00 2A 15 52 00 8B |A$."C".100.*.R..|
00000520: 41 24 B2 22 44 22 A7 31 32 30 00 3A 15 53 00 8B |A$."D".120.:.S..|
00000530: 41 24 B2 22 54 22 A7 31 34 30 00 49 15 54 00 8D |A$."T".140.I.T..|
00000540: 31 30 3A 81 52 B2 31 A4 33 00 69 15 55 00 99 22 |10:.R.1.3.i.U.."|
00000550: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000560: 11 11 22 A6 36 29 22 20 22 00 88 15 56 00 99 A6 |..".6)" "...V...|
00000570: 36 29 22 20 22 3A 99 A6 36 29 22 20 22 3A 81 4D |6)" ":..6)" ":.M|
00000580: B2 31 A4 33 30 30 3A 82 00 A8 15 58 00 99 22 13 |.1.300:....X..".|
00000590: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000005A0: 11 22 A6 36 29 22 D4 22 00 C7 15 59 00 99 A6 36 |.".6)"."...Y...6|
000005B0: 29 22 C3 22 3A 99 A6 36 29 22 C4 22 3A 81 4D B2 |)".":..6)".":.M.|
000005C0: 31 A4 33 30 30 3A 82 00 D1 15 5A 00 82 3A 89 38 |1.300:....Z..:.8|
000005D0: 30 00 F2 15 64 00 99 22 C1 4D 54 20 4F 46 20 C3 |0...d..".MT OF .|
000005E0: 48 45 43 4B 2C C1 43 43 54 20 23 3A 22 3A 85 41 |HECK,.CCT #:":.A|
000005F0: 2C 4C 00 19 16 65 00 8B 4C B1 31 30 B0 4C B3 31 |,L...e..L.10.L.1|
00000600: B0 4C AB B5 28 4C 29 B1 30 A7 8D 31 30 3A 99 22 |.L..(L).0..10:."|
00000610: 91 91 22 3B 3A 89 31 30 30 00 44 16 66 00 41 28 |..";:.100.D.f.A(|
00000620: 31 31 29 B2 A5 52 28 41 28 31 31 29 AB 41 29 3A |11)..R(A(11).A):|
00000630: 41 28 4C 29 B2 A5 52 28 41 28 4C 29 AB 41 29 3A |A(L)..R(A(L).A):|
00000640: 89 31 32 32 00 5E 16 78 00 99 22 C1 4D 54 20 4F |.122.^.x..".MT O|
00000650: 46 20 C4 45 50 4F 53 49 54 3A 22 3A 85 41 00 89 |F .EPOSIT:":.A..|
00000660: 16 79 00 4C B2 31 30 3A 41 28 31 31 29 B2 A5 52 |.y.L.10:A(11)..R|
00000670: 28 41 28 31 31 29 AA 41 29 3A 41 28 4C 29 B2 A5 |(A(11).A):A(L)..|
00000680: 52 28 41 28 4C 29 AA 41 29 00 9E 16 7A 00 8D 36 |R(A(L).A)...z..6|
00000690: 3A 45 B2 4C 3A 46 B2 31 32 3A 89 31 36 30 00 BF |:E.L:F.12:.160..|
000006A0: 16 8C 00 99 22 C1 4D 54 2C 46 52 4F 4D 20 23 2C |....".MT,FROM #,|
000006B0: 54 4F 20 23 3A 22 3A 85 41 2C 41 31 2C 41 32 00 |TO #:":.A,A1,A2.|
000006C0: FA 16 8D 00 58 48 B2 30 3A 8B 41 31 B1 31 30 B0 |....XH.0:.A1.10.|
000006D0: 41 32 B1 31 30 B0 41 31 B3 31 B0 41 32 B3 31 B0 |A2.10.A1.1.A2.1.|
000006E0: 41 31 AB B5 28 41 31 29 B1 30 B0 41 32 AB B5 28 |A1..(A1).0.A2..(|
000006F0: 41 32 29 B1 30 A7 58 48 B2 31 00 14 17 8E 00 8B |A2).0.XH.1......|
00000700: 58 48 B2 31 A7 8D 31 30 3A 99 22 91 91 22 3B 3A |XH.1..10:."..";:|
00000710: 89 31 34 30 00 3C 17 8F 00 41 28 41 31 29 B2 A5 |.140.<...A(A1)..|
00000720: 52 28 41 28 41 31 29 AB 41 29 3A 41 28 41 32 29 |R(A(A1).A):A(A2)|
00000730: B2 A5 52 28 41 28 41 32 29 AA 41 29 00 4D 17 90 |..R(A(A2).A).M..|
00000740: 00 8D 36 3A 45 B2 41 31 3A 46 B2 41 32 00 75 17 |..6:E.A1:F.A2.u.|
00000750: A0 00 8B 45 B1 37 A7 99 22 13 22 A6 31 30 30 29 |...E.7..".".100)|
00000760: A6 38 36 AA 45 AC 32 32 AB 31 30 30 29 22 2A 22 |.86.E.22.100)"*"|
00000770: 3A 89 31 36 32 00 8A 17 A1 00 99 22 13 22 A6 38 |:.162......".".8|
00000780: 36 AA 45 AC 32 32 29 22 2A 22 00 B2 17 A2 00 8B |6.E.22)"*"......|
00000790: 46 B1 37 A7 99 22 13 22 A6 31 30 30 29 A6 38 36 |F.7..".".100).86|
000007A0: AA 46 AC 32 32 AB 31 30 30 29 22 2A 22 3A 89 31 |.F.22.100)"*":.1|
000007B0: 36 34 00 C7 17 A3 00 99 22 13 22 A6 38 36 AA 46 |64......".".86.F|
000007C0: AC 32 32 29 22 2A 22 00 ED 17 A4 00 97 53 2C 32 |.22)"*"......S,2|
000007D0: 33 32 3A 81 4D B2 31 A4 32 30 30 3A 82 3A 97 53 |32:.M.1.200:.:.S|
000007E0: 2C 30 3A 81 4D B2 31 A4 31 30 30 3A 82 00 08 18 |,0:.M.1.100:....|
000007F0: A5 00 97 53 2C 32 33 32 3A 81 4D B2 31 A4 31 35 |...S,232:.M.1.15|
00000800: 30 3A 82 3A 97 53 2C 30 00 30 18 A6 00 81 4D B2 |0:.:.S,0.0....M.|
00000810: 31 A4 37 35 30 3A 82 3A 99 22 13 11 11 11 11 11 |1.750:.:."......|
00000820: 11 11 11 11 11 11 11 11 11 11 11 22 3A 89 35 30 |...........":.50|
00000830: 00 3D 18 B4 00 8B 54 B2 30 A7 32 30 30 00 58 18 |.=....T.0.200.X.|
00000840: B5 00 5A B2 30 3A 81 52 B2 31 A4 31 30 3A 5A B2 |..Z.0:.R.1.10:Z.|
00000850: 5A AA 41 28 52 29 3A 82 00 71 18 B6 00 8B B6 28 |Z.A(R):..q.....(|
00000860: 5A AB 41 28 31 31 29 29 B2 B1 2E 30 31 A7 32 32 |Z.A(11))...01.22|
00000870: 30 00 94 18 B7 00 8D 20 36 3A 99 22 C1 43 43 54 |0...... 6:.".CCT|
00000880: 20 C2 41 4C 3D C3 48 42 4B 20 C2 41 4C 22 3A 8D | .AL=.HBK .AL":.|
00000890: 20 32 35 30 00 BE 18 B8 00 8B 20 58 20 A7 20 9F | 250...... X . .|
000008A0: 31 2C 38 2C 32 2C 22 40 30 3A 43 48 42 4B 46 49 |1,8,2,"@0:CHBKFI|
000008B0: 4C 45 2C 57 52 49 54 45 22 3A 89 31 39 31 00 FD |LE,WRITE":.191..|
000008C0: 18 B9 00 99 22 D2 45 57 49 4E 44 20 43 41 53 53 |....".EWIND CASS|
000008D0: 45 54 45 20 54 4F 20 20 20 20 57 52 49 54 45 20 |ETE TO WRITE |
000008E0: 46 49 4C 45 2E 22 3A 97 53 2C 32 34 30 3A 81 4D |FILE.":.S,240:.M|
000008F0: B2 31 A4 33 30 30 3A 82 3A 97 53 2C 30 00 16 19 |.1.300:.:.S,0...|
00000900: BA 00 99 3A 99 22 D2 45 41 44 59 3F 2E 2E 2E 50 |...:.".EADY?...P|
00000910: 52 45 53 53 20 D9 00 29 19 BB 00 A1 41 24 3A 8B |RESS ..)....A$:.|
00000920: 41 24 B2 22 22 A7 31 38 37 00 39 19 BC 00 8B 41 |A$."".187.9....A|
00000930: 24 B2 22 4E 22 A7 32 31 30 00 4A 19 BD 00 8B 41 |$."N".210.J....A|
00000940: 24 B3 B1 22 59 22 A7 31 38 34 00 60 19 BE 00 9F |$.."Y".184.`....|
00000950: 31 2C 31 2C 31 2C 22 43 48 42 4B 46 49 4C 45 22 |1,1,1,"CHBKFILE"|
00000960: 00 83 19 BF 00 52 24 B2 C7 28 31 33 29 3A 81 52 |.....R$..(13):.R|
00000970: B2 31 A4 31 31 3A 98 31 2C 41 28 52 29 3B 52 24 |.1.11:.1,A(R);R$|
00000980: 3B 3A 82 00 94 19 C0 00 98 31 2C 44 24 3B 52 24 |;:.......1,D$;R$|
00000990: 3B 3A A0 31 00 BB 19 C1 00 99 54 24 3A 99 22 C4 |;:.1......T$:.".|
000009A0: 41 54 45 3A 22 44 24 3A 99 22 C8 41 44 22 54 22 |ATE:"D$:.".AD"T"|
000009B0: 20 54 52 41 4E 53 2E 22 3A 8D 37 00 DC 19 C2 00 | TRANS.":.7.....|
000009C0: 99 22 CE 45 57 20 46 49 4C 45 20 44 4F 4E 45 2E |.".EW FILE DONE.|
000009D0: 22 3A 97 33 36 38 37 38 2C 30 3A 80 00 0E 1A C8 |":.36878,0:.....|
000009E0: 00 8D 36 3A 99 22 CE 4F 20 54 52 41 4E 53 41 43 |..6:.".O TRANSAC|
000009F0: 54 49 4F 4E 53 2E 22 3A 99 22 C6 49 4C 45 20 4E |TIONS.":.".ILE N|
00000A00: 4F 54 20 43 48 41 4E 47 45 44 2E 22 3A 80 00 2F |OT CHANGED.":../|
00000A10: 1A D2 00 8D 36 3A 99 22 C2 41 4C 41 4E 43 45 53 |....6:.".ALANCES|
00000A20: 20 48 41 56 45 20 43 48 41 4E 47 45 44 2E 22 00 | HAVE CHANGED.".|
00000A30: 46 1A D3 00 99 22 D7 52 49 54 45 20 4E 45 57 20 |F....".RITE NEW |
00000A40: 46 49 4C 45 3F 22 00 59 1A D4 00 A1 41 24 3A 8B |FILE?".Y....A$:.|
00000A50: 41 24 B2 22 22 A7 32 31 32 00 67 1A D5 00 8B 41 |A$."".212.g....A|
00000A60: 24 B2 22 4E 22 A7 80 00 78 1A D6 00 8B 41 24 B3 |$."N"...x....A$.|
00000A70: B1 22 59 22 A7 32 31 30 00 80 1A D7 00 89 34 30 |."Y".210......40|
00000A80: 00 C2 1A DC 00 8D 36 3A 99 22 C5 52 52 4F 52 20 |......6:.".RROR |
00000A90: 2D 20 CE 4F 20 42 41 4C 41 4E 43 45 2E 22 3A 99 |- .O BALANCE.":.|
00000AA0: 22 C1 43 43 54 20 D3 55 4D 3D 22 5A 3A 99 22 C3 |".CCT .UM="Z:.".|
00000AB0: 48 42 4B 20 C2 41 4C 41 4E 43 45 3D 22 41 28 31 |HBK .ALANCE="A(1|
00000AC0: 31 29 00 E4 1A DD 00 99 22 C4 4F 20 59 4F 55 20 |1)......".O YOU |
00000AD0: 57 49 53 48 20 54 4F 22 3A 99 22 43 4F 4E 54 49 |WISH TO":."CONTI|
00000AE0: 4E 55 45 3F 00 F7 1A DE 00 A1 41 24 3A 8B 41 24 |NUE?......A$:.A$|
00000AF0: B2 22 22 A7 32 32 32 00 05 1B DF 00 8B 41 24 B2 |."".222......A$.|
00000B00: 22 4E 22 A7 80 00 16 1B E0 00 8B 41 24 B3 B1 22 |"N"........A$.."|
00000B10: 59 22 A7 32 32 30 00 1E 1B E1 00 89 34 30 00 51 |Y".220......40.Q|
00000B20: 1B FA 00 99 22 C9 4E 53 45 52 54 20 44 41 54 41 |....".NSERT DATA|
00000B30: 20 44 49 53 4B 20 4F 52 20 20 20 54 41 50 45 2E | DISK OR TAPE.|
00000B40: 20 D2 45 41 44 59 3F 28 41 4E 59 20 4B 45 59 29 | .EADY?(ANY KEY)|
00000B50: 22 00 64 1B FB 00 A1 41 24 3A 8B 41 24 B2 22 22 |".d....A$:.A$.""|
00000B60: A7 32 35 31 00 6A 1B FD 00 8E 00 00 00 |.251.j....... |
..0...X.1:. MAKE X=0 FOR TAPE,OR X=1 TO
USE DISK.R...T$.". .. .*. . BUDGETEER .
.*. ..":.G(14);:.36878,15:S.36874......
A$(11),A(11),B%(11):. .R(X)..(X.100..5).
100:.T$:.:..M....:.:."TODAY'S DATE";DD$:
.:.20......T$:."DATE:"D$:."LAST AMT:$"A.
$....12:.:.R.1.9:."."R"...."A$(R)"..$.".
B%(R))A(R):..M....".10..."A$(10)"..$.".B
%(10))A(10):..W....".11..."A$(11)".$.".B
%(11))A(11):.:.......S,212:.M.1.150:.:.S
,0:.M.1.100:.......S,201:.M.1.200:.:.S,0
:..F....R.1.11.......(A(R))..1.B%(R).16.
C(D(.(.(A(R))))).......(A(R)).1.B%(R).15
......:..%....R.1.11:.A$(R):..M...."HOUS
","UTIL","INSU","BANK","MC/V".|...."VACA
","MEDI","BOOK","CHGE","MISC","CHBK"....
..250...... X . .1,8,2,"0:CHBKFILE,READ"
:. 37......"INSERT DATA CASSETTE AND RE
WIND TO READ BALANCES.......S,240:.M.
1.300:.:.S,0... ..:."READY?...PRESS Y./.
!..A$:.A$."".33.=."..A$."N"...M.#..A$.."
Y".30.C.$..1,1,0,"CHBKFILE"...%..R.1.11:
.1,A(R):.:.1,D$: 1...(..6...2.."TRANSACT
ION? Y/N":.S,245:.M.1.200:....3..S,0:.M
.1.100:.:.S,235:.M.1.200:.:.S,0...4..A$:
.A$."".52...5..A$."Y".70...6..A$."N".180
...7..10:.R.1.3.M.8.."..................
".14)" ":.M.1.300:..{.:.."............
......".14)"Y/N":.M.1.300:....;..:.52...
F.T.T.1:.T.1.D$.DD$.I.G.."..............
....MENU: T=ACCT TRANSFER...H...6)"C=WRI
TE CHECK...I...6)"D=MAKE DEPOSIT...P..A$
:.A$."".80...Q..A$."C".100.*.R..A$."D".1
20.:.S..A$."T".140.I.T..10:.R.1.3.I.U.."
..................".6)" "...V...6)" ":..
6)" ":.M.1.300:....X..".................
.".6)"T".G.Y...6)"C":..6)"D":.M.1.300:..
Q.Z..:.80...D.."AMT OF CHECK,ACCT #:":.A
,L...E..L.10.L.1.L..(L).0..10:."..";:.10
0.D.F.A(11)..R(A(11).A):A(L)..R(A(L).A):
.122.^.X.."AMT OF DEPOSIT:":.A...Y.L.10:
A(11)..R(A(11).A):A(L)..R(A(L).A)...Z..6
:E.L:F.12:.160......"AMT,FROM #,TO #:":.
A,A1,A2.....XH.0:.A1.10.A2.10.A1.1.A2.1.
A1..(A1).0.A2..(A2).0.XH.1......XH.1..10
:."..";:.140.<...A(A1)..R(A(A1).A):A(A2)
..R(A(A2).A).M....6:E.A1:F.A2.U. ..E.7..
".".100).86.E.22.100)"*":.162......".".8
6.E.22)"*"......F.7..".".100).86.F.22.10
0)"*":.164.G....".".86.F.22)"*"......S,2
32:.M.1.200:.:.S,0:.M.1.100:.......S,232
:.M.1.150:.:.S,0.0....M.1.750:.:."......
...........":.50.=....T.0.200.X...Z.0:.R
.1.10:Z.Z.A(R):..Q.....(Z.A(11))...01.22
0...... 6:."ACCT BAL=CHBK BAL":. 250....
.. X . .1,8,2,"@0:CHBKFILE,WRITE":.191..
...."REWIND CASSETE TO WRITE FILE.":.
S,240:.M.1.300:.:.S,0......:."READY?...P
RESS Y.)....A$:.A$."".187.9....A$."N".21
0.J....A$.."Y".184.`....1,1,1,"CHBKFILE"
.....R$.G(13):.R.1.11:.1,A(R);R$;:......
.1,D$;R$;: 1...A..T$:."DATE:"D$:."HAD"T"
TRANS.":.7...B.."NEW FILE DONE.":.36878
,0:....H..6:."NO TRANSACTIONS.":."FILE N
OT CHANGED.":../.R..6:."BALANCES HAVE CH
ANGED.".F.S.."WRITE NEW FILE?".Y.T..A$:.
A$."".212.G.U..A$."N"...X.V..A$.."Y".210
...W..40.B....6:."ERROR - NO BALANCE.":.
"ACCT SUM="Z:."CHBK BALANCE="A(11)......
"DO YOU WISH TO":."CONTINUE?......A$:.A$
."".222......A$."N"........A$.."Y".220..
....40.Q...."INSERT DATA DISK OR TAPE.
READY?(ANY KEY)".D....A$:.A$."".251.J..
.....
> CLICK IMAGE PREVIEW FOR FULL MODAL