XREF SIMONS BAS.
FILE INFORMATION
FILENAME(S): XREF SIMONS BAS.
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-11-30 01:12:36
APPEARS ON: 1 disk(s)
FILE HASH
8591d988473c35de860e670fdecdb93d7909db314bce3a9d576748da03283fe1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 10 85 | XREF SIMONS BAS. | PRG | C64er | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..(....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 14 00 8F 2A 20 |********.O....* |
00000030: 50 52 4F 47 52 41 4D 4D 4E 41 4D 45 20 3A 20 58 |PROGRAMMNAME : X|
00000040: 52 45 46 20 20 20 20 20 20 20 20 20 20 20 2A 00 |REF *.|
00000050: 76 08 1E 00 8F 2A 20 20 20 20 20 43 2D 36 34 20 |v....* C-64 |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 20 20 2A 00 9D 08 28 00 8F 2A 20 20 20 | *...(..* |
00000080: 20 20 46 4C 4F 50 50 59 20 31 35 34 31 20 4F 2E | FLOPPY 1541 O.|
00000090: 20 41 45 48 4E 4C 49 43 48 45 20 20 2A 00 C4 08 | AEHNLICHE *...|
000000A0: 32 00 8F 2A 20 20 20 20 20 44 52 55 43 4B 45 52 |2..* DRUCKER|
000000B0: 20 28 5A 2E 42 2E 20 4D 50 53 20 38 30 31 29 20 | (Z.B. MPS 801) |
000000C0: 20 20 20 2A 00 EB 08 3C 00 8F 2A 20 56 4F 4E 20 | *...<..* VON |
000000D0: 53 54 45 46 41 4E 20 42 45 43 4B 45 52 20 20 20 |STEFAN BECKER |
000000E0: 20 20 20 20 20 20 20 20 20 20 2A 00 12 09 46 00 | *...F.|
000000F0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000110: 2A 2A 00 1D 09 50 00 9C 3A 89 31 35 30 00 40 09 |**...P..:.150.@.|
00000120: 5A 00 A1 23 31 2C 41 24 3A 58 B2 C6 28 41 24 AA |Z..#1,A$:X..(A$.|
00000130: 4E 24 29 3A 8B 28 36 34 AF 53 54 29 B2 30 A7 8E |N$):.(64.ST).0..|
00000140: 00 55 09 64 00 A0 31 3A 8B 50 41 A7 50 41 B2 30 |.U.d..1:.PA.PA.0|
00000150: 3A 89 35 32 30 00 5E 09 6E 00 89 39 36 30 00 7C |:.520.^.n..960.||
00000160: 09 78 00 8D 39 30 3A 58 31 B2 58 3A 8D 39 30 3A |.x..90:X1.X:.90:|
00000170: 58 B2 58 31 AA 32 35 36 AC 58 3A 8E 00 B1 09 82 |X.X1.256.X:.....|
00000180: 00 8B 53 50 B3 4F 42 AF 56 41 B3 4F 42 AF 50 53 |..SP.OB.VA.OB.PS|
00000190: B3 4F 42 A7 8E 3A 8F 2A 2A 2A 20 47 52 45 4E 5A |.OB..:.*** GRENZ|
000001A0: 45 4E 20 45 52 52 45 49 43 48 54 20 3F 20 2A 2A |EN ERREICHT ? **|
000001B0: 2A 00 F1 09 8C 00 99 3A 99 22 C2 49 54 54 45 20 |*......:.".ITTE |
000001C0: 44 49 45 20 D6 41 52 49 41 42 4C 45 20 4F 42 20 |DIE .ARIABLE OB |
000001D0: 49 4E 20 DA 45 49 4C 45 20 31 35 30 20 56 45 52 |IN .EILE 150 VER|
000001E0: 47 52 4F 45 53 53 45 52 4E 2E 22 3A 89 31 33 31 |GROESSERN.":.131|
000001F0: 30 00 15 0A 96 00 4F 42 B2 35 30 30 3A 86 53 50 |0.....OB.500:.SP|
00000200: 24 28 4F 42 29 2C 50 53 24 28 4F 42 29 2C 56 41 |$(OB),PS$(OB),VA|
00000210: 24 28 4F 42 29 00 5A 0A A0 00 8F 2A 2A 2A 20 4F |$(OB).Z....*** O|
00000220: 42 20 49 53 54 20 4F 42 45 52 47 52 45 4E 5A 45 |B IST OBERGRENZE|
00000230: 20 44 45 52 20 41 4E 5A 41 48 4C 20 44 45 52 20 | DER ANZAHL DER |
00000240: 53 50 52 55 45 4E 47 45 20 55 4E 44 20 56 41 52 |SPRUENGE UND VAR|
00000250: 49 41 42 4C 45 4E 20 2A 2A 2A 00 70 0A AA 00 97 |IABLEN ***.p....|
00000260: 35 33 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 36 |53280,6:.53281,6|
00000270: 00 7C 0A B4 00 4E 24 B2 C7 28 30 29 00 B9 0A BE |.|...N$..(0)....|
00000280: 00 4C 45 24 B2 22 20 20 20 20 20 20 20 20 20 20 |.LE$." |
00000290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002B0: 20 20 20 20 20 20 20 20 22 00 D9 0A C8 00 99 C7 | ".......|
000002C0: 28 31 34 37 29 C7 28 39 29 C7 28 31 34 29 C7 28 |(147).(9).(14).(|
000002D0: 38 29 C7 28 31 34 34 29 3B 00 0A 0B D2 00 99 22 |8).(144);......"|
000002E0: 12 20 20 20 20 20 20 20 20 20 20 C3 52 4F 53 53 |. .ROSS|
000002F0: 2D D2 45 46 45 52 45 4E 5A 2D CC 49 53 54 45 52 |-.EFERENZ-.ISTER|
00000300: 20 20 20 20 20 20 20 20 20 22 00 43 0B DC 00 99 | ".C....|
00000310: 22 11 11 C1 55 53 47 41 42 45 20 41 55 46 20 22 |"...USGABE AUF "|
00000320: 3A 99 22 11 12 C2 92 49 4C 44 53 43 48 49 52 4D |:."....ILDSCHIRM|
00000330: 20 4F 44 45 52 20 12 C4 92 52 55 43 4B 45 52 91 | ODER ...RUCKER.|
00000340: 91 91 22 00 55 0B E6 00 99 A6 31 32 29 3B 3A 97 |..".U.....12);:.|
00000350: 32 30 34 2C 30 00 72 0B F0 00 A1 41 24 3A 8B 41 |204,0.r....A$:.A|
00000360: 24 B3 B1 22 42 22 AF 41 24 B3 B1 22 44 22 89 32 |$.."B".A$.."D".2|
00000370: 34 30 00 97 0B FA 00 8B 41 24 B2 22 42 22 A7 99 |40......A$."B"..|
00000380: 22 C2 49 4C 44 53 43 48 49 52 4D 2E 22 3A 44 56 |".ILDSCHIRM.":DV|
00000390: B2 33 3A 89 32 37 30 00 AC 0B 04 01 99 22 C4 52 |.3:.270......".R|
000003A0: 55 43 4B 45 52 2E 22 3A 44 56 B2 34 00 CD 0B 0E |UCKER.":DV.4....|
000003B0: 01 99 22 11 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
000003C0: 20 20 20 20 20 20 20 20 20 20 20 91 22 00 F5 0B | ."...|
000003D0: 18 01 9F 31 2C 30 3A 99 22 D0 52 4F 47 52 41 4D |...1,0:.".ROGRAM|
000003E0: 4D 4E 41 4D 45 3A 20 22 3B 3A 84 31 2C 4E 41 24 |MNAME: ";:.1,NA$|
000003F0: 3A A0 31 3A 99 00 2A 0C 22 01 9F 32 2C 38 2C 31 |:.1:..*."..2,8,1|
00000400: 35 3A 9F 31 2C 38 2C 32 2C 4E 41 24 AA 22 2C 50 |5:.1,8,2,NA$.",P|
00000410: 2C 52 22 3A 8D 31 32 39 30 3A 8D 31 32 30 3A 8B |,R":.1290:.120:.|
00000420: 58 B2 32 30 34 39 A7 33 31 30 00 5B 0C 2C 01 99 |X.2049.310.[.,..|
00000430: 3A 99 22 C4 41 53 20 D0 52 4F 47 52 41 4D 4D 20 |:.".AS .ROGRAMM |
00000440: 4D 55 53 53 20 41 42 20 32 30 34 39 20 4C 49 45 |MUSS AB 2049 LIE|
00000450: 47 45 4E 2E 22 3A 89 31 33 31 30 00 61 0C 2E 01 |GEN.":.1310.a...|
00000460: 3A 00 67 0C 30 01 3A 00 8D 0C 31 01 8F 2A 2A 2A |:.g.0.:...1..***|
00000470: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000480: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 AC 0C |*************...|
00000490: 32 01 8F 20 20 20 20 20 50 41 53 53 20 31 20 53 |2.. PASS 1 S|
000004A0: 50 52 55 4E 47 54 41 42 45 4C 4C 45 00 D2 0C 34 |PRUNGTABELLE...4|
000004B0: 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
000004C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004D0: 2A 2A 00 D8 0C 35 01 3A 00 03 0D 36 01 99 22 93 |**...5.:...6..".|
000004E0: D0 41 53 53 20 31 20 28 D3 55 43 48 45 4E 20 44 |.ASS 1 (.UCHEN D|
000004F0: 45 52 20 D3 50 52 55 45 4E 47 45 29 11 22 3A 50 |ER .PRUENGE).":P|
00000500: 41 B2 31 00 31 0D 40 01 8D 31 32 30 3A 8D 31 32 |A.1.1.@..120:.12|
00000510: 30 3A 5A 45 24 B2 C9 28 22 20 20 20 20 20 22 AA |0:ZE$..(" ".|
00000520: C4 28 58 29 2C 35 29 3A 99 22 13 11 11 22 5A 45 |.(X),5):."..."ZE|
00000530: 24 00 5E 0D 4A 01 8D 39 30 3A 8B 58 B2 31 33 37 |$.^.J..90:.X.137|
00000540: B0 58 B2 31 33 38 B0 58 B2 31 34 31 B0 58 B2 31 |.X.138.X.141.X.1|
00000550: 36 37 A7 53 31 24 B2 22 22 3A 89 33 36 30 00 6B |67.S1$."":.360.k|
00000560: 0D 54 01 8B 58 B2 30 89 33 32 30 00 74 0D 5E 01 |.T..X.0.320.t.^.|
00000570: 89 33 33 30 00 86 0D 68 01 8D 39 30 3A 8B 58 B2 |.330...h..90:.X.|
00000580: 33 32 89 33 36 30 00 A7 0D 72 01 8B 58 B1 B2 34 |32.360...r..X..4|
00000590: 38 AF 58 B3 B2 35 37 A7 53 31 24 B2 53 31 24 AA |8.X..57.S1$.S1$.|
000005A0: 41 24 3A 89 33 36 30 00 B7 0D 7C 01 8B 53 31 24 |A$:.360...|..S1$|
000005B0: B2 22 22 89 34 37 30 00 D1 0D 86 01 53 31 24 B2 |."".470.....S1$.|
000005C0: C9 28 22 20 20 20 20 20 20 22 AA 53 31 24 2C 36 |.(" ".S1$,6|
000005D0: 29 00 05 0E 90 01 8B C8 28 53 50 24 28 53 50 29 |).......(SP$(SP)|
000005E0: 2C 35 29 B3 B1 5A 45 24 A7 53 50 B2 53 50 AA 31 |,5)..ZE$.SP.SP.1|
000005F0: 3A 8D 31 33 30 3A 53 50 24 28 53 50 29 B2 5A 45 |:.130:SP$(SP).ZE|
00000600: 24 AA 22 3A 22 00 35 0E 9A 01 8B C3 28 53 50 24 |$.":".5.....(SP$|
00000610: 28 53 50 29 29 B1 37 30 A7 53 50 B2 53 50 AA 31 |(SP)).70.SP.SP.1|
00000620: 3A 8D 31 33 30 3A 53 50 24 28 53 50 29 B2 5A 45 |:.130:SP$(SP).ZE|
00000630: 24 AA 22 3A 22 00 60 0E A4 01 8B C9 28 53 50 24 |$.":".`.....(SP$|
00000640: 28 53 50 29 2C 36 29 B3 B1 53 31 24 A7 53 50 24 |(SP),6)..S1$.SP$|
00000650: 28 53 50 29 B2 53 50 24 28 53 50 29 AA 53 31 24 |(SP).SP$(SP).S1$|
00000660: 00 6C 0E AE 01 81 49 B2 31 A4 50 53 00 9D 0E B8 |.l....I.1.PS....|
00000670: 01 8B C8 28 50 53 24 28 49 29 2C 36 29 B3 B1 53 |...(PS$(I),6)..S|
00000680: 31 24 A7 82 3A 50 53 B2 49 3A 8D 31 33 30 3A 50 |1$..:PS.I:.130:P|
00000690: 53 24 28 49 29 B2 53 31 24 AA 22 3A 22 00 D2 0E |S$(I).S1$.":"...|
000006A0: C2 01 8B C3 28 50 53 24 28 49 29 29 B1 37 30 A7 |....(PS$(I)).70.|
000006B0: 82 3A 50 53 B2 50 53 AA 31 3A 49 B2 50 53 3A 8D |.:PS.PS.1:I.PS:.|
000006C0: 31 33 30 3A 50 53 24 28 49 29 B2 53 31 24 AA 22 |130:PS$(I).S1$."|
000006D0: 3A 22 00 FE 0E CC 01 8B C9 28 50 53 24 28 49 29 |:".......(PS$(I)|
000006E0: 2C 35 29 B3 B1 5A 45 24 A7 50 53 24 28 49 29 B2 |,5)..ZE$.PS$(I).|
000006F0: 50 53 24 28 49 29 AA 22 20 22 AA 5A 45 24 00 0B |PS$(I)." ".ZE$..|
00000700: 0F D6 01 8B 58 B2 30 89 33 32 30 00 21 0F E0 01 |....X.0.320.!...|
00000710: 8B 58 B2 34 34 A7 53 31 24 B2 22 22 3A 89 33 36 |.X.44.S1$."":.36|
00000720: 30 00 44 0F EA 01 8B 58 B2 35 38 B0 58 B1 B2 31 |0.D....X.58.X..1|
00000730: 32 37 B0 28 58 B1 B2 36 35 AF 58 B3 B2 39 30 29 |27.(X..65.X..90)|
00000740: 89 33 33 30 00 53 0F EF 01 8B 58 B2 31 30 30 A7 |.330.S....X.100.|
00000750: 33 33 30 00 86 0F F4 01 99 3A 99 22 11 C6 45 48 |330......:."..EH|
00000760: 4C 45 52 20 49 4D 20 D1 55 45 4C 4C 50 52 4F 47 |LER IM .UELLPROG|
00000770: 52 41 4D 4D 2E 20 DA 45 49 4C 45 3A 22 5A 45 24 |RAMM. .EILE:"ZE$|
00000780: 3A 89 31 33 31 30 00 8C 0F F6 01 3A 00 92 0F F8 |:.1310.....:....|
00000790: 01 3A 00 B8 0F FA 01 8F 20 2D 2D 2D 2D 2D 2D 2D |.:...... -------|
000007A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007B0: 2D 2D 2D 2D 2D 2D 2D 2D 00 EA 0F FE 01 8F 2A 2A |--------......**|
000007C0: 2A 20 53 4F 52 54 49 45 52 45 4E 20 44 45 52 20 |* SORTIEREN DER |
000007D0: 53 50 52 55 4E 47 5A 49 45 4C 45 20 28 46 45 4C |SPRUNGZIELE (FEL|
000007E0: 44 20 50 53 24 28 20 2A 2A 2A 00 10 10 03 02 8F |D PS$( ***......|
000007F0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000800: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000810: 00 16 10 04 02 3A 00 22 10 08 02 81 49 B2 31 A4 |.....:."....I.1.|
00000820: 50 53 00 2E 10 12 02 81 4A B2 49 A4 50 53 00 4F |PS......J.I.PS.O|
00000830: 10 1C 02 8B C8 28 50 53 24 28 49 29 2C 35 29 B3 |.....(PS$(I),5).|
00000840: C8 28 50 53 24 28 4A 29 2C 35 29 89 35 36 30 00 |.(PS$(J),5).560.|
00000850: 7D 10 26 02 50 53 24 28 30 29 B2 50 53 24 28 49 |}.&.PS$(0).PS$(I|
00000860: 29 3A 50 53 24 28 49 29 B2 50 53 24 28 4A 29 3A |):PS$(I).PS$(J):|
00000870: 50 53 24 28 4A 29 B2 50 53 24 28 30 29 00 84 10 |PS$(J).PS$(0)...|
00000880: 30 02 82 4A 00 8B 10 3A 02 82 49 00 91 10 3E 02 |0..J...:..I...>.|
00000890: 3A 00 B7 10 3F 02 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D |:...?..---------|
000008A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008B0: 2D 2D 2D 2D 2D 2D 2D 00 DE 10 40 02 8F 20 20 20 |-------...@.. |
000008C0: 41 55 53 47 41 42 45 20 53 50 52 55 45 4E 47 45 |AUSGABE SPRUENGE|
000008D0: 20 2B 20 53 50 52 55 4E 47 5A 49 45 4C 45 00 04 | + SPRUNGZIELE..|
000008E0: 11 41 02 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.A..------------|
000008F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000900: 2D 2D 2D 2D 00 0A 11 42 02 3A 00 30 11 44 02 9F |----...B.:.0.D..|
00000910: 31 2C 44 56 2C 37 3A 98 31 2C 22 D0 52 4F 47 52 |1,DV,7:.1,".ROGR|
00000920: 41 4D 4D 4E 41 4D 45 3A 20 22 4E 41 24 3A 98 31 |AMMNAME: "NA$:.1|
00000930: 00 52 11 4E 02 98 31 2C 22 53 50 52 55 4E 47 54 |.R.N..1,"SPRUNGT|
00000940: 41 42 45 4C 4C 45 20 20 20 20 20 20 20 20 20 20 |ABELLE |
00000950: 20 22 00 76 11 58 02 98 31 2C 22 2D 2D 2D 2D 2D | ".v.X..1,"-----|
00000960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000970: 2D 2D 2D 2D 2D 22 00 A3 11 5D 02 98 31 2C 22 5A |-----"...]..1,"Z|
00000980: 45 49 4C 45 20 3A 20 20 20 53 50 52 55 4E 47 20 |EILE : SPRUNG |
00000990: 41 55 46 20 5A 45 49 4C 45 20 20 20 20 20 20 22 |AUF ZEILE "|
000009A0: 3A 98 31 00 AF 11 62 02 81 49 B2 31 A4 53 50 00 |:.1...b..I.1.SP.|
000009B0: E5 11 6C 02 8B C8 28 53 50 24 28 49 AB 31 29 2C |..l...(SP$(I.1),|
000009C0: 35 29 B2 C8 28 53 50 24 28 49 29 2C 35 29 A7 98 |5)..(SP$(I),5)..|
000009D0: 31 2C A6 37 29 CA 28 53 50 24 28 49 29 2C 37 29 |1,.7).(SP$(I),7)|
000009E0: 3A 89 36 34 30 00 F6 11 76 02 98 31 2C 22 20 22 |:.640...v..1," "|
000009F0: 53 50 24 28 49 29 00 00 12 80 02 82 49 3A 98 31 |SP$(I)......I:.1|
00000A00: 00 2C 12 85 02 98 31 2C 22 5A 45 49 4C 45 20 3A |.,....1,"ZEILE :|
00000A10: 20 20 20 57 49 52 44 20 41 4E 47 45 53 50 52 55 | WIRD ANGESPRU|
00000A20: 4E 47 45 4E 20 56 4F 4E 22 3A 98 31 00 42 12 8A |NGEN VON":.1.B..|
00000A30: 02 50 53 24 28 30 29 B2 22 22 3A 81 49 B2 32 A4 |.PS$(0)."":.I.2.|
00000A40: 50 53 00 71 12 94 02 8B C8 28 50 53 24 28 49 AB |PS.q.....(PS$(I.|
00000A50: 31 29 2C 36 29 B3 B1 C8 28 50 53 24 28 49 29 2C |1),6)...(PS$(I),|
00000A60: 36 29 A7 98 31 2C 50 53 24 28 49 29 3A 89 36 38 |6)..1,PS$(I):.68|
00000A70: 30 00 88 12 9E 02 98 31 2C A6 36 29 3B CA 28 50 |0......1,.6);.(P|
00000A80: 53 24 28 49 29 2C 37 29 00 92 12 A8 02 82 49 3A |S$(I),7)......I:|
00000A90: A0 31 00 A0 12 AD 02 8B 44 56 B2 34 A7 37 31 32 |.1......DV.4.712|
00000AA0: 00 BC 12 B2 02 99 22 11 12 CE 92 4F 43 48 4D 41 |......"....OCHMA|
00000AB0: 4C 53 2F 12 D7 92 45 49 54 45 52 22 00 D9 12 BC |LS/...EITER"....|
00000AC0: 02 A1 41 24 3A 8B 41 24 B3 B1 22 4E 22 AF 41 24 |..A$:.A$.."N".A$|
00000AD0: B3 B1 22 57 22 89 37 30 30 00 E9 12 C6 02 8B 41 |.."W".700......A|
00000AE0: 24 B2 22 4E 22 89 35 38 30 00 EF 12 C8 02 3A 00 |$."N".580.....:.|
00000AF0: F5 12 CA 02 3A 00 1B 13 CB 02 8F 2A 2A 2A 2A 2A |....:......*****|
00000B00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3C 13 CC 02 |***********.<...|
00000B20: 8F 20 20 20 20 20 50 41 53 53 20 32 20 56 41 52 |. PASS 2 VAR|
00000B30: 49 41 42 4C 45 20 53 55 43 48 45 4E 00 62 13 CE |IABLE SUCHEN.b..|
00000B40: 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B60: 2A 2A 00 68 13 CF 02 3A 00 8F 13 D0 02 99 22 93 |**.h...:......".|
00000B70: D0 41 53 53 20 32 20 28 D3 55 43 48 45 4E 20 44 |.ASS 2 (.UCHEN D|
00000B80: 45 52 20 D6 41 52 49 41 42 4C 45 4E 29 11 22 00 |ER .ARIABLEN).".|
00000B90: B0 13 DA 02 9F 31 2C 38 2C 32 2C 4E 41 24 AA 22 |.....1,8,2,NA$."|
00000BA0: 2C 50 2C 52 22 3A 8D 31 32 39 30 3A 8D 31 32 30 |,P,R":.1290:.120|
00000BB0: 00 E2 13 E4 02 8D 31 32 30 3A 8D 31 32 30 3A 5A |......120:.120:Z|
00000BC0: 45 24 B2 C9 28 22 20 20 20 20 20 22 AA C4 28 58 |E$..(" "..(X|
00000BD0: 29 2C 35 29 3A 99 22 13 11 11 22 5A 45 24 3A 59 |),5):."..."ZE$:Y|
00000BE0: B2 30 00 EA 13 EE 02 8D 39 30 00 F7 13 F8 02 8B |.0......90......|
00000BF0: 58 B2 30 89 37 34 30 00 17 14 02 03 8B 58 B2 33 |X.0.740......X.3|
00000C00: 34 B0 58 B2 31 30 30 B0 58 B2 31 33 31 B0 58 B2 |4.X.100.X.131.X.|
00000C10: 31 34 33 89 38 30 30 00 2A 14 0C 03 8B 58 B1 36 |143.800.*....X.6|
00000C20: 34 AF 58 B3 39 31 89 38 35 30 00 33 14 16 03 89 |4.X.91.850.3....|
00000C30: 37 35 30 00 42 14 20 03 8B 58 B2 31 33 31 A7 59 |750.B. ..X.131.Y|
00000C40: B2 31 00 50 14 25 03 8B 58 B2 33 34 A7 59 B2 32 |.1.P.%..X.34.Y.2|
00000C50: 00 5F 14 26 03 8B 58 B2 31 30 30 A7 59 B2 33 00 |._.&..X.100.Y.3.|
00000C60: 70 14 2A 03 8D 39 30 3A 8B 58 B2 30 89 37 34 30 |p.*..90:.X.0.740|
00000C70: 00 82 14 34 03 8B 58 B2 33 34 AF 59 B2 32 89 37 |...4..X.34.Y.2.7|
00000C80: 35 30 00 94 14 3E 03 8B 58 B2 35 38 AF 59 B2 31 |50...>..X.58.Y.1|
00000C90: 89 37 35 30 00 B2 14 43 03 8B 59 B2 33 AF 28 58 |.750...C..Y.3.(X|
00000CA0: B2 34 39 B0 58 B2 35 30 B0 58 B2 35 31 29 A7 59 |.49.X.50.X.51).Y|
00000CB0: B2 30 00 BF 14 44 03 8B 59 B2 33 89 37 35 30 00 |.0...D..Y.3.750.|
00000CC0: C8 14 48 03 89 38 31 30 00 D3 14 52 03 56 31 24 |..H..810...R.V1$|
00000CD0: B2 41 24 00 DB 14 5C 03 8D 39 30 00 12 15 66 03 |.A$...\..90...f.|
00000CE0: 8B 58 B2 33 36 B0 58 B2 33 37 B0 28 58 B1 34 37 |.X.36.X.37.(X.47|
00000CF0: AF 58 B3 35 38 29 B0 28 58 B1 36 34 AF 58 B3 39 |.X.58).(X.64.X.9|
00000D00: 31 29 A7 56 31 24 B2 56 31 24 AA 41 24 3A 89 38 |1).V1$.V1$.A$:.8|
00000D10: 36 30 00 27 15 70 03 8B 58 B2 34 30 A7 56 31 24 |60.'.p..X.40.V1$|
00000D20: B2 56 31 24 AA 41 24 00 3F 15 7A 03 56 31 24 B2 |.V1$.A$.?.z.V1$.|
00000D30: C8 28 56 31 24 AA 22 20 20 20 20 22 2C 34 29 00 |.(V1$." ",4).|
00000D40: 4B 15 84 03 81 49 B2 31 A4 56 41 00 7E 15 8E 03 |K....I.1.VA.~...|
00000D50: 8B C8 28 56 41 24 28 49 29 2C 34 29 B3 B1 56 31 |..(VA$(I),4)..V1|
00000D60: 24 A7 82 3A 56 41 B2 49 3A 8D 31 33 30 3A 56 41 |$..:VA.I:.130:VA|
00000D70: 24 28 49 29 B2 56 31 24 AA 22 20 20 3A 22 00 B5 |$(I).V1$." :"..|
00000D80: 15 98 03 8B C3 28 56 41 24 28 49 29 29 B1 35 30 |.....(VA$(I)).50|
00000D90: A7 82 3A 56 41 B2 56 41 AA 31 3A 49 B2 56 41 3A |..:VA.VA.1:I.VA:|
00000DA0: 8D 31 33 30 3A 56 41 24 28 49 29 B2 56 31 24 AA |.130:VA$(I).V1$.|
00000DB0: 22 20 20 3A 22 00 E1 15 A2 03 8B C9 28 56 41 24 |" :".......(VA$|
00000DC0: 28 49 29 2C 35 29 B3 B1 5A 45 24 A7 56 41 24 28 |(I),5)..ZE$.VA$(|
00000DD0: 49 29 B2 56 41 24 28 49 29 AA 22 20 22 AA 5A 45 |I).VA$(I)." ".ZE|
00000DE0: 24 00 EE 15 AC 03 8B 58 B2 30 89 37 34 30 00 F7 |$......X.0.740..|
00000DF0: 15 B6 03 89 37 35 30 00 FD 15 B8 03 3A 00 03 16 |....750.....:...|
00000E00: BA 03 3A 00 29 16 BC 03 8F 20 2D 2D 2D 2D 2D 2D |..:.).... ------|
00000E10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 5A 16 C0 03 8F 20 |---------.Z.... |
00000E30: 2A 2A 2A 20 53 4F 52 54 49 45 52 45 4E 20 44 45 |*** SORTIEREN DE|
00000E40: 52 20 56 41 52 49 41 42 4C 45 4E 20 28 46 45 4C |R VARIABLEN (FEL|
00000E50: 44 20 56 41 24 28 20 2A 2A 2A 00 80 16 C5 03 8F |D VA$( ***......|
00000E60: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000E70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000E80: 00 86 16 C8 03 3A 00 92 16 CA 03 81 49 B2 31 A4 |.....:......I.1.|
00000E90: 56 41 00 9E 16 D4 03 81 4A B2 49 A4 56 41 00 C0 |VA......J.I.VA..|
00000EA0: 16 DE 03 8B C8 28 56 41 24 28 49 29 2C 34 29 B1 |.....(VA$(I),4).|
00000EB0: C8 28 56 41 24 28 4A 29 2C 34 29 89 31 30 31 30 |.(VA$(J),4).1010|
00000EC0: 00 EE 16 E8 03 56 41 24 28 30 29 B2 56 41 24 28 |.....VA$(0).VA$(|
00000ED0: 49 29 3A 56 41 24 28 49 29 B2 56 41 24 28 4A 29 |I):VA$(I).VA$(J)|
00000EE0: 3A 56 41 24 28 4A 29 B2 56 41 24 28 30 29 00 F5 |:VA$(J).VA$(0)..|
00000EF0: 16 F2 03 82 4A 00 09 17 FC 03 82 49 3A 56 41 B2 |....J......I:VA.|
00000F00: 56 41 AB 31 3A 49 B2 56 41 00 0F 17 01 04 3A 00 |VA.1:I.VA.....:.|
00000F10: 4F 17 06 04 99 22 93 D7 4F 4C 4C 45 4E 20 D3 49 |O...."..OLLEN .I|
00000F20: 45 20 5A 55 20 44 45 4E 20 D6 41 52 49 41 42 4C |E ZU DEN .ARIABL|
00000F30: 45 4E 22 3A 99 22 C2 45 4D 45 52 4B 55 4E 47 45 |EN":.".EMERKUNGE|
00000F40: 4E 20 45 49 4E 47 45 42 45 4E 3F 20 20 22 3B 00 |N EINGEBEN? ";.|
00000F50: 64 17 10 04 A1 41 24 3A 8B 41 24 B2 22 4E 22 89 |d....A$:.A$."N".|
00000F60: 31 31 38 30 00 76 17 1A 04 8B 41 24 B3 B1 22 4A |1180.v....A$.."J|
00000F70: 22 89 31 30 34 30 00 83 17 24 04 99 22 CA 41 11 |".1040...$..".A.|
00000F80: 11 11 22 00 AD 17 2E 04 99 22 13 11 11 11 11 11 |.."......"......|
00000F90: 11 D6 41 52 49 41 42 4C 45 4E 4E 41 4D 45 3A 20 |..ARIABLENNAME: |
00000FA0: 22 3B C8 28 56 41 24 28 49 29 2C 34 29 00 B6 17 |";.(VA$(I),4)...|
00000FB0: 31 04 99 4C 45 24 00 DA 17 33 04 8B C3 28 56 41 |1..LE$...3...(VA|
00000FC0: 24 28 49 29 29 B1 37 30 A7 99 22 91 91 22 C9 28 |$(I)).70.."..".(|
00000FD0: 56 41 24 28 49 29 2C 32 35 29 00 0A 18 38 04 A1 |VA$(I),25)...8..|
00000FE0: 41 24 3A 8B 41 24 B3 B1 22 91 22 AF 41 24 B3 B1 |A$:.A$..".".A$..|
00000FF0: 22 11 22 AF 41 24 B3 B1 C7 28 31 33 29 AF 41 24 |".".A$...(13).A$|
00001000: B3 B1 22 45 22 89 31 30 38 30 00 27 18 42 04 8B |.."E".1080.'.B..|
00001010: 41 24 B2 22 91 22 A7 49 B2 49 AA 31 3A 8B 49 B1 |A$.".".I.I.1:.I.|
00001020: 56 41 A7 49 B2 56 41 00 42 18 4C 04 8B 41 24 B2 |VA.I.VA.B.L..A$.|
00001030: 22 11 22 A7 49 B2 49 AB 31 3A 8B 49 B3 31 A7 49 |".".I.I.1:.I.1.I|
00001040: B2 31 00 53 18 51 04 8B 41 24 B2 22 45 22 89 31 |.1.S.Q..A$."E".1|
00001050: 31 38 30 00 67 18 56 04 8B 41 24 B3 B1 C7 28 31 |180.g.V..A$...(1|
00001060: 33 29 89 31 30 37 30 00 70 18 60 04 9F 31 2C 30 |3).1070.p.`..1,0|
00001070: 00 98 18 6A 04 99 22 D4 45 58 54 3A 22 3B 3A 84 |...j..".EXT:";:.|
00001080: 31 2C 54 45 24 3A 99 3A A0 31 3A 54 45 24 B2 C8 |1,TE$:.:.1:TE$..|
00001090: 28 54 45 24 2C 32 35 29 00 AD 18 6F 04 99 22 93 |(TE$,25)...o..".|
000010A0: 11 11 11 11 11 11 11 11 11 22 4C 45 24 00 DD 18 |........."LE$...|
000010B0: 88 04 56 41 24 28 49 29 B2 C8 28 56 41 24 28 49 |..VA$(I)..(VA$(I|
000010C0: 29 AA 4C 45 24 2C 35 35 29 AA C9 28 4C 45 24 AA |).LE$,55)..(LE$.|
000010D0: 54 45 24 2C 32 35 29 3A 89 31 30 37 30 00 E3 18 |TE$,25):.1070...|
000010E0: 96 04 3B 00 08 19 97 04 8F 2D 2D 2D 2D 2D 2D 2D |..;......-------|
000010F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001100: 2D 2D 2D 2D 2D 2D 2D 2D 00 23 19 98 04 8F 20 20 |--------.#.... |
00001110: 20 20 20 41 55 53 47 41 42 45 20 56 41 52 49 41 | AUSGABE VARIA|
00001120: 42 4C 45 00 48 19 99 04 8F 2D 2D 2D 2D 2D 2D 2D |BLE.H....-------|
00001130: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001140: 2D 2D 2D 2D 2D 2D 2D 2D 00 56 19 9C 04 99 3A 9F |--------.V....:.|
00001150: 31 2C 44 56 2C 37 00 7B 19 A6 04 98 31 2C 22 11 |1,DV,7.{....1,".|
00001160: 11 4C 49 53 54 45 20 44 45 52 20 56 41 52 49 41 |.LISTE DER VARIA|
00001170: 42 4C 45 4E 20 20 20 20 20 3A 22 00 9E 19 B0 04 |BLEN :".....|
00001180: 98 31 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.1,"------------|
00001190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 AD |-------------"..|
000011A0: 19 BA 04 81 49 B2 56 41 A4 31 A9 AB 31 00 DD 19 |....I.VA.1..1...|
000011B0: C4 04 8B C8 28 56 41 24 28 49 AA 31 29 2C 34 29 |....(VA$(I.1),4)|
000011C0: B3 B1 C8 28 56 41 24 28 49 29 2C 34 29 A7 98 31 |...(VA$(I),4)..1|
000011D0: 2C 56 41 24 28 49 29 3A 89 31 32 34 30 00 F4 19 |,VA$(I):.1240...|
000011E0: CE 04 98 31 2C A6 36 29 3B CA 28 56 41 24 28 49 |...1,.6);.(VA$(I|
000011F0: 29 2C 37 29 00 FB 19 D8 04 82 49 00 0A 1A DD 04 |),7)......I.....|
00001200: 8B 44 56 B2 34 A7 31 32 36 39 00 26 1A E2 04 99 |.DV.4.1269.&....|
00001210: 22 11 12 4E 92 4F 43 48 4D 41 4C 53 2F 12 57 92 |"..N.OCHMALS/.W.|
00001220: 45 49 54 45 52 22 00 44 1A EC 04 A1 41 24 3A 8B |EITER".D....A$:.|
00001230: 41 24 B3 B1 22 4E 22 AF 41 24 B3 B1 22 57 22 89 |A$.."N".A$.."W".|
00001240: 31 32 36 30 00 55 1A EF 04 8B 41 24 B2 22 4E 22 |1260.U....A$."N"|
00001250: 89 31 31 39 30 00 83 1A F2 04 99 22 D6 41 52 49 |.1190......".ARI|
00001260: 41 42 4C 45 4E 4C 49 53 54 45 20 4F 48 4E 45 20 |ABLENLISTE OHNE |
00001270: DA 45 49 4C 45 4E 4E 55 4D 4D 45 52 20 28 4A 2F |.EILENNUMMER (J/|
00001280: 4E 29 22 00 97 1A F3 04 A1 52 24 3A 8B 52 24 B2 |N)"......R$:.R$.|
00001290: 22 22 A7 31 32 36 37 00 B4 1A F4 04 8B 52 24 B3 |"".1267......R$.|
000012A0: B1 22 4A 22 A7 99 3A 99 22 45 4E 44 45 22 3A 89 |."J"..:."ENDE":.|
000012B0: 31 33 31 30 00 E4 1A F5 04 98 31 3A 98 31 3A 98 |1310......1:.1:.|
000012C0: 31 2C 22 D6 41 52 49 41 42 4C 45 4E 4C 49 53 54 |1,".ARIABLENLIST|
000012D0: 45 20 4F 48 4E 45 20 DA 45 49 4C 45 4E 4E 55 4D |E OHNE .EILENNUM|
000012E0: 4D 45 52 22 00 0D 1B F6 04 98 31 2C 22 2D 2D 2D |MER"......1,"---|
000012F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001300: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 1C 1B |------------"...|
00001310: F7 04 81 49 B2 56 41 A4 31 A9 AB 31 00 50 1B F8 |...I.VA.1..1.P..|
00001320: 04 8B C3 28 56 41 24 28 49 29 29 B1 37 30 A7 98 |...(VA$(I)).70..|
00001330: 31 2C C8 28 56 41 24 28 49 29 2C 38 29 3B C9 28 |1,.(VA$(I),8);.(|
00001340: 56 41 24 28 49 29 2C 32 35 29 3A 89 31 32 37 35 |VA$(I),25):.1275|
00001350: 00 74 1B F9 04 8B C8 28 56 41 24 28 49 AA 31 29 |.t.....(VA$(I.1)|
00001360: 2C 34 29 B2 C8 28 56 41 24 28 49 29 2C 34 29 A7 |,4)..(VA$(I),4).|
00001370: 31 32 37 35 00 87 1B FA 04 98 31 2C C8 28 56 41 |1275......1,.(VA|
00001380: 24 28 49 29 2C 38 29 00 8E 1B FB 04 82 49 00 98 |$(I),8)......I..|
00001390: 1B 00 05 89 31 33 31 30 00 B0 1B 0A 05 84 32 2C |....1310......2,|
000013A0: 41 24 2C 42 24 3A 8B 41 24 B2 22 30 30 22 A7 8E |A$,B$:.A$."00"..|
000013B0: 00 C9 1B 14 05 99 3A 99 22 C4 49 53 4B 2D C5 52 |......:.".ISK-.R|
000013C0: 52 4F 52 3A 20 22 3B 42 24 00 D5 1B 1E 05 A0 31 |ROR: ";B$......1|
000013D0: 3A A0 32 3A 80 00 00 00 |:.2:.... |
..(....*********************************
.O....* PROGRAMMNAME : XREF *.
V....* C-64 *..
.(..* FLOPPY 1541 O. AEHNLICHE *.D.
2..* DRUCKER (Z.B. MPS 801) *...<
..* VON STEFAN BECKER *...F.
.*********************************...P..
:.150.@.Z..#1,A$:X.F(A$.N$):.(64.ST).0..
.U.D. 1:.PA.PA.0:.520.^.N..960.|.X..90:X
1.X:.90:X.X1.256.X:.......SP.OB.VA.OB.PS
.OB..:.*** GRENZEN ERREICHT ? ***......:
."BITTE DIE VARIABLE OB IN ZEILE 150 VER
GROESSERN.":.1310.....OB.500:.SP$(OB),PS
$(OB),VA$(OB).Z. ..*** OB IST OBERGRENZE
DER ANZAHL DER SPRUENGE UND VARIABLEN *
**.P....53280,6:.53281,6.|...N$.G(0)....
.LE$."
".Y.H..G(147)G(9)G(14)G(
8)G(144);...R..". CROSS-REFEREN
Z-LISTER ".C...."..AUSGABE AUF "
:."..B.ILDSCHIRM ODER .D.RUCKER...".U...
..12);:.204,0.R....A$:.A$.."B".A$.."D".2
40......A$."B".."BILDSCHIRM.":DV.3:.270.
....."DRUCKER.":DV.4.M....".
."......1,0:."PROGRAMMNAME: "
;:.1,NA$: 1:..*."..2,8,15:.1,8,2,NA$.",P
,R":.1290:.120:.X.2049.310.[.,..:."DAS P
ROGRAMM MUSS AB 2049 LIEGEN.":.1310.A...
:.G.0.:...1..***************************
*****...2.. PASS 1 SPRUNGTABELLE.R.4
..********************************.X.5.:
...6..".PASS 1 (SUCHEN DER SPRUENGE).":P
A.1.1.@..120:.120:ZE$.I(" ".D(X),5):
."..."ZE$.^.J..90:.X.137.X.138.X.141.X.1
67.S1$."":.360.K.T..X.0.320.T.^..330...H
..90:.X.32.360...R..X..48.X..57.S1$.S1$.
A$:.360...|..S1$."".470.Q...S1$.I("
".S1$,6)......H(SP$(SP),5)..ZE$.SP.SP.1
:.130:SP$(SP).ZE$.":".5....C(SP$(SP)).70
.SP.SP.1:.130:SP$(SP).ZE$.":".`....I(SP$
(SP),6)..S1$.SP$(SP).SP$(SP).S1$.L....I.
1.PS......H(PS$(I),6)..S1$..:PS.I:.130:P
S$(I).S1$.":".R.B..C(PS$(I)).70..:PS.PS.
1:I.PS:.130:PS$(I).S1$.":"...L..I(PS$(I)
,5)..ZE$.PS$(I).PS$(I)." ".ZE$...V..X.0.
320.!....X.44.S1$."":.360.D....X.58.X..1
27.(X..65.X..90).330.S....X.100.330.....
.:.".FEHLER IM QUELLPROGRAMM. ZEILE:"ZE$
:.1310.....:.....:...... ---------------
----------------......*** SORTIEREN DER
SPRUNGZIELE (FELD PS$( ***...... -------
------------------------.....:."....I.1.
PS......J.I.PS.O....H(PS$(I),5).H(PS$(J)
,5).560.}.&.PS$(0).PS$(I):PS$(I).PS$(J):
PS$(J).PS$(0)...0..J...:..I...>.:...?..-
-------------------------------...@..
AUSGABE SPRUENGE + SPRUNGZIELE...A..----
----------------------------...B.:.0.D..
1,DV,7:.1,"PROGRAMMNAME: "NA$:.1.R.N..1,
"SPRUNGTABELLE ".V.X..1,"-----
---------------------"...]..1,"ZEILE :
SPRUNG AUF ZEILE ":.1...B..I.1.SP.
..L..H(SP$(I.1),5).H(SP$(I),5)..1,.7)J(S
P$(I),7):.640...V..1," "SP$(I)......I:.1
.,....1,"ZEILE : WIRD ANGESPRUNGEN VON
":.1.B...PS$(0)."":.I.2.PS.Q....H(PS$(I.
1),6)..H(PS$(I),6)..1,PS$(I):.680......1
,.6);J(PS$(I),7)......I: 1. ....DV.4.712
......"..N.OCHMALS/.W.EITER".Y....A$:.A$
.."N".A$.."W".700...F..A$."N".580...H.:.
..J.:...K..*****************************
***.<.L.. PASS 2 VARIABLE SUCHEN.B.N
..********************************.H.O.:
...P..".PASS 2 (SUCHEN DER VARIABLEN).".
..Z..1,8,2,NA$.",P,R":.1290:.120......12
0:.120:ZE$.I(" ".D(X),5):."..."ZE$:Y
.0......90......X.0.740......X.34.X.100.
X.131.X.143.800.*....X.64.X.91.850.3....
750.B. ..X.131.Y.1.P.%..X.34.Y.2._.&..X.
100.Y.3.P.*..90:.X.0.740...4..X.34.Y.2.7
50...>..X.58.Y.1.750...C..Y.3.(X.49.X.50
.X.51).Y.0...D..Y.3.750.H.H..810.S.R.V1$
.A$...\..90...F..X.36.X.37.(X.47.X.58).(
X.64.X.91).V1$.V1$.A$:.860.'.P..X.40.V1$
.V1$.A$.?.Z.V1$.H(V1$." ",4).K....I.1
.VA.~....H(VA$(I),4)..V1$..:VA.I:.130:VA
$(I).V1$." :"......C(VA$(I)).50..:VA.VA
.1:I.VA:.130:VA$(I).V1$." :"......I(VA$
(I),5)..ZE$.VA$(I).VA$(I)." ".ZE$......X
.0.740......750.....:.....:.).... ------
-------------------------.Z.... *** SORT
IEREN DER VARIABLEN (FELD VA$( ***...E..
-------------------------------...H.:..
.J..I.1.VA...T..J.I.VA......H(VA$(I),4).
H(VA$(J),4).1010.....VA$(0).VA$(I):VA$(I
).VA$(J):VA$(J).VA$(0)......J......I:VA.
VA.1:I.VA.....:.O....".WOLLEN SIE ZU DEN
VARIABLEN":."BEMERKUNGEN EINGEBEN? ";.
D....A$:.A$."N".1180.V....A$.."J".1040..
.$.."JA..."......".......VARIABLENNAME:
";H(VA$(I),4)...1..LE$.Z.3..C(VA$(I)).70
..".."I(VA$(I),25)...8..A$:.A$..".".A$..
".".A$..G(13).A$.."E".1080.'.B..A$.".".I
.I.1:.I.VA.I.VA.B.L..A$.".".I.I.1:.I.1.I
.1.S.Q..A$."E".1180.G.V..A$..G(13).1070.
P.`..1,0...J.."TEXT:";:.1,TE$:.: 1:TE$.H
(TE$,25)...O..".........."LE$.....VA$(I)
.H(VA$(I).LE$,55).I(LE$.TE$,25):.1070...
..;......-------------------------------
.#.... AUSGABE VARIABLE.H....-------
------------------------.V....:.1,DV,7.{
....1,"..LISTE DER VARIABLEN :".....
.1,"-------------------------"......I.VA
.1..1...D..H(VA$(I.1),4)..H(VA$(I),4)..1
,VA$(I):.1240...N..1,.6);J(VA$(I),7)...X
..I......DV.4.1269.&...."..N.OCHMALS/.W.
EITER".D....A$:.A$.."N".A$.."W".1260.U..
..A$."N".1190......"VARIABLENLISTE OHNE
ZEILENNUMMER (J/N)"......R$:.R$."".1267.
.....R$.."J"..:."ENDE":.1310......1:.1:.
1,"VARIABLENLISTE OHNE ZEILENNUMMER"....
..1,"-------------------------------"...
...I.VA.1..1.P....C(VA$(I)).70..1,H(VA$(
I),8);I(VA$(I),25):.1275.T....H(VA$(I.1)
,4).H(VA$(I),4).1275......1,H(VA$(I),8).
.....I......1310......2,A$,B$:.A$."00"..
.I....:."DISK-ERROR: ";B$.U... 1: 2:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL