WEEKLY BUDGET

FILE INFORMATION

FILENAME(S): WEEKLY BUDGET

FILE TYPE(S): PRG

FILE SIZE: 1.6K

FIRST SEEN: 2025-11-30 18:12:21

APPEARS ON: 1 disk(s)

FILE HASH

886955d38bbf060ed138940efd3110aec2907cab6f5ce79f179d0fe629a80a7d

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
LOADSTAR 47 S 2	WEEKLY BUDGET	PRG	Sailor, Ganheden	12	5	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 2F 08 0A 00 97 35  33 32 38 30 2C 2E 3A 97  |../....53280,.:.|
00000010: 35 33 32 38 31 2C 2E 3A  99 22 93 9A 43 41 4C 43  |53281,.:."..CALC|
00000020: 55 4C 41 54 49 4E 47 2E  2E 2E 22 3A 89 35 30 00  |ULATING...":.50.|
00000030: 4F 08 14 00 41 24 28 59  29 B2 41 24 28 59 29 AA  |O...A$(Y).A$(Y).|
00000040: C9 28 53 24 AA C4 28 44  25 29 2C 36 29 3A 8E 00  |.(S$..(D%),6):..|
00000050: 88 08 1E 00 81 20 59 B2  53 20 A4 20 46 3A 87 20  |..... Y.S . F:. |
00000060: 44 24 3A 41 24 28 59 29  B2 C8 28 44 24 AA 53 24  |D$:A$(Y)..(D$.S$|
00000070: 2C 31 30 29 3A 41 24 28  59 29 B2 22 9A 22 AA 41  |,10):A$(Y).".".A|
00000080: 24 28 59 29 AA 22 9F 22  00 9B 08 23 00 81 20 58  |$(Y)."."...#.. X|
00000090: B2 30 20 A4 20 34 3A 87  20 44 25 00 BD 08 28 00  |.0 . 4:. D%...(.|
000000A0: 41 25 28 45 2C 58 29 B2  41 25 28 45 2C 58 29 AA  |A%(E,X).A%(E,X).|
000000B0: 44 25 3A 8D 20 32 30 3A  82 3A 82 3A 8E 00 F9 08  |D%:. 20:.:.:....|
000000C0: 32 00 81 20 58 B2 31 20  A4 20 33 30 3A 53 24 B2  |2.. X.1 . 30:S$.|
000000D0: 53 24 AA 22 20 22 3A 82  3A 81 20 58 B2 31 20 A4  |S$." ":.:. X.1 .|
000000E0: 20 34 30 3A 4C 24 B2 4C  24 AA 22 2D 22 3A 82 3A  | 40:L$.L$."-":.:|
000000F0: 4C 24 B2 22 9A 22 AA 4C  24 00 2E 09 64 00 57 24  |L$.".".L$...d.W$|
00000100: B2 22 93 9F 20 20 20 20  20 20 20 20 20 20 20 57  |."..           W|
00000110: 45 45 4B 31 20 57 45 45  4B 32 20 57 45 45 4B 33  |EEK1 WEEK2 WEEK3|
00000120: 20 57 45 45 4B 34 20 57  45 45 4B 35 9A 22 00 45  | WEEK4 WEEK5.".E|
00000130: 09 6E 00 49 24 B2 22 4E  45 54 20 49 4E 43 4F 4D  |.n.I$."NET INCOM|
00000140: 45 22 AA 53 24 00 66 09  78 00 83 20 53 41 4C 41  |E".S$.f.x.. SALA|
00000150: 52 59 2C 33 30 30 2C 33  30 30 2C 33 30 30 2C 33  |RY,300,300,300,3|
00000160: 30 30 2C 33 30 30 00 7E  09 82 00 83 20 4F 54 48  |00,300.~.... OTH|
00000170: 45 52 2C 30 2C 35 30 2C  30 2C 35 30 2C 30 00 84  |ER,0,50,0,50,0..|
00000180: 09 8C 00 8F 00 A0 09 C8  00 49 44 B2 32 3A 45 24  |.........ID.2:E$|
00000190: B2 22 20 20 20 45 58 50  45 4E 53 45 22 AA 53 24  |."   EXPENSE".S$|
000001A0: 00 BC 09 D2 00 83 20 43  48 55 52 43 48 2C 33 35  |...... CHURCH,35|
000001B0: 2C 34 30 2C 33 35 2C 34  30 2C 33 35 00 D3 09 DC  |,40,35,40,35....|
000001C0: 00 83 20 52 45 4E 54 2C  30 2C 30 2C 30 2C 35 37  |.. RENT,0,0,0,57|
000001D0: 35 2C 30 00 ED 09 E6 00  83 20 46 4F 4F 44 2C 34  |5,0...... FOOD,4|
000001E0: 35 2C 34 35 2C 34 35 2C  34 35 2C 34 35 00 04 0A  |5,45,45,45,45...|
000001F0: F0 00 83 20 50 48 4F 4E  45 2C 30 2C 32 35 2C 30  |... PHONE,0,25,0|
00000200: 2C 30 2C 30 00 1C 0A FA  00 83 20 4C 49 47 48 54  |,0,0...... LIGHT|
00000210: 53 2C 30 2C 30 2C 35 30  2C 30 2C 30 00 33 0A 04  |S,0,0,50,0,0.3..|
00000220: 01 83 20 57 41 54 45 52  2C 32 30 2C 30 2C 30 2C  |.. WATER,20,0,0,|
00000230: 30 2C 30 00 49 0A 0E 01  83 20 54 52 41 53 48 2C  |0,0.I.... TRASH,|
00000240: 38 2C 30 2C 30 2C 30 2C  30 00 67 0A 18 01 83 20  |8,0,0,0,0.g.... |
00000250: 47 41 53 4F 4C 49 4E 45  2C 31 30 2C 31 30 2C 31  |GASOLINE,10,10,1|
00000260: 30 2C 31 30 2C 31 30 00  82 0A 22 01 83 20 43 41  |0,10,10...".. CA|
00000270: 52 20 4C 4F 41 4E 2C 30  2C 31 33 33 2C 30 2C 30  |R LOAN,0,133,0,0|
00000280: 2C 30 00 9B 0A 2C 01 83  20 43 41 52 20 49 4E 53  |,0...,.. CAR INS|
00000290: 2C 30 2C 33 31 2C 30 2C  30 2C 30 00 B5 0A 36 01  |,0,31,0,0,0...6.|
000002A0: 83 20 4C 49 46 45 20 49  4E 53 2C 31 33 2C 30 2C  |. LIFE INS,13,0,|
000002B0: 30 2C 30 2C 30 00 D0 0A  40 01 83 20 42 41 4E 4B  |0,0,0...@.. BANK|
000002C0: 20 43 41 52 44 2C 32 35  2C 30 2C 30 2C 30 2C 30  | CARD,25,0,0,0,0|
000002D0: 00 EC 0A 4A 01 83 20 53  54 4F 52 45 20 43 41 52  |...J.. STORE CAR|
000002E0: 44 2C 31 30 2C 30 2C 30  2C 30 2C 30 00 09 0B 54  |D,10,0,0,0,0...T|
000002F0: 01 83 20 53 41 56 49 4E  47 53 2C 31 30 2C 31 30  |.. SAVINGS,10,10|
00000300: 2C 31 30 2C 31 30 2C 31  30 00 0F 0B 5E 01 8F 00  |,10,10,10...^...|
00000310: 57 0B 90 01 45 44 B2 31  34 3A 44 B2 49 44 AA 45  |W...ED.14:D.ID.E|
00000320: 44 AA 31 30 3A 86 20 41  24 28 44 29 2C 41 25 28  |D.10:. A$(D),A%(|
00000330: 34 2C 35 29 3A 41 24 28  30 29 B2 57 24 3A 41 24  |4,5):A$(0).W$:A$|
00000340: 28 31 29 B2 49 24 3A 53  B2 32 3A 46 B2 53 AA 49  |(1).I$:S.2:F.S.I|
00000350: 44 AB 31 3A 45 B2 30 00  82 0B 9A 01 8D 20 33 30  |D.1:E.0...... 30|
00000360: 3A 54 B2 59 3A 41 24 28  59 AA 34 29 B2 45 24 3A  |:T.Y:A$(Y.4).E$:|
00000370: 53 B2 59 AA 35 3A 46 B2  53 AA 45 44 AB 31 3A 45  |S.Y.5:F.S.ED.1:E|
00000380: B2 33 00 A5 0B 9F 01 8D  20 33 30 3A 54 54 B2 59  |.3...... 30:TT.Y|
00000390: 3A 41 24 28 54 29 B2 22  9A 20 2A 46 4F 52 57 41  |:A$(T).". *FORWA|
000003A0: 52 44 20 9F 22 00 DF 0B  A4 01 41 24 28 54 AA 31  |RD .".....A$(T.1|
000003B0: 29 B2 4C 24 3A 41 24 28  54 AA 32 29 B2 22 9A 20  |).L$:A$(T.2).". |
000003C0: 54 4F 54 41 4C 20 49 4E  20 9F 22 3A 41 24 28 54  |TOTAL IN .":A$(T|
000003D0: AA 33 29 B2 4C 24 3A 41  24 28 59 29 B2 4C 24 00  |.3).L$:A$(Y).L$.|
000003E0: FA 0B A9 01 41 24 28 59  AA 31 29 B2 22 9A 20 54  |....A$(Y.1).". T|
000003F0: 4F 54 41 4C 20 45 58 20  9F 22 00 20 0C AE 01 41  |OTAL EX .". ...A|
00000400: 24 28 59 AA 32 29 B2 4C  24 3A 41 24 28 59 AA 33  |$(Y.2).L$:A$(Y.3|
00000410: 29 B2 22 9A 20 2A 42 41  4C 41 4E 43 45 20 9F 22  |).". *BALANCE ."|
00000420: 00 4A 0C B3 01 81 20 58  B2 30 20 A4 20 34 3A 41  |.J.... X.0 . 4:A|
00000430: 25 28 32 2C 58 29 B2 41  25 28 30 2C 58 29 AA 41  |%(2,X).A%(0,X).A|
00000440: 25 28 31 2C 58 29 3A 59  B2 54 00 74 0C B8 01 44  |%(1,X):Y.T.t...D|
00000450: 25 B2 41 25 28 31 2C 58  29 3A 8D 20 32 30 3A 59  |%.A%(1,X):. 20:Y|
00000460: B2 54 AA 32 3A 44 25 B2  41 25 28 32 2C 58 29 3A  |.T.2:D%.A%(2,X):|
00000470: 8D 20 32 30 00 97 0C BD  01 41 25 28 34 2C 58 29  |. 20.....A%(4,X)|
00000480: B2 41 25 28 32 2C 58 29  AB 41 25 28 33 2C 58 29  |.A%(2,X).A%(3,X)|
00000490: 3A 59 B2 54 54 AA 31 00  D6 0C C2 01 44 25 B2 41  |:Y.TT.1.....D%.A|
000004A0: 25 28 33 2C 58 29 3A 8D  20 32 30 3A 59 B2 54 54  |%(3,X):. 20:Y.TT|
000004B0: AA 33 3A 44 25 B2 41 25  28 34 2C 58 29 3A 8D 20  |.3:D%.A%(4,X):. |
000004C0: 32 30 3A 41 25 28 31 2C  58 AA 31 29 B2 41 25 28  |20:A%(1,X.1).A%(|
000004D0: 34 2C 58 29 3A 82 00 FA  0C CC 01 81 20 58 B2 30  |4,X):....... X.0|
000004E0: 20 A4 20 44 3A 99 20 41  24 28 58 29 3B 3A 8B 20  | . D:. A$(X);:. |
000004F0: 58 B1 32 32 20 89 20 34  38 30 00 08 0D D6 01 82  |X.22 . 480......|
00000500: 3A 99 3A 89 20 35 30 30  00 1F 0D E0 01 A1 20 4B  |:.:. 500...... K|
00000510: 24 3A 8B 20 4B 24 B2 22  22 20 89 20 34 38 30 00  |$:. K$."" . 480.|
00000520: 28 0D EA 01 89 34 37 30  00 5A 0D F4 01 99 22 9F  |(....470.Z....".|
00000530: 30 9A 29 45 58 49 54 20  9F 31 9A 29 52 45 44 49  |0.)EXIT .1.)REDI|
00000540: 53 50 4C 41 59 20 9F 32  9A 29 53 41 56 45 20 9F  |SPLAY .2.)SAVE .|
00000550: 33 9A 29 50 52 49 4E 54  91 22 00 75 0D F5 01 A1  |3.)PRINT.".u....|
00000560: 41 24 3A 8B 41 24 B3 22  30 22 B0 41 24 B1 22 33  |A$:.A$."0".A$."3|
00000570: 22 A7 35 30 31 00 8C 0D  F6 01 4B B2 C5 28 41 24  |".501.....K..(A$|
00000580: 29 3A 8B 4B B2 2E A7 36  30 30 30 30 00 A2 0D F9  |):.K...60000....|
00000590: 01 91 20 4B 20 89 20 34  36 30 2C 35 31 30 2C 35  |.. K . 460,510,5|
000005A0: 32 30 00 B7 0D FE 01 94  22 42 55 44 47 45 54 22  |20......"BUDGET"|
000005B0: 2C 38 3A 89 35 30 30 00  DE 0D 08 02 9F 20 34 2C  |,8:.500...... 4,|
000005C0: 34 3A 81 20 58 B2 30 20  A4 20 44 3A 98 34 2C 41  |4:. X.0 . D:.4,A|
000005D0: 24 28 58 29 3A 82 3A A0  34 3A 89 35 30 30 00 17  |$(X):.:.4:.500..|
000005E0: 0E 60 EA 9F 31 35 2C 38  2C 31 35 2C 22 52 30 3A  |.`..15,8,15,"R0:|
000005F0: 48 45 4C 4C 4F 20 43 4F  4E 4E 45 43 54 3D 48 45  |HELLO CONNECT=HE|
00000600: 4C 4C 4F 20 43 4F 4E 4E  45 43 54 22 3A 84 31 35  |LLO CONNECT":.15|
00000610: 2C 45 52 3A A0 31 35 00  25 0E 6A EA 8B 45 52 B3  |,ER:.15.%.j..ER.|
00000620: B1 36 33 A7 80 00 5F 0E  74 EA 99 22 93 11 11 11  |.63..._.t.."....|
00000630: 90 4C 4F 41 44 22 C7 28  33 34 29 22 48 45 4C 4C  |.LOAD".(34)"HELL|
00000640: 4F 20 43 4F 4E 4E 45 43  54 22 C7 28 33 34 29 22  |O CONNECT".(34)"|
00000650: 2C 38 22 3A 99 22 11 11  11 11 52 55 4E 13 22 00  |,8":."....RUN.".|
00000660: 7C 0E 7E EA 97 36 33 31  2C 31 33 3A 97 36 33 32  ||.~..631,13:.632|
00000670: 2C 31 33 3A 97 31 39 38  2C 32 3A 80 00 00 00     |,13:.198,2:.... |

../....53280,.:.53281,.:."..CALCULATING.
..":.50.O...A$(Y).A$(Y).I(S$.D(D%),6):..
..... Y.S . F:. D$:A$(Y).H(D$.S$,10):A$(
Y).".".A$(Y)."."...#.. X.0 . 4:. D%...(.
A%(E,X).A%(E,X).D%:. 20:.:.:....2.. X.1 
. 30:S$.S$." ":.:. X.1 . 40:L$.L$."-":.:
L$.".".L$...D.W$."..           WEEK1 WEE
K2 WEEK3 WEEK4 WEEK5.".E.N.I$."NET INCOM
E".S$.F.X.. SALARY,300,300,300,300,300.~
.... OTHER,0,50,0,50,0....... .H.ID.2:E$
."   EXPENSE".S$...R.. CHURCH,35,40,35,4
0,35.S.... RENT,0,0,0,575,0...... FOOD,4
5,45,45,45,45...... PHONE,0,25,0,0,0....
.. LIGHTS,0,0,50,0,0.3.... WATER,20,0,0,
0,0.I.... TRASH,8,0,0,0,0.G.... GASOLINE
,10,10,10,10,10...".. CAR LOAN,0,133,0,0
,0...,.. CAR INS,0,31,0,0,0...6.. LIFE I
NS,13,0,0,0,0.P.@.. BANK CARD,25,0,0,0,0
...J.. STORE CARD,10,0,0,0,0...T.. SAVIN
GS,10,10,10,10,10...^...W...ED.14:D.ID.E
D.10:. A$(D),A%(4,5):A$(0).W$:A$(1).I$:S
.2:F.S.ID.1:E.0...... 30:T.Y:A$(Y.4).E$:
S.Y.5:F.S.ED.1:E.3...... 30:TT.Y:A$(T)."
. *FORWARD .".....A$(T.1).L$:A$(T.2).". 
TOTAL IN .":A$(T.3).L$:A$(Y).L$.....A$(Y
.1).". TOTAL EX .". ...A$(Y.2).L$:A$(Y.3
).". *BALANCE .".J.... X.0 . 4:A%(2,X).A
%(0,X).A%(1,X):Y.T.T...D%.A%(1,X):. 20:Y
.T.2:D%.A%(2,X):. 20.....A%(4,X).A%(2,X)
.A%(3,X):Y.TT.1.V.B.D%.A%(3,X):. 20:Y.TT
.3:D%.A%(4,X):. 20:A%(1,X.1).A%(4,X):...
.L.. X.0 . D:. A$(X);:. X.22 . 480...V..
:.:. 500...... K$:. K$."" . 480.(....470
.Z....".0.)EXIT .1.)REDISPLAY .2.)SAVE .
3.)PRINT.".U....A$:.A$."0".A$."3".501...
..K.E(A$):.K...60000...... K . 460,510,5
20......"BUDGET",8:.500...... 4,4:. X.0 
. D:.4,A$(X):.: 4:.500...`..15,8,15,"R0:
HELLO CONNECT=HELLO CONNECT":.15,ER: 15.
%.J..ER..63..._.T..".....LOAD"G(34)"HELL
O CONNECT"G(34)",8":."....RUN.".|.~..631
,13:.632,13:.198,2:....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL