GIROREK. C-128
FILE INFORMATION
FILENAME(S): GIROREK. C-128
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-11-30 21:14:19
APPEARS ON: 1 disk(s)
FILE HASH
920ad3dacbf3f54a31dc654f2b3be4a92d6c5416b13640d71d3f0b9607453044
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCHIJF 6 | GIROREK. C-128 | PRG | DuncanTwain | 9 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 16 1C 01 00 FE 25 3A E7 36 2C 31 3A E7 35 |.......%:.6,1:.5|
00000010: 2C 38 3A 89 31 37 00 6F 1C 02 00 99 C7 28 32 37 |,8:.17.o.....(27|
00000020: 29 22 55 22 3A 99 C7 28 31 34 29 22 93 11 1D 20 |)"U":..(14)"... |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 20 | . |
00000050: C6 49 4E 41 4E 43 45 20 92 20 22 3A 8B 4A 52 B3 |.INANCE . ":.JR.|
00000060: B1 30 A7 99 A3 34 31 29 22 91 20 20 22 4A 52 00 |.0...41)". "JR.|
00000070: 8C 1C 03 00 99 22 11 11 20 D5 20 4B 55 4E 54 20 |.....".. . KUNT |
00000080: 4B 49 45 5A 45 4E 20 55 49 54 3A 22 00 AC 1C 04 |KIEZEN UIT:"....|
00000090: 00 99 22 11 20 20 20 31 29 20 CE 49 45 55 57 45 |..". 1) .IEUWE|
000000A0: 20 42 45 54 41 4C 49 4E 47 45 4E 22 00 D2 1C 05 | BETALINGEN"....|
000000B0: 00 99 22 11 20 20 20 32 29 20 C1 46 47 45 48 41 |..". 2) .FGEHA|
000000C0: 4E 44 45 4C 44 45 20 42 45 54 41 4C 49 4E 47 45 |NDELDE BETALINGE|
000000D0: 4E 22 00 EF 1C 06 00 99 22 11 20 20 20 33 29 20 |N"......". 3) |
000000E0: CD 41 41 4E 44 4F 56 45 52 5A 49 43 48 54 22 00 |.AANDOVERZICHT".|
000000F0: 09 1D 07 00 99 22 11 20 20 20 34 29 20 CF 50 2F |.....". 4) .P/|
00000100: 56 41 4E 20 44 49 53 4B 22 00 3B 1D 08 00 99 22 |VAN DISK".;...."|
00000110: 11 20 20 20 35 29 20 CF 50 47 41 56 45 20 4A 41 |. 5) .PGAVE JA|
00000120: 41 52 54 41 4C 2F 52 45 4B 2E 4E 55 4D 4D 45 52 |ARTAL/REK.NUMMER|
00000130: 2F 42 45 47 49 4E 53 41 4C 44 4F 00 58 1D 09 00 |/BEGINSALDO.X...|
00000140: 99 22 11 20 20 20 36 29 20 D7 49 53 54 20 41 4C |.". 6) .IST AL|
00000150: 4C 45 20 44 41 54 41 22 00 6A 1D 0A 00 99 22 11 |LE DATA".j....".|
00000160: 20 20 20 37 29 20 D3 54 4F 50 00 92 1D 0B 00 85 | 7) .TOP......|
00000170: 22 11 11 20 D7 41 54 20 49 53 20 55 57 20 4B 45 |".. .AT IS UW KE|
00000180: 55 5A 45 3A 20 31 9D 9D 9D 22 3B 5A 3A 99 22 93 |UZE: 1...";Z:.".|
00000190: 22 3B 00 AC 1D 0C 00 8B 50 41 B3 B1 30 B0 28 5A |";......PA..0.(Z|
000001A0: B3 B1 32 AF 5A B3 B1 33 29 A7 31 34 00 DE 1D 0D |..2.Z..3).14....|
000001B0: 00 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |..".............|
000001C0: 1D D3 4F 52 52 59 2C 20 4E 4F 47 20 47 45 45 4E |..ORRY, NOG GEEN|
000001D0: 20 44 41 54 41 2E 22 3A FE 0B 32 3A 89 32 00 FF | DATA.":..2:.2..|
000001E0: 1D 0E 00 91 5A 8D 20 32 32 2C 34 34 2C 36 33 2C |....Z. 22,44,63,|
000001F0: 38 36 2C 31 31 30 2C 31 37 2C 31 35 3A 89 32 00 |86,110,17,15:.2.|
00000200: 3E 1E 0F 00 99 22 93 11 11 11 11 11 11 11 11 20 |>...."......... |
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000230: 20 20 20 12 20 C6 49 4E 41 4E 43 45 20 22 00 7D | . .INANCE ".}|
00000240: 1E 10 00 99 22 11 20 20 20 20 20 20 20 20 20 20 |....". |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000260: 20 20 20 20 1D 92 C7 45 53 4C 4F 54 45 4E 20 56 | ...ESLOTEN V|
00000270: 4F 4F 52 20 5A 41 4B 45 4E 2E 22 3A 80 00 C5 1E |OOR ZAKEN.":....|
00000280: 11 00 9C 3A 49 4E B2 31 3A 86 41 24 28 35 30 30 |...:IN.1:.A$(500|
00000290: 2C 31 29 2C 41 28 35 30 30 2C 31 29 2C 47 24 28 |,1),A(500,1),G$(|
000002A0: 35 30 30 2C 31 29 2C 53 4F 28 31 33 29 3A 41 28 |500,1),SO(13):A(|
000002B0: 30 2C 31 29 B2 39 39 39 3A 8C 3A 53 24 B2 22 20 |0,1).999:.:S$." |
000002C0: 20 20 20 20 22 00 F4 1E 12 00 86 4D 41 24 28 31 | "......MA$(1|
000002D0: 31 29 3A 81 49 B2 30 A4 31 31 3A 87 41 24 3A 4D |1):.I.0.11:.A$:M|
000002E0: 41 24 28 49 29 B2 41 24 3A 82 3A 43 52 24 B2 C7 |A$(I).A$:.:CR$..|
000002F0: 28 31 33 29 00 32 1F 13 00 83 22 CA 41 4E 55 41 |(13).2....".ANUA|
00000300: 52 49 22 2C 22 C6 45 42 52 55 41 52 49 22 2C 22 |RI",".EBRUARI","|
00000310: CD 41 41 52 54 22 2C 22 C1 50 52 49 4C 22 2C 22 |.AART",".PRIL","|
00000320: CD 45 49 22 2C 22 CA 55 4E 49 22 2C 22 CA 55 4C |.EI",".UNI",".UL|
00000330: 49 22 00 6E 1F 14 00 83 22 C1 55 47 55 53 54 55 |I".n....".UGUSTU|
00000340: 53 22 2C 22 D3 45 50 54 45 4D 42 45 52 22 2C 22 |S",".EPTEMBER","|
00000350: CF 4B 54 4F 42 45 52 22 2C 22 CE 4F 56 45 4D 42 |.KTOBER",".OVEMB|
00000360: 45 52 22 2C 22 C4 45 43 45 4D 42 45 52 22 00 7A |ER",".ECEMBER".z|
00000370: 1F 15 00 4F 50 B2 30 3A 89 32 00 A3 1F 16 00 99 |...OP.0:.2......|
00000380: 22 93 11 12 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000390: 20 CE 49 45 55 57 45 20 47 45 47 45 56 45 4E 53 | .IEUWE GEGEVENS|
000003A0: 20 92 22 00 C5 1F 17 00 99 22 11 20 20 31 29 20 | ."......". 1) |
000003B0: C3 52 45 44 49 54 22 3A 99 22 20 20 32 29 20 C4 |.REDIT":." 2) .|
000003C0: 45 42 45 54 22 00 EE 1F 18 00 85 22 11 D7 41 54 |EBET"......"..AT|
000003D0: 20 49 53 20 55 57 20 4B 45 55 5A 45 3A 20 32 9D | IS UW KEUZE: 2.|
000003E0: 9D 9D 22 3B 43 44 3A 43 44 B2 43 44 AB 31 00 21 |..";CD:CD.CD.1.!|
000003F0: 20 19 00 85 22 11 CE 41 41 4D 20 56 41 4E 20 42 | ..."..AAM VAN B|
00000400: 45 54 41 4C 49 4E 47 3A 20 5A 5A 5A 9D 9D 9D 9D |ETALING: ZZZ....|
00000410: 9D 22 3B 51 24 3A 8B 51 24 B2 22 5A 5A 5A 22 A7 |.";Q$:.Q$."ZZZ".|
00000420: 32 00 44 20 1A 00 85 22 11 C8 4F 45 20 42 45 54 |2.D ..."..OE BET|
00000430: 41 41 4C 44 22 3B 47 24 3A 8B 47 24 B2 22 5A 5A |AALD";G$:.G$."ZZ|
00000440: 5A 22 A7 32 00 5B 20 1B 00 85 22 11 C2 45 44 52 |Z".2.[ ..."..EDR|
00000450: 41 47 3A 20 30 9D 9D 9D 22 3B 51 00 97 20 1C 00 |AG: 0...";Q.. ..|
00000460: 85 22 11 CD 41 41 4E 44 3A 20 31 9D 9D 9D 22 3B |."..AAND: 1...";|
00000470: 52 24 3A 99 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |R$:."...........|
00000480: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 8B 52 24 B2 |..........":.R$.|
00000490: 22 5A 5A 5A 22 A7 32 00 BA 20 1D 00 81 49 B2 31 |"ZZZ".2.. ...I.1|
000004A0: A4 C3 28 52 24 29 A9 32 3A 88 4D B2 C5 28 CA 28 |..(R$).2:.M..(.(|
000004B0: 52 24 2C 49 2C 32 29 29 AB 31 00 CD 20 1E 00 8B |R$,I,2)).1.. ...|
000004C0: 4D B2 B1 30 AF 4D B3 B2 31 31 A7 33 32 00 07 21 |M..0.M..11.32..!|
000004D0: 1F 00 99 3A 99 22 91 D6 45 52 4B 45 45 52 44 45 |...:."..ERKEERDE|
000004E0: 20 4D 41 41 4E 44 20 20 20 20 20 20 20 20 20 20 | MAAND |
000004F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 91 22 3A | .":|
00000500: FE 0B 34 3A 89 32 38 00 23 21 20 00 99 20 22 11 |..4:.28.#! .. ".|
00000510: 20 20 20 20 22 4D 41 24 28 4D 29 3B 4A 52 3B 3A | "MA$(M);JR;:|
00000520: 82 3A 99 00 4C 21 21 00 85 22 11 C4 41 47 20 56 |.:..L!!.."..AG V|
00000530: 41 4E 20 42 45 54 41 4C 49 4E 47 3A 20 31 9D 9D |AN BETALING: 1..|
00000540: 9D 22 3B 53 3A 99 22 91 91 91 22 53 00 88 21 22 |.";S:."..."S..!"|
00000550: 00 54 24 B2 22 4E 22 3A 85 22 11 11 11 11 C9 53 |.T$."N":.".....S|
00000560: 20 20 44 49 54 20 43 4F 52 52 45 43 54 20 28 4A | DIT CORRECT (J|
00000570: 2F 4E 29 3A 20 4A 9D 9D 9D 22 3B 54 24 3A 8B 54 |/N): J...";T$:.T|
00000580: 24 B2 22 4A 22 A7 33 36 00 A0 21 23 00 8B 54 24 |$."J".36..!#..T$|
00000590: B3 B1 22 4A 22 A7 99 22 93 22 3B 3A 89 20 32 32 |.."J"..".";:. 22|
000005A0: 00 B9 21 24 00 50 41 B2 50 41 AA 31 3A 81 4A B2 |..!$.PA.PA.1:.J.|
000005B0: 50 41 AB 31 A4 30 A9 AB 31 00 07 22 25 00 8B 53 |PA.1.0..1.."%..S|
000005C0: B3 41 28 4A 2C 31 29 A7 81 4B B2 30 A4 31 3A 41 |.A(J,1)..K.0.1:A|
000005D0: 24 28 4A AA 31 2C 4B 29 B2 41 24 28 4A 2C 4B 29 |$(J.1,K).A$(J,K)|
000005E0: 3A 41 28 4A AA 31 2C 4B 29 B2 41 28 4A 2C 4B 29 |:A(J.1,K).A(J,K)|
000005F0: 3A 47 24 28 4A AA 31 2C 4B 29 B2 47 24 28 4A 2C |:G$(J.1,K).G$(J,|
00000600: 4B 29 3A 82 4B 2C 4A 00 28 22 26 00 4A B2 4A AA |K):.K,J.("&.J.J.|
00000610: 31 3A 41 24 28 4A 2C 31 29 B2 22 30 30 30 30 30 |1:A$(J,1)."00000|
00000620: 30 30 30 30 30 30 30 22 00 48 22 27 00 81 49 B2 |0000000".H"'..I.|
00000630: 31 A4 C3 28 52 24 29 A9 32 3A 4D B2 C5 28 CA 28 |1..(R$).2:M..(.(|
00000640: 52 24 2C 49 2C 32 29 29 00 79 22 28 00 41 24 28 |R$,I,2)).y"(.A$(|
00000650: 4A 2C 31 29 B2 C8 28 41 24 28 4A 2C 31 29 2C 4D |J,1)..(A$(J,1),M|
00000660: AB 31 29 AA 22 31 22 AA C9 28 41 24 28 4A 2C 31 |.1)."1"..(A$(J,1|
00000670: 29 2C 31 32 AB 4D 29 3A 82 00 A5 22 29 00 41 24 |),12.M):...").A$|
00000680: 28 4A 2C 30 29 B2 51 24 3A 41 28 4A 2C 30 29 B2 |(J,0).Q$:A(J,0).|
00000690: 51 3A 41 28 4A 2C 31 29 B2 53 3A 47 24 28 4A 2C |Q:A(J,1).S:G$(J,|
000006A0: 31 29 B2 47 24 00 C0 22 2A 00 8B 43 44 B2 31 A7 |1).G$.."*..CD.1.|
000006B0: 41 28 4A 2C 30 29 B2 41 28 4A 2C 30 29 AC AB 31 |A(J,0).A(J,0)..1|
000006C0: 00 C6 22 2B 00 8E 00 D4 22 2C 00 81 49 B2 30 A4 |.."+....",..I.0.|
000006D0: 50 41 AB 31 00 F0 22 2D 00 99 22 93 11 C2 45 54 |PA.1.."-.."...ET|
000006E0: 41 4C 49 4E 47 3A 20 22 3B 41 24 28 49 2C 30 29 |ALING: ";A$(I,0)|
000006F0: 00 0E 23 2E 00 99 22 11 C2 45 54 41 41 4C 44 20 |..#..."..ETAALD |
00000700: 4D 45 54 3A 20 22 3B 47 24 28 49 2C 31 29 00 25 |MET: ";G$(I,1).%|
00000710: 23 2F 00 99 22 11 C2 45 44 52 41 47 3A 22 3B 41 |#/.."..EDRAG:";A|
00000720: 28 49 2C 30 29 00 3F 23 30 00 99 22 11 CD 41 41 |(I,0).?#0.."..AA|
00000730: 4E 44 3A 20 22 3B 3A 81 20 4A B2 31 A4 31 32 00 |ND: ";:. J.1.12.|
00000740: 65 23 31 00 8B CA 28 41 24 28 49 2C 31 29 2C 4A |e#1...(A$(I,1),J|
00000750: 2C 31 29 B2 22 31 22 A7 99 4D 41 24 28 4A AB 31 |,1)."1"..MA$(J.1|
00000760: 29 3B 4A 52 3B 00 6E 23 32 00 82 4A 3A 99 00 8F |);JR;.n#2..J:...|
00000770: 23 33 00 99 22 11 C4 41 47 20 56 41 4E 20 42 45 |#3.."..AG VAN BE|
00000780: 54 41 4C 49 4E 47 3A 22 3B 41 28 49 2C 31 29 00 |TALING:";A(I,1).|
00000790: CF 23 34 00 99 22 11 12 C3 4F 4D 4D 41 4E 44 4F |.#4.."...OMMANDO|
000007A0: 20 4D 45 54 20 4E 55 4D 4D 45 52 20 54 4F 45 54 | MET NUMMER TOET|
000007B0: 53 3A 92 22 3A 99 22 11 31 20 2D 20 D6 4F 4C 47 |S:.":.".1 - .OLG|
000007C0: 45 4E 44 45 20 42 45 54 41 4C 49 4E 47 22 3A 00 |ENDE BETALING":.|
000007D0: E7 23 35 00 99 22 11 33 20 2D 20 D2 45 54 4F 55 |.#5..".3 - .ETOU|
000007E0: 52 20 4D 45 4E 55 22 00 3B 24 36 00 99 22 11 35 |R MENU".;$6..".5|
000007F0: 20 2D 20 DA 4F 45 4B 20 4F 50 44 52 41 43 48 54 | - .OEK OPDRACHT|
00000800: 22 20 3A 99 22 11 38 20 2D 20 D7 49 53 54 20 44 |" :.".8 - .IST D|
00000810: 45 5A 45 20 42 45 54 41 4C 49 4E 47 22 3A 99 22 |EZE BETALING":."|
00000820: 11 39 20 2D 20 D7 49 4A 5A 49 47 54 20 44 45 5A |.9 - .IJZIGT DEZ|
00000830: 45 20 42 45 54 41 4C 49 4E 47 22 00 5B 24 37 00 |E BETALING".[$7.|
00000840: 51 24 B2 22 22 3A 99 22 11 D7 41 54 20 49 53 20 |Q$."":."..AT IS |
00000850: 55 57 20 4B 45 55 5A 45 3A 3F 22 00 6D 24 38 00 |UW KEUZE:?".m$8.|
00000860: A1 51 24 3A 8B 51 24 B2 22 22 A7 35 36 00 7D 24 |.Q$:.Q$."".56.}$|
00000870: 39 00 8B 51 24 B2 22 39 22 A7 31 34 38 00 8D 24 |9..Q$."9".148..$|
00000880: 3A 00 8B 51 24 B2 22 35 22 A7 31 31 34 00 9D 24 |:..Q$."5".114..$|
00000890: 3B 00 8B 51 24 B3 B1 22 38 22 A7 36 31 00 F6 24 |;..Q$.."8".61..$|
000008A0: 3C 00 81 4A B2 49 A4 50 41 AB 31 3A 81 20 4B B2 |<..J.I.PA.1:. K.|
000008B0: 30 A4 31 3A 41 24 28 4A 2C 4B 29 B2 41 24 28 4A |0.1:A$(J,K).A$(J|
000008C0: AA 31 2C 4B 29 3A 41 28 4A 2C 4B 29 B2 41 28 4A |.1,K):A(J,K).A(J|
000008D0: AA 31 2C 4B 29 3A 47 24 28 4A 2C 4B 29 B2 47 24 |.1,K):G$(J,K).G$|
000008E0: 28 4A AA 31 2C 4B 29 3A 82 4B 2C 4A 3A 50 41 B2 |(J.1,K):.K,J:PA.|
000008F0: 50 41 AB 31 3A 8E 00 05 25 3D 00 8B 51 24 B2 22 |PA.1:...%=..Q$."|
00000900: 31 22 A7 82 49 00 0B 25 3E 00 8E 00 3A 25 3F 00 |1"..I..%>...:%?.|
00000910: 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D CD C1 |."..............|
00000920: C1 CE C4 CF D6 C5 D2 DA C9 C3 C8 D4 22 3A 53 55 |............":SU|
00000930: B2 30 3A 49 B2 30 3A 4A B2 30 00 5B 25 40 00 85 |.0:I.0:J.0.[%@..|
00000940: 22 11 CE 55 4D 4D 45 52 20 56 41 4E 20 4D 41 41 |"..UMMER VAN MAA|
00000950: 4E 44 3A 20 30 9D 9D 9D 22 3B 51 00 70 25 41 00 |ND: 0...";Q.p%A.|
00000960: 8B 51 B1 31 32 A7 36 34 3A D5 8B 51 B2 30 A7 32 |.Q.12.64:..Q.0.2|
00000970: 00 88 25 42 00 53 55 B2 53 55 AA 53 4F 28 51 29 |..%B.SU.SU.SO(Q)|
00000980: 3A 8B 51 B2 31 A7 37 30 00 95 25 43 00 EB 20 FC |:.Q.1.70..%C.. .|
00000990: 4A B2 35 30 30 00 9F 25 44 00 4A B2 4A AA 31 00 |J.500..%D.J.J.1.|
000009A0: BB 25 45 00 EC 20 FD 20 CA 28 41 24 28 4A 2C 31 |.%E.. . .(A$(J,1|
000009B0: 29 2C 51 2C 31 29 B3 B1 22 31 22 00 DE 25 46 00 |),Q,1).."1"..%F.|
000009C0: 99 22 93 11 1D 1D 1D 1D 1D 22 3B 4D 41 24 28 51 |.".......";MA$(Q|
000009D0: AB 31 29 3B 4A 52 3B A3 32 33 29 52 4E 24 00 03 |.1);JR;.23)RN$..|
000009E0: 26 47 00 99 C7 28 37 29 A3 36 30 29 22 12 20 C2 |&G...(7).60)". .|
000009F0: 45 44 52 41 47 20 20 20 20 20 D4 4F 54 41 41 4C |EDRAG .OTAAL|
00000A00: 20 92 22 00 2B 26 48 00 99 22 C4 41 47 20 20 20 | .".+&H..".AG |
00000A10: CE 41 41 4D 3A 20 20 22 A3 33 36 29 22 C2 45 54 |.AAM: ".36)".ET|
00000A20: 41 41 4C 44 20 4D 45 54 3A 22 3B 00 57 26 49 00 |AALD MET:";.W&I.|
00000A30: 53 4F B2 53 55 4D 3A 53 4F 28 51 29 B2 53 4F 3A |SO.SUM:SO(Q).SO:|
00000A40: 99 A3 37 30 29 3B 3A 99 FB 22 2D 23 23 23 23 23 |..70);:.."-#####|
00000A50: 2E 23 23 22 3B 53 55 00 63 26 4A 00 81 49 B2 4A |.##";SU.c&J..I.J|
00000A60: A4 50 41 00 7F 26 4B 00 8B CA 28 41 24 28 49 2C |.PA..&K...(A$(I,|
00000A70: 31 29 2C 51 2C 31 29 B3 B1 22 31 22 A7 38 32 00 |1),Q,1).."1".82.|
00000A80: 98 26 4C 00 99 22 20 22 3B 3A 99 FB 22 23 23 22 |.&L.." ";:.."##"|
00000A90: 3B 41 28 49 2C 31 29 3B 00 B6 26 4D 00 99 22 20 |;A(I,1);..&M.." |
00000AA0: 20 20 22 41 24 28 49 2C 30 29 3B A3 33 36 29 47 | "A$(I,0);.36)G|
00000AB0: 24 28 49 2C 31 29 00 D9 26 4E 00 99 A3 36 30 29 |$(I,1)..&N...60)|
00000AC0: 22 91 22 3B 3A 99 FB 22 2D 23 23 23 23 2E 23 23 |".";:.."-####.##|
00000AD0: 22 3B 41 28 49 2C 30 29 3B 00 02 27 4F 00 53 55 |";A(I,0);..'O.SU|
00000AE0: B2 53 55 AA 41 28 49 2C 30 29 3A 99 A3 37 30 29 |.SU.A(I,0):..70)|
00000AF0: 3B 3A 99 FB 22 2D 23 23 23 23 23 2E 23 23 22 3B |;:.."-#####.##";|
00000B00: 53 55 00 11 27 50 00 53 4F 28 51 AA 31 29 B2 53 |SU..'P.SO(Q.1).S|
00000B10: 55 00 24 27 51 00 A1 41 24 3A 8B 20 41 24 B2 22 |U.$'Q..A$:. A$."|
00000B20: 22 A7 38 31 00 4C 27 52 00 82 49 3A 99 C7 28 37 |".81.L'R..I:..(7|
00000B30: 29 22 C4 45 5A 45 20 4D 41 41 4E 44 20 50 52 49 |)".EZE MAAND PRI|
00000B40: 4E 54 45 4E 3F 20 28 4A 2F 4E 29 22 00 5E 27 53 |NTEN? (J/N)".^'S|
00000B50: 00 A1 58 24 3A 8B 58 24 B2 22 22 A7 38 33 00 7B |..X$:.X$."".83.{|
00000B60: 27 54 00 8B 58 24 B2 22 4A 22 A7 31 33 30 3A D5 |'T..X$."J".130:.|
00000B70: 8B 58 24 B3 B1 22 4E 22 A7 38 33 00 81 27 55 00 |.X$.."N".83..'U.|
00000B80: 8E 00 B2 27 56 00 99 22 11 1D 1D 1D 1D 1D 1D 1D |...'V.."........|
00000B90: 1D 1D 1D 1D 1D 12 20 CF D0 2F D6 C1 CE A0 C4 C9 |...... ../......|
00000BA0: D3 CB 20 92 22 3A 44 24 B2 22 46 49 4E 41 4E 43 |.. .":D$."FINANC|
00000BB0: 45 22 00 EA 27 57 00 99 22 11 CB 45 55 5A 45 20 |E"..'W.."..EUZE |
00000BC0: 55 49 54 20 3A 22 3A 99 22 11 20 31 29 20 D3 41 |UIT :":.". 1) .A|
00000BD0: 56 45 20 44 41 54 41 22 3A 99 22 11 20 32 29 20 |VE DATA":.". 2) |
00000BE0: CC 4F 41 44 20 44 41 54 41 22 00 07 28 58 00 99 |.OAD DATA"..(X..|
00000BF0: 22 11 20 33 29 20 D2 45 54 4F 55 52 20 4D 45 4E |". 3) .ETOUR MEN|
00000C00: 55 20 22 3A 51 B2 30 00 34 28 59 00 85 22 11 20 |U ":Q.0.4(Y..". |
00000C10: D7 41 54 20 49 53 20 55 57 20 4B 45 55 5A 45 3A |.AT IS UW KEUZE:|
00000C20: 20 33 9D 9D 9D 22 3B 51 3A 91 51 89 39 31 2C 31 | 3...";Q:.Q.91,1|
00000C30: 30 30 2C 32 00 3A 28 5A 00 8E 00 66 28 5B 00 99 |00,2.:(Z...f([..|
00000C40: C7 28 31 35 29 C7 28 31 38 29 22 11 11 20 D3 C1 |.(15).(18)".. ..|
00000C50: D6 C9 CE C7 A0 C4 C1 D4 C1 20 11 22 3A 4A 52 24 |......... .":JR$|
00000C60: B2 C4 28 4A 52 29 00 86 28 5C 00 9F 20 31 2C 38 |..(JR)..(\.. 1,8|
00000C70: 2C 32 2C 22 40 30 3A 22 AA 44 24 AA 4A 52 24 AA |,2,"@0:".D$.JR$.|
00000C80: 22 2C 53 2C 57 22 00 9F 28 5D 00 98 31 2C 50 41 |",S,W"..(]..1,PA|
00000C90: 3B 43 52 24 3B 4A 52 3B 43 52 24 3B 52 4E 24 00 |;CR$;JR;CR$;RN$.|
00000CA0: B7 28 5E 00 81 4A B2 31 A4 31 32 3A 98 31 2C 53 |.(^..J.1.12:.1,S|
00000CB0: 4F 28 4A 29 3A 82 4A 00 C3 28 5F 00 81 49 B2 30 |O(J):.J..(_..I.0|
00000CC0: A4 50 41 00 03 29 60 00 98 31 2C 41 24 28 49 2C |.PA..)`..1,A$(I,|
00000CD0: 30 29 3B 43 52 24 3B 41 28 49 2C 30 29 3B 43 52 |0);CR$;A(I,0);CR|
00000CE0: 24 3B 41 28 49 2C 31 29 3B 43 52 24 3B 41 24 28 |$;A(I,1);CR$;A$(|
00000CF0: 49 2C 31 29 3B 43 52 24 3B 47 24 28 49 2C 31 29 |I,1);CR$;G$(I,1)|
00000D00: 3A 82 49 00 61 29 61 00 A0 31 3A 8B 44 53 B2 30 |:.I.a)a..1:.DS.0|
00000D10: A7 99 22 11 C4 41 54 41 20 53 54 41 41 54 20 4F |.."..ATA STAAT O|
00000D20: 50 20 44 49 53 4B 2C 22 C7 28 37 29 C7 28 31 35 |P DISK,".(7).(15|
00000D30: 29 C7 28 31 38 29 22 20 D2 C5 D4 D5 D2 CE 20 22 |).(18)" ...... "|
00000D40: 3A D5 99 44 53 24 3A 99 C7 28 37 29 C7 28 31 35 |:..DS$:..(7).(15|
00000D50: 29 C7 28 31 38 29 22 11 20 D2 C5 D4 D5 D2 CE 20 |).(18)". ...... |
00000D60: 22 00 77 29 62 00 A1 47 24 3A 8B 47 24 B3 B1 C7 |".w)b..G$:.G$...|
00000D70: 28 31 33 29 A7 39 38 00 7D 29 63 00 8E 00 99 29 |(13).98.})c....)|
00000D80: 64 00 85 22 11 D7 45 4C 4B 20 4A 41 41 52 20 20 |d.."..ELK JAAR |
00000D90: 20 30 9D 9D 9D 22 3B 4A 52 00 BA 29 65 00 99 22 | 0...";JR..)e.."|
00000DA0: 11 11 CC 4F 41 44 49 4E 47 20 44 41 54 41 11 22 |...OADING DATA."|
00000DB0: 3A 4A 52 24 B2 C4 28 4A 52 29 00 CC 29 66 00 9F |:JR$..(JR)..)f..|
00000DC0: 31 2C 38 2C 32 2C 44 24 AA 4A 52 24 00 DD 29 67 |1,8,2,D$.JR$..)g|
00000DD0: 00 84 31 2C 50 41 2C 4A 52 2C 52 4E 24 00 F5 29 |..1,PA,JR,RN$..)|
00000DE0: 68 00 81 4A B2 31 A4 31 32 3A 84 31 2C 53 4F 28 |h..J.1.12:.1,SO(|
00000DF0: 4A 29 3A 82 4A 00 2D 2A 69 00 81 49 B2 30 A4 50 |J):.J.-*i..I.0.P|
00000E00: 41 3A 84 31 2C 41 24 28 49 2C 30 29 2C 41 28 49 |A:.1,A$(I,0),A(I|
00000E10: 2C 30 29 2C 41 28 49 2C 31 29 2C 41 24 28 49 2C |,0),A(I,1),A$(I,|
00000E20: 31 29 2C 47 24 28 49 2C 31 29 3A 82 49 00 34 2A |1),G$(I,1):.I.4*|
00000E30: 6A 00 A0 31 00 8B 2A 6B 00 8B 44 53 B2 30 A7 99 |j..1..*k..DS.0..|
00000E40: 22 11 C4 41 54 41 20 49 53 20 42 49 4E 4E 45 4E |"..ATA IS BINNEN|
00000E50: 2C 22 C7 28 37 29 C7 28 31 35 29 C7 28 31 38 29 |,".(7).(15).(18)|
00000E60: 22 20 D2 C5 D4 D5 D2 CE 20 22 3A D5 99 44 53 24 |" ...... ":..DS$|
00000E70: 3A 99 C7 28 37 29 C7 28 31 35 29 C7 28 31 38 29 |:..(7).(15).(18)|
00000E80: 22 11 20 D2 C5 D4 D5 D2 CE 20 22 00 A2 2A 6C 00 |". ...... "..*l.|
00000E90: A1 47 24 3A 8B 47 24 B3 B1 C7 28 31 33 29 A7 31 |.G$:.G$...(13).1|
00000EA0: 30 38 00 A8 2A 6D 00 8E 00 D8 2A 6E 00 99 22 93 |08..*m....*n..".|
00000EB0: 22 3A 85 22 11 11 11 11 11 11 1D 1D D7 41 54 20 |":.".........AT |
00000EC0: 49 53 20 48 45 54 20 4A 41 41 52 54 41 4C 20 20 |IS HET JAARTAL |
00000ED0: 30 9D 9D 9D 22 3B 4A 52 00 FF 2A 6F 00 85 22 11 |0...";JR..*o..".|
00000EE0: 1D 1D D7 41 54 20 49 53 20 48 45 54 20 52 45 4B |...AT IS HET REK|
00000EF0: 2E 4E 52 2E 20 20 30 9D 9D 9D 22 3B 52 4E 24 00 |.NR. 0...";RN$.|
00000F00: 28 2B 70 00 99 22 11 20 20 D7 41 54 20 49 53 20 |(+p..". .AT IS |
00000F10: 48 45 54 20 42 45 47 49 4E 53 41 4C 44 4F 20 20 |HET BEGINSALDO |
00000F20: 20 22 3B 53 4F 28 31 29 00 51 2B 71 00 85 22 91 | ";SO(1).Q+q..".|
00000F30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000F40: 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 53 4F 28 31 29 3A |........";SO(1):|
00000F50: 8E 00 72 2B 72 00 99 22 93 20 20 20 20 20 20 20 |..r+r..". |
00000F60: 20 20 20 20 20 20 20 12 20 DA CF C5 CB C5 CE 20 | . ...... |
00000F70: 92 22 00 A5 2B 73 00 99 22 11 20 20 31 29 20 CE |."..+s..". 1) .|
00000F80: 41 41 4D 20 42 45 54 41 4C 49 4E 47 22 3A 99 22 |AAM BETALING":."|
00000F90: 11 20 20 32 29 20 C2 45 54 41 4C 49 4E 47 53 57 |. 2) .ETALINGSW|
00000FA0: 49 4A 5A 45 22 00 AE 2B 74 00 A1 F9 51 24 00 C7 |IJZE"..+t...Q$..|
00000FB0: 2B 75 00 8B 51 24 B3 B1 22 31 22 AF 51 24 B3 B1 |+u..Q$.."1".Q$..|
00000FC0: 22 32 22 A7 31 31 36 00 F4 2B 76 00 85 22 11 11 |"2".116..+v.."..|
00000FD0: D7 41 41 52 20 5A 4F 45 4B 54 20 55 20 4E 41 41 |.AAR ZOEKT U NAA|
00000FE0: 52 20 20 20 30 9D 9D 9D 22 3B 5A 24 3A 4C B2 C3 |R 0...";Z$:L..|
00000FF0: 28 5A 24 29 00 09 2C 77 00 8B C8 28 5A 24 2C 31 |(Z$)..,w...(Z$,1|
00001000: 29 B2 22 30 22 A7 31 32 37 00 26 2C 78 00 8B 51 |)."0".127.&,x..Q|
00001010: 24 B2 22 31 22 A7 31 32 31 3A D5 8B 51 24 B2 22 |$."1".121:..Q$."|
00001020: 32 22 A7 31 32 34 00 49 2C 79 00 81 49 B2 31 A4 |2".124.I,y..I.1.|
00001030: 50 41 AB 32 3A 8B C8 28 41 24 28 49 2C 30 29 2C |PA.2:..(A$(I,0),|
00001040: 4C 29 B3 B1 5A 24 A7 82 49 00 61 2C 7A 00 8B C8 |L)..Z$..I.a,z...|
00001050: 28 41 24 28 49 2C 30 29 2C 4C 29 B2 5A 24 A7 34 |(A$(I,0),L).Z$.4|
00001060: 35 00 68 2C 7B 00 89 32 00 8B 2C 7C 00 81 49 B2 |5.h,{..2..,|..I.|
00001070: 31 A4 50 41 AB 31 3A 8B C8 28 47 24 28 49 2C 31 |1.PA.1:..(G$(I,1|
00001080: 29 2C 4C 29 B3 B1 5A 24 A7 82 49 00 A3 2C 7D 00 |),L)..Z$..I..,}.|
00001090: 8B C8 28 47 24 28 49 2C 31 29 2C 4C 29 B2 5A 24 |..(G$(I,1),L).Z$|
000010A0: A7 34 35 00 AA 2C 7E 00 89 32 00 C6 2C 7F 00 81 |.45..,~..2..,...|
000010B0: 49 B2 30 A4 50 41 AB 31 3A 8B 41 28 49 2C 30 29 |I.0.PA.1:.A(I,0)|
000010C0: B3 B1 30 A7 82 49 00 DD 2C 80 00 8B 41 28 49 2C |..0..I..,...A(I,|
000010D0: 30 29 B2 30 A7 99 22 93 22 3A 89 34 35 00 E4 2C |0).0..".":.45..,|
000010E0: 81 00 89 32 00 02 2D 82 00 53 55 B2 30 3A 9F 34 |...2..-..SU.0:.4|
000010F0: 2C 34 2C 37 3A 9F 31 2C 34 2C 31 3A 9F 32 2C 34 |,4,7:.1,4,1:.2,4|
00001100: 2C 32 00 4C 2D 83 00 98 34 3A 98 34 2C 22 1D 1D |,2.L-...4:.4,"..|
00001110: 1D 1D 1D 1D 1D 1D 1D 1D 1D CD C1 C1 CE C4 CF D6 |................|
00001120: C5 D2 DA C9 C3 C8 D4 20 20 20 22 3B 4D 41 24 28 |....... ";MA$(|
00001130: 51 AB 31 29 3B 4A 52 3B 22 20 20 20 20 20 20 20 |Q.1);JR;" |
00001140: 20 20 20 20 20 20 20 20 22 52 4E 24 00 7A 2D 84 | "RN$.z-.|
00001150: 00 46 24 B2 22 41 41 41 41 41 41 41 41 41 41 41 |.F$."AAAAAAAAAAA|
00001160: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 20 |AAAAAAAAAAAAAAA |
00001170: 53 39 39 39 39 39 2E 39 39 22 00 84 2D 85 00 98 |S99999.99"..-...|
00001180: 32 2C 46 24 00 A8 2D 86 00 41 24 B2 22 C2 45 47 |2,F$..-..A$.".EG|
00001190: 49 4E 53 41 4C 44 4F 20 44 45 5A 45 20 4D 41 41 |INSALDO DEZE MAA|
000011A0: 4E 44 20 49 53 3A 20 22 00 BB 2D 87 00 98 31 2C |ND IS: "..-...1,|
000011B0: 41 24 2C C7 28 32 39 29 2C 53 4F 00 10 2E 88 00 |A$,.(29),SO.....|
000011C0: 46 24 B2 22 C4 41 47 20 20 CE 41 41 4D 20 20 20 |F$.".AG .AAM |
000011D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000011E0: 20 20 20 20 20 C2 45 54 41 41 4C 44 20 4D 45 54 | .ETAALD MET|
000011F0: 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 45 |: .E|
00001200: 44 52 41 47 20 20 20 20 20 D4 4F 54 41 41 4C 22 |DRAG .OTAAL"|
00001210: 00 1A 2E 89 00 98 34 2C 46 24 00 72 2E 8A 00 46 |......4,F$.r...F|
00001220: 24 B2 22 20 5A 5A 20 20 41 41 41 41 41 41 41 41 |$." ZZ AAAAAAAA|
00001230: 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 41 |AAAAAAAAAAAAAAAA|
00001240: 41 20 20 20 41 41 41 41 41 41 41 41 41 41 41 41 |A AAAAAAAAAAAA|
00001250: 41 41 41 41 41 41 41 41 41 41 20 20 20 53 39 39 |AAAAAAAAAA S99|
00001260: 39 39 2E 39 39 20 20 20 53 39 39 39 39 39 2E 39 |99.99 S99999.9|
00001270: 39 22 00 7C 2E 8B 00 98 32 2C 46 24 00 A7 2E 8C |9".|....2,F$....|
00001280: 00 53 55 B2 53 4F 3A 81 49 B2 30 A4 50 41 3A 8B |.SU.SO:.I.0.PA:.|
00001290: CA 28 41 24 28 49 2C 31 29 2C 51 2C 31 29 B3 B1 |.(A$(I,1),Q,1)..|
000012A0: 22 31 22 A7 31 34 33 00 E0 2E 8D 00 41 B2 41 28 |"1".143.....A.A(|
000012B0: 49 2C 31 29 3A 41 24 B2 41 24 28 49 2C 30 29 3A |I,1):A$.A$(I,0):|
000012C0: 42 B2 41 28 49 2C 30 29 3A 53 55 B2 53 55 AA 41 |B.A(I,0):SU.SU.A|
000012D0: 28 49 2C 30 29 3A 47 24 B2 47 24 28 49 2C 31 29 |(I,0):G$.G$(I,1)|
000012E0: 00 00 2F 8E 00 98 31 2C 41 2C 41 24 2C C7 28 32 |../...1,A,A$,.(2|
000012F0: 39 29 2C 47 24 2C C7 28 32 39 29 2C 42 2C 53 55 |9),G$,.(29),B,SU|
00001300: 00 07 2F 8F 00 82 49 00 26 2F 90 00 98 34 2C 22 |../...I.&/...4,"|
00001310: C5 49 4E 44 45 20 4D 41 41 4E 44 20 22 3B 4D 41 |.INDE MAAND ";MA|
00001320: 24 28 51 AB 31 29 00 61 2F 91 00 99 C7 28 31 35 |$(Q.1).a/....(15|
00001330: 29 C7 28 31 38 29 C7 28 37 29 C7 28 31 30 29 22 |).(18).(7).(10)"|
00001340: 20 D2 C5 D4 D5 D2 CE 20 22 3B C7 28 31 34 33 29 | ...... ";.(143)|
00001350: C7 28 31 34 36 29 22 56 4F 4F 52 20 4D 45 4E 55 |.(146)"VOOR MENU|
00001360: 22 00 78 2F 92 00 A1 58 24 3A 8B 58 24 B3 B1 C7 |".x/...X$:.X$...|
00001370: 28 31 33 29 A7 31 34 36 00 88 2F 93 00 A0 34 3A |(13).146../...4:|
00001380: A0 31 3A A0 32 3A 89 32 00 BD 2F 94 00 99 22 13 |.1:.2:.2../...".|
00001390: 11 C2 45 54 41 4C 49 4E 47 3A 20 20 20 22 3B 41 |..ETALING: ";A|
000013A0: 24 28 49 2C 30 29 3A 85 22 91 1D 1D 1D 1D 1D 1D |$(I,0):.".......|
000013B0: 1D 1D 1D 1D 22 3B 41 24 28 49 2C 30 29 00 F7 2F |....";A$(I,0)../|
000013C0: 95 00 99 22 11 C2 45 54 41 41 4C 44 20 4D 45 54 |..."..ETAALD MET|
000013D0: 3A 20 20 20 22 3B 47 24 28 49 2C 31 29 3A 85 22 |: ";G$(I,1):."|
000013E0: 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 3B |..............";|
000013F0: 47 24 28 49 2C 31 29 00 25 30 96 00 99 22 11 C2 |G$(I,1).%0..."..|
00001400: 45 44 52 41 47 3A 20 20 20 22 3B 41 28 49 2C 30 |EDRAG: ";A(I,0|
00001410: 29 3A 85 22 91 1D 1D 1D 1D 1D 1D 1D 1D 22 3B 41 |):.".........";A|
00001420: 28 49 2C 30 29 00 68 30 97 00 99 22 11 C4 41 47 |(I,0).h0..."..AG|
00001430: 20 56 41 4E 20 42 45 54 41 4C 49 4E 47 3A 20 20 | VAN BETALING: |
00001440: 20 22 3B 41 28 49 2C 31 29 3A 85 22 91 1D 1D 1D | ";A(I,1):."....|
00001450: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001460: 22 3B 41 28 49 2C 31 29 00 6F 30 98 00 89 32 00 |";A(I,1).o0...2.|
00001470: 96 30 99 00 8F 20 47 2E 4A 2E 48 41 52 44 45 56 |.0... G.J.HARDEV|
00001480: 45 4C 44 20 5A 41 41 4E 44 41 4D 20 30 37 35 2D |ELD ZAANDAM 075-|
00001490: 33 35 35 38 37 38 00 00 00 |355878... |
.......%:.6,1:.5,8:.17.O....G(27)"U":.G(
14)"... .
FINANCE . ":.JR..0...41)". "JR......"..
U KUNT KIEZEN UIT:"......". 1) NIEUWE
BETALINGEN".R....". 2) AFGEHANDELDE B
ETALINGEN"......". 3) MAANDOVERZICHT".
.....". 4) OP/VAN DISK".;....". 5) O
PGAVE JAARTAL/REK.NUMMER/BEGINSALDO.X...
.". 6) WIST ALLE DATA".J....". 7) ST
OP......".. WAT IS UW KEUZE: 1...";Z:.".
";......PA..0.(Z..2.Z..3).14......".....
.........SORRY, NOG GEEN DATA.":..2:.2..
....Z. 22,44,63,86,110,17,15:.2.>...."..
.......
. FINANCE ".}....".
..GESLOTEN VOOR ZAKEN.":..E.
...:IN.1:.A$(500,1),A(500,1),G$(500,1),S
O(13):A(0,1).999:.:S$." "......MA$(1
1):.I.0.11:.A$:MA$(I).A$:.:CR$.G(13).2..
.."JANUARI","FEBRUARI","MAART","APRIL","
MEI","JUNI","JULI".N...."AUGUSTUS","SEPT
EMBER","OKTOBER","NOVEMBER","DECEMBER".Z
...OP.0:.2......"............... NIEUWE
GEGEVENS .".E....". 1) CREDIT":." 2) D
EBET"......".WAT IS UW KEUZE: 2...";CD:C
D.CD.1.! ...".NAAM VAN BETALING: ZZZ....
.";Q$:.Q$."ZZZ".2.D ...".HOE BETAALD";G$
:.G$."ZZZ".2.[ ...".BEDRAG: 0...";Q.. ..
.".MAAND: 1...";R$:."...................
..":.R$."ZZZ".2.. ...I.1.C(R$).2:.M.E(J(
R$,I,2)).1.M ...M..0.M..11.32..!...:.".V
ERKEERDE MAAND .":
..4:.28.#! .. ". "MA$(M);JR;:.:..L!!.
.".DAG VAN BETALING: 1...";S:."..."S..!"
.T$."N":."....IS DIT CORRECT (J/N): J..
.";T$:.T$."J".36. !#..T$.."J"..".";:. 22
..!$.PA.PA.1:.J.PA.1.0..1.."%..S.A(J,1).
.K.0.1:A$(J.1,K).A$(J,K):A(J.1,K).A(J,K)
:G$(J.1,K).G$(J,K):.K,J.("&.J.J.1:A$(J,1
)."000000000000".H"'..I.1.C(R$).2:M.E(J(
R$,I,2)).Y"(.A$(J,1).H(A$(J,1),M.1)."1".
I(A$(J,1),12.M):...").A$(J,0).Q$:A(J,0).
Q:A(J,1).S:G$(J,1).G$.."*..CD.1.A(J,0).A
(J,0)..1.F"+...T",..I.0.PA.1.."-.."..BET
ALING: ";A$(I,0)..#...".BETAALD MET: ";G
$(I,1).%#/..".BEDRAG:";A(I,0).?#0..".MAA
ND: ";:. J.1.12.E#1..J(A$(I,1),J,1)."1".
.MA$(J.1);JR;.N#2..J:...#3..".DAG VAN BE
TALING:";A(I,1).O#4.."..COMMANDO MET NUM
MER TOETS:.":.".1 - VOLGENDE BETALING":.
.#5..".3 - RETOUR MENU".;$6..".5 - ZOEK
OPDRACHT" :.".8 - WIST DEZE BETALING":."
.9 - WIJZIGT DEZE BETALING".[$7.Q$."":."
.WAT IS UW KEUZE:?".M$8..Q$:.Q$."".56.}$
9..Q$."9".148..$:..Q$."5".114..$;..Q$.."
8".61..$<..J.I.PA.1:. K.0.1:A$(J,K).A$(J
.1,K):A(J,K).A(J.1,K):G$(J,K).G$(J.1,K):
.K,J:PA.PA.1:...%=..Q$."1"..I..%>...:%?.
."............MAANDOVERZICHT":SU.0:I.0:J
.0.[%@..".NUMMER VAN MAAND: 0...";Q.P%A.
.Q.12.64:U.Q.0.2..%B.SU.SU.SO(Q):.Q.1.70
..%C.. .J.500..%D.J.J.1..%E.. . J(A$(J,1
),Q,1).."1"..%F..".......";MA$(Q.1);JR;.
23)RN$..&G..G(7).60)". BEDRAG TOTAAL
.".+&H.."DAG NAAM: ".36)"BETAALD MET
:";.W&I.SO.SUM:SO(Q).SO:..70);:.."-#####
.##";SU.C&J..I.J.PA.&K..J(A$(I,1),Q,1).
."1".82..&L.." ";:.."##";A(I,1);..&M.."
"A$(I,0);.36)G$(I,1).Y&N...60)".";:.."
-####.##";A(I,0);..'O.SU.SU.A(I,0):..70)
;:.."-#####.##";SU..'P.SO(Q.1).SU.$'Q..A
$:. A$."".81.L'R..I:.G(7)"DEZE MAAND PRI
NTEN? (J/N)".^'S..X$:.X$."".83.{'T..X$."
J".130:U.X$.."N".83..'U....'V.."........
...... OP/VAN DISK .":D$."FINANCE"..'W..
".KEUZE UIT :":.". 1) SAVE DATA":.". 2)
LOAD DATA"..(X..". 3) RETOUR MENU ":Q.0.
4(Y..". WAT IS UW KEUZE: 3...";Q:.Q.91,1
00,2.:(Z...F([..G(15)G(18)".. SAVING DAT
A .":JR$.D(JR)..(\.. 1,8,2,"@0:".D$.JR$.
",S,W"..(]..1,PA;CR$;JR;CR$;RN$..(^..J.1
.12:.1,SO(J):.J.C(_..I.0.PA..)`..1,A$(I,
0);CR$;A(I,0);CR$;A(I,1);CR$;A$(I,1);CR$
;G$(I,1):.I.A)A. 1:.DS.0..".DATA STAAT O
P DISK,"G(7)G(15)G(18)" RETURN ":U.DS$:.
G(7)G(15)G(18)". RETURN ".W)B..G$:.G$..G
(13).98.})C....)D..".WELK JAAR 0...";J
R..)E.."..LOADING DATA.":JR$.D(JR).L)F..
1,8,2,D$.JR$..)G..1,PA,JR,RN$..)H..J.1.1
2:.1,SO(J):.J.-*I..I.0.PA:.1,A$(I,0),A(I
,0),A(I,1),A$(I,1),G$(I,1):.I.4*J. 1..*K
..DS.0..".DATA IS BINNEN,"G(7)G(15)G(18)
" RETURN ":U.DS$:.G(7)G(15)G(18)". RETUR
N "..*L..G$:.G$..G(13).108..*M...X*N..".
":."........WAT IS HET JAARTAL 0...";JR
..*O.."...WAT IS HET REK.NR. 0...";RN$.
(+P..". WAT IS HET BEGINSALDO ";SO(1)
.Q+Q..".........................";SO(1):
..R+R..". . ZOEKEN ."..+S..
". 1) NAAM BETALING":.". 2) BETALINGSW
IJZE"..+T...Q$.G+U..Q$.."1".Q$.."2".116.
.+V.."..WAAR ZOEKT U NAAR 0...";Z$:L.C
(Z$)..,W..H(Z$,1)."0".127.&,X..Q$."1".12
1:U.Q$."2".124.I,Y..I.1.PA.2:.H(A$(I,0),
L)..Z$..I.A,Z..H(A$(I,0),L).Z$.45.H,{..2
..,|..I.1.PA.1:.H(G$(I,1),L)..Z$..I..,}.
.H(G$(I,1),L).Z$.45..,~..2.F,..I.0.PA.1
:.A(I,0)..0..I..,...A(I,0).0..".":.45..,
...2..-..SU.0:.4,4,7:.1,4,1:.2,4,2.L-...
4:.4,"...........MAANDOVERZICHT ";MA$(
Q.1);JR;" "RN$.Z-..F$."AAA
AAAAAAAAAAAAAAAAAAAAAAA S99999.99"..-...
2,F$..-..A$."BEGINSALDO DEZE MAAND IS: "
..-...1,A$,G(29),SO.....F$."DAG NAAM
BETAALD MET:
BEDRAG TOTAAL"......4,F$.R...F
$." ZZ AAAAAAAAAAAAAAAAAAAAAAAAA AAAA
AAAAAAAAAAAAAAAAAA S9999.99 S99999.9
9".|....2,F$.....SU.SO:.I.0.PA:.J(A$(I,1
),Q,1).."1".143.....A.A(I,1):A$.A$(I,0):
B.A(I,0):SU.SU.A(I,0):G$.G$(I,1)../...1,
A,A$,G(29),G$,G(29),B,SU../...I.&/...4,"
EINDE MAAND ";MA$(Q.1).A/...G(15)G(18)G(
7)G(10)" RETURN ";G(143)G(146)"VOOR MENU
".X/...X$:.X$..G(13).146../.. 4: 1: 2:.2
../..."..BETALING: ";A$(I,0):.".......
....";A$(I,0)../...".BETAALD MET: ";G$
(I,1):."..............";G$(I,1).%0...".B
EDRAG: ";A(I,0):.".........";A(I,0).H0
...".DAG VAN BETALING: ";A(I,1):."....
................";A(I,1).O0...2..0... G.
J.HARDEVELD ZAANDAM 075-355878...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL