C2
FILE INFORMATION
FILENAME(S): C2
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-11-30 20:14:36
APPEARS ON: 1 disk(s)
FILE HASH
11502b820581439d1eabf2ca8fc47429e9b04bb7c211cefbb842254a67a0a062
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NS FAKT DEB | C2 | PRG | Curtcool, LPN | 24 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 9E 32 30 37 33 00 00 00 20 52 |.......2073... R| 00000010: 08 4C 45 B7 20 52 08 4C 99 A4 20 52 08 AD FF 02 |.LE. R.L.. R....| 00000020: C9 64 F0 17 A9 3F 85 BB A9 08 85 BC A9 06 85 B7 |.d...?..........| 00000030: A9 00 85 B9 A2 00 A0 A0 20 D5 FF 68 68 4C 48 A0 |........ ..hhLH.| 00000040: 52 54 4C 2D 36 34 20 52 08 20 71 AF 20 5F 08 60 |RTL-64 R. q. _.`| 00000050: A2 01 60 A9 03 05 00 85 00 A9 FE 25 01 85 01 60 |..`........%...`| 00000060: 48 A9 03 05 00 85 00 A5 01 09 01 85 01 68 60 20 |H............h` | 00000070: 5F 08 20 47 A3 20 52 08 60 40 00 03 87 00 87 00 |_. G. R.`@......| 00000080: A7 00 00 00 6A 1A 00 01 00 54 5B 05 56 4C 2D 43 |....j....T[.VL-C| 00000090: 32 00 86 41 28 31 30 29 3A 41 00 0E 00 86 41 53 |2..A(10):A....AS| 000000A0: 28 31 30 29 3A 41 00 10 57 00 9F 31 35 2C 38 2C |(10):A..W..15,8,| 000000B0: 31 35 2C 22 49 30 22 3A 8A 25 20 43 4F 50 59 52 |15,"I0":.% COPYR| 000000C0: 49 47 48 54 20 3A 20 44 4A 55 52 53 20 44 41 54 |IGHT : DJURS DAT| 000000D0: 41 20 41 50 53 20 2D 20 47 52 45 4E 5D 20 20 D2 |A APS - GREN] .| 000000E0: 02 8A 25 20 44 41 54 4F 20 20 20 20 20 20 3A 20 |..% DATO : | 000000F0: 30 35 2E 31 31 2E 31 39 38 33 20 20 20 20 20 2D |05.11.1983 -| 00000100: 20 41 2E 4F 2E 20 20 20 D2 09 8A 25 20 50 52 4F | A.O. ...% PRO| 00000110: 47 52 41 4D 20 20 20 3A 20 56 45 44 4C 49 47 45 |GRAM : VEDLIGE| 00000120: 48 2E 20 54 45 4B 53 54 4B 41 52 54 4F 54 45 4B |H. TEKSTKARTOTEK| 00000130: 20 D2 10 81 D0 17 8D 03 E8 42 00 17 47 00 17 00 | ........B..G...| 00000140: A1 58 24 3A 92 1E 8A 01 40 2E 4F 05 48 0D 8A 00 |.X$:....@.O.H...| 00000150: 99 22 93 11 11 11 11 11 1D 12 22 3B 4E 31 24 00 |."........";N1$.| 00000160: 99 22 1D 12 22 3B 4E 32 24 00 99 22 1D 12 22 3B |."..";N2$.."..";| 00000170: 4E 33 24 3A 81 D0 17 8D 07 D0 42 00 17 47 00 17 |N3$:......B..G..| 00000180: 48 0D 3A 00 99 22 93 22 3A 80 D0 17 8A 00 D2 02 |H.:..".":.......| 00000190: 8A 00 D2 09 8A 00 D2 10 8D 03 14 89 34 50 88 90 |............4P..| 000001A0: 50 18 00 00 89 15 50 8A 03 30 3A 46 89 14 B8 13 |P.....P..0:F....| 000001B0: 01 8A 0D 46 49 52 4D 2D 57 41 52 45 2C 50 2C 52 |...FIRM-WARE,P,R| 000001C0: 01 D2 25 00 9F 32 2C 38 2C 32 2C 44 46 24 3A 4A |..%..2,8,2,DF$:J| 000001D0: 17 F1 81 D0 17 85 42 00 17 00 84 32 2C 54 24 3A |......B....2,T$:| 000001E0: 4A 17 F1 47 00 17 00 A0 32 3A 4A 17 F1 8A 0E 30 |J..G....2:J....0| 000001F0: 3A 53 59 53 2D 55 54 49 4C 2C 53 2C 52 D2 25 00 |:SYS-UTIL,S,R.%.| 00000200: 9F 32 2C 38 2C 32 2C 44 46 24 3A 4A 17 F1 00 84 |.2,8,2,DF$:J....| 00000210: 32 2C 44 49 24 3A 4A 17 F1 00 A0 32 3A 8A 0B 30 |2,DI$:J....2:..0| 00000220: 3A 53 4B 5B 52 4D 8F 1F F2 FE 16 F2 02 6F FF F2 |:SK[RM.......o..| 00000230: FF F8 CF A8 F9 FF A8 F8 8B 84 EF C8 8F A4 08 FA |................| 00000240: 4C 48 FA 44 08 FA 44 48 FA 4C A8 FA 4C D8 18 04 |LH.D..DH.L..L...| 00000250: 05 1F 8E BF 8F FF FF 8D 08 88 88 1F 05 8D 8F FF |................| 00000260: 8D 08 C8 88 1F 89 CD 88 1F F6 E8 FA 44 41 F5 1F |............DA..| 00000270: 8A 7C F4 CF FF 7C F4 C8 56 09 9F 1F 05 8F 1F 89 |.|...|..V.......| 00000280: CF 1F 89 FF 1F 8A FF 1F 8E BF 8F FF 41 CA F1 8F |............A...| 00000290: 88 4C 56 0B C9 F1 BB 9F 88 4C 16 0B CF 1F 8F F8 |.LV......L......| 000002A0: 1F FF F3 F6 66 66 67 A7 AD 2F FF 6E DF FF FF 6E |....ffg../.n...n| 000002B0: FF 7F AF FD 2F FD 6F EE FE FF FF FF BF FE FF FF |..../.o.........| 000002C0: 2D 7F FF FF EE FE EF FD DF FF FF 6E 3F DF F3 F7 |-..........n?...| 000002D0: F3 2F B6 27 FF 6D 0F 0F F2 3F 7F FF BF FD 3F FF |./.'.m...?....?.| 000002E0: FF FF 2F DD FF 2F FA F3 2A 3A F5 F3 AF FD C6 2F |../../..*:...../| 000002F0: DA F5 2F 27 F7 6D F6 74 FF F3 22 20 12 31 92 20 |../'.m.t.." .1. | 00000300: 3D 20 4F 50 52 45 54 20 20 20 54 45 4B 53 54 22 |= OPRET TEKST"| 00000310: 00 99 22 20 12 32 92 20 3D 20 52 45 54 20 20 20 |.." .2. = RET | 00000320: 20 20 54 45 4B 53 54 22 00 99 22 20 12 33 92 20 | TEKST".." .3. | 00000330: 3D 20 53 4C 45 54 20 A0 A0 A0 54 45 4B 53 54 22 |= SLET ...TEKST"| 00000340: 00 99 22 20 12 34 92 20 3D 20 55 44 53 4B 52 49 |.." .4. = UDSKRI| 00000350: 56 20 54 45 4B 53 54 4B 41 52 54 4F 54 45 4B 22 |V TEKSTKARTOTEK"| 00000360: 00 99 22 20 12 35 92 20 3D 20 41 46 53 4C 55 54 |.." .5. = AFSLUT| 00000370: 20 50 52 4F 47 52 41 4D 22 00 99 3A 81 D1 80 8A | PROGRAM"..:....| 00000380: 09 1D 4A 4F 42 20 56 41 4C 47 D2 2C 4A 16 16 92 |..JOB VALG.,J...| 00000390: 8E B8 11 D0 87 90 87 85 2A 90 87 81 2D 07 4F 12 |........*...-.O.| 000003A0: 00 99 22 46 45 4A 4C 20 4A 4F 42 22 3A 48 0E FC |.."FEJL JOB":H..| 000003B0: 90 87 4D 0A 08 58 09 89 0A C2 0B B4 10 96 48 0F |..M..X........H.| 000003C0: 70 82 D1 80 8A 0C 1D 53 41 4C 44 4F 20 4B 4F 44 |p......SALDO KOD| 000003D0: 45 20 D2 2C 4A 16 16 92 8E 8A 01 3D 2B 4F 12 90 |E .,J......=+O..| 000003E0: 95 A1 04 B8 10 D2 8E 00 99 4F 50 24 3B 48 24 3A |.........OP$;H$:| 000003F0: 4C 86 D1 80 8A 0C 1D 42 4F 47 46 2E 4B 4F 4E 54 |L......BOGF.KONT| 00000400: 4F 20 D2 2C 4A 16 16 92 8E 8A 01 3D 2B 4F 12 90 |O .,J......=+O..| 00000410: 95 A0 06 B8 10 D2 8E 00 99 4F 50 24 3B 48 24 3A |.........OP$;H$:| 00000420: 4C 86 D1 80 8A 0C 1D 53 41 4D 4C 45 4B 4F 4E 54 |L......SAMLEKONT| 00000430: 4F 20 D2 2C 4A 16 16 92 8E 8A 01 3D 2B 4F 12 90 |O .,J......=+O..| 00000440: 95 A0 08 B8 10 D2 8E 00 99 4F 50 24 3B 48 24 3A |.........OP$;H$:| 00000450: 4C 00 99 22 93 20 20 12 2D 2D 2D 4F 50 52 45 54 |L..". .---OPRET| 00000460: 20 54 45 4B 53 54 2D 2D 2D 22 00 99 00 99 3A 8A | TEKST---"....:.| 00000470: 0C 1D 54 45 4B 53 54 4E 55 4D 4D 45 52 D2 2C 83 |..TEKSTNUMMER.,.| 00000480: D1 80 4A 16 16 92 8E B8 11 D0 95 90 95 90 72 2A |..J...........r*| 00000490: 90 95 80 2D 07 4F 16 00 99 22 1D 46 45 4A 4C 20 |...-.O...".FEJL | 000004A0: 4E 55 4D 4D 45 52 22 3A 48 08 63 90 95 80 2B 4F |NUMMER":H.c...+O| 000004B0: 05 48 0E FC 90 95 A1 0A 80 2B 4F 05 48 08 DA 00 |.H.......+O.H...| 000004C0: 99 22 20 45 52 20 4F 50 52 45 54 54 45 54 22 3A |." ER OPRETTET":| 000004D0: 48 08 63 81 D0 A3 8A 0C 1D 54 45 4B 53 54 20 20 |H.c......TEKST | 000004E0: 20 20 20 20 D2 2C 89 18 D1 80 4A 16 16 92 8E 8A | .,....J.....| 000004F0: 01 5E 2B 4F 05 48 08 63 92 8E 8A 01 3D 2B 4F 0E |.^+O.H.c....=+O.| 00000500: 92 AA D2 8E 00 99 4F 50 24 54 4B 24 3A 90 95 92 |......OP$TK$:...| 00000510: 8E E2 0C 92 8E D2 AA 85 85 A0 0E 81 01 E0 0E 90 |................| 00000520: B1 81 06 4F 05 48 09 22 48 09 70 4A 0F C8 92 8E |...O.H."H.pJ....| 00000530: 8A 01 5E 2B 4F 05 48 08 DD 90 95 92 8E B8 11 E1 |..^+O.H.........| 00000540: 04 90 B1 82 06 4F 05 48 09 44 48 09 70 4A 0F F8 |.....O.H.DH.pJ..| 00000550: 92 8E 8A 01 5E 2B 4F 05 48 09 22 90 95 92 8E B8 |....^+O.H.".....| 00000560: 11 E0 06 4A 08 28 92 8E 8A 01 5E 2B 4F 05 48 09 |...J.(....^+O.H.| 00000570: 44 90 95 92 8E B8 11 E0 08 90 95 90 95 E1 0A 48 |D..............H| 00000580: 08 63 00 99 22 93 20 20 12 2D 2D 2D 52 45 54 20 |.c..". .---RET | 00000590: 54 45 4B 53 54 2D 2D 2D 22 00 99 00 99 3A 8A 0C |TEKST---"....:..| 000005A0: 1D 54 45 4B 53 54 4E 55 4D 4D 45 52 D2 2C 83 D1 |.TEKSTNUMMER.,..| 000005B0: 80 4A 16 16 92 8E B8 11 D0 95 90 95 90 72 2A 90 |.J...........r*.| 000005C0: 95 80 2D 07 4F 16 00 99 22 1D 46 45 4A 4C 20 4E |..-.O...".FEJL N| 000005D0: 55 4D 4D 45 52 22 3A 48 09 92 90 95 80 2B 4F 05 |UMMER":H.....+O.| 000005E0: 48 0E FC 90 95 A1 0A 80 2E 4F 05 48 0A 0E 00 99 |H........O.H....| 000005F0: 22 1D 45 52 20 49 4B 4B 45 20 4F 50 52 45 54 54 |".ER IKKE OPRETT| 00000600: 45 54 22 3A 48 09 92 81 D0 A3 00 99 22 20 47 4C |ET":H......." GL| 00000610: 2E 20 54 45 4B 53 54 20 3D 20 12 22 3B 54 4B 24 |. TEKST = .";TK$| 00000620: 28 54 29 3A 90 95 A2 0C D2 AA 8A 0B 54 45 4B 53 |(T):........TEKS| 00000630: 54 20 20 20 20 20 20 D2 2C 89 18 D1 80 4A 16 16 |T .,....J..| 00000640: 92 8E 8A 01 5E 2B 4F 05 48 09 92 92 8E 8A 01 3D |....^+O.H......=| 00000650: 2B 4F 0E 92 AA D2 8E 00 99 4F 50 24 54 4B 24 3A |+O.......OP$TK$:| 00000660: 90 95 92 8E E2 0C 86 86 A0 0E 81 01 E0 0E 90 B1 |................| 00000670: 81 06 4F 05 48 0A 71 48 09 92 4A 0F C8 92 8E 8A |..O.H.qH..J.....| 00000680: 01 5E 2B 4F 05 48 0A 21 90 95 92 8E B8 11 E1 04 |.^+O.H.!........| 00000690: 90 B1 82 06 4F 05 48 0A 93 48 09 92 4A 0F F8 92 |....O.H..H..J...| 000006A0: 8E 8A 01 5E 2B 4F 05 48 0A 71 90 95 92 8E B8 11 |...^+O.H.q......| 000006B0: E0 06 4A 08 28 92 8E 8A 01 5E 2B 4F 05 48 0A 93 |..J.(....^+O.H..| 000006C0: 90 95 92 8E B8 11 E0 08 48 09 92 00 99 22 93 20 |........H....". | 000006D0: 20 12 2D 2D 2D 53 4C 45 54 20 54 45 4B 53 54 2D | .---SLET TEKST-| 000006E0: 2D 2D 22 00 99 00 99 3A 8A 0C 1D 54 45 4B 53 54 |--"....:...TEKST| 000006F0: 4E 55 4D 4D 45 52 D2 2C 83 D1 80 4A 16 16 92 8E |NUMMER.,...J....| 00000700: B8 11 D0 95 90 95 90 72 2A 90 95 80 2D 07 4F 16 |.......r*...-.O.| 00000710: 00 99 22 1D 46 45 4A 4C 20 4E 55 4D 4D 45 52 22 |..".FEJL NUMMER"| 00000720: 3A 48 0A EC 90 95 80 2B 4F 05 48 0E FC 90 95 A1 |:H.....+O.H.....| 00000730: 0A 90 95 2B 4F 05 48 0B 59 00 99 22 20 45 52 20 |...+O.H.Y.." ER | 00000740: 49 4B 4B 45 20 4F 50 52 45 54 54 45 54 22 3A 48 |IKKE OPRETTET":H| 00000750: 0A EC 00 99 22 20 47 4C 2E 20 54 45 4B 53 54 20 |...." GL. TEKST | 00000760: 3D 20 12 22 3B 54 4B 24 28 54 29 3A 90 95 A2 0C |= .";TK$(T):....| 00000770: D2 AA 81 D1 80 8A 0D 1D 53 92 20 3D 20 53 4C 45 |........S. = SLE| 00000780: 54 54 45 53 D2 2C 4A 16 16 92 8E 8A 01 53 2B 4F |TTES.,J......S+O| 00000790: 2B 00 99 22 20 12 53 92 4C 45 54 54 45 54 20 12 |+.." .S.LETTET .| 000007A0: 4F 4B 22 3A 90 95 8A 00 E2 0C 81 D0 A3 87 87 A0 |OK":............| 000007B0: 0E 81 01 E0 0E 90 95 80 E1 0A 48 0A EC 00 99 22 |..........H...."| 000007C0: 11 20 20 12 2D 2D 55 44 53 4B 52 49 56 20 54 45 |. .--UDSKRIV TE| 000007D0: 4B 53 54 4B 41 52 54 4F 54 45 4B 2D 2D 11 22 3A |KSTKARTOTEK--.":| 000007E0: 81 D1 80 8A 1C 1D 20 53 20 92 4B 5B 52 4D 20 45 |...... S .K[RM E| 000007F0: 4C 4C 45 52 20 4C 49 4E 49 45 53 4B 52 49 56 45 |LLER LINIESKRIVE| 00000800: 52 D2 2C 4A 16 16 84 D0 B8 81 8D 03 3E B8 0E E0 |R.,J........>...| 00000810: 10 82 8D 03 3F B8 0E E0 10 92 8E 8A 01 53 2B 4F |....?........S+O| 00000820: 14 83 D0 B8 89 17 D0 BF 81 80 E0 10 82 80 E0 10 |................| 00000830: 48 14 6F 8A 1B 1D 12 44 92 4F 42 42 45 4C 54 20 |H.o....D.OBBELT | 00000840: 4C 49 4E 49 45 41 46 53 54 41 4E 44 20 20 20 20 |LINIEAFSTAND | 00000850: D2 2C 4A 16 16 92 8E D2 C6 92 8E 8A 01 5E 2B 4F |.,J..........^+O| 00000860: 05 48 0B B4 89 48 D0 BF 00 9F 34 2C 44 56 3A 81 |.H...H....4,DV:.| 00000870: D0 CD 4A 14 84 48 15 4F 90 CD D0 D4 90 BF 42 00 |..J..H.O......B.| 00000880: D4 00 98 34 2C 22 20 22 3A 46 81 D0 CD 90 B8 83 |...4," ":F......| 00000890: 2B 4F 26 00 98 34 2C 22 11 11 12 20 54 45 4B 53 |+O&..4,"... TEKS| 000008A0: 54 4B 41 52 54 4F 54 45 4B 20 50 52 2E 20 22 3B |TKARTOTEK PR. ";| 000008B0: 44 44 24 3A 48 14 E1 00 98 34 2C 22 20 20 22 3B |DD$:H....4," ";| 000008C0: C7 28 41 53 28 31 29 29 3B 22 54 45 4B 53 54 4B |.(AS(1));"TEKSTK| 000008D0: 41 52 54 4F 54 45 4B 20 50 52 2E 20 22 3B 44 44 |ARTOTEK PR. ";DD| 000008E0: 24 3B C7 28 41 53 28 32 29 29 3A 90 CD 84 01 D0 |$;.(AS(2)):.....| 000008F0: CD 00 98 34 2C 22 20 22 00 98 34 2C 22 54 45 4B |...4," "..4,"TEK| 00000900: 53 54 4B 4F 44 45 20 20 22 3B 00 98 34 2C 22 54 |STKODE ";..4,"T| 00000910: 45 4B 53 54 20 20 20 20 20 20 20 20 20 20 20 20 |EKST | 00000920: 20 20 20 20 22 3B 3A 90 B1 81 06 4F 14 00 98 34 | ";:....O...4| 00000930: 2C 22 20 20 20 20 20 20 20 20 20 20 53 4B 22 00 |," SK".| 00000940: 98 34 2C 22 20 22 3A 4C 81 D0 95 90 72 42 00 95 |.4," ":L....rB..| 00000950: 00 A1 58 24 3A 92 1E 8A 01 40 2B 4F 05 48 16 0A |..X$:....@+O.H..| 00000960: 90 95 A1 0A 80 2B 4F 05 48 15 F7 8A 00 D2 8E 90 |.....+O.H.......| 00000970: CD 90 BF 86 02 2A 4F 05 4A 14 7F 89 08 D1 80 90 |.....*O.J.......| 00000980: 95 D0 D4 4A 17 17 92 8E 8A 03 20 2D 20 01 D2 8E |...J...... - ...| 00000990: 00 98 34 2C 48 24 3B C8 28 54 4B 24 28 54 29 AA |..4,H$;.(TK$(T).| 000009A0: 43 4C 24 2C 33 30 29 3B 3A 90 CD 81 01 D0 CD 90 |CL$,30);:.......| 000009B0: B1 81 06 4F 05 48 15 CA 00 98 34 2C 22 20 22 3A |...O.H....4," ":| 000009C0: 48 15 DF 00 98 34 2C C9 28 43 4C 24 AA C4 28 4E |H....4,.(CL$..(N| 000009D0: 25 28 54 29 29 2C 33 29 3A 92 C6 8A 01 44 2B 4F |%(T)),3):....D+O| 000009E0: 10 00 98 34 2C 22 20 22 3A 90 CD 81 01 D0 CD 90 |...4," ":.......| 000009F0: B8 83 2B 8D 02 8D B8 0E 81 2B 06 4F 05 48 15 E6 |..+......+.O.H..| 00000A00: 47 00 95 90 CD D0 D4 90 BF 42 00 D4 00 98 34 2C |G........B....4,| 00000A10: 22 20 22 3A 46 81 D0 CD 00 A0 34 3A 48 0E FC 00 |" ":F.....4:H...| 00000A20: 99 22 12 22 3B 54 24 3B 22 92 20 22 3B 43 41 24 |.".";T$;". ";CA$| 00000A30: 3B 3A 8A 00 D2 8E 89 CC 80 50 00 A1 58 24 3A 92 |;:.......P..X$:.| 00000A40: 1E 8A 00 2B 4F 05 48 16 31 92 1E B8 12 89 0D 2B |...+O.H.1......+| 00000A50: 4F 0D 00 99 22 20 22 3A 89 CC 81 50 4C 92 1E B8 |O..." ":...PL...| 00000A60: 12 89 14 2B 4F 05 48 16 F1 92 1E B8 12 89 20 2D |...+O.H....... -| 00000A70: 4F 05 48 16 31 92 1E B8 12 89 7F 2A 92 1E B8 12 |O.H.1......*....| 00000A80: 89 95 2D 06 4F 05 48 16 31 92 1E B8 12 89 22 2B |..-.O.H.1....."+| 00000A90: 92 1E B8 12 89 2C 2B 07 92 1E B8 12 89 9D 2B 07 |.....,+.......+.| 00000AA0: 92 1E B8 12 89 3A 2B 07 4F 05 48 16 31 92 8E 92 |.....:+.O.H.1...| 00000AB0: 1E 01 D2 8E 00 99 58 24 3B 43 41 24 3B 3A 92 8E |......X$;CA$;:..| 00000AC0: B8 0F 91 80 2A 4F 05 48 16 F1 92 1E B8 12 89 5E |....*O.H.......^| 00000AD0: 2B 4F 09 92 E9 D2 1E 48 16 40 92 1E B8 12 89 3D |+O.....H.@.....=| 00000AE0: 2B 92 1E B8 12 89 5F 2B 07 4F 0E 92 E9 D2 1E 8A |+....._+.O......| 00000AF0: 01 3D D2 8E 48 16 40 48 16 31 92 8E B8 0F 80 2A |.=..H.@H.1.....*| 00000B00: 4F 1C 92 8E 92 8E B8 0F 81 02 B8 14 D2 8E 00 99 |O...............| 00000B10: 22 20 9D 9D 20 9D 22 3B 43 41 24 3B 3A 48 16 31 |" .. .";CA$;:H.1| 00000B20: 90 D4 88 80 00 00 00 00 01 B8 01 B8 10 D2 F0 92 |................| 00000B30: F0 B8 11 80 2B 4F 09 8A 00 D2 F0 48 17 BF 92 8E |....+O.....H....| 00000B40: 92 E2 92 F0 01 91 80 B8 15 01 D2 8E 4C 90 D4 89 |............L...| 00000B50: 64 03 88 80 00 00 00 00 01 B8 01 B8 10 D2 F0 92 |d...............| 00000B60: F0 B8 11 80 2B 4F 09 8A 00 D2 F0 48 17 BF 92 F0 |....+O.....H....| 00000B70: B8 11 B8 02 88 9E 6E 6B 27 FC 2A 4F 18 90 D4 89 |......nk'.*O....| 00000B80: 0A 03 88 80 00 00 00 00 01 B8 01 B8 10 8A 01 30 |...............0| 00000B90: 01 D2 F0 92 E2 92 F0 01 91 80 81 02 B8 15 D2 F0 |................| 00000BA0: 92 8E 92 F0 91 80 83 02 B8 14 01 8A 01 2E 01 92 |................| 00000BB0: F0 82 B8 15 01 D2 8E 4C 92 8E 92 F0 92 E2 01 91 |.......L........| 00000BC0: 80 B8 14 01 D2 8E 4C 92 8E 92 E2 92 F0 01 91 80 |......L.........| 00000BD0: B8 15 01 D2 8E 4C 92 8E 8A 00 2B 4F 0D 00 98 34 |.....L....+O...4| 00000BE0: 2C 22 20 22 3A 48 17 E5 00 98 34 2C 48 24 3A 8A |," ":H....4,H$:.| 00000BF0: 00 D2 8E 90 CD 81 01 D0 CD 4C B8 1A D0 F7 00 84 |.........L......| 00000C00: 31 35 2C 41 31 3A 90 FE 80 2B 4F 03 4C 90 FE 80 |15,A1:...+O.L...| 00000C10: 2B 4F 03 4C 48 1C 80 00 99 3A 92 6B 8A 12 3A 54 |+O.LH....:.k..:T| 00000C20: 45 4B 53 54 4B 41 52 54 4F 54 45 4B 2C 53 2C 52 |EKSTKARTOTEK,S,R| 00000C30: 01 D2 25 00 9F 32 2C 38 2C 32 2C 44 46 24 00 99 |..%..2,8,2,DF$..| 00000C40: 22 4C 5B 53 20 20 20 20 22 3B 44 46 24 3B 00 84 |"L[S ";DF$;..| 00000C50: 32 2C 54 2C 54 4B 24 28 54 29 2C 4E 25 28 54 29 |2,T,TK$(T),N%(T)| 00000C60: 2C 4E 31 28 54 29 2C 4E 32 28 54 29 3A 4A 17 F1 |,N1(T),N2(T):J..| 00000C70: 90 95 90 95 E1 0A 90 95 80 2E 90 F7 80 2B 06 4F |.............+.O| 00000C80: 05 48 10 45 90 F7 89 40 06 90 95 80 2B 07 4F 0E |.H.E...@....+.O.| 00000C90: 00 A0 32 00 99 22 20 4F 4B 22 3A 4C 48 1C 64 90 |..2.." OK":LH.d.| 00000CA0: A3 80 2B 4F 05 48 11 71 00 99 3A 92 6B 8A 0E 3A |..+O.H.q..:.k..:| 00000CB0: 54 45 4B 53 54 4B 41 52 54 4F 54 45 4B 01 D6 01 |TEKSTKARTOTEK...| 00000CC0: 05 4A 1D 02 92 6B 8A 12 3A 54 45 4B 53 54 4B 41 |.J...k..:TEKSTKA| 00000CD0: 52 54 4F 54 45 4B 2C 53 2C 57 01 D2 25 00 9F 32 |RTOTEK,S,W..%..2| 00000CE0: 2C 38 2C 32 2C 44 46 24 00 99 22 53 4B 52 49 56 |,8,2,DF$.."SKRIV| 00000CF0: 20 20 22 3B 44 46 24 3B 3A 81 D0 95 90 72 42 00 | ";DF$;:....rB.| 00000D00: 95 90 95 A1 0A 80 2B 4F 05 48 11 59 00 98 32 2C |......+O.H.Y..2,| 00000D10: C4 28 54 29 AA 22 2C 22 AA 54 4B 24 28 54 29 AA |.(T).",".TK$(T).| 00000D20: 22 2C 22 AA C4 28 4E 25 28 54 29 29 AA 22 2C 22 |","..(N%(T)).","| 00000D30: 3B 00 98 32 2C C4 28 4E 31 28 54 29 29 AA 22 2C |;..2,.(N1(T)).",| 00000D40: 22 AA C4 28 4E 32 28 54 29 29 43 52 24 3B 3A 4A |"..(N2(T))CR$;:J| 00000D50: 17 F1 47 00 95 00 98 32 2C 22 30 2C 2A 2C 30 2C |..G....2,"0,*,0,| 00000D60: 30 2C 30 22 43 52 24 3B 3A 4A 17 F1 00 A0 32 00 |0,0"CR$;:J....2.| 00000D70: 99 22 20 4F 4B 22 3A 80 D0 A3 48 13 10 00 99 22 |." OK":...H...."| 00000D80: 93 20 20 20 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |. ............| 00000D90: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................| 00000DA0: D2 D2 D2 D2 D2 22 00 99 22 20 20 20 12 A6 A6 20 |.....".." ... | 00000DB0: 20 56 45 44 4C 49 47 45 48 4F 4C 44 20 54 45 4B | VEDLIGEHOLD TEK| 00000DC0: 53 54 4B 41 52 54 4F 54 45 4B 20 20 A6 A6 22 00 |STKARTOTEK ..".| 00000DD0: 99 22 20 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |." ...........| 00000DE0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 00000DF0: C5 C5 C5 C5 C5 C5 22 00 99 22 11 20 20 20 20 44 |......"..". D| 00000E00: 41 47 53 44 41 54 4F 20 20 3A 20 22 2C 44 44 24 |AGSDATO : ",DD$| 00000E10: 00 99 3A 4C 4A 11 74 00 A0 31 35 00 9F 31 35 2C |..:LJ.t..15..15,| 00000E20: 38 2C 31 35 2C 22 49 22 AA 44 31 24 3A 8D 03 4E |8,15,"I".D1$:..N| 00000E30: 8D 02 BC B8 0E 01 B8 0E 8D 03 50 B8 0E 2E 8D 03 |..........P.....| 00000E40: 50 B8 0E 82 2E 07 4F 05 48 1C EF 00 86 54 25 28 |P.....O.H....T%(| 00000E50: 44 29 3A 41 00 0A 00 86 54 4B 24 28 44 29 3A 41 |D):A....TK$(D):A| 00000E60: 00 0C 00 86 4E 25 28 44 29 3A 41 00 04 00 86 4E |....N%(D):A....N| 00000E70: 31 28 44 29 3A 41 00 06 00 86 4E 32 28 44 29 3A |1(D):A....N2(D):| 00000E80: 41 00 08 81 D0 CD 89 48 D0 BF 8A 0D 91 1D 1D 1D |A......H........| 00000E90: 1D 1D 1D 1D 1D 1D 1D 1D 1D D2 9C 8D 03 39 B8 0E |.............9..| 00000EA0: D0 B1 8D 03 36 B8 0E B8 10 8A 01 2E 01 8D 03 37 |....6..........7| 00000EB0: B8 0E B8 10 01 8A 01 2E 01 8D 03 38 B8 0E B8 10 |...........8....| 00000EC0: 01 D2 DB 8A 2A 20 20 20 20 20 20 20 20 20 20 20 |....* | 00000ED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000EE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D2 | .| 00000EF0: E2 89 C6 80 50 4A 17 F1 89 0D B8 13 D2 E9 00 99 |....PJ..........| 00000F00: 00 99 3A 81 8D 03 3E B8 0E E0 10 82 8D 03 3F B8 |..:...>.......?.| 00000F10: 0E E0 10 4A 10 1E 48 0E FC 00 99 22 11 20 20 12 |...J..H....". .| 00000F20: 2A 2A 20 20 20 20 20 20 20 20 20 20 41 46 52 45 |** AFRE| 00000F30: 47 4E 49 4E 47 20 20 20 20 20 20 20 20 20 20 2A |GNING *| 00000F40: 2A 22 00 99 00 99 22 20 12 54 45 4B 53 54 4F 50 |*"...." .TEKSTOP| 00000F50: 52 45 54 20 92 22 3B 41 28 35 29 00 99 22 20 12 |RET .";A(5).." .| 00000F60: 54 45 4B 53 54 52 45 54 20 20 20 92 22 3B 41 28 |TEKSTRET .";A(| 00000F70: 36 29 00 99 22 20 12 54 45 4B 53 54 53 4C 45 54 |6).." .TEKSTSLET| 00000F80: 20 20 92 22 3B 41 28 37 29 3A 85 A0 0E 86 A0 0E | .";A(7):......| 00000F90: 01 87 A0 0E 01 80 2B 90 5D 80 2B 07 4F 05 48 13 |......+.].+.O.H.| 00000FA0: FD 00 99 00 99 22 20 20 12 2A 2A 20 20 20 53 4C |....." .** SL| 00000FB0: 55 54 20 56 45 44 4C 49 47 45 48 4F 4C 44 20 54 |UT VEDLIGEHOLD T| 00000FC0: 45 4B 53 54 20 20 20 20 2A 2A 22 3A 89 C6 80 50 |EKST **":...P| 00000FD0: 00 99 22 11 11 1D 1D 54 52 59 4B 20 12 20 52 45 |.."....TRYK . RE| 00000FE0: 54 55 52 4E 20 92 20 46 4F 52 20 56 5B 4C 47 45 |TURN . FOR V[LGE| 00000FF0: 52 22 3A 48 1C 2B 90 5D 81 2B 4F 05 48 1C 49 00 |R":H.+.].+O.H.I.| 00001000: 99 22 11 11 11 1D 1D 1D 49 53 5B 54 20 50 52 47 |."......IS[T PRG| 00001010: 2E 44 49 53 4B 20 2D 20 54 52 59 4B 20 52 45 54 |.DISK - TRYK RET| 00001020: 55 52 4E 22 00 A1 58 24 3A 92 1E 89 0D B8 13 2B |URN"..X$:......+| 00001030: 4F 0F 00 98 31 35 2C 22 49 30 22 3A 48 1C 49 48 |O...15,"I0":H.IH| 00001040: 1C 2B 00 A0 31 35 00 A0 34 3A 8D 03 46 80 50 8D |.+..15..4:..F.P.| 00001050: 03 4E 8D 02 BC B8 0E 01 90 79 50 49 00 93 22 30 |.N.......yPI.."0| 00001060: 3A 4D 45 4E 55 22 2C 38 3A 5E 03 00 A2 00 99 00 |:MENU",8:^......| 00001070: 99 22 44 49 53 4B 53 54 41 54 55 53 20 3D 20 12 |."DISKSTATUS = .| 00001080: 22 3B 52 53 3B 3A 48 1C A8 00 99 00 99 22 44 49 |";RS;:H......"DI| 00001090: 53 4B 20 46 45 4A 4C 4E 52 2E 20 12 22 3B 41 31 |SK FEJLNR. .";A1| 000010A0: 3B 00 99 22 92 20 4F 42 53 45 52 56 45 52 45 54 |;..". OBSERVERET| 000010B0: 20 56 45 44 20 12 22 3B 44 46 24 00 A0 32 00 99 | VED .";DF$..2..| 000010C0: 00 99 22 53 4C 55 4B 20 41 4E 4C 5B 47 47 45 54 |.."SLUK ANL[GGET| 000010D0: 20 53 54 41 52 54 20 46 52 41 20 4B 4F 50 49 44 | START FRA KOPID| 000010E0: 49 53 4B 22 3A 48 1D 0C 00 99 00 99 22 53 4C 55 |ISK":H......"SLU| 000010F0: 4B 20 41 4E 4C 5B 47 47 45 54 20 50 52 5C 56 20 |K ANL[GGET PR\V | 00001100: 49 47 45 4E 22 3A 49 5E 03 00 A2 3A 8A 01 53 96 |IGEN":I^...:..S.| 00001110: 01 05 01 D6 01 05 00 98 31 35 2C 45 24 00 84 31 |........15,E$..1| 00001120: 35 2C 41 31 3A 90 FE 81 01 4D 04 1D 3E 1D 3E 96 |5,A1:....M..>.>.| 00001130: 01 05 D2 25 48 1C 80 4C 5E 03 00 80 00 00 00 4E |...%H..L^......N| 00001140: B1 00 00 00 00 00 4E B2 00 00 00 00 00 4E B3 00 |......N......N..| 00001150: 00 00 00 00 49 00 00 00 00 00 00 58 80 00 00 00 |....I......X....| 00001160: 00 00 44 C6 00 00 00 00 00 54 80 00 00 00 00 00 |..D......T......| 00001170: 44 C9 00 00 00 00 00 43 31 00 00 00 00 00 43 32 |D......C1.....C2| 00001180: 00 00 00 00 00 43 33 00 00 00 00 00 43 34 00 00 |.....C3.....C4..| 00001190: 00 00 00 43 35 00 00 00 00 00 44 31 00 00 00 00 |...C5.....D1....| 000011A0: 00 43 C1 00 00 00 00 00 44 B1 00 00 00 00 00 44 |.C......D......D| 000011B0: 00 00 00 00 00 00 50 4B 00 00 00 00 00 C3 80 00 |......PK........| 000011C0: 00 00 00 00 4A 42 00 00 00 00 00 48 80 00 00 00 |....JB.....H....| 000011D0: 00 00 54 00 00 00 00 00 00 4F D0 00 00 00 00 00 |..T......O......| 000011E0: 55 44 00 00 00 00 00 54 CB 00 00 00 00 00 49 47 |UD.....T......IG| 000011F0: 00 00 00 00 00 44 56 00 00 00 00 00 43 4C 00 00 |.....DV.....CL..| 00001200: 00 00 00 44 C2 00 00 00 00 00 43 54 00 00 00 00 |...D......CT....| 00001210: 00 4E 00 00 00 00 00 00 44 C4 00 00 00 00 00 43 |.N......D......C| 00001220: CC 00 00 00 00 00 43 D2 00 00 00 00 00 43 80 00 |......C......C..| 00001230: 00 00 00 00 52 53 00 00 00 00 00 41 31 00 00 00 |....RS.....A1...| 00001240: 00 00 45 80 00 00 00 00 00 00 00 12 00 00 00 00 |..E.............| 00001250: 00 00 00 00 00 00 00 00 00 00 00 4C 1A 46 19 04 |...........L.F..| 00001260: 08 4E 32 58 24 27 DD B1 55 4E 51 |.N2X$'..UNQ |
.......2073... R.LE. R.L.. R....ID...?..
.............. U.HHLH RTL-64 R. Q. _.`
..`........%...`H............H` _. G. R.
`@..........J....T[.VL-C2..A(10):A....AS
(10):A..W..15,8,15,"I0":.% COPYRIGHT : D
JURS DATA APS - GREN] R..% DATO :
05.11.1983 - A.O. R..% PROGRAM :
VEDLIGEH. TEKSTKARTOTEK R..P....B..G...
.X$:....@.O.H...."........";N1$.."..";N2
$.."..";N3$:.P...PB..G..H.:..".":.P...R.
..R...R.....4P..P.....P..0:F.......FIRM-
WARE,P,R.R%..2,8,2,DF$:J...P..B....2,T$:
J..G... 2:J....0:SYS-UTIL,S,RR%..2,8,2,D
F$:J....2,DI$:J... 2:..0:SK[RM.......O..
..O........H....LH.D..DH.L..LX..........
..........H...M.....DA...|.O.|.HV.......
O...........AJ...LV.I....L..O.......FFG.
./.N...N.../.O.........-.........N?...
./.'.M...?...?.../../..*:....F/Z./'.M.T
.." .1. = OPRET TEKST".." .2. = RET
TEKST".." .3. = SLET TEKST".." .4.
= UDSKRIV TEKSTKARTOTEK".." .5. = AFSLUT
PROGRAM"..:.Q....JOB VALGR,J......P....
*...-.O..."FEJL JOB":H....M..X...B....H.
P.Q....SALDO KODE R,J......=+O.......R..
.OP$;H$:L.Q....BOGF.KONTO R,J......=+O..
. ...R...OP$;H$:L.Q....SAMLEKONTO R,J...
...=+O... ...R...OP$;H$:L..". .---OPRET
TEKST---"....:...TEKSTNUMMERR,.Q.J.....
.P....R*...-.O...".FEJL NUMMER":H.C...+O
.H.......+O.H.Z.." ER OPRETTET":H.C.P...
.TEKST R,..Q.J......^+O.H.C....=+O.
..R...OP$TK$:........R... .........O.H."
H.PJ.H....^+O.H..............O.H.DH.PJ..
....^+O.H."........J.(....^+O.H.D.......
.......H.C..". .---RET TEKST---"....:..
.TEKSTNUMMERR,.Q.J......P....R*...-.O...
".FEJL NUMMER":H.....+O.H........O.H....
".ER IKKE OPRETTET":H...P..." GL. TEKST
= .";TK$(T):....R...TEKST R,..Q.J..
....^+O.H......=+O...R...OP$TK$:........
.........O.H.QH..J.H....^+O.H.!........
....O.H..H..J......^+O.H.Q........J.(...
.^+O.H..........H....". .---SLET TEKST-
--"....:...TEKSTNUMMERR,.Q.J......P....R
*...-.O...".FEJL NUMMER":H.....+O.H.....
...+O.H.Y.." ER IKKE OPRETTET":H...." GL
. TEKST = .";TK$(T):....R..Q....S. = SLE
TTESR,J......S+O+.." .S.LETTET .OK":....
...P... ..........H....". .--UDSKRIV TE
KSTKARTOTEK--.":.Q.... S .K[RM ELLER LIN
IESKRIVERR,J...P....>.......?........S+O
..P...P.........H.O....D.OBBELT LINIEAFS
TAND R,J....RF....^+O.H...HP...4,DV:.
PMJ..H.O.MPT..B.T..4," ":F.PM...+O&..4,"
... TEKSTKARTOTEK PR. ";DD$:H....4," ";
G(AS(1));"TEKSTKARTOTEK PR. ";DD$;G(AS(2
)):.M..PM..4," "..4,"TEKSTKODE ";..4,"T
EKST ";:....O...4,"
SK"..4," ":L.P..RB....X$:....@+O.H..
.....+O.H....R..M....*O.J...Q...PTJ....
.. - .R...4,H$;H(TK$(T).CL$,30);:.M..PM.
...O.H.J..4," ":H....4,I(CL$.D(N%(T)),3)
:.F..D+O...4," ":.M..PM...+......+.O.H..
G...MPT..B.T..4," ":F.PM. 4:H....".";T$;
". ";CA$;:..R..L.P..X$:....+O.H.1......+
O..." ":.L.PL......+O.H....... -O.H.1...
..*......-.O.H.1....."+.....,+.......+.
.....:+.O.H.1.....R...X$;CA$;:......*O.H
.......^+O...R.H.@.....=+....._+.O...R..
.=R.H.@H.1.....*O...........R..." .. .";
CA$;:H.1.T...........R......+O...R.H....
..........R.L.T.D............R......+O..
.R.H..........NK'.*O..T................0
.R............R......................R.L
............R.L............R.L....+O...4
," ":H....4,H$:..R..M..PML..P...15,A1:..
.+O.L...+O.LH....:.K..:TEKSTKARTOTEK,S,R
.R%..2,8,2,DF$.."L[S ";DF$;..2,T,TK$(
T),N%(T),N1(T),N2(T):J...............+.O
.H.E...@....+.O.. 2.." OK":LH.D...+O.H.Q
..:.K..:TEKSTKARTOTEK.V..J...K..:TEKSTKA
RTOTEK,S,W.R%..2,8,2,DF$.."SKRIV ";DF$;
:.P..RB.......+O.H.Y..2,D(T).",".TK$(T).
",".D(N%(T)).",";..2,D(N1(T)).",".D(N2(T
))CR$;:J..G....2,"0,*,0,0,0"CR$;:J... 2.
." OK":.P.H....". RRRRRRRRRRRRRRRRRRRR
RRRRRRRRRRRRR".." ... VEDLIGEHOLD TEK
STKARTOTEK ..".." EEEEEEEEEEEEEEEEEEE
EEEEEEEEEEEEEE"..". DAGSDATO : ",DD$
..:LJ.T. 15..15,8,15,"I".D1$:..N........
..P.....P.....O.H....T%(D):A....TK$(D):A
....N%(D):A....N1(D):A....N2(D):A...PM.H
P................R...9..P...6..........7
...........8.....R..*
R..F.PJ......R...
..:...>.......?....J..H....". .**
AFREGNING **"...." .TEKSTOP
RET .";A(5).." .TEKSTRET .";A(6).." .T
EKSTSLET .";A(7):. .. ... ...+.].+.O.H.
....." .** SLUT VEDLIGEHOLD TEKST
**":.F.P.."....TRYK . RETURN . FOR V[LGE
R":H.+.].+O.H.I.."......IS[T PRG.DISK -
TRYK RETURN"..X$:......+O...15,"I0":H.IH
.+. 15. 4:..F.P..N.......YPI.."0:MENU",8
:^......."DISKSTATUS = .";RS;:H......"DI
SK FEJLNR. .";A1;..". OBSERVERET VED .";
DF$. 2...."SLUK ANL[GGET START FRA KOPID
ISK":H......"SLUK ANL[GGET PR\V IGEN":I^
...:..S....V....15,E$..15,A1:....M..>.>.
..R%H..L^......N......N......N......I...
...X......DF.....T......DI.....C1.....C2
.....C3.....C4.....C5.....D1.....CA.....
D......D......PK.....C......JB.....H....
..T......OP.....UD.....TK.....IG.....DV.
....CL.....DB.....CT.....N......DD.....C
L.....CR.....C......RS.....A1.....E.....
...................L.F...N2X$'..UNQ
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL