_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

AFU-DATEI OE3FEA

FILE INFORMATION

FILENAME(S): AFU-DATEI OE3FEA

FILE TYPE(S): PRG

FILE SIZE: 7.7K

FIRST SEEN: 2025-12-02 23:23:14

APPEARS ON: 1 disk(s)

FILE HASH

781450e50cf5d7079a72304d7c14998bbe03a5e3f143b126afbc3f1a726cfc9c

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
A AFU-DATEI OE3FEA PRG swasti, dinkel 28 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 49 08 0A 00 8F 20  55 4E 49 20 44 41 54 45  |..I.... UNI DATE|
00000010: 49 20 41 55 53 20 48 41  50 50 59 20 43 4F 4D 50  |I AUS HAPPY COMP|
00000020: 55 54 45 52 20 56 4F 4E  20 4F 45 33 46 45 41 20  |UTER VON OE3FEA |
00000030: 46 55 52 20 41 4D 41 54  45 55 52 46 55 4E 4B 20  |FUR AMATEURFUNK |
00000040: 41 4E 47 45 50 41 53 53  54 00 7E 08 64 00 8F 20  |ANGEPASST.~.d.. |
00000050: 5A 55 52 20 45 49 4E 47  41 42 45 20 44 45 52 20  |ZUR EINGABE DER |
00000060: 44 41 54 45 4E 46 45 4C  44 45 52 20 52 55 4E 20  |DATENFELDER RUN |
00000070: 38 30 30 30 20 45 49 4E  54 49 50 50 45 4E 00 93  |8000 EINTIPPEN..|
00000080: 08 DC 00 4E 24 B2 22 41  4D 41 54 45 55 52 46 55  |...N$."AMATEURFU|
00000090: 4E 4B 22 00 9C 08 E6 00  41 41 B2 38 00 C1 08 F0  |NK".....AA.8....|
000000A0: 00 4E 31 B2 34 30 30 3A  20 8F 20 41 4E 5A 41 48  |.N1.400: . ANZAH|
000000B0: 4C 20 44 45 52 20 44 41  54 45 4E 53 41 45 54 5A  |L DER DATENSAETZ|
000000C0: 45 00 DF 08 FA 00 58 58  24 28 31 29 B2 22 43 41  |E.....XX$(1)."CA|
000000D0: 4C 4C 20 20 20 20 20 20  20 20 20 20 20 20 22 00  |LL            ".|
000000E0: FD 08 04 01 58 58 24 28  32 29 B2 22 44 41 54 55  |....XX$(2)."DATU|
000000F0: 4D 20 20 20 20 20 20 20  20 20 20 20 22 00 1B 09  |M           "...|
00000100: 0E 01 58 58 24 28 33 29  B2 22 5A 45 49 54 20 20  |..XX$(3)."ZEIT  |
00000110: 20 20 20 20 20 20 20 20  20 20 22 00 39 09 18 01  |          ".9...|
00000120: 58 58 24 28 34 29 B2 22  46 52 45 51 55 45 4E 5A  |XX$(4)."FREQUENZ|
00000130: 20 20 20 20 20 20 20 20  22 00 57 09 22 01 58 58  |        ".W.".XX|
00000140: 24 28 35 29 B2 22 42 45  54 52 49 45 42 53 41 52  |$(5)."BETRIEBSAR|
00000150: 54 20 20 20 20 20 22 00  75 09 2C 01 58 58 24 28  |T     ".u.,.XX$(|
00000160: 36 29 B2 22 51 54 48 20  20 20 20 20 20 20 20 20  |6)."QTH         |
00000170: 20 20 20 20 22 00 93 09  36 01 58 58 24 28 37 29  |    "...6.XX$(7)|
00000180: B2 22 4E 41 4D 45 20 20  20 20 20 20 20 20 20 20  |."NAME          |
00000190: 20 20 22 00 B1 09 40 01  58 58 24 28 38 29 B2 22  |  "...@.XX$(8)."|
000001A0: 51 53 4C 20 41 55 53 2F  45 49 4E 20 20 20 20 20  |QSL AUS/EIN     |
000001B0: 22 00 C6 09 5E 01 8F 20  49 4E 49 54 49 41 4C 49  |"...^.. INITIALI|
000001C0: 53 49 45 52 45 4E 00 EA  09 7C 01 99 C7 28 31 34  |SIEREN...|...(14|
000001D0: 37 29 3A 50 B2 30 3A 47  B2 30 3A 53 B2 30 3A 4E  |7):P.0:G.0:S.0:N|
000001E0: B2 30 3A 97 37 38 38 2C  34 39 00 15 0A 86 01 97  |.0:.788,49......|
000001F0: 35 33 32 38 30 2C 36 3A  97 35 33 32 38 31 2C 36  |53280,6:.53281,6|
00000200: 3A 97 36 35 30 2C 31 32  38 3A 86 58 59 24 28 41  |:.650,128:.XY$(A|
00000210: 41 2C 4E 31 29 00 21 0A  AE 01 8F 20 4D 45 4E 55  |A,N1).!.... MENU|
00000220: 45 00 3A 0A CC 01 99 C7  28 31 34 37 29 3A 81 49  |E.:.....(147):.I|
00000230: B2 31 A4 32 33 3A 99 3A  82 49 00 66 0A D6 01 99  |.1.23:.:.I.f....|
00000240: 22 12 1E 20 41 4D 41 54  45 55 52 4B 41 52 54 45  |".. AMATEURKARTE|
00000250: 49 20 20 4F 20 45 20 33  20 46 20 45 20 41 20 20  |I  O E 3 F E A  |
00000260: 20 20 20 20 20 22 00 96  0A E0 01 99 22 13 12 20  |     "......".. |
00000270: 4D 20 45 20 4E 20 55 20  45 20 20 20 20 20 20 20  |M E N U E       |
00000280: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000290: 20 20 20 20 9A 22 00 C3  0A EA 01 99 3A 99 A3 34  |    ."......:..4|
000002A0: 29 22 9F 20 31 2E 2D 20  12 45 49 4E 47 41 42 45  |)". 1.- .EINGABE|
000002B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 9A  |               .|
000002C0: 22 3A 99 00 EC 0A F4 01  81 49 B2 31 A4 41 41 3A  |":.......I.1.AA:|
000002D0: 99 A3 34 29 49 AA 31 22  2D 20 53 55 43 48 45 4E  |..4)I.1"- SUCHEN|
000002E0: 20 22 20 58 58 24 28 49  29 3A 82 49 00 16 0B FE  | " XX$(I):.I....|
000002F0: 01 99 3A 99 A3 34 29 22  9E 20 4C 20 2D 20 12 44  |..:..4)". L - .D|
00000300: 41 54 45 4E 20 4C 41 44  45 4E 20 20 20 20 20 20  |ATEN LADEN      |
00000310: 20 20 20 20 20 22 00 3F  0B 08 02 99 3A 99 A3 34  |     ".?....:..4|
00000320: 29 22 20 53 20 2D 20 12  44 41 54 45 4E 20 53 49  |)" S - .DATEN SI|
00000330: 43 48 45 52 4E 20 20 20  20 20 20 20 20 20 22 00  |CHERN         ".|
00000340: 69 0B 12 02 99 3A 99 A3  34 29 22 1E 20 46 20 2D  |i....:..4)". F -|
00000350: 20 12 46 52 45 49 45 20  44 41 54 45 4E 53 41 45  | .FREIE DATENSAE|
00000360: 54 5A 45 20 20 20 20 20  22 00 93 0B 1C 02 99 3A  |TZE     "......:|
00000370: 99 A3 34 29 22 9C 20 44  20 2D 20 12 44 55 52 43  |..4)". D - .DURC|
00000380: 48 42 4C 41 45 54 54 45  52 4E 20 20 20 20 20 20  |HBLAETTERN      |
00000390: 20 20 22 00 BE 0B 26 02  99 3A 99 A3 34 29 22 81  |  "...&..:..4)".|
000003A0: 20 45 20 2D 20 12 45 4E  44 45 20 20 20 20 20 20  | E - .ENDE      |
000003B0: 20 20 20 20 20 20 20 20  20 20 20 20 9A 22 00 D1  |            ."..|
000003C0: 0B 30 02 A1 58 24 3A 8B  58 24 B2 22 22 A7 35 36  |.0..X$:.X$."".56|
000003D0: 30 00 DA 0B 35 02 99 22  93 22 00 EB 0B 3A 02 8B  |0...5.."."...:..|
000003E0: 58 24 B2 22 31 22 A7 8D  37 37 30 00 0B 0C 44 02  |X$."1"..770...D.|
000003F0: 8B 58 24 B2 22 32 22 A7  58 32 24 B2 58 58 24 28  |.X$."2".X2$.XX$(|
00000400: 31 29 3A 5A B2 31 3A 8D  39 31 30 00 31 0C 4E 02  |1):Z.1:.910.1.N.|
00000410: 8B 58 24 B2 22 33 22 A7  8B 41 41 B1 31 A7 58 32  |.X$."3"..AA.1.X2|
00000420: 24 B2 58 58 24 28 32 29  3A 5A B2 32 3A 8D 39 31  |$.XX$(2):Z.2:.91|
00000430: 30 00 57 0C 58 02 8B 58  24 B2 22 34 22 A7 8B 41  |0.W.X..X$."4"..A|
00000440: 41 B1 32 A7 58 32 24 B2  58 58 24 28 33 29 3A 5A  |A.2.X2$.XX$(3):Z|
00000450: B2 33 3A 8D 39 31 30 00  7D 0C 62 02 8B 58 24 B2  |.3:.910.}.b..X$.|
00000460: 22 35 22 A7 8B 41 41 B1  33 A7 58 32 24 B2 58 58  |"5"..AA.3.X2$.XX|
00000470: 24 28 34 29 3A 5A B2 34  3A 8D 39 31 30 00 A3 0C  |$(4):Z.4:.910...|
00000480: 6C 02 8B 58 24 B2 22 36  22 A7 8B 41 41 B1 34 A7  |l..X$."6"..AA.4.|
00000490: 58 32 24 B2 58 58 24 28  35 29 3A 5A B2 35 3A 8D  |X2$.XX$(5):Z.5:.|
000004A0: 39 31 30 00 C9 0C 76 02  8B 58 24 B2 22 37 22 A7  |910...v..X$."7".|
000004B0: 8B 41 41 B1 35 A7 58 32  24 B2 58 58 24 28 36 29  |.AA.5.X2$.XX$(6)|
000004C0: 3A 5A B2 36 3A 8D 39 31  30 00 EF 0C 80 02 8B 58  |:Z.6:.910......X|
000004D0: 24 B2 22 38 22 A7 8B 41  41 B1 36 A7 58 32 24 B2  |$."8"..AA.6.X2$.|
000004E0: 58 58 24 28 37 29 3A 5A  B2 37 3A 8D 39 31 30 00  |XX$(7):Z.7:.910.|
000004F0: 15 0D 8A 02 8B 58 24 B2  22 39 22 A7 8B 41 41 B1  |.....X$."9"..AA.|
00000500: 37 A7 58 32 24 B2 58 58  24 28 38 29 3A 5A B2 38  |7.X2$.XX$(8):Z.8|
00000510: 3A 8D 39 31 30 00 27 0D  94 02 8B 58 24 B2 22 4C  |:.910.'....X$."L|
00000520: 22 A7 8D 31 34 35 30 00  39 0D 9E 02 8B 58 24 B2  |"..1450.9....X$.|
00000530: 22 53 22 A7 8D 31 32 37  30 00 4B 0D A8 02 8B 58  |"S"..1270.K....X|
00000540: 24 B2 22 46 22 A7 8D 32  31 34 30 00 5D 0D B2 02  |$."F"..2140.]...|
00000550: 8B 58 24 B2 22 44 22 A7  8D 31 38 34 30 00 6F 0D  |.X$."D"..1840.o.|
00000560: BC 02 8B 58 24 B2 22 45  22 A7 8D 31 37 36 30 00  |...X$."E"..1760.|
00000570: 78 0D C6 02 89 34 36 30  00 86 0D E4 02 8F 20 45  |x....460...... E|
00000580: 49 4E 47 41 42 45 00 95  0D 02 03 8B 47 B2 30 A7  |INGABE......G.0.|
00000590: 8D 32 32 30 30 00 AF 0D  0C 03 53 B2 31 3A 99 22  |.2200.....S.1:."|
000005A0: 93 22 3A 81 49 B2 31 A4  32 33 3A 99 3A 82 49 00  |.":.I.1.23:.:.I.|
000005B0: DF 0D 16 03 99 22 12 1E  20 4D 45 4E 55 45 20 3D  |.....".. MENUE =|
000005C0: 20 5E 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | ^              |
000005D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 22 00  |              ".|
000005E0: 11 0E 20 03 99 22 13 12  1E 20 45 20 49 20 4E 20  |.. .."... E I N |
000005F0: 47 20 41 20 42 20 45 20  20 20 20 20 20 20 20 20  |G A B E         |
00000600: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000610: 22 00 32 0E 2A 03 99 3A  99 3A 99 22 9A 4C 41 55  |".2.*..:.:.".LAU|
00000620: 46 45 4E 44 45 20 4E 55  4D 4D 45 52 3A 22 3B 4E  |FENDE NUMMER:";N|
00000630: AA 31 00 58 0E 34 03 81  49 B2 31 A4 41 41 3A 99  |.1.X.4..I.1.AA:.|
00000640: 22 12 11 22 58 58 24 28  49 29 22 92 22 3B 3A 85  |".."XX$(I)".";:.|
00000650: 58 59 24 28 49 2C 4E 29  00 86 0E 3E 03 8B 58 59  |XY$(I,N)...>..XY|
00000660: 24 28 49 2C 4E 29 B2 C7  28 39 34 29 A7 81 58 B2  |$(I,N)..(94)..X.|
00000670: 31 A4 41 41 3A 58 59 24  28 58 2C 4E 29 B2 22 20  |1.AA:XY$(X,N)." |
00000680: 22 3A 82 58 3A 8E 00 A7  0E 48 03 8B 58 59 24 28  |":.X:....H..XY$(|
00000690: 49 2C 4E 29 B2 22 22 A7  58 59 24 28 49 2C 4E 29  |I,N)."".XY$(I,N)|
000006A0: B2 C7 28 31 36 30 29 00  B9 0E 52 03 82 49 3A 4E  |..(160)...R..I:N|
000006B0: B2 4E AA 31 3A 89 37 38  30 00 C6 0E 70 03 8F 20  |.N.1:.780...p.. |
000006C0: 53 55 43 48 45 4E 00 DB  0E 8E 03 99 22 93 22 3A  |SUCHEN......".":|
000006D0: 81 49 B2 31 A4 32 33 3A  99 3A 82 00 0C 0F 98 03  |.I.1.23:.:......|
000006E0: 99 22 12 1E 20 4D 45 4E  55 45 20 3D 20 5E 20 20  |.".. MENUE = ^  |
000006F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000700: 20 20 20 20 20 20 20 20  20 20 20 22 00 3E 0F A2  |           ".>..|
00000710: 03 99 22 13 12 1E 20 53  20 55 20 43 20 48 20 45  |.."... S U C H E|
00000720: 20 4E 20 20 20 20 2A 20  3D 20 45 52 4C 41 55 42  | N    * = ERLAUB|
00000730: 54 20 20 20 20 20 20 20  20 20 20 20 20 22 00 56  |T            ".V|
00000740: 0F AC 03 99 3A 99 3A 99  22 9A 45 49 4E 47 41 42  |....:.:.".EINGAB|
00000750: 45 20 22 58 32 24 00 6E  0F B6 03 99 3A 85 41 31  |E "X2$.n....:.A1|
00000760: 24 3A 8B 41 31 24 B2 C7  28 39 34 29 A7 8E 00 A0  |$:.A1$..(94)....|
00000770: 0F C0 03 81 54 B2 31 A4  31 34 3A 99 3A 82 3A 99  |....T.1.14:.:.:.|
00000780: 22 12 81 20 42 49 54 54  45 20 45 49 4E 45 4E 20  |".. BITTE EINEN |
00000790: 4D 4F 4D 45 4E 54 20 47  45 44 55 4C 44 20 9A 22  |MOMENT GEDULD ."|
000007A0: 00 B8 0F CA 03 8B C9 28  41 31 24 2C 31 29 B2 C7  |.......(A1$,1)..|
000007B0: 28 34 32 29 A7 50 B2 31  00 C6 0F D4 03 4E 32 B2  |(42).P.1.....N2.|
000007C0: C3 28 41 31 24 29 00 E7  0F DE 03 8B 50 B2 31 A7  |.(A1$)......P.1.|
000007D0: 41 31 24 B2 C8 28 41 31  24 2C 4E 32 AB 31 29 3A  |A1$..(A1$,N2.1):|
000007E0: 4E 32 B2 4E 32 AB 31 00  F4 0F E8 03 81 54 B2 30  |N2.N2.1......T.0|
000007F0: A4 4E AA 31 00 2F 10 F2  03 8B 54 B1 4E A7 99 22  |.N.1./....T.N.."|
00000800: 93 22 3A 81 49 49 B2 31  A4 39 3A 99 3A 82 3A 99  |.":.II.1.9:.:.:.|
00000810: 22 4B 45 49 4E 45 20 57  45 49 54 45 52 45 4E 20  |"KEINE WEITEREN |
00000820: 45 49 4E 54 52 41 47 55  4E 47 45 4E 20 22 3B 00  |EINTRAGUNGEN ";.|
00000830: 66 10 FC 03 8B 54 B1 4E  A7 99 22 12 81 20 3E 54  |f....T.N..".. >T|
00000840: 41 53 54 45 3C 20 9A 22  3A 97 31 39 38 2C 30 3A  |ASTE< .":.198,0:|
00000850: 92 31 39 38 2C 31 3A 97  31 39 38 2C 30 3A 50 B2  |.198,1:.198,0:P.|
00000860: 30 3A 89 39 31 30 00 87  10 06 04 8B 50 B2 31 A7  |0:.910......P.1.|
00000870: 8B C8 28 58 59 24 28 5A  2C 54 29 2C 4E 32 29 B3  |..(XY$(Z,T),N2).|
00000880: B1 41 31 24 A7 82 54 00  A2 10 10 04 8B 50 B2 30  |.A1$..T......P.0|
00000890: A7 8B 58 59 24 28 5A 2C  54 29 B3 B1 41 31 24 A7  |..XY$(Z,T)..A1$.|
000008A0: 82 54 00 B0 10 2E 04 8F  20 41 55 53 47 41 42 45  |.T...... AUSGABE|
000008B0: 00 C5 10 4C 04 99 22 93  22 3A 81 49 B2 31 A4 32  |...L..".":.I.1.2|
000008C0: 32 3A 99 3A 82 00 F7 10  51 04 99 22 12 1E 20 20  |2:.:....Q.."..  |
000008D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008F0: 20 20 20 20 20 20 22 00  28 11 56 04 99 22 12 20  |      ".(.V..". |
00000900: 4D 45 4E 55 45 3D 5E 20  20 41 45 4E 44 45 52 4E  |MENUE=^  AENDERN|
00000910: 3D 46 37 20 20 57 45 49  54 45 52 20 53 55 43 48  |=F7  WEITER SUCH|
00000920: 45 4E 3D 46 31 20 20 22  00 5A 11 60 04 99 22 12  |EN=F1  ".Z.`..".|
00000930: 1E 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00000940: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000950: 20 20 20 20 20 20 20 20  20 22 00 8B 11 6A 04 99  |         "...j..|
00000960: 22 12 20 45 49 4E 54 52  41 47 20 4C 4F 45 53 43  |". EINTRAG LOESC|
00000970: 48 45 4E 3D 5F 20 20 4E  45 55 20 53 55 43 48 45  |HEN=_  NEU SUCHE|
00000980: 4E 3D 52 45 54 55 52 4E  20 20 22 00 BE 11 6F 04  |N=RETURN  "...o.|
00000990: 99 22 12 1E 20 20 20 20  20 20 20 20 20 20 20 20  |."..            |
000009A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009B0: 20 20 20 20 20 20 20 20  20 20 20 20 9A 22 00 F2  |            ."..|
000009C0: 11 74 04 99 22 13 22 3A  81 52 B2 31 A4 41 41 3A  |.t..".":.R.1.AA:|
000009D0: 99 22 11 12 22 58 58 24  28 52 29 22 20 3D 20 92  |.".."XX$(R)" = .|
000009E0: 20 20 9E 22 58 59 24 28  52 2C 54 29 22 9A 22 3A  |  ."XY$(R,T)".":|
000009F0: 82 52 00 06 12 7E 04 A1  58 24 3A 8B 58 24 B2 22  |.R...~..X$:.X$."|
00000A00: 22 A7 31 31 35 30 00 1A  12 88 04 8B 58 24 B2 C7  |".1150......X$..|
00000A10: 28 39 34 29 A7 50 B2 30  3A 8E 00 3A 12 92 04 8B  |(94).P.0:..:....|
00000A20: 58 24 B2 C7 28 31 33 33  29 A7 99 22 13 22 3A 81  |X$..(133)..".":.|
00000A30: 49 B2 31 A4 31 37 3A 99  3A 82 00 6E 12 9C 04 8B  |I.1.17:.:..n....|
00000A40: 58 24 B2 C7 28 31 33 33  29 A7 99 22 12 81 20 42  |X$..(133)..".. B|
00000A50: 49 54 54 45 20 45 49 4E  45 4E 20 4D 4F 4D 45 4E  |ITTE EINEN MOMEN|
00000A60: 54 20 47 45 44 55 4C 44  20 9A 22 3A 82 54 00 85  |T GEDULD .":.T..|
00000A70: 12 A6 04 8B 58 24 B2 C7  28 31 33 29 A7 50 B2 30  |....X$..(13).P.0|
00000A80: 3A 89 39 31 30 00 A0 12  B0 04 8B 58 24 B2 C7 28  |:.910......X$..(|
00000A90: 31 33 36 29 A7 50 B2 30  3A 8D 31 36 34 30 3A 8E  |136).P.0:.1640:.|
00000AA0: 00 B6 12 B5 04 8B 58 24  B2 C7 28 39 35 29 A7 8D  |......X$..(95)..|
00000AB0: 32 34 34 30 3A 8E 00 C0  12 BA 04 89 31 31 35 30  |2440:.......1150|
00000AC0: 00 D4 12 D8 04 8F 20 44  41 54 45 4E 20 53 49 43  |...... DATEN SIC|
00000AD0: 48 45 52 4E 00 DF 12 F6  04 8B 4E B3 31 A7 8E 00  |HERN......N.1...|
00000AE0: F2 12 00 05 53 B2 30 3A  99 22 93 22 3A 99 3A 99  |....S.0:.".":.:.|
00000AF0: 3A 99 00 19 13 14 05 8D  32 30 30 30 3A 99 22 44  |:.......2000:."D|
00000B00: 41 54 45 4E 20 57 45 52  44 45 4E 20 47 45 53 50  |ATEN WERDEN GESP|
00000B10: 45 49 43 48 45 52 54 21  22 00 3B 13 15 05 9F 31  |EICHERT!".;....1|
00000B20: 2C 38 2C 32 2C 22 40 3A  22 AA 4E 24 AA 22 2C 53  |,8,2,"@:".N$.",S|
00000B30: 2C 57 22 3A 9F 32 2C 38  2C 31 35 00 60 13 1E 05  |,W":.2,8,15.`...|
00000B40: 98 31 2C 4E 3A 84 32 2C  46 41 2C 46 42 24 2C 46  |.1,N:.2,FA,FB$,F|
00000B50: 43 2C 46 44 3A 8B 46 41  B3 B1 30 A7 31 33 35 30  |C,FD:.FA..0.1350|
00000B60: 00 86 13 28 05 81 49 B2  30 A4 4E AB 31 3A 81 52  |...(..I.0.N.1:.R|
00000B70: B2 31 A4 41 41 3A 98 31  2C 58 59 24 28 52 2C 49  |.1.AA:.1,XY$(R,I|
00000B80: 29 3A 82 52 2C 49 00 A6  13 2A 05 84 32 2C 46 41  |):.R,I...*..2,FA|
00000B90: 2C 46 42 24 2C 46 43 2C  46 44 3A 8B 46 41 B3 B1  |,FB$,FC,FD:.FA..|
00000BA0: 30 A7 31 33 35 30 00 B6  13 32 05 A0 31 3A A0 32  |0.1350...2..1:.2|
00000BB0: 3A 89 31 33 35 35 00 E5  13 46 05 A0 31 3A A0 32  |:.1355...F..1:.2|
00000BC0: 3A 99 22 11 11 11 46 45  48 4C 45 52 4D 45 4C 44  |:."...FEHLERMELD|
00000BD0: 55 4E 47 22 3B 46 41 3B  46 42 24 3B 46 43 3B 46  |UNG";FA;FB$;FC;F|
00000BE0: 44 3A 99 3A 99 00 FF 13  47 05 85 22 12 81 20 52  |D:.:....G..".. R|
00000BF0: 45 54 55 52 4E 20 9A 92  20 22 3B 58 24 3A 8E 00  |ETURN .. ";X$:..|
00000C00: 29 14 4B 05 81 49 49 B2  31 A4 36 3A 99 3A 82 3A  |).K..II.1.6:.:.:|
00000C10: 99 A3 36 29 22 44 41 54  45 4E 20 41 42 47 45 53  |..6)"DATEN ABGES|
00000C20: 50 45 49 43 48 45 52 54  22 00 41 14 53 05 81 49  |PEICHERT".A.S..I|
00000C30: 49 B2 31 A4 35 30 30 3A  82 3A 8D 32 32 36 30 3A  |I.1.500:.:.2260:|
00000C40: 8E 00 53 14 8C 05 8F 20  44 41 54 45 4E 20 4C 41  |..S.... DATEN LA|
00000C50: 44 45 4E 00 85 14 AA 05  8D 32 30 30 30 3A 47 B2  |DEN......2000:G.|
00000C60: 31 3A 99 22 93 22 3A 99  3A 99 3A 99 3A 99 22 44  |1:.".":.:.:.:."D|
00000C70: 41 54 45 4E 20 57 45 52  44 45 4E 20 47 45 4C 41  |ATEN WERDEN GELA|
00000C80: 44 45 4E 21 22 00 A2 14  B4 05 9F 31 2C 38 2C 32  |DEN!"......1,8,2|
00000C90: 2C 4E 24 AA 22 2C 53 2C  52 22 3A 9F 32 2C 38 2C  |,N$.",S,R":.2,8,|
00000CA0: 31 35 00 C7 14 BE 05 84  31 2C 4E 3A 84 32 2C 46  |15......1,N:.2,F|
00000CB0: 41 2C 46 42 24 2C 46 43  2C 46 44 3A 8B 46 41 B3  |A,FB$,FC,FD:.FA.|
00000CC0: B1 30 A7 31 35 33 30 00  ED 14 C8 05 81 49 B2 30  |.0.1530......I.0|
00000CD0: A4 4E AB 31 3A 81 52 B2  31 A4 41 41 3A 84 31 2C  |.N.1:.R.1.AA:.1,|
00000CE0: 58 59 24 28 52 2C 49 29  3A 82 52 2C 49 00 0D 15  |XY$(R,I):.R,I...|
00000CF0: D2 05 84 32 2C 46 41 2C  46 42 24 2C 46 43 2C 46  |...2,FA,FB$,FC,F|
00000D00: 44 3A 8B 46 41 B3 B1 30  A7 31 35 33 30 00 23 15  |D:.FA..0.1530.#.|
00000D10: DC 05 A0 31 3A A0 32 3A  8D 32 32 36 30 3A 89 31  |...1:.2:.2260:.1|
00000D20: 35 35 30 00 52 15 FA 05  A0 31 3A A0 32 3A 99 22  |550.R....1:.2:."|
00000D30: 11 11 11 46 45 48 4C 45  52 4D 45 4C 44 55 4E 47  |...FEHLERMELDUNG|
00000D40: 22 3B 46 41 3B 46 42 24  3B 46 43 3B 46 44 3A 99  |";FA;FB$;FC;FD:.|
00000D50: 3A 99 00 6C 15 FC 05 85  22 12 81 20 52 45 54 55  |:..l....".. RETU|
00000D60: 52 4E 20 9A 92 20 22 3B  58 24 3A 8E 00 A2 15 0E  |RN .. ";X$:.....|
00000D70: 06 81 49 49 B2 31 A4 36  3A 99 3A 82 3A 99 A3 36  |..II.1.6:.:.:..6|
00000D80: 29 22 44 41 54 45 4E 20  49 4D 20 52 45 43 48 4E  |)"DATEN IM RECHN|
00000D90: 45 52 20 22 3A 81 49 49  B2 31 A4 35 30 30 3A 82  |ER ":.II.1.500:.|
00000DA0: 3A 8E 00 B8 15 40 06 8F  20 45 49 4E 54 52 41 47  |:....@.. EINTRAG|
00000DB0: 20 41 45 4E 44 45 52 4E  00 EC 15 68 06 53 B2 31  | AENDERN...h.S.1|
00000DC0: 3A 99 22 93 12 1E 20 45  20 49 20 4E 20 54 20 52  |:."... E I N T R|
00000DD0: 20 41 20 47 20 55 20 4E  20 47 20 20 20 41 20 45  | A G U N G   A E|
00000DE0: 20 4E 20 44 20 45 20 52  20 4E 20 9A 00 19 16 72  | N D E R N ....r|
00000DF0: 06 81 52 B2 31 A4 41 41  3A 99 3A 99 22 20 12 22  |..R.1.AA:.:." ."|
00000E00: 58 58 24 28 52 29 22 20  3D 92 20 20 9E 22 58 59  |XX$(R)" =.  ."XY|
00000E10: 24 28 52 2C 54 29 22 81  22 00 42 16 7C 06 97 36  |$(R,T)".".B.|..6|
00000E20: 33 31 2C 33 34 3A 97 31  39 38 2C 31 3A 85 22 41  |31,34:.198,1:."A|
00000E30: 45 4E 44 45 52 4E 20 49  4E 20 20 3D 20 22 3B 58  |ENDERN IN  = ";X|
00000E40: 33 24 00 53 16 86 06 8B  58 33 24 B2 22 22 A7 82  |3$.S....X3$.""..|
00000E50: 52 3A 8E 00 69 16 90 06  58 59 24 28 52 2C 54 29  |R:..i...XY$(R,T)|
00000E60: B2 58 33 24 3A 82 52 3A  8E 00 77 16 C2 06 8F 20  |.X3$:.R:..w.... |
00000E70: 42 45 45 4E 44 45 4E 00  8A 16 E0 06 8B 53 B2 31  |BEENDEN......S.1|
00000E80: AF 4E B1 30 A7 8D 31 32  37 30 00 9A 16 E5 06 8B  |.N.0..1270......|
00000E90: 46 41 B3 B1 30 A7 89 34  36 30 00 C0 16 EA 06 99  |FA..0..460......|
00000EA0: 22 93 22 3A 97 35 33 32  38 30 2C 31 34 3A 97 35  |".":.53280,14:.5|
00000EB0: 33 32 38 31 2C 36 3A 97  36 34 36 2C 31 34 3A 80  |3281,6:.646,14:.|
00000EC0: 00 D5 16 12 07 8F 20 44  55 52 43 48 42 4C 41 45  |...... DURCHBLAE|
00000ED0: 54 54 45 52 4E 00 DD 16  30 07 54 B2 30 00 0D 17  |TTERN...0.T.0...|
00000EE0: 3A 07 99 22 93 12 1E 20  44 55 52 43 48 42 4C 41  |:.."... DURCHBLA|
00000EF0: 45 54 54 45 52 4E 20 20  20 20 20 20 20 20 20 20  |ETTERN          |
00000F00: 20 4E 55 4D 4D 45 52 3A  22 3B 54 AA 31 00 1D 17  | NUMMER:";T.1...|
00000F10: 44 07 81 49 B2 31 A4 32  31 3A 99 3A 82 00 4D 17  |D..I.1.21:.:..M.|
00000F20: 4E 07 99 22 12 1E 20 20  4D 45 4E 55 45 20 3D 20  |N.."..  MENUE = |
00000F30: 5E 20 20 20 42 4C 41 45  54 54 45 52 4E 20 3D 20  |^   BLAETTERN = |
00000F40: 3C 20 4F 44 45 52 20 3E  20 20 20 9A 92 00 7B 17  |< ODER >   ...{.|
00000F50: 6C 07 81 52 B2 31 A4 41  41 3A 99 22 11 12 22 58  |l..R.1.AA:.".."X|
00000F60: 58 24 28 52 29 22 20 3D  20 92 20 9E 22 58 59 24  |X$(R)" = . ."XY$|
00000F70: 28 52 2C 54 29 22 9A 22  3A 82 52 00 8F 17 76 07  |(R,T)".":.R...v.|
00000F80: A1 58 24 3A 8B 58 24 B2  22 22 A7 31 39 31 30 00  |.X$:.X$."".1910.|
00000F90: AE 17 7F 07 8B 58 24 B2  C7 28 34 36 29 A7 8B 54  |.....X$..(46)..T|
00000FA0: B2 4E AB 31 A7 54 B2 30  3A 89 31 38 35 30 00 C8  |.N.1.T.0:.1850..|
00000FB0: 17 80 07 8B 58 24 B2 C7  28 34 36 29 A7 54 B2 54  |....X$..(46).T.T|
00000FC0: AA 31 3A 89 31 38 35 30  00 E7 17 85 07 8B 58 24  |.1:.1850......X$|
00000FD0: B2 C7 28 34 34 29 A7 8B  54 B2 30 A7 54 B2 4E AB  |..(44)..T.0.T.N.|
00000FE0: 31 3A 89 31 38 35 30 00  01 18 8A 07 8B 58 24 B2  |1:.1850......X$.|
00000FF0: C7 28 34 34 29 A7 54 B2  54 AB 31 3A 89 31 38 35  |.(44).T.T.1:.185|
00001000: 30 00 19 18 8F 07 8B 58  24 B2 C7 28 39 34 29 A7  |0......X$..(94).|
00001010: 50 B2 30 3A 54 B2 30 3A  8E 00 23 18 94 07 89 31  |P.0:T.0:..#....1|
00001020: 39 31 30 00 3A 18 B2 07  8F 20 54 45 53 54 20 46  |910.:.... TEST F|
00001030: 4C 4F 50 50 59 20 41 4E  20 3F 00 5E 18 D0 07 97  |LOPPY AN ?.^....|
00001040: 37 36 38 2C 36 31 3A 9F  31 2C 38 2C 31 35 2C 22  |768,61:.1,8,15,"|
00001050: 49 22 3A A0 31 3A 97 37  36 38 2C 31 33 39 00 6E  |I":.1:.768,139.n|
00001060: 18 EE 07 8B 53 54 B3 B1  AB 31 32 38 A7 8E 00 83  |....ST...128....|
00001070: 18 F8 07 99 22 93 22 3A  81 49 B2 31 A4 31 34 3A  |....".":.I.1.14:|
00001080: 99 3A 82 00 AB 18 02 08  99 A3 36 29 22 96 20 46  |.:........6)". F|
00001090: 4C 4F 50 50 59 20 4E 49  43 48 54 20 45 49 4E 47  |LOPPY NICHT EING|
000010A0: 45 53 43 48 41 4C 54 45  54 21 22 00 CA 18 0C 08  |ESCHALTET!".....|
000010B0: 99 3A 99 3A 99 3A 99 A3  31 39 29 22 13 12 81 20  |.:.:.:..19)"... |
000010C0: 3E 54 41 53 54 45 3C 20  9A 22 00 E3 18 16 08 97  |>TASTE< ."......|
000010D0: 31 39 38 2C 30 3A 92 31  39 38 2C 31 3A 97 31 39  |198,0:.198,1:.19|
000010E0: 38 2C 30 00 E9 18 20 08  8E 00 01 19 3E 08 8F 20  |8,0... .....>.. |
000010F0: 46 52 45 49 45 20 44 41  54 45 4E 53 41 45 54 5A  |FREIE DATENSAETZ|
00001100: 45 00 37 19 5C 08 99 22  93 22 3A 99 3A 99 3A 99  |E.7.\..".":.:.:.|
00001110: 3A 99 22 56 4F 4E 20 44  45 4E 20 5A 55 52 20 56  |:."VON DEN ZUR V|
00001120: 45 52 46 55 45 47 55 4E  47 20 53 54 45 48 45 4E  |ERFUEGUNG STEHEN|
00001130: 44 45 4E 22 3B 4E 31 00  5B 19 66 08 99 3A 99 22  |DEN";N1.[.f..:."|
00001140: 44 41 54 45 4E 53 41 45  54 5A 45 4E 20 53 49 4E  |DATENSAETZEN SIN|
00001150: 44 22 4E 22 42 45 4C 45  47 54 2E 00 80 19 70 08  |D"N"BELEGT....p.|
00001160: 99 3A 99 22 53 4F 4D 49  54 20 53 54 45 48 45 4E  |.:."SOMIT STEHEN|
00001170: 20 49 48 4E 45 4E 20 4E  4F 43 48 22 4E 31 AB 4E  | IHNEN NOCH"N1.N|
00001180: 00 A5 19 7A 08 99 3A 99  22 44 41 54 45 4E 53 41  |...z..:."DATENSA|
00001190: 45 54 5A 45 20 5A 55 52  20 56 45 52 46 55 45 47  |ETZE ZUR VERFUEG|
000011A0: 55 4E 47 21 22 00 C3 19  84 08 99 3A 99 3A 99 3A  |UNG!"......:.:.:|
000011B0: 99 A3 31 36 29 22 12 81  20 3E 54 41 53 54 45 3C  |..16)".. >TASTE<|
000011C0: 20 9A 22 00 DE 19 8E 08  97 31 39 38 2C 30 3A 92  | ."......198,0:.|
000011D0: 31 39 38 2C 31 3A 97 31  39 38 2C 30 3A 8E 00 F9  |198,1:.198,0:...|
000011E0: 19 95 08 8F 20 48 49 4E  57 45 49 53 20 46 55 45  |.... HINWEIS FUE|
000011F0: 52 20 45 49 4E 47 41 42  45 00 35 1A 98 08 99 22  |R EINGABE.5...."|
00001200: 93 22 3A 81 49 49 B2 31  A4 35 3A 99 3A 82 3A 99  |.":.II.1.5:.:.:.|
00001210: 22 56 4F 52 20 44 45 4D  20 45 49 4E 47 45 42 45  |"VOR DEM EINGEBE|
00001220: 4E 20 45 52 53 54 20 44  49 45 20 56 4F 52 48 41  |N ERST DIE VORHA|
00001230: 4E 44 45 4E 45 00 4F 1A  A2 08 99 3A 99 22 44 41  |NDENE.O....:."DA|
00001240: 54 45 49 20 45 49 4E 4C  41 44 45 4E 20 21 22 00  |TEI EINLADEN !".|
00001250: 7B 1A AC 08 99 3A 99 3A  99 3A 85 22 44 41 54 45  |{....:.:.:."DATE|
00001260: 49 20 45 49 4E 4C 41 44  45 4E 20 20 28 4A 2F 4E  |I EINLADEN  (J/N|
00001270: 29 20 20 4E 9D 9D 9D 22  3B 58 24 00 8C 1A B6 08  |)  N...";X$.....|
00001280: 8B 58 24 B2 22 4A 22 A7  31 34 35 30 00 9E 1A C0  |.X$."J".1450....|
00001290: 08 8B 58 24 B3 B1 22 4E  22 A7 32 32 30 30 00 A4  |..X$.."N".2200..|
000012A0: 1A CA 08 8E 00 AF 1A D1  08 8F 20 47 4F 4E 47 00  |.......... GONG.|
000012B0: D6 1A D4 08 53 49 B2 35  34 32 37 32 3A 97 53 49  |....SI.54272:.SI|
000012C0: AA 35 2C 39 3A 97 53 49  AA 36 2C 30 3A 97 53 49  |.5,9:.SI.6,0:.SI|
000012D0: AA 32 34 2C 31 35 00 06  1B D9 08 97 53 49 2C 33  |.24,15......SI,3|
000012E0: 30 3A 97 53 49 AA 31 2C  33 30 3A 97 53 49 AA 34  |0:.SI.1,30:.SI.4|
000012F0: 2C 31 37 3A 81 49 B2 30  A4 33 30 30 3A 82 3A 97  |,17:.I.0.300:.:.|
00001300: 53 49 AA 34 2C 30 00 36  1B DE 08 97 53 49 2C 32  |SI.4,0.6....SI,2|
00001310: 30 3A 97 53 49 AA 31 2C  32 30 3A 97 53 49 AA 34  |0:.SI.1,20:.SI.4|
00001320: 2C 31 37 3A 81 49 B2 30  A4 36 30 30 3A 82 3A 97  |,17:.I.0.600:.:.|
00001330: 53 49 AA 34 2C 30 00 45  1B E3 08 97 53 49 AA 32  |SI.4,0.E....SI.2|
00001340: 34 2C 30 3A 8E 00 5C 1B  6A 09 8F 20 45 49 4E 54  |4,0:..\.j.. EINT|
00001350: 52 41 47 20 4C 4F 45 53  43 48 45 4E 00 7A 1B 88  |RAG LOESCHEN.z..|
00001360: 09 99 3A 99 22 12 96 20  53 49 43 48 45 52 20 3F  |..:.".. SICHER ?|
00001370: 3F 20 28 4A 2F 4E 29 20  9A 22 00 8E 1B 8D 09 A1  |? (J/N) ."......|
00001380: 58 24 3A 8B 58 24 B2 22  22 A7 32 34 34 35 00 9D  |X$:.X$."".2445..|
00001390: 1B 92 09 8B 58 24 B3 B1  22 4A 22 A7 8E 00 CC 1B  |....X$.."J".....|
000013A0: A6 09 99 22 91 12 96 20  44 45 52 20 4F 42 49 47  |..."... DER OBIG|
000013B0: 45 20 45 49 4E 54 52 41  47 20 57 49 52 44 20 47  |E EINTRAG WIRD G|
000013C0: 45 4C 4F 45 53 43 48 54  21 20 9A 22 00 E5 1B B0  |ELOESCHT! ."....|
000013D0: 09 53 B2 31 3A 81 49 49  B2 54 A4 4E 3A 81 54 54  |.S.1:.II.T.N:.TT|
000013E0: B2 31 A4 41 41 00 01 1C  BA 09 58 59 24 28 54 54  |.1.AA.....XY$(TT|
000013F0: 2C 49 49 29 B2 58 59 24  28 54 54 2C 49 49 AA 31  |,II).XY$(TT,II.1|
00001400: 29 00 14 1C C4 09 82 54  54 2C 49 49 3A 4E B2 4E  |)......TT,II:N.N|
00001410: AB 31 3A 8E 00 20 1C A0  0F 9F 31 2C 38 2C 31 35  |.1:.. ....1,8,15|
00001420: 00 44 1C AA 0F 84 31 2C  46 41 3A 8B 46 41 B3 B1  |.D....1,FA:.FA..|
00001430: 30 A7 20 20 20 84 31 2C  46 41 2C 46 42 24 2C 46  |0.   .1,FA,FB$,F|
00001440: 43 2C 46 44 00 59 1C 88  13 99 46 41 3B 46 42 24  |C,FD.Y....FA;FB$|
00001450: 3B 46 43 3B 46 44 3A A0  31 00 77 1C 3E 1F 8F 20  |;FC;FD:.1.w.>.. |
00001460: 45 49 4E 47 41 42 45 20  44 45 52 20 44 41 54 45  |EINGABE DER DATE|
00001470: 4E 46 45 4C 44 45 52 00  95 1C 40 1F 97 35 33 32  |NFELDER...@..532|
00001480: 38 30 2C 30 3A 97 35 33  32 38 31 2C 30 3A 99 22  |80,0:.53281,0:."|
00001490: 93 1E 11 11 22 00 B0 1C  4A 1F 4E 4E 24 B2 22 20  |...."...J.NN$." |
000014A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
000014B0: 00 F7 1C 54 1F 99 22 46  55 45 52 20 44 49 45 20  |...T.."FUER DIE |
000014C0: 4E 45 55 45 52 53 54 45  4C 4C 55 4E 47 20 45 49  |NEUERSTELLUNG EI|
000014D0: 4E 45 52 20 44 41 54 45  49 20 53 49 4E 44 22 3A  |NER DATEI SIND":|
000014E0: 99 22 11 56 45 52 53 43  48 49 45 44 45 4E 45 20  |.".VERSCHIEDENE |
000014F0: 41 4E 47 41 42 45 4E 00  3B 1D 5E 1F 99 22 45 52  |ANGABEN.;.^.."ER|
00001500: 46 4F 52 44 45 52 4C 49  43 48 2E 22 3A 99 22 11  |FORDERLICH.":.".|
00001510: 1C 12 53 50 45 49 43 48  45 52 4E 20 53 49 45 20  |..SPEICHERN SIE |
00001520: 53 49 43 48 20 56 4F 52  48 45 52 20 45 49 4E 45  |SICH VORHER EINE|
00001530: 20 4B 4F 50 49 45 20 41  42 2E 1E 00 69 1D 68 1F  | KOPIE AB...i.h.|
00001540: 99 22 11 11 57 45 4E 4E  20 53 49 45 20 49 48 52  |."..WENN SIE IHR|
00001550: 45 20 45 49 4E 47 41 42  45 4E 20 42 45 45 4E 44  |E EINGABEN BEEND|
00001560: 45 54 20 48 41 42 45 4E  22 00 8D 1D 72 1F 99 22  |ET HABEN"...r.."|
00001570: 11 44 52 55 45 43 4B 45  4E 20 53 49 45 20 4E 55  |.DRUECKEN SIE NU|
00001580: 52 20 3E 52 45 54 55 52  4E 3C 20 21 22 00 B4 1D  |R >RETURN< !"...|
00001590: 7C 1F 99 22 12 11 11 11  20 54 41 53 54 45 20 92  ||..".... TASTE .|
000015A0: 22 3A 92 31 39 38 2C 31  3A 97 31 39 38 2C 30 3A  |":.198,1:.198,0:|
000015B0: 99 22 93 22 00 02 1E 86  1F 99 22 55 4E 54 45 52  |."."......"UNTER|
000015C0: 20 57 45 4C 43 48 45 4D  20 4E 41 4D 45 4E 20 53  | WELCHEM NAMEN S|
000015D0: 4F 4C 4C 20 44 49 45 20  44 41 54 45 49 20 41 55  |OLL DIE DATEI AU|
000015E0: 46 20 20 44 49 53 4B 45  54 54 45 20 41 42 47 45  |F  DISKETTE ABGE|
000015F0: 53 50 45 49 43 48 45 52  54 20 57 45 52 44 45 4E  |SPEICHERT WERDEN|
00001600: 2E 22 00 0A 1E 90 1F 85  4E 24 00 2A 1E 9A 1F 4E  |."......N$.*...N|
00001610: 24 B2 22 32 32 30 20 4E  24 3D 22 AA C7 28 33 34  |$."220 N$="..(34|
00001620: 29 AA 4E 24 AA C7 28 33  34 29 00 44 1E A4 1F 99  |).N$..(34).D....|
00001630: C7 28 31 34 37 29 4E 24  3A 99 22 47 4F 54 4F 38  |.(147)N$:."GOTO8|
00001640: 31 32 30 22 00 69 1E AE  1F 97 36 33 31 2C 31 39  |120".i....631,19|
00001650: 3A 97 36 33 32 2C 31 33  3A 97 36 33 33 2C 31 33  |:.632,13:.633,13|
00001660: 3A 97 31 39 38 2C 33 3A  80 00 A9 1E B8 1F 99 22  |:.198,3:......."|
00001670: 93 57 49 45 56 49 45 4C  45 20 44 41 54 45 4E 46  |.WIEVIELE DATENF|
00001680: 45 4C 44 45 52 20 53 4F  4C 4C 45 4E 20 42 45 4C  |ELDER SOLLEN BEL|
00001690: 45 47 54 20 57 45 52 44  45 4E 22 3A 85 22 20 28  |EGT WERDEN":." (|
000016A0: 31 2D 38 29 A0 22 3B 4E  24 00 BD 1E C2 1F 4E 24  |1-8).";N$.....N$|
000016B0: B2 22 32 33 30 20 41 41  3D 22 AA 4E 24 00 D7 1E  |."230 AA=".N$...|
000016C0: CC 1F 99 C7 28 31 34 37  29 4E 24 3A 99 22 47 4F  |....(147)N$:."GO|
000016D0: 54 4F 38 31 36 30 22 00  FC 1E D6 1F 97 36 33 31  |TO8160"......631|
000016E0: 2C 31 39 3A 97 36 33 32  2C 31 33 3A 97 36 33 33  |,19:.632,13:.633|
000016F0: 2C 31 33 3A 97 31 39 38  2C 33 3A 80 00 25 1F E0  |,13:.198,3:..%..|
00001700: 1F 85 22 93 44 41 54 45  4E 46 45 4C 44 20 4E 52  |..".DATENFELD NR|
00001710: 2E 20 31 20 3D 22 3B 4E  24 3A 8B 4E 24 B2 22 22  |. 1 =";N$:.N$.""|
00001720: A7 38 36 35 30 00 49 1F  EA 1F 4E 4E 24 B2 22 20  |.8650.I...NN$." |
00001730: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00001740: 3A 4E 4E B2 C3 28 4E 24  29 00 60 1F F4 1F 4E 24  |:NN..(N$).`...N$|
00001750: B2 4E 24 AA C9 28 4E 4E  24 2C 31 36 AB 4E 4E 29  |.N$..(NN$,16.NN)|
00001760: 00 84 1F FE 1F 4E 24 B2  22 32 35 30 20 58 58 24  |.....N$."250 XX$|
00001770: 28 31 29 3D 22 AA C7 28  33 34 29 AA 4E 24 AA C7  |(1)="..(34).N$..|
00001780: 28 33 34 29 00 9E 1F 08  20 99 C7 28 31 34 37 29  |(34).... ..(147)|
00001790: 4E 24 3A 99 22 47 4F 54  4F 38 32 32 30 22 00 C3  |N$:."GOTO8220"..|
000017A0: 1F 12 20 97 36 33 31 2C  31 39 3A 97 36 33 32 2C  |.. .631,19:.632,|
000017B0: 31 33 3A 97 36 33 33 2C  31 33 3A 97 31 39 38 2C  |13:.633,13:.198,|
000017C0: 33 3A 80 00 EC 1F 1C 20  85 22 93 44 41 54 45 4E  |3:..... .".DATEN|
000017D0: 46 45 4C 44 20 4E 52 2E  20 32 20 3D 22 3B 4E 24  |FELD NR. 2 =";N$|
000017E0: 3A 8B 4E 24 B2 22 22 A7  38 36 35 30 00 10 20 26  |:.N$."".8650.. &|
000017F0: 20 4E 4E 24 B2 22 20 20  20 20 20 20 20 20 20 20  | NN$."          |
00001800: 20 20 20 20 20 20 22 3A  4E 4E B2 C3 28 4E 24 29  |      ":NN..(N$)|
00001810: 00 27 20 30 20 4E 24 B2  4E 24 AA C9 28 4E 4E 24  |.' 0 N$.N$..(NN$|
00001820: 2C 31 36 AB 4E 4E 29 00  4B 20 3A 20 4E 24 B2 22  |,16.NN).K : N$."|
00001830: 32 36 30 20 58 58 24 28  32 29 3D 22 AA C7 28 33  |260 XX$(2)="..(3|
00001840: 34 29 AA 4E 24 AA C7 28  33 34 29 00 65 20 44 20  |4).N$..(34).e D |
00001850: 99 C7 28 31 34 37 29 4E  24 3A 99 22 47 4F 54 4F  |..(147)N$:."GOTO|
00001860: 38 32 38 30 22 00 8A 20  4E 20 97 36 33 31 2C 31  |8280".. N .631,1|
00001870: 39 3A 97 36 33 32 2C 31  33 3A 97 36 33 33 2C 31  |9:.632,13:.633,1|
00001880: 33 3A 97 31 39 38 2C 33  3A 80 00 B3 20 58 20 85  |3:.198,3:... X .|
00001890: 22 93 44 41 54 45 4E 46  45 4C 44 20 4E 52 2E 20  |".DATENFELD NR. |
000018A0: 33 20 3D 22 3B 4E 24 3A  8B 4E 24 B2 22 22 A7 38  |3 =";N$:.N$."".8|
000018B0: 36 35 30 00 D7 20 62 20  4E 4E 24 B2 22 20 20 20  |650.. b NN$."   |
000018C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 22 3A 4E  |             ":N|
000018D0: 4E B2 C3 28 4E 24 29 00  EE 20 6C 20 4E 24 B2 4E  |N..(N$).. l N$.N|
000018E0: 24 AA C9 28 4E 4E 24 2C  31 36 AB 4E 4E 29 00 12  |$..(NN$,16.NN)..|
000018F0: 21 76 20 4E 24 B2 22 32  37 30 20 58 58 24 28 33  |!v N$."270 XX$(3|
00001900: 29 3D 22 AA C7 28 33 34  29 AA 4E 24 AA C7 28 33  |)="..(34).N$..(3|
00001910: 34 29 00 2C 21 80 20 99  C7 28 31 34 37 29 4E 24  |4).,!. ..(147)N$|
00001920: 3A 99 22 47 4F 54 4F 38  33 34 30 22 00 51 21 8A  |:."GOTO8340".Q!.|
00001930: 20 97 36 33 31 2C 31 39  3A 97 36 33 32 2C 31 33  | .631,19:.632,13|
00001940: 3A 97 36 33 33 2C 31 33  3A 97 31 39 38 2C 33 3A  |:.633,13:.198,3:|
00001950: 80 00 7A 21 94 20 85 22  93 44 41 54 45 4E 46 45  |..z!. .".DATENFE|
00001960: 4C 44 20 4E 52 2E 20 34  20 3D 22 3B 4E 24 3A 8B  |LD NR. 4 =";N$:.|
00001970: 4E 24 B2 22 22 A7 38 36  35 30 00 9E 21 9E 20 4E  |N$."".8650..!. N|
00001980: 4E 24 B2 22 20 20 20 20  20 20 20 20 20 20 20 20  |N$."            |
00001990: 20 20 20 20 22 3A 4E 4E  B2 C3 28 4E 24 29 00 B5  |    ":NN..(N$)..|
000019A0: 21 A8 20 4E 24 B2 4E 24  AA C9 28 4E 4E 24 2C 31  |!. N$.N$..(NN$,1|
000019B0: 36 AB 4E 4E 29 00 D9 21  B2 20 4E 24 B2 22 32 38  |6.NN)..!. N$."28|
000019C0: 30 20 58 58 24 28 34 29  3D 22 AA C7 28 33 34 29  |0 XX$(4)="..(34)|
000019D0: AA 4E 24 AA C7 28 33 34  29 00 F3 21 BC 20 99 C7  |.N$..(34)..!. ..|
000019E0: 28 31 34 37 29 4E 24 3A  99 22 47 4F 54 4F 38 34  |(147)N$:."GOTO84|
000019F0: 30 30 22 00 18 22 C6 20  97 36 33 31 2C 31 39 3A  |00"..". .631,19:|
00001A00: 97 36 33 32 2C 31 33 3A  97 36 33 33 2C 31 33 3A  |.632,13:.633,13:|
00001A10: 97 31 39 38 2C 33 3A 80  00 41 22 D0 20 85 22 93  |.198,3:..A". .".|
00001A20: 44 41 54 45 4E 46 45 4C  44 20 4E 52 2E 20 35 20  |DATENFELD NR. 5 |
00001A30: 3D 22 3B 4E 24 3A 8B 4E  24 B2 22 22 A7 38 36 35  |=";N$:.N$."".865|
00001A40: 30 00 65 22 DA 20 4E 4E  24 B2 22 20 20 20 20 20  |0.e". NN$."     |
00001A50: 20 20 20 20 20 20 20 20  20 20 20 22 3A 4E 4E B2  |           ":NN.|
00001A60: C3 28 4E 24 29 00 7C 22  E4 20 4E 24 B2 4E 24 AA  |.(N$).|". N$.N$.|
00001A70: C9 28 4E 4E 24 2C 31 36  AB 4E 4E 29 00 A0 22 EE  |.(NN$,16.NN)..".|
00001A80: 20 4E 24 B2 22 32 39 30  20 58 58 24 28 35 29 3D  | N$."290 XX$(5)=|
00001A90: 22 AA C7 28 33 34 29 AA  4E 24 AA C7 28 33 34 29  |"..(34).N$..(34)|
00001AA0: 00 BA 22 F8 20 99 C7 28  31 34 37 29 4E 24 3A 99  |..". ..(147)N$:.|
00001AB0: 22 47 4F 54 4F 38 34 36  30 22 00 DF 22 02 21 97  |"GOTO8460"..".!.|
00001AC0: 36 33 31 2C 31 39 3A 97  36 33 32 2C 31 33 3A 97  |631,19:.632,13:.|
00001AD0: 36 33 33 2C 31 33 3A 97  31 39 38 2C 33 3A 80 00  |633,13:.198,3:..|
00001AE0: 08 23 0C 21 85 22 93 44  41 54 45 4E 46 45 4C 44  |.#.!.".DATENFELD|
00001AF0: 20 4E 52 2E 20 36 20 3D  22 3B 4E 24 3A 8B 4E 24  | NR. 6 =";N$:.N$|
00001B00: B2 22 22 A7 38 36 35 30  00 2C 23 16 21 4E 4E 24  |."".8650.,#.!NN$|
00001B10: B2 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |."              |
00001B20: 20 20 22 3A 4E 4E B2 C3  28 4E 24 29 00 43 23 20  |  ":NN..(N$).C# |
00001B30: 21 4E 24 B2 4E 24 AA C9  28 4E 4E 24 2C 31 36 AB  |!N$.N$..(NN$,16.|
00001B40: 4E 4E 29 00 67 23 2A 21  4E 24 B2 22 33 30 30 20  |NN).g#*!N$."300 |
00001B50: 58 58 24 28 36 29 3D 22  AA C7 28 33 34 29 AA 4E  |XX$(6)="..(34).N|
00001B60: 24 AA C7 28 33 34 29 00  81 23 34 21 99 C7 28 31  |$..(34)..#4!..(1|
00001B70: 34 37 29 4E 24 3A 99 22  47 4F 54 4F 38 35 32 30  |47)N$:."GOTO8520|
00001B80: 22 00 A6 23 3E 21 97 36  33 31 2C 31 39 3A 97 36  |"..#>!.631,19:.6|
00001B90: 33 32 2C 31 33 3A 97 36  33 33 2C 31 33 3A 97 31  |32,13:.633,13:.1|
00001BA0: 39 38 2C 33 3A 80 00 CF  23 48 21 85 22 93 44 41  |98,3:...#H!.".DA|
00001BB0: 54 45 4E 46 45 4C 44 20  4E 52 2E 20 37 20 3D 22  |TENFELD NR. 7 ="|
00001BC0: 3B 4E 24 3A 8B 4E 24 B2  22 22 A7 38 36 35 30 00  |;N$:.N$."".8650.|
00001BD0: F3 23 52 21 4E 4E 24 B2  22 20 20 20 20 20 20 20  |.#R!NN$."       |
00001BE0: 20 20 20 20 20 20 20 20  20 22 3A 4E 4E B2 C3 28  |         ":NN..(|
00001BF0: 4E 24 29 00 0A 24 5C 21  4E 24 B2 4E 24 AA C9 28  |N$)..$\!N$.N$..(|
00001C00: 4E 4E 24 2C 31 36 AB 4E  4E 29 00 2E 24 66 21 4E  |NN$,16.NN)..$f!N|
00001C10: 24 B2 22 33 31 30 20 58  58 24 28 37 29 3D 22 AA  |$."310 XX$(7)=".|
00001C20: C7 28 33 34 29 AA 4E 24  AA C7 28 33 34 29 00 48  |.(34).N$..(34).H|
00001C30: 24 70 21 99 C7 28 31 34  37 29 4E 24 3A 99 22 47  |$p!..(147)N$:."G|
00001C40: 4F 54 4F 38 35 38 30 22  00 6D 24 7A 21 97 36 33  |OTO8580".m$z!.63|
00001C50: 31 2C 31 39 3A 97 36 33  32 2C 31 33 3A 97 36 33  |1,19:.632,13:.63|
00001C60: 33 2C 31 33 3A 97 31 39  38 2C 33 3A 80 00 96 24  |3,13:.198,3:...$|
00001C70: 84 21 85 22 93 44 41 54  45 4E 46 45 4C 44 20 4E  |.!.".DATENFELD N|
00001C80: 52 2E 20 38 20 3D 22 3B  4E 24 3A 8B 4E 24 B2 22  |R. 8 =";N$:.N$."|
00001C90: 22 A7 38 36 35 30 00 BA  24 8E 21 4E 4E 24 B2 22  |".8650..$.!NN$."|
00001CA0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001CB0: 22 3A 4E 4E B2 C3 28 4E  24 29 00 D1 24 98 21 4E  |":NN..(N$)..$.!N|
00001CC0: 24 B2 4E 24 AA C9 28 4E  4E 24 2C 31 36 AB 4E 4E  |$.N$..(NN$,16.NN|
00001CD0: 29 00 F5 24 A2 21 4E 24  B2 22 33 32 30 20 58 58  |)..$.!N$."320 XX|
00001CE0: 24 28 38 29 3D 22 AA C7  28 33 34 29 AA 4E 24 AA  |$(8)="..(34).N$.|
00001CF0: C7 28 33 34 29 00 0F 25  AC 21 99 C7 28 31 34 37  |.(34)..%.!..(147|
00001D00: 29 4E 24 3A 99 22 47 4F  54 4F 38 36 35 30 22 00  |)N$:."GOTO8650".|
00001D10: 34 25 B6 21 97 36 33 31  2C 31 39 3A 97 36 33 32  |4%.!.631,19:.632|
00001D20: 2C 31 33 3A 97 36 33 33  2C 31 33 3A 97 31 39 38  |,13:.633,13:.198|
00001D30: 2C 33 3A 80 00 57 25 CA  21 99 22 93 11 49 48 52  |,3:..W%.!."..IHR|
00001D40: 45 20 45 49 4E 47 41 42  45 4E 20 53 54 45 48 45  |E EINGABEN STEHE|
00001D50: 4E 20 4A 45 54 5A 54 00  73 25 D4 21 99 22 11 49  |N JETZT.s%.!.".I|
00001D60: 4D 20 50 52 4F 47 52 41  4D 4D 4C 49 53 54 49 4E  |M PROGRAMMLISTIN|
00001D70: 47 2E 22 00 94 25 DE 21  99 22 11 4E 55 4E 20 4B  |G."..%.!.".NUN K|
00001D80: 4F 45 4E 4E 45 4E 20 53  49 45 20 44 49 45 20 44  |OENNEN SIE DIE D|
00001D90: 41 54 45 49 00 AE 25 E8  21 99 22 11 4D 49 54 20  |ATEI..%.!.".MIT |
00001DA0: 3E 52 55 4E 3C 20 53 54  41 52 54 45 4E 2E 00 DB  |>RUN< STARTEN...|
00001DB0: 25 F2 21 99 22 11 57 45  4E 4E 20 53 49 45 20 44  |%.!.".WENN SIE D|
00001DC0: 49 45 20 44 41 54 45 49  20 4E 49 43 48 54 20 4D  |IE DATEI NICHT M|
00001DD0: 45 48 52 20 41 45 4E 44  45 52 4E 00 FA 25 FC 21  |EHR AENDERN..%.!|
00001DE0: 99 22 11 57 4F 4C 4C 45  4E 20 45 4D 50 46 49 45  |.".WOLLEN EMPFIE|
00001DF0: 4C 54 20 45 53 20 53 49  43 48 00 22 26 06 22 99  |LT ES SICH."&.".|
00001E00: 22 11 44 49 45 20 50 52  4F 47 52 41 4D 4D 5A 45  |".DIE PROGRAMMZE|
00001E10: 49 4C 45 4E 20 38 30 30  30 20 42 49 53 20 38 37  |ILEN 8000 BIS 87|
00001E20: 32 30 00 53 26 10 22 99  22 11 57 45 47 45 4E 20  |20.S&.".".WEGEN |
00001E30: 44 45 52 20 4B 55 45 52  5A 45 52 45 4E 20 4C 41  |DER KUERZEREN LA|
00001E40: 44 45 5A 45 49 54 20 5A  55 20 4C 4F 45 53 43 48  |DEZEIT ZU LOESCH|
00001E50: 45 4E 22 00 7D 26 1A 22  99 22 11 46 41 4C 4C 53  |EN".}&.".".FALLS|
00001E60: 20 53 49 45 20 45 49 4E  4D 41 4C 20 45 49 4E 45  | SIE EINMAL EINE|
00001E70: 20 41 4E 44 45 52 45 20  44 41 54 45 49 00 A2 26  | ANDERE DATEI..&|
00001E80: 24 22 99 22 11 45 52 53  54 45 4C 4C 45 4E 20 57  |$".".ERSTELLEN W|
00001E90: 4F 4C 4C 45 4E 20 48 41  42 45 4E 20 53 49 45 20  |OLLEN HABEN SIE |
00001EA0: 4A 41 00 C1 26 2E 22 99  22 11 49 48 52 45 20 53  |JA..&.".".IHRE S|
00001EB0: 49 43 48 45 52 48 45 49  54 53 4B 4F 50 49 45 21  |ICHERHEITSKOPIE!|
00001EC0: 22 00 00 00 2A                                    |"...*           |
..I.... UNI DATEI AUS HAPPY COMPUTER VON
 OE3FEA FUR AMATEURFUNK ANGEPASST.~.D.. 
ZUR EINGABE DER DATENFELDER RUN 8000 EIN
TIPPEN.....N$."AMATEURFUNK".....AA.8.A..
.N1.400: . ANZAHL DER DATENSAETZE.....XX
$(1)."CALL            ".....XX$(2)."DATU
M           ".....XX$(3)."ZEIT          
  ".9...XX$(4)."FREQUENZ        ".W.".XX
$(5)."BETRIEBSART     ".U.,.XX$(6)."QTH 
            "...6.XX$(7)."NAME          
  "...@.XX$(8)."QSL AUS/EIN     ".F.^.. 
INITIALISIEREN...|..G(147):P.0:G.0:S.0:N
.0:.788,49......53280,6:.53281,6:.650,12
8:.XY$(AA,N1).!.... MENUE.:.L..G(147):.I
.1.23:.:.I.F.V..".. AMATEURKARTEI  O E 3
 F E A       "......".. M E N U E       
                    .".C....:..4)". 1.- 
.EINGABE               .":.......I.1.AA:
..4)I.1"- SUCHEN " XX$(I):.I......:..4)"
. L - .DATEN LADEN           ".?....:..4
)" S - .DATEN SICHERN         ".I....:..
4)". F - .FREIE DATENSAETZE     "......:
..4)". D - .DURCHBLAETTERN        "...&.
.:..4)". E - .ENDE                  .".Q
.0..X$:.X$."".560.Z.5.."."...:..X$."1"..
770...D..X$."2".X2$.XX$(1):Z.1:.910.1.N.
.X$."3"..AA.1.X2$.XX$(2):Z.2:.910.W.X..X
$."4"..AA.2.X2$.XX$(3):Z.3:.910.}.B..X$.
"5"..AA.3.X2$.XX$(4):Z.4:.910...L..X$."6
"..AA.4.X2$.XX$(5):Z.5:.910.I.V..X$."7".
.AA.5.X2$.XX$(6):Z.6:.910......X$."8"..A
A.6.X2$.XX$(7):Z.7:.910......X$."9"..AA.
7.X2$.XX$(8):Z.8:.910.'....X$."L"..1450.
9....X$."S"..1270.K....X$."F"..2140.]...
.X$."D"..1840.O....X$."E"..1760.X.F..460
...... EINGABE......G.0..2200.....S.1:."
.":.I.1.23:.:.I......".. MENUE = ^      
                      "... .."... E I N 
G A B E                         ".2.*..:
.:.".LAUFENDE NUMMER:";N.1.X.4..I.1.AA:.
".."XX$(I)".";:.XY$(I,N)...>..XY$(I,N).G
(94)..X.1.AA:XY$(X,N)." ":.X:....H..XY$(
I,N)."".XY$(I,N).G(160)...R..I:N.N.1:.78
0.F.P.. SUCHEN......".":.I.1.23:.:......
.".. MENUE = ^                          
   ".>...."... S U C H E N    * = ERLAUB
T            ".V....:.:.".EINGABE "X2$.N
....:.A1$:.A1$.G(94)... ....T.1.14:.:.:.
".. BITTE EINEN MOMENT GEDULD ."...J..I(
A1$,1).G(42).P.1.F.T.N2.C(A1$)......P.1.
A1$.H(A1$,N2.1):N2.N2.1......T.0.N.1./..
..T.N..".":.II.1.9:.:.:."KEINE WEITEREN 
EINTRAGUNGEN ";.F....T.N..".. >TASTE< ."
:.198,0:.198,1:.198,0:P.0:.910......P.1.
.H(XY$(Z,T),N2)..A1$..T......P.0..XY$(Z,
T)..A1$..T...... AUSGABE.E.L..".":.I.1.2
2:.:....Q.."..                          
              ".(.V..". MENUE=^  AENDERN
=F7  WEITER SUCHEN=F1  ".Z.`.."..       
                                 "...J..
". EINTRAG LOESCHEN=_  NEU SUCHEN=RETURN
  "...O.."..                            
            ."...T..".":.R.1.AA:.".."XX$
(R)" = .  ."XY$(R,T)".":.R...~..X$:.X$."
".1150......X$.G(94).P.0:..:....X$.G(133
)..".":.I.1.17:.:..N....X$.G(133)..".. B
ITTE EINEN MOMENT GEDULD .":.T......X$.G
(13).P.0:.910. ....X$.G(136).P.0:.1640:.
......X$.G(95)..2440:.......1150.T.X.. D
ATEN SICHERN......N.1.......S.0:.".":.:.
:.......2000:."DATEN WERDEN GESPEICHERT!
".;....1,8,2,"@:".N$.",S,W":.2,8,15.`...
.1,N:.2,FA,FB$,FC,FD:.FA..0.1350...(..I.
0.N.1:.R.1.AA:.1,XY$(R,I):.R,I...*..2,FA
,FB$,FC,FD:.FA..0.1350...2. 1: 2:.1355..
.F. 1: 2:."...FEHLERMELDUNG";FA;FB$;FC;F
D:.:....G..".. RETURN .. ";X$:..).K..II.
1.6:.:.:..6)"DATEN ABGESPEICHERT".A.S..I
I.1.500:.:.2260:..S.... DATEN LADEN.....
.2000:G.1:.".":.:.:.:."DATEN WERDEN GELA
DEN!"......1,8,2,N$.",S,R":.2,8,15.G....
1,N:.2,FA,FB$,FC,FD:.FA..0.1530...H..I.0
.N.1:.R.1.AA:.1,XY$(R,I):.R,I...R..2,FA,
FB$,FC,FD:.FA..0.1530.#... 1: 2:.2260:.1
550.R... 1: 2:."...FEHLERMELDUNG";FA;FB$
;FC;FD:.:..L....".. RETURN .. ";X$:.....
..II.1.6:.:.:..6)"DATEN IM RECHNER ":.II
.1.500:.:....@.. EINTRAG AENDERN...H.S.1
:."... E I N T R A G U N G   A E N D E R
 N ....R..R.1.AA:.:." ."XX$(R)" =.  ."XY
$(R,T)".".B.|..631,34:.198,1:."AENDERN I
N  = ";X3$.S....X3$.""..R:..I...XY$(R,T)
.X3$:.R:..W.B.. BEENDEN......S.1.N.0..12
70......FA..0..460......".":.53280,14:.5
3281,6:.646,14:..U.... DURCHBLAETTERN...
0.T.0...:.."... DURCHBLAETTERN          
 NUMMER:";T.1...D..I.1.21:.:..M.N.."..  
MENUE = ^   BLAETTERN = < ODER >   ...{.
L..R.1.AA:.".."XX$(R)" = . ."XY$(R,T)"."
:.R...V..X$:.X$."".1910.....X$.G(46)..T
.N.1.T.0:.1850.H....X$.G(46).T.T.1:.1850
......X$.G(44)..T.0.T.N.1:.1850......X$.
G(44).T.T.1:.1850......X$.G(94).P.0:T.0:
..#....1910.:.... TEST FLOPPY AN ?.^.P..
768,61:.1,8,15,"I": 1:.768,139.N....ST..
.128........".":.I.1.14:.:........6)". F
LOPPY NICHT EINGESCHALTET!".J....:.:.:..
19)"... >TASTE< ."......198,0:.198,1:.19
8,0... .....>.. FREIE DATENSAETZE.7.\.."
.":.:.:.:."VON DEN ZUR VERFUEGUNG STEHEN
DEN";N1.[.F..:."DATENSAETZEN SIND"N"BELE
GT....P..:."SOMIT STEHEN IHNEN NOCH"N1.N
...Z..:."DATENSAETZE ZUR VERFUEGUNG!".C.
...:.:.:..16)".. >TASTE< ."......198,0:.
198,1:.198,0:....... HINWEIS FUER EINGAB
E.5....".":.II.1.5:.:.:."VOR DEM EINGEBE
N ERST DIE VORHANDENE.O....:."DATEI EINL
ADEN !".{....:.:.:."DATEI EINLADEN  (J/N
)  N...";X$......X$."J".1450......X$.."N
".2200...J.....Q.. GONG.V.T.SI.54272:.SI
.5,9:.SI.6,0:.SI.24,15...Y..SI,30:.SI.1,
30:.SI.4,17:.I.0.300:.:.SI.4,0.6....SI,2
0:.SI.1,20:.SI.4,17:.I.0.600:.:.SI.4,0.E
....SI.24,0:..\.J.. EINTRAG LOESCHEN.Z..
..:.".. SICHER ?? (J/N) ."......X$:.X$."
".2445......X$.."J"...L...."... DER OBIG
E EINTRAG WIRD GELOESCHT! .".....S.1:.II
.T.N:.TT.1.AA.....XY$(TT,II).XY$(TT,II.1
)...D..TT,II:N.N.1:.. . ..1,8,15.D....1,
FA:.FA..0.   .1,FA,FB$,FC,FD.Y....FA;FB$
;FC;FD: 1.W.>.. EINGABE DER DATENFELDER.
..@..53280,0:.53281,0:."...."...J.NN$." 
               "...T.."FUER DIE NEUERSTE
LLUNG EINER DATEI SIND":.".VERSCHIEDENE 
ANGABEN.;.^.."ERFORDERLICH.":."...SPEICH
ERN SIE SICH VORHER EINE KOPIE AB...I.H.
."..WENN SIE IHRE EINGABEN BEENDET HABEN
"...R..".DRUECKEN SIE NUR >RETURN< !"...
|..".... TASTE .":.198,1:.198,0:."."....
.."UNTER WELCHEM NAMEN SOLL DIE DATEI AU
F  DISKETTE ABGESPEICHERT WERDEN."......
N$.*...N$."220 N$=".G(34).N$.G(34).D....
G(147)N$:."GOTO8120".I....631,19:.632,13
:.633,13:.198,3:.......".WIEVIELE DATENF
ELDER SOLLEN BELEGT WERDEN":." (1-8) ";N
$...B.N$."230 AA=".N$.W.L..G(147)N$:."GO
TO8160"...V..631,19:.632,13:.633,13:.198
,3:..%....".DATENFELD NR. 1 =";N$:.N$.""
.8650.I...NN$."                ":NN.C(N$
).`...N$.N$.I(NN$,16.NN).....N$."250 XX$
(1)=".G(34).N$.G(34).... .G(147)N$:."GOT
O8220".C.. .631,19:.632,13:.633,13:.198,
3:..... .".DATENFELD NR. 2 =";N$:.N$."".
8650.. & NN$."                ":NN.C(N$)
.' 0 N$.N$.I(NN$,16.NN).K : N$."260 XX$(
2)=".G(34).N$.G(34).E D .G(147)N$:."GOTO
8280".. N .631,19:.632,13:.633,13:.198,3
:... X .".DATENFELD NR. 3 =";N$:.N$."".8
650.W B NN$."                ":NN.C(N$).
. L N$.N$.I(NN$,16.NN)..!V N$."270 XX$(3
)=".G(34).N$.G(34).,!. .G(147)N$:."GOTO8
340".Q!. .631,19:.632,13:.633,13:.198,3:
..Z!. .".DATENFELD NR. 4 =";N$:.N$."".86
50..!. NN$."                ":NN.C(N$)..
!. N$.N$.I(NN$,16.NN).Y!. N$."280 XX$(4)
=".G(34).N$.G(34)..!. .G(147)N$:."GOTO84
00".."F .631,19:.632,13:.633,13:.198,3:.
.A"P .".DATENFELD NR. 5 =";N$:.N$."".865
0.E"Z NN$."                ":NN.C(N$).|"
. N$.N$.I(NN$,16.NN). ". N$."290 XX$(5)=
".G(34).N$.G(34)..". .G(147)N$:."GOTO846
0"..".!.631,19:.632,13:.633,13:.198,3:..
.#.!.".DATENFELD NR. 6 =";N$:.N$."".8650
.,#.!NN$."                ":NN.C(N$).C# 
!N$.N$.I(NN$,16.NN).G#*!N$."300 XX$(6)="
.G(34).N$.G(34)..#4!.G(147)N$:."GOTO8520
"..#>!.631,19:.632,13:.633,13:.198,3:..O
#H!.".DATENFELD NR. 7 =";N$:.N$."".8650.
.#R!NN$."                ":NN.C(N$)..$\!
N$.N$.I(NN$,16.NN)..$F!N$."310 XX$(7)=".
G(34).N$.G(34).H$P!.G(147)N$:."GOTO8580"
.M$Z!.631,19:.632,13:.633,13:.198,3:...$
.!.".DATENFELD NR. 8 =";N$:.N$."".8650..
$.!NN$."                ":NN.C(N$).Q$.!N
$.N$.I(NN$,16.NN)..$.!N$."320 XX$(8)=".G
(34).N$.G(34)..%.!.G(147)N$:."GOTO8650".
4%.!.631,19:.632,13:.633,13:.198,3:..W%J
!."..IHRE EINGABEN STEHEN JETZT.S%T!.".I
M PROGRAMMLISTING."..%.!.".NUN KOENNEN S
IE DIE DATEI..%.!.".MIT >RUN< STARTEN...
%.!.".WENN SIE DIE DATEI NICHT MEHR AEND
ERN..%.!.".WOLLEN EMPFIELT ES SICH."&.".
".DIE PROGRAMMZEILEN 8000 BIS 8720.S&.".
".WEGEN DER KUERZEREN LADEZEIT ZU LOESCH
EN".}&.".".FALLS SIE EINMAL EINE ANDERE 
DATEI..&$".".ERSTELLEN WOLLEN HABEN SIE 
JA.A&.".".IHRE SICHERHEITSKOPIE!"...*
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL