KONTINDTAST
FILE INFORMATION
FILENAME(S): KONTINDTAST
FILE TYPE(S): PRG
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 19:38:41
APPEARS ON: 1 disk(s)
FILE HASH
355299e8a373b3f1dfd0fd25846e225c8534196ad260aa4a4088367d3cc11ae3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMFINANS | KONTINDTAST | PRG | Curtcool, Brian | 29 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 01 00 9E 32 30 36 34 00 00 00 02 00 |.......2064.....| 00000010: 8F A5 9D F0 03 4C E2 FC A9 FF 8D 0C 08 4C 33 A5 |.....L.......L3.| 00000020: 00 50 08 03 00 9C 3A 86 41 24 28 33 30 31 29 3A |.P....:.A$(301):| 00000030: 9F 31 35 2C 38 2C 31 35 3A 9F 35 2C 38 2C 35 2C |.15,8,15:.5,8,5,| 00000040: 22 49 4E 44 45 58 2C 4C 2C 22 AA C7 28 32 31 29 |"INDEX,L,"..(21)| 00000050: 00 97 08 04 00 98 31 35 2C 22 50 22 C7 28 35 29 |......15,"P".(5)| 00000060: C7 28 34 35 29 C7 28 31 29 3A 84 35 2C 54 47 24 |.(45).(1):.5,TG$| 00000070: 3A 54 47 B2 C5 28 54 47 24 29 3A 81 58 B2 31 A4 |:TG..(TG$):.X.1.| 00000080: 54 47 3A 54 B2 B5 28 58 AD 32 35 36 29 3A 51 B2 |TG:T..(X.256):Q.| 00000090: 58 AB 54 AC 32 35 36 00 BA 08 05 00 98 31 35 2C |X.T.256......15,| 000000A0: 22 50 22 C7 28 35 29 C7 28 51 29 C7 28 54 29 3A |"P".(5).(Q).(T):| 000000B0: 84 35 2C 41 24 28 58 29 3A 82 00 DE 08 06 00 81 |.5,A$(X):.......| 000000C0: 58 B2 54 47 AA 31 A4 33 30 30 3A 41 24 28 58 29 |X.TG.1.300:A$(X)| 000000D0: B2 22 30 30 30 30 22 AA C4 28 58 29 3A 82 00 0C |."0000"..(X):...| 000000E0: 09 07 00 A0 35 3A 99 22 93 11 11 11 20 20 20 20 |....5:.".... | 000000F0: 20 12 49 4E 44 54 41 53 54 4E 49 4E 47 20 41 46 | .INDTASTNING AF| 00000100: 20 4B 4F 4E 54 4F 50 4C 41 4E 92 22 00 34 09 08 | KONTOPLAN.".4..| 00000110: 00 99 22 11 11 11 20 20 31 2E 20 49 4E 44 54 41 |.."... 1. INDTA| 00000120: 53 54 4E 49 4E 47 20 41 46 20 4B 4F 4E 54 4F 50 |STNING AF KONTOP| 00000130: 4C 41 4E 22 00 71 09 09 00 99 22 11 11 11 20 20 |LAN".q...."... | 00000140: 32 2E 20 52 45 54 55 52 20 54 49 4C 20 4D 45 4E |2. RETUR TIL MEN| 00000150: 55 22 3A 99 22 11 11 11 20 20 20 20 20 49 4E 44 |U":."... IND| 00000160: 54 41 53 54 20 56 41 4C 47 20 3C A0 3E 22 3A A0 |TAST VALG <.>":.| 00000170: 35 00 9F 09 0A 00 4B 31 24 B2 22 41 4A 4F 55 52 |5.....K1$."AJOUR| 00000180: 46 5C 52 49 4E 47 20 41 46 20 4B 4F 4E 54 4F 22 |F\RING AF KONTO"| 00000190: 3A 4B 32 24 B2 22 4E 59 20 4B 4F 4E 54 4F 22 00 |:K2$."NY KONTO".| 000001A0: D1 09 0B 00 97 35 30 37 39 35 2C 31 30 30 3A 97 |.....50795,100:.| 000001B0: 35 35 39 31 35 2C 31 3A 81 58 B2 31 A4 33 30 30 |55915,1:.X.1.300| 000001C0: 3A 82 3A A1 56 24 3A 8B 56 24 B3 B1 22 22 A7 31 |:.:.V$:.V$.."".1| 000001D0: 33 00 F8 09 0C 00 97 35 30 37 39 35 2C 33 32 3A |3......50795,32:| 000001E0: 81 58 B2 31 A4 33 30 30 3A 82 3A A1 56 24 3A 8B |.X.1.300:.:.V$:.| 000001F0: 56 24 B2 22 22 A7 31 31 00 10 0A 0D 00 8B 56 24 |V$."".11......V$| 00000200: B3 B1 22 31 22 AF 56 24 B3 B1 22 32 22 A7 31 31 |.."1".V$.."2".11| 00000210: 00 49 0A 0E 00 97 35 30 37 39 35 2C C6 28 56 24 |.I....50795,.(V$| 00000220: 29 3A 8B 56 24 B2 22 31 22 A7 9F 35 2C 38 2C 35 |):.V$."1"..5,8,5| 00000230: 2C 22 4B 4F 4E 54 4F 50 4C 41 4E 2C 4C 2C 22 AA |,"KONTOPLAN,L,".| 00000240: C7 28 38 30 29 3A 89 31 37 00 5D 0A 0F 00 8B 56 |.(80):.17.]....V| 00000250: 24 B2 22 32 22 AF 43 48 B2 31 A7 38 38 00 9A 0A |$."2".CH.1.88...| 00000260: 10 00 8B 56 24 B2 22 32 22 A7 A0 31 35 3A 99 22 |...V$."2"..15:."| 00000270: 93 11 11 11 11 11 11 11 11 11 11 11 22 A6 31 32 |............".12| 00000280: 29 22 56 45 4E 54 20 45 54 20 5C 4A 45 42 4C 49 |)"VENT ET \JEBLI| 00000290: 4B 22 3A 93 22 4D 45 4E 55 22 00 E9 0A 11 00 99 |K":."MENU"......| 000002A0: 22 93 11 11 20 20 20 31 2E 20 4B 4F 4E 54 4F 4E |"... 1. KONTON| 000002B0: 55 4D 4D 45 52 22 3A 99 22 11 11 20 20 20 32 2E |UMMER":.".. 2.| 000002C0: 20 4B 4F 4E 54 4F 4E 41 56 4E 22 3A 99 22 11 11 | KONTONAVN":."..| 000002D0: 20 20 20 33 2E 20 44 45 42 49 54 4F 52 2F 4B 52 | 3. DEBITOR/KR| 000002E0: 45 44 49 54 4F 52 2F 2D 22 00 2D 0B 12 00 99 22 |EDITOR/-".-...."| 000002F0: 11 11 20 20 20 34 2E 20 41 4B 54 49 56 2F 50 41 |.. 4. AKTIV/PA| 00000300: 53 53 49 56 2F 49 4E 44 54 2E 2F 55 44 47 49 46 |SSIV/INDT./UDGIF| 00000310: 54 22 3A 99 22 11 11 20 20 20 35 2E 20 4D 4F 4D |T":.".. 5. MOM| 00000320: 53 4B 4F 4E 54 4F 20 28 4A 2F 4E 29 22 00 4D 0B |SKONTO (J/N)".M.| 00000330: 13 00 99 22 11 11 20 20 20 36 2E 20 53 49 44 53 |...".. 6. SIDS| 00000340: 54 45 20 5D 52 53 20 53 41 4C 44 4F 22 00 73 0B |TE ]RS SALDO".s.| 00000350: 14 00 85 AC 33 2C 37 2C 34 2C 22 30 39 22 2C 22 |....3,7,4,"09","| 00000360: 22 2C 30 2C 4B 4E 24 3A 8B C5 28 4B 4E 24 29 B2 |",0,KN$:..(KN$).| 00000370: 30 A7 37 00 87 0B 15 00 8B C5 28 4B 4E 24 29 B3 |0.7.......(KN$).| 00000380: 31 30 30 30 A7 32 30 00 9C 0B 16 00 81 4F B2 31 |1000.20......O.1| 00000390: A4 54 47 3A 8B 54 47 B2 30 A7 32 34 00 D7 0B 17 |.TG:.TG.0.24....| 000003A0: 00 8B C8 28 41 24 28 4F 29 2C 34 29 B2 4B 4E 24 |...(A$(O),4).KN$| 000003B0: A7 54 41 B2 C5 28 CA 28 41 24 28 4F 29 2C 35 29 |.TA..(.(A$(O),5)| 000003C0: 29 3A 5A 41 24 B2 22 41 4A 4F 22 3A 4B 42 24 B2 |):ZA$."AJO":KB$.| 000003D0: 4B 31 24 3A 89 35 35 00 EE 0B 18 00 82 3A 5A 41 |K1$:.55......:ZA| 000003E0: 24 B2 22 4E 59 22 3A 4B 42 24 B2 4B 32 24 00 13 |$."NY":KB$.K2$..| 000003F0: 0C 19 00 99 22 13 20 20 20 20 20 20 12 22 4B 42 |....". ."KB| 00000400: 24 22 92 20 20 20 20 20 20 20 20 20 20 20 20 20 |$". | 00000410: 20 20 22 00 39 0C 1A 00 85 AC 36 2C 37 2C 33 30 | ".9.....6,7,30| 00000420: 2C 22 20 5D 22 2C 22 22 2C 31 2C 4E 41 24 3A 8B |," ]","",1,NA$:.| 00000430: 4E 41 24 B2 22 22 A7 32 36 00 50 0C 1B 00 8B 4E |NA$."".26.P....N| 00000440: 41 24 B2 22 53 4C 45 54 4E 49 4E 47 22 A7 35 38 |A$."SLETNING".58| 00000450: 00 77 0C 1C 00 85 AC 39 2C 37 2C 31 2C 22 44 44 |.w.....9,7,1,"DD| 00000460: 22 2C 22 4B 2D 22 2C 30 2C 44 45 24 3A 8B 44 45 |","K-",0,DE$:.DE| 00000470: 24 B2 22 22 A7 32 38 00 A0 0C 1D 00 85 AC 31 32 |$."".28.......12| 00000480: 2C 37 2C 31 2C 22 41 41 22 2C 22 50 49 55 22 2C |,7,1,"AA","PIU",| 00000490: 30 2C 46 49 24 3A 8B 46 49 24 B2 22 22 A7 32 39 |0,FI$:.FI$."".29| 000004A0: 00 E2 0C 1E 00 8B 46 49 24 B2 22 50 22 B0 46 49 |......FI$."P".FI| 000004B0: 24 B2 22 41 22 A7 4D 4F 24 B2 22 4E 22 3A 99 22 |$."A".MO$."N":."| 000004C0: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000004D0: 20 20 20 20 20 20 3E 22 4D 4F 24 22 3C 22 3A 89 | >"MO$"<":.| 000004E0: 33 32 00 09 0D 1F 00 85 AC 31 35 2C 37 2C 31 2C |32.......15,7,1,| 000004F0: 22 4A 4A 22 2C 22 4E 22 2C 30 2C 4D 4F 24 3A 8B |"JJ","N",0,MO$:.| 00000500: 4D 4F 24 B2 22 22 A7 33 31 00 2B 0D 20 00 8B C9 |MO$."".31.+. ...| 00000510: 28 4B 4E 24 2C 32 29 B2 22 30 30 22 A7 53 49 24 |(KN$,2)."00".SI$| 00000520: B2 22 30 2E 30 30 22 3A 89 33 35 00 48 0D 21 00 |."0.00":.35.H.!.| 00000530: 85 AC 31 38 2C 37 2C 31 30 2C 22 30 39 22 2C 22 |..18,7,10,"09","| 00000540: 2E 22 2C 30 2C 53 49 24 00 5F 0D 22 00 8B 53 49 |.",0,SI$._."..SI| 00000550: 24 B2 22 22 A7 53 49 24 B2 22 30 2E 30 30 22 00 |$."".SI$."0.00".| 00000560: 9D 0D 23 00 99 22 13 11 11 11 11 11 11 11 11 11 |..#.."..........| 00000570: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 |.............. | 00000580: 20 20 20 20 20 52 45 54 54 45 4C 53 45 52 28 31 | RETTELSER(1| 00000590: 2D 36 29 20 53 4C 55 54 28 37 29 91 22 00 C4 0D |-6) SLUT(7)."...| 000005A0: 24 00 85 AC 32 33 2C 33 31 2C 31 2C 22 31 37 22 |$...23,31,1,"17"| 000005B0: 2C 22 22 2C 30 2C 53 56 24 3A 8B 53 56 24 B2 22 |,"",0,SV$:.SV$."| 000005C0: 22 A7 33 36 00 E5 0D 25 00 91 C5 28 53 56 24 29 |".36...%...(SV$)| 000005D0: 89 33 38 2C 34 33 2C 34 36 2C 34 38 2C 35 30 2C |.38,43,46,48,50,| 000005E0: 35 32 2C 36 35 00 0B 0E 26 00 85 AC 33 2C 37 2C |52,65...&...3,7,| 000005F0: 34 2C 22 30 39 22 2C 22 22 2C 30 2C 4B 4E 24 3A |4,"09","",0,KN$:| 00000600: 8B C5 28 4B 4E 24 29 B2 30 A7 37 00 1F 0E 27 00 |..(KN$).0.7...'.| 00000610: 8B C5 28 4B 4E 24 29 B3 31 30 30 30 A7 33 38 00 |..(KN$).1000.38.| 00000620: 34 0E 28 00 81 4F B2 31 A4 54 47 3A 8B 54 47 B2 |4.(..O.1.TG:.TG.| 00000630: 30 A7 34 32 00 6F 0E 29 00 8B C8 28 41 24 28 4F |0.42.o.)...(A$(O| 00000640: 29 2C 34 29 B2 4B 4E 24 A7 54 41 B2 C5 28 CA 28 |),4).KN$.TA..(.(| 00000650: 41 24 28 4F 29 2C 35 29 29 3A 5A 41 24 B2 22 41 |A$(O),5)):ZA$."A| 00000660: 4A 4F 22 3A 4B 42 24 B2 4B 31 24 3A 89 35 35 00 |JO":KB$.K1$:.55.| 00000670: 8A 0E 2A 00 82 3A 5A 41 24 B2 22 4E 59 22 3A 4B |..*..:ZA$."NY":K| 00000680: 42 24 B2 4B 32 24 3A 89 32 35 00 B0 0E 2B 00 85 |B$.K2$:.25...+..| 00000690: AC 36 2C 37 2C 33 30 2C 22 20 5D 22 2C 22 22 2C |.6,7,30," ]","",| 000006A0: 31 2C 4E 41 24 3A 8B 4E 41 24 B2 22 22 A7 34 33 |1,NA$:.NA$."".43| 000006B0: 00 C7 0E 2C 00 8B 4E 41 24 B2 22 53 4C 45 54 4E |...,..NA$."SLETN| 000006C0: 49 4E 47 22 A7 35 38 00 CF 0E 2D 00 89 33 35 00 |ING".58...-..35.| 000006D0: F6 0E 2E 00 85 AC 39 2C 37 2C 31 2C 22 44 44 22 |......9,7,1,"DD"| 000006E0: 2C 22 4B 2D 22 2C 30 2C 44 45 24 3A 8B 44 45 24 |,"K-",0,DE$:.DE$| 000006F0: B2 22 22 A7 34 36 00 FE 0E 2F 00 89 33 35 00 27 |."".46.../..35.'| 00000700: 0F 30 00 85 AC 31 32 2C 37 2C 31 2C 22 41 41 22 |.0...12,7,1,"AA"| 00000710: 2C 22 50 49 55 22 2C 30 2C 46 49 24 3A 8B 46 49 |,"PIU",0,FI$:.FI| 00000720: 24 B2 22 22 A7 34 38 00 2F 0F 31 00 89 33 35 00 |$."".48./.1..35.| 00000730: 56 0F 32 00 85 AC 31 35 2C 37 2C 31 2C 22 4A 4A |V.2...15,7,1,"JJ| 00000740: 22 2C 22 4E 22 2C 30 2C 4D 4F 24 3A 8B 4D 4F 24 |","N",0,MO$:.MO$| 00000750: B2 22 22 A7 35 30 00 5E 0F 33 00 89 33 35 00 80 |."".50.^.3..35..| 00000760: 0F 34 00 8B C9 28 4B 4E 24 2C 32 29 B2 22 30 30 |.4...(KN$,2)."00| 00000770: 22 A7 53 49 24 B2 22 30 2E 30 30 22 3A 89 33 35 |".SI$."0.00":.35| 00000780: 00 B0 0F 35 00 85 AC 31 38 2C 37 2C 31 30 2C 22 |...5...18,7,10,"| 00000790: 30 39 22 2C 22 2E 22 2C 30 2C 53 49 24 3A 8B 53 |09",".",0,SI$:.S| 000007A0: 49 24 B2 22 22 A7 53 49 24 B2 22 30 2E 30 30 22 |I$."".SI$."0.00"| 000007B0: 00 B8 0F 36 00 89 33 35 00 E7 0F 37 00 4C B2 B5 |...6..35...7.L..| 000007C0: 28 54 41 AD 32 35 36 29 3A 50 B2 54 41 AB 4C AC |(TA.256):P.TA.L.| 000007D0: 32 35 36 3A 98 31 35 2C 22 50 22 C7 28 35 29 C7 |256:.15,"P".(5).| 000007E0: 28 50 29 C7 28 4C 29 00 08 10 38 00 84 35 2C 43 |(P).(L)...8..5,C| 000007F0: 24 3A 8B C8 28 41 24 28 4F 29 2C 34 29 B2 C8 28 |$:..(A$(O),4)..(| 00000800: 43 24 2C 34 29 A7 38 33 00 3E 10 39 00 41 24 28 |C$,4).83.>.9.A$(| 00000810: 4F 29 B2 22 20 20 20 31 22 AA CA 28 41 24 28 4F |O)." 1"..(A$(O| 00000820: 29 2C 35 29 3A 5A 41 24 B2 22 4E 59 22 3A 4B 42 |),5):ZA$."NY":KB| 00000830: 24 B2 4B 32 24 3A 43 48 B2 31 3A 89 32 35 00 4F |$.K2$:CH.1:.25.O| 00000840: 10 3A 00 8B 5A 41 24 B2 22 4E 59 22 A7 31 37 00 |.:..ZA$."NY".17.| 00000850: 6B 10 3B 00 8B C5 28 42 31 24 29 B3 B2 30 AF C5 |k.;...(B1$)..0..| 00000860: 28 53 49 24 29 B3 B2 30 A7 36 34 00 A0 10 3C 00 |(SI$)..0.64...<.| 00000870: 99 22 13 11 11 11 11 11 11 20 20 20 20 20 20 3E |."....... >| 00000880: 4B 41 4E 20 49 4B 4B 45 20 53 4C 45 54 54 45 53 |KAN IKKE SLETTES| 00000890: 2E 20 54 52 59 4B 20 12 52 45 54 55 52 4E 92 22 |. TRYK .RETURN."| 000008A0: 00 B2 10 3D 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 |...=..A$:.A$."".| 000008B0: 36 31 00 C4 10 3E 00 8B C6 28 41 24 29 B3 B1 31 |61...>...(A$)..1| 000008C0: 33 A7 36 31 00 CC 10 3F 00 89 31 37 00 F1 10 40 |3.61...?..17...@| 000008D0: 00 43 48 B2 31 3A 41 24 28 4F 29 B2 22 A0 A0 A0 |.CH.1:A$(O)."...| 000008E0: 31 22 AA CA 28 41 24 28 4F 29 2C 35 29 3A 89 31 |1"..(A$(O),5):.1| 000008F0: 37 00 23 11 41 00 4B 4C 24 B2 22 20 20 20 20 20 |7.#.A.KL$." | 00000900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000920: 20 20 22 00 35 11 42 00 8B 5A 41 24 B2 22 41 4A | ".5.B..ZA$."AJ| 00000930: 4F 22 A7 37 32 00 44 11 43 00 42 31 24 B2 22 30 |O".72.D.C.B1$."0| 00000940: 2E 30 30 22 00 6C 11 44 00 42 31 24 B2 C8 28 28 |.00".l.D.B1$..((| 00000950: 42 31 24 AA 4B 4C 24 29 2C 31 30 29 AA C8 28 28 |B1$.KL$),10)..((| 00000960: 42 31 24 AA 4B 4C 24 29 2C 31 30 29 00 81 11 45 |B1$.KL$),10)...E| 00000970: 00 81 4F B2 31 A4 54 47 3A 8B 54 47 B2 30 A7 37 |..O.1.TG:.TG.0.7| 00000980: 31 00 AE 11 46 00 8B C5 28 C8 28 41 24 28 4F 29 |1...F...(.(A$(O)| 00000990: 2C 34 29 29 B3 31 30 30 30 A7 54 41 B2 C5 28 CA |,4)).1000.TA..(.| 000009A0: 28 41 24 28 4F 29 2C 35 29 29 3A 89 37 32 00 CC |(A$(O),5)):.72..| 000009B0: 11 47 00 82 3A 54 47 B2 54 47 AA 31 3A 54 41 B2 |.G..:TG.TG.1:TA.| 000009C0: 54 47 3A 8B 54 47 B2 31 A7 4F B2 31 00 13 12 48 |TG:.TG.1.O.1...H| 000009D0: 00 56 24 B2 4B 4E 24 AA C8 28 28 4E 41 24 AA 4B |.V$.KN$..((NA$.K| 000009E0: 4C 24 29 2C 33 30 29 AA 44 45 24 AA 46 49 24 AA |L$),30).DE$.FI$.| 000009F0: 4D 4F 24 AA C8 28 28 42 31 24 AA 4B 4C 24 29 2C |MO$..((B1$.KL$),| 00000A00: 32 30 29 AA C8 28 28 53 49 24 AA 4B 4C 24 29 2C |20)..((SI$.KL$),| 00000A10: 31 30 29 00 57 12 49 00 41 24 28 4F 29 B2 4B 4E |10).W.I.A$(O).KN| 00000A20: 24 AA CA 28 41 24 28 4F 29 2C 35 29 3A 4C B2 B5 |$..(A$(O),5):L..| 00000A30: 28 54 41 AD 32 35 36 29 3A 50 B2 54 41 AB 4C AC |(TA.256):P.TA.L.| 00000A40: 32 35 36 3A 98 31 35 2C 22 50 22 C7 28 35 29 C7 |256:.15,"P".(5).| 00000A50: 28 50 29 C7 28 4C 29 00 8D 12 4A 00 98 35 2C 56 |(P).(L)...J..5,V| 00000A60: 24 3A 43 48 B2 31 3A 98 31 35 2C 22 50 22 C7 28 |$:CH.1:.15,"P".(| 00000A70: 35 29 C7 28 50 29 C7 28 4C 29 3A 84 35 2C 51 51 |5).(P).(L):.5,QQ| 00000A80: 24 3A 8B 51 51 24 B3 B1 56 24 A7 37 33 00 9B 12 |$:.QQ$..V$.73...| 00000A90: 4B 00 8B 54 47 B3 35 30 A7 31 37 00 BF 12 4C 00 |K..TG.50.17...L.| 00000AA0: 81 4F B2 31 A4 54 47 3A 8B C5 28 C8 24 28 41 24 |.O.1.TG:..(.$(A$| 00000AB0: 28 4F 29 2C 34 29 29 B3 31 30 30 30 A7 31 37 00 |(O),4)).1000.17.| 00000AC0: C5 12 4D 00 82 00 0F 13 4E 00 99 22 93 11 11 20 |..M.....N.."... | 00000AD0: 44 45 52 20 4B 41 4E 20 49 4B 4B 45 20 4F 50 52 |DER KAN IKKE OPR| 00000AE0: 45 54 54 45 53 20 46 4C 45 52 45 20 4B 4F 4E 54 |ETTES FLERE KONT| 00000AF0: 49 2C 20 44 41 22 3A 99 22 11 11 20 44 45 52 20 |I, DA":.".. DER | 00000B00: 45 52 20 4F 50 52 45 54 54 45 54 20 35 30 22 00 |ER OPRETTET 50".| 00000B10: 2A 13 4F 00 99 22 11 11 20 20 20 20 54 52 59 4B |*.O..".. TRYK| 00000B20: 20 12 52 45 54 55 52 4E 92 22 00 3F 13 50 00 A1 | .RETURN.".?.P..| 00000B30: 41 24 3A 8B C6 28 41 24 29 B2 22 22 A7 38 30 00 |A$:..(A$)."".80.| 00000B40: 51 13 51 00 8B C6 28 41 24 29 B3 B1 31 33 A7 37 |Q.Q...(A$)..13.7| 00000B50: 39 00 58 13 52 00 89 37 00 95 13 53 00 4B 4E 24 |9.X.R..7...S.KN$| 00000B60: B2 C8 28 43 24 2C 34 29 3A 4E 41 24 B2 CA 28 43 |..(C$,4):NA$..(C| 00000B70: 24 2C 35 2C 33 30 29 3A 44 45 24 B2 CA 28 43 24 |$,5,30):DE$..(C$| 00000B80: 2C 33 35 2C 31 29 3A 46 49 24 B2 CA 28 43 24 2C |,35,1):FI$..(C$,| 00000B90: 33 36 2C 31 29 00 A9 13 54 00 53 49 24 B2 CA 28 |36,1)...T.SI$..(| 00000BA0: 43 24 2C 35 38 2C 31 30 29 00 F1 13 55 00 4D 4F |C$,58,10)...U.MO| 00000BB0: 24 B2 CA 28 43 24 2C 33 37 2C 31 29 3A 42 31 24 |$..(C$,37,1):B1$| 00000BC0: B2 CA 28 43 24 2C 33 38 2C 32 30 29 3A 99 22 13 |..(C$,38,20):.".| 00000BD0: 20 20 20 20 20 20 12 22 4B 42 24 22 92 22 3A 99 | ."KB$".":.| 00000BE0: 22 11 11 20 20 20 20 20 20 3E 22 4B 4E 24 22 3C |".. >"KN$"<| 00000BF0: 22 00 2E 14 56 00 99 22 11 11 20 20 20 20 20 20 |"...V..".. | 00000C00: 3E 22 4E 41 24 22 3C 22 3A 99 22 11 11 20 20 20 |>"NA$"<":.".. | 00000C10: 20 20 20 3E 22 44 45 24 22 3C 22 3A 99 22 11 11 | >"DE$"<":."..| 00000C20: 20 20 20 20 20 20 3E 22 46 49 24 22 3C 22 00 5C | >"FI$"<".\| 00000C30: 14 57 00 99 22 11 11 20 20 20 20 20 20 3E 22 4D |.W..".. >"M| 00000C40: 4F 24 22 3C 22 3A 99 22 11 11 20 20 20 20 20 20 |O$"<":.".. | 00000C50: 3E 22 53 49 24 22 3C 22 3A 89 33 35 00 9F 14 58 |>"SI$"<":.35...X| 00000C60: 00 99 22 93 20 20 53 4F 52 54 45 52 49 4E 47 20 |..". SORTERING | 00000C70: 41 46 20 4B 4F 4E 54 4F 4E 55 4D 52 45 20 46 4F |AF KONTONUMRE FO| 00000C80: 52 45 54 41 47 45 53 11 11 22 3A 99 22 20 20 56 |RETAGES..":." V| 00000C90: 45 4E 54 20 45 54 20 5C 4A 45 42 4C 49 4B 22 00 |ENT ET \JEBLIK".| 00000CA0: B3 14 59 00 9E 34 39 31 35 32 2C 54 47 2C 41 24 |..Y..49152,TG,A$| 00000CB0: 28 31 29 00 E7 14 5A 00 A0 35 3A 9F 35 2C 38 2C |(1)...Z..5:.5,8,| 00000CC0: 35 2C 22 49 4E 44 45 58 2C 4C 2C 22 AA C7 28 32 |5,"INDEX,L,"..(2| 00000CD0: 31 29 3A 98 31 35 2C 22 50 22 C7 28 35 29 C7 28 |1):.15,"P".(5).(| 00000CE0: 34 35 29 C7 28 31 29 00 1D 15 5B 00 98 35 2C C4 |45).(1)...[..5,.| 00000CF0: 28 54 47 29 3A 98 31 35 2C 22 50 22 C7 28 35 29 |(TG):.15,"P".(5)| 00000D00: C7 28 34 35 29 C7 28 31 29 3A 84 35 2C 56 24 3A |.(45).(1):.5,V$:| 00000D10: 8B C5 28 56 24 29 B3 B1 54 47 A7 39 30 00 29 15 |..(V$)..TG.90.).| 00000D20: 5C 00 81 4A B2 31 A4 54 47 00 4A 15 5D 00 98 31 |\..J.1.TG.J.]..1| 00000D30: 35 2C 22 50 22 C7 28 35 29 C7 28 4A 29 C7 28 30 |5,"P".(5).(J).(0| 00000D40: 29 3A 98 35 2C 41 24 28 4A 29 00 78 15 5E 00 98 |):.5,A$(J).x.^..| 00000D50: 31 35 2C 22 50 22 C7 28 35 29 C7 28 4A 29 C7 28 |15,"P".(5).(J).(| 00000D60: 30 29 3A 84 35 2C 51 51 24 3A 8B 41 24 28 4A 29 |0):.5,QQ$:.A$(J)| 00000D70: B3 B1 51 51 24 A7 39 33 00 8C 15 5F 00 82 3A 56 |..QQ$.93..._..:V| 00000D80: 24 B2 22 32 22 3A A0 35 3A 89 31 36 00 00 00 2F |$."2":.5:.16.../|
.......2064..........L.......L3..P....:.
A$(301):.15,8,15:.5,8,5,"INDEX,L,".G(21)
......15,"P"G(5)G(45)G(1):.5,TG$:TG.E(TG
$):.X.1.TG:T..(X.256):Q.X.T.256......15,
"P"G(5)G(Q)G(T):.5,A$(X):.......X.TG.1.3
00:A$(X)."0000".D(X):...... 5:."....
.INDTASTNING AF KONTOPLAN.".4...."...
1. INDTASTNING AF KONTOPLAN".Q...."...
2. RETUR TIL MENU":."... INDTAST VAL
G < >": 5.....K1$."AJOURF\RING AF KONTO"
:K2$."NY KONTO".Q....50795,100:.55915,1:
.X.1.300:.:.V$:.V$.."".13......50795,32:
.X.1.300:.:.V$:.V$."".11......V$.."1".V$
.."2".11.I....50795,F(V$):.V$."1"..5,8,5
,"KONTOPLAN,L,".G(80):.17.]....V$."2".CH
.1.88......V$."2". 15:."............".12
)"VENT ET \JEBLIK":."MENU"......"... 1
. KONTONUMMER":.".. 2. KONTONAVN":."..
3. DEBITOR/KREDITOR/-".-....".. 4.
AKTIV/PASSIV/INDT./UDGIFT":.".. 5. MOM
SKONTO (J/N)".M....".. 6. SIDSTE ]RS S
ALDO".S.....3,7,4,"09","",0,KN$:.E(KN$).
0.7......E(KN$).1000.20......O.1.TG:.TG.
0.24.W....H(A$(O),4).KN$.TA.E(J(A$(O),5)
):ZA$."AJO":KB$.K1$:.55......:ZA$."NY":K
B$.K2$......". ."KB$".
".9.....6,7,30," ]","",1,NA$:.NA$."".2
6.P....NA$."SLETNING".58.W.....9,7,1,"DD
","K-",0,DE$:.DE$."".28. .....12,7,1,"AA
","PIU",0,FI$:.FI$."".29......FI$."P".FI
$."A".MO$."N":."................ >"
MO$"<":.32.......15,7,1,"JJ","N",0,MO$:.
MO$."".31.+. ..I(KN$,2)."00".SI$."0.00":
.35.H.!...18,7,10,"09",".",0,SI$._."..SI
$."".SI$."0.00"...#.."..................
...... RETTELSER(1-6) SLUT(7).".D.
$...23,31,1,"17","",0,SV$:.SV$."".36...%
..E(SV$).38,43,46,48,50,52,65...&...3,7,
4,"09","",0,KN$:.E(KN$).0.7...'..E(KN$).
1000.38.4.(..O.1.TG:.TG.0.42.O.)..H(A$(O
),4).KN$.TA.E(J(A$(O),5)):ZA$."AJO":KB$.
K1$:.55...*..:ZA$."NY":KB$.K2$:.25...+..
.6,7,30," ]","",1,NA$:.NA$."".43.G.,..NA
$."SLETNING".58.O.-..35.......9,7,1,"DD"
,"K-",0,DE$:.DE$."".46.../..35.'.0...12,
7,1,"AA","PIU",0,FI$:.FI$."".48./.1..35.
V.2...15,7,1,"JJ","N",0,MO$:.MO$."".50.^
.3..35...4..I(KN$,2)."00".SI$."0.00":.35
...5...18,7,10,"09",".",0,SI$:.SI$."".SI
$."0.00"...6..35...7.L..(TA.256):P.TA.L.
256:.15,"P"G(5)G(P)G(L)...8..5,C$:.H(A$(
O),4).H(C$,4).83.>.9.A$(O)." 1".J(A$(O
),5):ZA$."NY":KB$.K2$:CH.1:.25.O.:..ZA$.
"NY".17.K.;..E(B1$)..0.E(SI$)..0.64. .<.
."....... >KAN IKKE SLETTES. TRYK .
RETURN."...=..A$:.A$."".61.D.>..F(A$)..1
3.61.L.?..17...@.CH.1:A$(O)." 1".J(A$(
O),5):.17.#.A.KL$."
".5.B..ZA$."AJO".72.D.
C.B1$."0.00".L.D.B1$.H((B1$.KL$),10).H((
B1$.KL$),10)...E..O.1.TG:.TG.0.71...F..E
(H(A$(O),4)).1000.TA.E(J(A$(O),5)):.72.L
.G..:TG.TG.1:TA.TG:.TG.1.O.1...H.V$.KN$.
H((NA$.KL$),30).DE$.FI$.MO$.H((B1$.KL$),
20).H((SI$.KL$),10).W.I.A$(O).KN$.J(A$(O
),5):L..(TA.256):P.TA.L.256:.15,"P"G(5)G
(P)G(L)...J..5,V$:CH.1:.15,"P"G(5)G(P)G(
L):.5,QQ$:.QQ$..V$.73...K..TG.50.17...L.
.O.1.TG:.E(H$(A$(O),4)).1000.17.E.M.....
N.."... DER KAN IKKE OPRETTES FLERE KONT
I, DA":.".. DER ER OPRETTET 50".*.O.."..
TRYK .RETURN.".?.P..A$:.F(A$)."".80.
Q.Q..F(A$)..13.79.X.R..7...S.KN$.H(C$,4)
:NA$.J(C$,5,30):DE$.J(C$,35,1):FI$.J(C$,
36,1)...T.SI$.J(C$,58,10)...U.MO$.J(C$,3
7,1):B1$.J(C$,38,20):.". ."KB$".":.
".. >"KN$"<"...V..".. >"NA$"<"
:.".. >"DE$"<":.".. >"FI$"<".\
.W..".. >"MO$"<":.".. >"SI$"<"
:.35...X..". SORTERING AF KONTONUMRE FO
RETAGES..":." VENT ET \JEBLIK"...Y..491
52,TG,A$(1)...Z. 5:.5,8,5,"INDEX,L,".G(2
1):.15,"P"G(5)G(45)G(1)...[..5,D(TG):.15
,"P"G(5)G(45)G(1):.5,V$:.E(V$)..TG.90.).
\..J.1.TG.J.]..15,"P"G(5)G(J)G(0):.5,A$(
J).X.^..15,"P"G(5)G(J)G(0):.5,QQ$:.A$(J)
..QQ$.93..._..:V$."2": 5:.16.../
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL