ERATOSTHENES
FILE INFORMATION
FILENAME(S): ERATOSTHENES
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-12-02 23:47:50
APPEARS ON: 1 disk(s)
FILE HASH
c4133b86c74bee62dbd9e19c0a0820f47365422342b377ce8f8b8eab77bbdd14
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 MATH U STUFE | ERATOSTHENES | PRG | swasti, flohmarkt | 23 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 46 08 0A 00 8F 20 44 52 2E 20 48 41 4E 53 |..F.... DR. HANS|
00000010: 20 4A 2E 20 4D 55 45 4C 4C 45 52 2C 20 47 59 4D | J. MUELLER, GYM|
00000020: 4E 41 53 49 55 4D 20 42 45 49 20 53 54 2E 20 41 |NASIUM BEI ST. A|
00000030: 4E 4E 41 2C 20 41 55 47 53 42 55 52 47 2C 20 32 |NNA, AUGSBURG, 2|
00000040: 34 2E 36 2E 38 34 00 80 08 14 00 8F 20 4D 49 54 |4.6.84...... MIT|
00000050: 20 41 4E 52 45 47 55 4E 47 45 4E 20 56 4F 4E 20 | ANREGUNGEN VON |
00000060: 42 2E 20 42 52 4F 43 4B 4D 41 4E 4E 2C 20 56 45 |B. BROCKMANN, VE|
00000070: 52 53 49 4F 4E 20 32 2C 20 31 30 2E 34 2E 38 35 |RSION 2, 10.4.85|
00000080: 00 CC 08 1E 00 8F 20 53 49 45 42 20 44 45 53 20 |...... SIEB DES |
00000090: 45 52 41 54 4F 53 54 48 45 4E 45 53 20 49 4D 20 |ERATOSTHENES IM |
000000A0: 42 45 52 45 49 43 48 20 42 49 53 20 31 30 30 30 |BEREICH BIS 1000|
000000B0: 20 28 20 4D 41 4E 55 45 4C 4C 20 55 4E 44 20 41 | ( MANUELL UND A|
000000C0: 55 54 4F 4D 41 54 49 53 43 48 20 29 00 D2 08 28 |UTOMATISCH )...(|
000000D0: 00 3A 00 E3 08 64 00 8F 20 4B 4F 4E 53 54 41 4E |.:...d.. KONSTAN|
000000E0: 54 45 4E 00 EF 08 6E 00 86 20 50 28 31 31 29 00 |TEN...n.. P(11).|
000000F0: 3F 09 78 00 50 28 30 29 B2 32 3A 50 28 31 29 B2 |?.x.P(0).2:P(1).|
00000100: 33 3A 50 28 32 29 B2 35 3A 50 28 33 29 B2 37 3A |3:P(2).5:P(3).7:|
00000110: 50 28 34 29 B2 31 31 3A 50 28 35 29 B2 31 33 3A |P(4).11:P(5).13:|
00000120: 50 28 36 29 B2 31 37 3A 50 28 37 29 B2 31 39 3A |P(6).17:P(7).19:|
00000130: 50 28 38 29 B2 32 33 3A 50 28 39 29 B2 32 39 00 |P(8).23:P(9).29.|
00000140: 55 09 82 00 50 28 31 30 29 B2 33 31 3A 50 28 31 |U...P(10).31:P(1|
00000150: 31 29 B2 33 37 00 83 09 8C 00 45 24 B2 22 93 20 |1).37.....E$.". |
00000160: 20 20 20 20 20 20 12 20 C4 41 53 20 D3 49 45 42 | . .AS .IEB|
00000170: 20 44 45 53 20 C5 52 41 54 4F 53 54 48 45 4E 45 | DES .RATOSTHENE|
00000180: 53 11 22 00 8F 09 96 00 8D 20 36 33 30 30 30 00 |S."...... 63000.|
00000190: DC 09 F4 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..... **********|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 |*************** |
000001B0: 48 41 55 50 54 50 52 4F 47 52 41 4D 4D 20 2A 2A |HAUPTPROGRAMM **|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 13 0A FE |************....|
000001E0: 01 99 20 45 24 3A 99 22 11 11 11 11 20 C5 53 20 |.. E$:.".... .S |
000001F0: 53 54 45 48 45 4E 20 46 4F 4C 47 45 4E 44 45 20 |STEHEN FOLGENDE |
00000200: CD 4F 45 47 4C 49 43 48 4B 45 49 54 45 4E 20 5A |.OEGLICHKEITEN Z|
00000210: 55 52 22 00 24 0A 08 02 99 22 20 C1 55 53 57 41 |UR".$...." .USWA|
00000220: 48 4C 3A 22 00 4F 0A 12 02 99 22 11 11 11 20 20 |HL:".O...."... |
00000230: 20 12 20 20 20 31 20 20 20 92 20 20 20 20 4D 41 | . 1 . MA|
00000240: 4E 55 45 4C 4C 45 53 20 D3 49 45 42 45 4E 22 00 |NUELLES .IEBEN".|
00000250: 7E 0A 1C 02 99 22 11 11 20 20 20 12 20 20 20 32 |~....".. . 2|
00000260: 20 20 20 92 20 20 20 20 41 55 54 4F 4D 41 54 49 | . AUTOMATI|
00000270: 53 43 48 45 53 20 D3 49 45 42 45 4E 22 3A 00 A3 |SCHES .IEBEN":..|
00000280: 0A 26 02 99 22 11 11 20 20 20 12 20 20 20 30 20 |.&..".. . 0 |
00000290: 20 20 92 20 20 20 20 C5 4E 44 45 22 3A 8D 20 33 | . .NDE":. 3|
000002A0: 35 30 30 00 D6 0A 30 02 8D 20 33 31 30 30 3A 20 |500...0.. 3100: |
000002B0: 56 B2 C6 28 58 24 29 3A 20 8B 20 56 B1 34 38 20 |V..(X$): . V.48 |
000002C0: AF 20 56 B3 35 31 20 A7 20 56 B2 56 AB 34 38 3A |. V.51 . V.V.48:|
000002D0: 20 89 20 36 30 30 00 EC 0A 3A 02 8B 20 56 B1 31 | . 600...:.. V.1|
000002E0: 32 37 20 A7 20 56 B2 56 AB 31 32 38 00 06 0B 44 |27 . V.V.128...D|
000002F0: 02 8B 20 56 B2 34 38 20 B0 20 56 B2 36 39 20 A7 |.. V.48 . V.69 .|
00000300: 20 36 30 32 30 30 00 10 0B 4E 02 89 20 35 36 30 | 60200...N.. 560|
00000310: 00 16 0B 53 02 3A 00 52 0B 58 02 99 20 45 24 3A |...S.:.R.X.. E$:|
00000320: 20 99 20 C8 28 46 55 24 2C 33 29 22 20 C9 4E 20 | . .(FU$,3)" .N |
00000330: 57 45 4C 43 48 45 4D 20 C8 55 4E 44 45 52 54 45 |WELCHEM .UNDERTE|
00000340: 52 42 45 52 45 49 43 48 20 53 49 45 42 45 4E A0 |RBEREICH SIEBEN.|
00000350: 3F 22 00 89 0B 62 02 99 20 C8 28 46 55 24 2C 35 |?"...b.. .(FU$,5|
00000360: 29 22 20 20 20 20 20 12 20 20 30 20 20 92 20 20 |)" . 0 . |
00000370: 20 20 C2 45 52 45 49 43 48 20 20 20 20 30 20 20 | .EREICH 0 |
00000380: 2D 20 20 20 39 39 22 3A 99 00 C8 0B 6C 02 81 49 |- 99":....l..I|
00000390: B2 31 A4 32 3A 59 B2 49 AC 31 30 30 3A 99 22 20 |.1.2:Y.I.100:." |
000003A0: 20 20 20 20 12 20 22 C4 28 49 29 22 20 20 92 20 | . ".(I)" . |
000003B0: 20 20 20 C2 45 52 45 49 43 48 20 22 59 22 20 2D | .EREICH "Y" -|
000003C0: 20 22 59 AA 39 39 3A 99 00 E7 0B 76 02 82 3A 99 | "Y.99:....v..:.|
000003D0: 22 20 20 20 20 20 20 20 3A 22 3A 99 22 20 20 20 |" :":." |
000003E0: 20 20 20 20 3A 11 22 00 26 0C 80 02 81 49 B2 37 | :.".&....I.7|
000003F0: A4 39 3A 59 B2 49 AC 31 30 30 3A 99 22 20 20 20 |.9:Y.I.100:." |
00000400: 20 20 12 20 22 C4 28 49 29 22 20 20 92 20 20 20 | . ".(I)" . |
00000410: 20 C2 45 52 45 49 43 48 20 22 59 22 20 2D 20 22 | .EREICH "Y" - "|
00000420: 59 AA 39 39 3A 99 00 2C 0C 8A 02 82 00 62 0C 94 |Y.99:..,.....b..|
00000430: 02 99 20 22 11 20 20 20 20 20 12 20 20 DA 20 20 |.. ". . . |
00000440: 92 20 20 20 20 DA 55 52 55 45 43 4B 20 5A 55 4D |. .URUECK ZUM|
00000450: 20 D6 45 52 54 45 49 4C 45 52 22 3A 8D 20 33 35 | .ERTEILER":. 35|
00000460: 30 30 00 A2 0C 9E 02 8D 20 33 31 30 30 3A 5A B2 |00...... 3100:Z.|
00000470: C6 28 58 24 29 3A 8B 20 5A B1 34 37 20 AF 20 5A |.(X$):. Z.47 . Z|
00000480: B3 35 38 20 A7 20 5A B2 5A AB 34 38 3A 4E B2 5A |.58 . Z.Z.48:N.Z|
00000490: AC 31 30 30 3A 4E 31 B2 4E AA 39 39 3A 89 20 37 |.100:N1.N.99:. 7|
000004A0: 30 30 00 B8 0C A8 02 8B 20 5A B1 31 32 37 20 A7 |00...... Z.127 .|
000004B0: 20 5A B2 5A AB 31 32 38 00 C9 0C AA 02 8B 20 5A | Z.Z.128...... Z|
000004C0: B2 39 30 20 A7 20 35 30 30 00 DC 0C AC 02 8B 20 |.90 . 500...... |
000004D0: 5A B2 36 39 20 A7 20 36 30 32 30 30 00 E6 0C AE |Z.69 . 60200....|
000004E0: 02 89 20 36 37 30 00 EC 0C B2 02 3A 00 11 0D BC |.. 670.....:....|
000004F0: 02 46 56 B2 30 3A 8D 20 31 30 30 30 3A 20 8F 20 |.FV.0:. 1000: . |
00000500: 54 41 42 45 4C 4C 45 20 53 43 48 52 45 49 42 45 |TABELLE SCHREIBE|
00000510: 4E 00 23 0D C6 02 91 20 56 20 8D 20 38 30 30 2C |N.#.... V . 800,|
00000520: 39 30 30 00 40 0D D0 02 91 20 46 56 AA 31 20 89 |900.@.... FV.1 .|
00000530: 20 36 30 30 2C 36 30 30 2C 35 30 30 2C 37 30 30 | 600,600,500,700|
00000540: 00 8D 0D DA 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********|
00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 45 4E 44 |************ END|
00000560: 45 20 44 45 53 20 48 41 55 50 54 50 52 4F 47 52 |E DES HAUPTPROGR|
00000570: 41 4D 4D 53 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |AMMS ***********|
00000580: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 93 0D |*************...|
00000590: E4 02 3A 00 AC 0D 20 03 8F 20 4D 41 4E 55 45 4C |..:... .. MANUEL|
000005A0: 4C 45 20 53 54 45 55 45 52 55 4E 47 00 E6 0D 2A |LE STEUERUNG...*|
000005B0: 03 99 20 C8 28 46 55 24 2C 32 33 29 22 D7 45 4C |.. .(FU$,23)".EL|
000005C0: 43 48 45 53 20 D3 49 45 42 20 28 20 31 20 2D 22 |CHES .IEB ( 1 -"|
000005D0: 4E 31 22 29 20 3F 20 22 3B 3A 20 46 46 B2 37 3A |N1") ? ";: FF.7:|
000005E0: 20 89 20 38 34 30 00 20 0E 34 03 99 20 22 13 22 | . 840. .4.. "."|
000005F0: 42 4C 24 22 13 CC 45 54 5A 54 45 53 20 D3 49 45 |BL$"..ETZTES .IE|
00000600: 42 20 3A 20 22 3B 53 3A 46 38 B2 46 46 3A 46 46 |B : ";S:F8.FF:FF|
00000610: B2 37 3A 8D 20 36 32 35 30 30 3A 46 46 B2 46 38 |.7:. 62500:FF.F8|
00000620: 00 50 0E 3E 03 99 20 C8 28 46 55 24 2C 32 33 29 |.P.>.. .(FU$,23)|
00000630: 22 CE 41 45 43 48 53 54 45 53 20 D3 49 45 42 20 |".AECHSTES .IEB |
00000640: 28 20 31 20 2D 20 22 4E 31 22 29 20 3F 20 22 3B |( 1 - "N1") ? ";|
00000650: 00 79 0E 48 03 8D 20 33 31 30 30 3A 20 5A B2 C6 |.y.H.. 3100: Z..|
00000660: 28 58 24 29 3A 20 8B 20 5A B1 34 37 20 AF 20 5A |(X$): . Z.47 . Z|
00000670: B3 35 38 20 A7 20 38 36 30 00 8F 0E 4A 03 8B 20 |.58 . 860...J.. |
00000680: 5A B1 31 32 37 20 A7 20 5A B2 5A AB 31 32 38 00 |Z.127 . Z.Z.128.|
00000690: A4 0E 4C 03 8B 20 5A B2 39 30 20 A7 20 46 56 B2 |..L.. Z.90 . FV.|
000006A0: 31 3A 20 8E 00 B9 0E 4E 03 8B 20 5A B2 36 35 20 |1: ....N.. Z.65 |
000006B0: A7 20 46 56 B2 32 3A 20 8E 00 CC 0E 50 03 8B 20 |. FV.2: ....P.. |
000006C0: 5A B2 36 39 20 A7 20 36 30 32 30 30 00 D6 0E 52 |Z.69 . 60200...R|
000006D0: 03 89 20 38 34 30 00 DC 0E 57 03 3A 00 00 0F 5C |.. 840...W.:...\|
000006E0: 03 8D 33 30 30 30 3A 8D 20 35 31 30 30 3A 8B 20 |..3000:. 5100:. |
000006F0: 53 B3 31 20 B0 20 53 B1 4E 31 20 A7 20 38 33 30 |S.1 . S.N1 . 830|
00000700: 00 22 0F 66 03 8D 20 36 32 35 30 30 3A 20 8D 20 |.".f.. 62500: . |
00000710: 32 30 30 30 3A 20 8B 20 46 56 B2 30 20 A7 20 38 |2000: . FV.0 . 8|
00000720: 32 30 00 28 0F 70 03 8E 00 2E 0F 7A 03 3A 00 47 |20.(.p.....z.:.G|
00000730: 0F 84 03 8F 20 41 55 54 4F 4D 41 54 2E 20 53 54 |.... AUTOMAT. ST|
00000740: 45 55 45 52 55 4E 47 00 67 0F 8E 03 46 46 B2 37 |EUERUNG.g...FF.7|
00000750: 3A 8D 20 36 32 35 30 30 3A 20 4D B2 B5 28 BA 28 |:. 62500: M..(.(|
00000760: 4E AA 31 30 31 29 29 00 8C 0F 98 03 81 20 54 B2 |N.101))...... T.|
00000770: 30 20 A4 20 31 31 3A 8B 20 50 28 54 29 B1 4D 20 |0 . 11:. P(T).M |
00000780: A7 20 4D B2 54 AB 31 3A 54 B2 31 31 00 92 0F A2 |. M.T.1:T.11....|
00000790: 03 82 00 BB 0F AC 03 81 20 4C B2 30 20 A4 20 4D |........ L.0 . M|
000007A0: 3A 53 B2 50 28 4C 29 3A 8D 20 32 30 30 30 3A 8B |:S.P(L):. 2000:.|
000007B0: 20 46 56 B1 30 20 A7 20 4C B2 4D 00 CD 0F B6 03 | FV.0 . L.M.....|
000007C0: 82 3A 20 8B 20 46 56 B1 30 20 A7 20 8E 00 E4 0F |.: . FV.0 . ....|
000007D0: C0 03 8D 20 33 35 31 30 3A 20 8D 20 33 31 30 30 |... 3510: . 3100|
000007E0: 20 3A 20 8E 00 EA 0F CA 03 3A 00 07 10 E8 03 8F | : ......:......|
000007F0: 20 54 41 42 45 4C 4C 45 20 56 4F 4E 20 4E 20 42 | TABELLE VON N B|
00000800: 49 53 20 4E 2B 39 39 00 10 10 F2 03 99 20 45 24 |IS N+99...... E$|
00000810: 00 25 10 FC 03 3A 81 20 4A B2 30 20 A4 20 39 30 |.%...:. J.0 . 90|
00000820: 20 A9 20 31 30 00 57 10 06 04 3A 20 81 20 49 B2 | . 10.W...: . I.|
00000830: 4A AA 4E 20 A4 20 39 AA 4A AA 4E 20 3A 20 8B 49 |J.N . 9.J.N : .I|
00000840: B2 30 B0 49 B2 31 A7 20 99 22 20 20 20 20 22 3B |.0.I.1. ." ";|
00000850: 3A 89 20 31 30 35 30 00 78 10 10 04 3A 20 20 20 |:. 1050.x...: |
00000860: 41 24 B2 22 20 20 20 22 AA C4 28 49 29 3A 99 20 |A$." "..(I):. |
00000870: C9 28 41 24 2C 34 29 3B 00 90 10 1A 04 3A 20 82 |.(A$,4);.....: .|
00000880: 20 49 3A 99 3A 8B 20 47 58 B2 38 30 20 A7 20 99 | I:.:. GX.80 . .|
00000890: 00 9B 10 24 04 82 20 4A 3A 20 8E 00 A1 10 2E 04 |...$.. J: ......|
000008A0: 3A 00 C0 10 D0 07 8F 20 44 55 52 43 48 46 55 45 |:...... DURCHFUE|
000008B0: 48 52 55 4E 47 20 44 45 53 20 53 49 45 42 45 53 |HRUNG DES SIEBES|
000008C0: 00 D7 10 DA 07 53 24 B2 C4 28 53 29 3A 53 24 B2 |.....S$..(S):S$.|
000008D0: CA 28 53 24 2C 32 29 00 0C 11 E4 07 99 22 13 CA |.(S$,2)......"..|
000008E0: 45 54 5A 54 20 57 49 52 44 20 4D 49 54 20 44 45 |ETZT WIRD MIT DE|
000008F0: 4D 20 12 22 3B 53 24 3B 22 2D 45 52 20 D3 49 45 |M .";S$;"-ER .IE|
00000900: 42 92 20 47 45 53 49 45 42 54 21 22 00 1B 11 EE |B. GESIEBT!"....|
00000910: 07 8B 20 53 B1 4E 31 20 A7 20 8E 00 41 11 F8 07 |.. S.N1 . ..A...|
00000920: 4A B2 B5 28 4E AD 53 29 AC 53 3A 20 8B 20 4A B2 |J..(N.S).S: . J.|
00000930: 30 20 A7 20 4A B2 53 AA 53 3A 20 89 20 32 30 34 |0 . J.S.S: . 204|
00000940: 35 00 59 11 FA 07 8B 20 4A B3 4E 20 B0 20 4A B2 |5.Y.... J.N . J.|
00000950: 53 20 A7 20 4A B2 4A AA 53 00 68 11 FD 07 8B 20 |S . J.J.S.h.... |
00000960: 4A B1 4E 31 20 A7 20 8E 00 7B 11 02 08 81 20 49 |J.N1 . ..{.... I|
00000970: B2 4A 20 A4 20 4E 31 20 A9 20 53 00 AB 11 0C 08 |.J . N1 . S.....|
00000980: 3A 81 20 46 B2 31 20 A4 20 46 54 3A 82 3A 8D 20 |:. F.1 . FT:.:. |
00000990: 36 30 30 30 30 3A 8B 20 46 56 B1 30 20 A7 20 49 |60000:. FV.0 . I|
000009A0: B2 4E 31 3A 20 89 20 32 30 39 30 00 D9 11 16 08 |.N1: . 2090.....|
000009B0: 3A 49 31 B2 49 AB 4E 3A 55 B2 B5 28 49 31 AD 31 |:I1.I.N:U..(I1.1|
000009C0: 30 29 3A 52 B2 28 49 31 AB 55 AC 31 30 29 AC 34 |0):R.(I1.U.10).4|
000009D0: 3A 20 55 B2 55 AC 32 AA 33 00 FF 11 20 08 51 B2 |: U.U.2.3... .Q.|
000009E0: 47 30 AA 55 AC 47 58 AA 52 3A 81 20 54 B2 51 20 |G0.U.GX.R:. T.Q |
000009F0: A4 20 51 AA 32 3A 97 20 54 2C 31 36 30 3A 82 00 |. Q.2:. T,160:..|
00000A00: 1A 12 22 08 3A 99 20 C8 28 46 55 24 2C 55 29 3B |..".:. .(FU$,U);|
00000A10: A3 52 29 3B 22 20 20 20 20 22 00 43 12 25 08 3A |.R);" ".C.%.:|
00000A20: 8F 20 50 52 49 4E 54 20 4C 45 46 54 24 28 46 55 |. PRINT LEFT$(FU|
00000A30: 24 2C 55 29 3B 54 41 42 28 52 29 3B 22 20 20 20 |$,U);TAB(R);" |
00000A40: 20 22 3B 00 49 12 2A 08 82 00 4F 12 34 08 8E 00 | ";.I.*...O.4...|
00000A50: 55 12 3E 08 3A 00 7C 12 B8 0B 8F 20 55 50 20 2A |U.>.:.|.... UP *|
00000A60: 2A 2A 20 45 49 4E 47 41 42 45 20 4E 41 54 55 45 |** EINGABE NATUE|
00000A70: 52 4C 2E 20 5A 41 48 4C 20 2A 2A 2A 00 8F 12 C2 |RL. ZAHL ***....|
00000A80: 0B 5A B2 31 3A 48 24 B2 58 24 3A 99 58 24 3B 00 |.Z.1:H$.X$:.X$;.|
00000A90: 9A 12 CC 0B 8D 20 33 31 30 30 00 BA 12 D6 0B 48 |..... 3100.....H|
00000AA0: B2 C6 28 58 24 29 3A 8B 20 48 B2 31 33 20 A7 20 |..(X$):. H.13 . |
00000AB0: 53 B2 C5 28 48 24 29 3A 20 8E 00 EF 12 E0 0B 8B |S..(H$): .......|
00000AC0: 20 48 B2 32 30 20 AF 20 5A B1 30 20 A7 20 99 22 | H.20 . Z.0 . ."|
00000AD0: 9D 20 9D 22 3B 3A 5A B2 5A AB 31 3A 20 48 24 B2 |. .";:Z.Z.1: H$.|
00000AE0: C8 28 48 24 2C 5A 29 3A 20 89 20 33 30 32 30 00 |.(H$,Z): . 3020.|
00000AF0: 00 13 EA 0B 8B 20 5A B1 34 20 A7 20 33 30 32 30 |..... Z.4 . 3020|
00000B00: 00 2B 13 F4 0B 8B 20 48 B1 34 37 20 AF 20 48 B3 |.+.... H.47 . H.|
00000B10: 35 38 20 A7 20 99 20 58 24 3B 3A 20 5A B2 5A AA |58 . . X$;: Z.Z.|
00000B20: 31 3A 20 48 24 B2 48 24 AA 58 24 00 36 13 FE 0B |1: H$.H$.X$.6...|
00000B30: 89 20 33 30 32 30 00 3C 13 08 0C 3A 00 56 13 1C |. 3020.<...:.V..|
00000B40: 0C 8F 20 5A 45 49 43 48 45 4E 20 55 45 42 45 52 |.. ZEICHEN UEBER|
00000B50: 4E 45 48 4D 45 4E 00 6E 13 26 0C 81 20 49 31 B2 |NEHMEN.n.&.. I1.|
00000B60: 31 20 A4 20 32 3A 20 A1 20 58 24 3A 20 82 00 87 |1 . 2: . X$: ...|
00000B70: 13 30 0C A1 20 58 24 3A 20 8B 20 58 24 B2 22 22 |.0.. X$: . X$.""|
00000B80: 20 A7 20 33 31 32 30 00 8D 13 3A 0C 8E 00 93 13 | . 3120...:.....|
00000B90: 44 0C 3A 00 CA 13 AC 0D 99 20 46 55 24 3B 22 20 |D.:...... FU$;" |
00000BA0: C2 49 54 54 45 20 45 4E 54 53 50 52 45 43 48 45 |.ITTE ENTSPRECHE|
00000BB0: 4E 44 45 53 20 DA 45 49 43 48 45 4E 20 45 49 4E |NDES .EICHEN EIN|
00000BC0: 47 45 42 45 4E 21 13 22 3A 8E 00 00 14 B6 0D 99 |GEBEN!.":.......|
00000BD0: 20 46 55 24 3B 22 20 CD 49 54 20 42 45 4C 49 45 | FU$;" .IT BELIE|
00000BE0: 42 49 47 45 52 20 D4 41 53 54 45 20 47 45 48 54 |BIGER .ASTE GEHT|
00000BF0: 20 45 53 20 57 45 49 54 45 52 20 21 13 22 3A 8E | ES WEITER !.":.|
00000C00: 00 06 14 C0 0D 3A 00 1A 14 88 13 99 20 46 55 24 |.....:...... FU$|
00000C10: 3B 42 4C 24 3B 22 13 22 3A 8E 00 31 14 EC 13 99 |;BL$;".":..1....|
00000C20: 20 C8 28 46 55 24 2C 32 33 29 3B 42 4C 24 3A 20 | .(FU$,23);BL$: |
00000C30: 8E 00 4C 14 60 EA 8F 20 5A 55 53 54 41 4E 44 53 |..L.`.. ZUSTANDS|
00000C40: 56 45 52 41 52 42 45 49 54 55 4E 47 00 66 14 6A |VERARBEITUNG.f.j|
00000C50: EA 46 56 B2 30 20 3A 20 8B 20 46 46 B2 37 20 A7 |.FV.0 : . FF.7 .|
00000C60: 20 36 30 37 30 30 00 7E 14 74 EA A1 20 46 46 24 | 60700.~.t.. FF$|
00000C70: 3A 20 8B 20 46 46 24 B2 22 22 20 A7 20 8E 00 8A |: . FF$."" . ...|
00000C80: 14 7E EA 8D 20 36 32 30 30 30 00 C5 14 88 EA 91 |.~.. 62000......|
00000C90: 20 46 46 20 89 20 36 30 31 30 30 2C 36 30 32 30 | FF . 60100,6020|
00000CA0: 30 2C 36 30 33 30 30 2C 36 30 34 30 30 2C 36 30 |0,60300,60400,60|
00000CB0: 35 30 30 2C 36 30 36 30 30 2C 36 30 37 30 30 2C |500,60600,60700,|
00000CC0: 36 30 38 30 30 00 CB 14 92 EA 8E 00 D1 14 9C EA |60800...........|
00000CD0: 3A 00 DE 14 C4 EA 46 56 B2 32 20 3A 20 8E 00 E4 |:.....FV.2 : ...|
00000CE0: 14 CE EA 3A 00 F0 14 28 EB 99 22 93 22 3A 20 80 |...:...(..".": .|
00000CF0: 00 F6 14 32 EB 3A 00 15 15 8C EB 8F 20 48 49 4C |...2.:...... HIL|
00000D00: 46 45 20 28 54 41 53 54 45 4E 42 45 4C 45 47 55 |FE (TASTENBELEGU|
00000D10: 4E 47 45 4E 29 00 40 15 96 EB 99 22 93 D7 41 45 |NGEN).@...."..AE|
00000D20: 48 52 45 4E 44 20 44 45 53 20 C1 42 4C 41 55 46 |HREND DES .BLAUF|
00000D30: 53 20 53 49 4E 44 20 46 4F 4C 47 45 4E 44 45 22 |S SIND FOLGENDE"|
00000D40: 00 6A 15 A0 EB 99 22 D3 54 45 55 45 52 55 4E 47 |.j....".TEUERUNG|
00000D50: 53 4D 4F 45 47 4C 49 43 48 4B 45 49 54 45 4E 20 |SMOEGLICHKEITEN |
00000D60: 47 45 47 45 42 45 4E 20 3A 22 00 A9 15 AA EB 81 |GEGEBEN :"......|
00000D70: 20 46 49 B2 31 20 A4 20 46 41 3A 99 20 22 11 20 | FI.1 . FA:. ". |
00000D80: 20 20 20 20 20 20 20 20 12 20 22 C8 28 46 59 24 | . ".(FY$|
00000D90: 28 46 49 29 2C 31 29 AA 22 20 92 20 3D 20 22 3B |(FI),1)." . = ";|
00000DA0: 46 59 24 28 46 49 29 3A 82 00 E1 15 B4 EB 99 22 |FY$(FI):......."|
00000DB0: 11 CD 49 54 20 5A 55 47 45 4C 41 53 53 45 4E 45 |..IT ZUGELASSENE|
00000DC0: 52 20 D4 41 53 54 45 20 57 45 49 54 45 52 20 21 |R .ASTE WEITER !|
00000DD0: 22 3A 20 8D 20 36 32 35 30 30 3A 20 46 38 B2 46 |": . 62500: F8.F|
00000DE0: 39 00 04 16 BE EB 8D 20 36 32 39 30 30 3A 8D 20 |9...... 62900:. |
00000DF0: 36 32 30 30 30 3A 8B 20 46 4B B2 30 20 A7 20 36 |62000:. FK.0 . 6|
00000E00: 30 33 35 30 00 21 16 C8 EB 99 22 93 22 3A 46 39 |0350.!....".":F9|
00000E10: B2 46 38 3A 8B 20 46 46 B2 35 20 A7 20 46 46 B2 |.F8:. FF.5 . FF.|
00000E20: 37 00 35 16 D2 EB 8B 20 46 46 B2 37 20 A7 20 46 |7.5.... FF.7 . F|
00000E30: 56 B2 33 3A 8E 00 41 16 DC EB 89 20 36 30 30 34 |V.3:..A.... 6004|
00000E40: 30 00 47 16 E6 EB 3A 00 6A 16 F0 EB 8F 20 50 41 |0.G...:.j.... PA|
00000E50: 52 41 4D 45 54 45 52 20 27 4C 41 4E 47 53 41 4D |RAMETER 'LANGSAM|
00000E60: 45 52 27 20 53 45 54 5A 45 4E 00 7B 16 FA EB 8B |ER' SETZEN.{....|
00000E70: 46 54 B3 38 30 A7 46 54 B2 38 30 00 90 16 04 EC |FT.80.FT.80.....|
00000E80: 8B 46 54 B1 31 33 30 30 A7 46 54 B2 31 33 30 30 |.FT.1300.FT.1300|
00000E90: 00 9E 16 0E EC 46 54 B2 46 54 AC 32 3A 8E 00 A4 |.....FT.FT.2:...|
00000EA0: 16 18 EC 3A 00 D7 16 54 EC 46 38 B2 46 39 3A 8D |...:...T.F8.F9:.|
00000EB0: 20 36 32 39 30 30 3A 8D 20 36 32 30 30 30 3A 8B | 62900:. 62000:.|
00000EC0: 20 46 46 B2 35 20 A7 20 46 46 B2 46 38 3A 8D 20 | FF.5 . FF.F8:. |
00000ED0: 36 32 35 30 30 3A 8E 00 E3 16 5E EC 89 20 36 30 |62500:....^.. 60|
00000EE0: 30 34 30 00 E9 16 68 EC 3A 00 0C 17 B8 EC 8F 20 |040...h.:...... |
00000EF0: 50 41 52 41 4D 45 54 45 52 20 27 53 43 48 4E 45 |PARAMETER 'SCHNE|
00000F00: 4C 4C 45 52 27 20 53 45 54 5A 45 4E 00 1D 17 C2 |LLER' SETZEN....|
00000F10: EC 8B 46 54 B1 38 30 A7 46 54 B2 38 30 00 2B 17 |..FT.80.FT.80.+.|
00000F20: CC EC 46 54 B2 46 54 AD 32 3A 8E 00 31 17 D6 EC |..FT.FT.2:..1...|
00000F30: 3A 00 5A 17 1C ED 8D 20 36 32 39 30 30 3A 20 8D |:.Z.... 62900: .|
00000F40: 20 36 32 30 30 30 3A 20 8B 20 46 4B B3 B1 30 20 | 62000: . FK..0 |
00000F50: AF 20 46 46 B2 37 20 A7 20 8E 00 66 17 26 ED 89 |. FF.7 . ..f.&..|
00000F60: 20 36 30 30 34 30 00 6C 17 30 ED 3A 00 79 17 80 | 60040.l.0.:.y..|
00000F70: ED 46 56 B2 31 20 3A 20 8E 00 7F 17 8A ED 3A 00 |.FV.1 : ......:.|
00000F80: AE 17 48 EE 81 20 4A B2 31 20 A4 20 46 54 3A 20 |..H.. J.1 . FT: |
00000F90: 82 3A 20 8E 20 3A 20 8F 20 56 45 52 5A 4F 45 47 |.: . : . VERZOEG|
00000FA0: 45 52 55 4E 47 53 53 43 48 4C 45 49 46 45 00 B4 |ERUNGSSCHLEIFE..|
00000FB0: 17 52 EE 3A 00 D5 17 30 F2 8F 20 54 41 53 54 45 |.R.:...0.. TASTE|
00000FC0: 4E 41 4E 41 4C 59 53 45 20 46 55 45 52 20 5A 55 |NANALYSE FUER ZU|
00000FD0: 53 54 41 4E 44 00 F6 17 3A F2 46 4B B2 30 3A 46 |STAND...:.FK.0:F|
00000FE0: 48 B2 C6 28 46 46 24 29 3A 8B 46 48 B3 B1 33 32 |H..(FF$):.FH..32|
00000FF0: A7 36 32 31 30 30 00 0C 18 44 F2 8B 46 46 B2 37 |.62100...D..FF.7|
00001000: A7 46 4B B2 37 3A 89 36 32 32 30 30 00 1C 18 4E |.FK.7:.62200...N|
00001010: F2 46 4B B2 35 3A 89 36 32 32 30 30 00 32 18 94 |.FK.5:.62200.2..|
00001020: F2 8B 46 48 B3 31 32 38 A7 46 48 B2 46 48 AA 31 |..FH.128.FH.FH.1|
00001030: 32 38 00 65 18 9E F2 81 20 46 49 B2 31 20 A4 20 |28.e.... FI.1 . |
00001040: 46 41 3A 8B C7 28 46 48 29 B2 CA 28 46 58 24 28 |FA:..(FH)..(FX$(|
00001050: 46 46 29 2C 46 49 2C 31 29 A7 46 4B B2 46 49 3A |FF),FI,1).FK.FI:|
00001060: 46 49 B2 46 41 00 73 18 A8 F2 82 3A 8B 46 4B B2 |FI.FA.s....:.FK.|
00001070: 30 A7 8E 00 8C 18 F8 F2 46 39 B2 46 46 3A 46 46 |0.......F9.FF:FF|
00001080: B2 46 4B 3A 8D 36 32 35 30 30 3A 8E 00 92 18 02 |.FK:.62500:.....|
00001090: F3 3A 00 AE 18 24 F4 8F 20 53 59 53 54 45 4D 5A |.:...$.. SYSTEMZ|
000010A0: 45 49 4C 45 20 53 43 48 52 45 49 42 45 4E 00 EC |EILE SCHREIBEN..|
000010B0: 18 2E F4 99 46 55 24 3B C8 28 22 12 22 AA 46 59 |....FU$;.(".".FY|
000010C0: 24 28 46 46 29 AA 22 92 20 20 20 20 20 20 20 20 |$(FF).". |
000010D0: 20 20 20 22 2C 31 36 29 AA 22 D4 41 53 54 45 4E | ",16).".ASTEN|
000010E0: 3A 20 22 3B 3A 46 58 24 B2 22 12 22 00 24 19 38 |: ";:FX$.".".$.8|
000010F0: F4 81 20 46 49 B2 31 20 A4 20 46 41 3A 20 46 48 |.. FI.1 . FA: FH|
00001100: 24 B2 CA 28 46 58 24 28 46 46 29 2C 46 49 2C 31 |$..(FX$(FF),FI,1|
00001110: 29 3A 20 8B 20 46 48 24 B2 22 2A 22 20 A7 20 36 |): . FH$."*" . 6|
00001120: 32 35 34 30 00 3A 19 42 F4 3A 20 46 58 24 B2 46 |2540.:.B.: FX$.F|
00001130: 58 24 AA 46 48 24 AA 22 2C 22 00 6C 19 4C F4 82 |X$.FH$.",".l.L..|
00001140: 3A 46 4C B2 C3 28 46 58 24 29 AB 31 3A 99 20 C8 |:FL..(FX$).1:. .|
00001150: 28 46 58 24 2C 46 4C 29 22 92 22 C8 28 42 4C 24 |(FX$,FL)".".(BL$|
00001160: 2C 31 36 AB 46 4C 29 22 13 22 3A 8E 00 72 19 56 |,16.FL)".":..r.V|
00001170: F4 3A 00 7F 19 B4 F5 8F 20 57 41 52 54 45 4E 00 |.:...... WARTEN.|
00001180: 9B 19 BE F5 A1 20 46 46 24 3A 20 8B 20 46 46 24 |..... FF$: . FF$|
00001190: B2 22 22 20 A7 20 36 32 39 31 30 00 A1 19 C8 F5 |."" . 62910.....|
000011A0: 8E 00 A7 19 D2 F5 3A 00 CB 19 18 F6 8F 20 49 4E |......:...... IN|
000011B0: 49 54 49 41 4C 49 53 49 45 52 55 4E 47 20 44 45 |ITIALISIERUNG DE|
000011C0: 52 20 53 54 45 55 45 52 55 4E 47 00 EC 19 22 F6 |R STEUERUNG...".|
000011D0: 97 20 35 33 32 37 32 2C 32 33 3A 86 20 46 58 24 |. 53272,23:. FX$|
000011E0: 28 31 30 29 2C 46 59 24 28 31 30 29 00 10 1A 2C |(10),FY$(10)...,|
000011F0: F6 46 39 B2 33 3A 46 41 B2 38 3A 42 4C 24 B2 22 |.F9.3:FA.8:BL$."|
00001200: 20 20 20 20 20 22 3A 46 55 24 B2 22 11 11 11 22 | ":FU$."..."|
00001210: 00 50 1A 36 F6 81 46 49 B2 31 A4 33 3A 42 4C 24 |.P.6..FI.1.3:BL$|
00001220: B2 42 4C 24 AA 42 4C 24 3A 46 55 24 B2 46 55 24 |.BL$.BL$:FU$.FU$|
00001230: AA 46 55 24 3A 82 3A 42 4C 24 B2 C8 28 42 4C 24 |.FU$:.:BL$..(BL$|
00001240: 2C 33 39 29 3A 46 55 24 B2 22 13 22 AA 46 55 24 |,39):FU$.".".FU$|
00001250: 00 8A 1A 40 F6 47 30 B2 20 20 39 38 35 3A 47 58 |...@.G0. 985:GX|
00001260: B2 34 30 3A 8F 20 49 46 20 50 45 45 4B 28 32 31 |.40:. IF PEEK(21|
00001270: 33 29 3D 37 39 20 20 54 48 45 4E 20 47 30 3D 33 |3)=79 THEN G0=3|
00001280: 32 36 38 39 3A 47 58 3D 38 30 00 90 1A 4A F6 3A |2689:GX=80...J.:|
00001290: 00 B6 1A 7C F6 46 58 24 28 31 29 B2 22 2A 2A 2A |...|.FX$(1)."***|
000012A0: 2A 2A 2A 2A 2A 22 3A 46 59 24 28 31 29 B2 22 C1 |*****":FY$(1).".|
000012B0: 4E 46 41 4E 47 22 00 DA 1A 86 F6 46 58 24 28 32 |NFANG".....FX$(2|
000012C0: 29 B2 22 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 46 59 24 |)."********":FY$|
000012D0: 28 32 29 B2 22 C5 4E 44 45 22 00 FF 1A 90 F6 46 |(2).".NDE".....F|
000012E0: 58 24 28 33 29 B2 22 C1 C5 2A 2A 2A 2A D7 DA 22 |X$(3)."..****.."|
000012F0: 3A 46 59 24 28 33 29 B2 22 C8 49 4C 46 45 22 00 |:FY$(3).".ILFE".|
00001300: 28 1B 9A F6 46 58 24 28 34 29 B2 22 C1 C5 C8 CC |(...FX$(4)."....|
00001310: D0 D3 D7 DA 22 3A 46 59 24 28 34 29 B2 22 CC 41 |....":FY$(4).".A|
00001320: 4E 47 53 41 4D 45 52 22 00 4D 1B A4 F6 46 58 24 |NGSAMER".M...FX$|
00001330: 28 35 29 B2 22 C1 C5 C8 CC D0 D3 D7 DA 22 3A 46 |(5)."........":F|
00001340: 59 24 28 35 29 B2 22 D0 41 55 53 45 22 00 76 1B |Y$(5).".AUSE".v.|
00001350: AE F6 46 58 24 28 36 29 B2 22 C1 C5 C8 CC D0 D3 |..FX$(6)."......|
00001360: D7 DA 22 3A 46 59 24 28 36 29 B2 22 D3 43 48 4E |..":FY$(6).".CHN|
00001370: 45 4C 4C 45 52 22 00 A3 1B B8 F6 46 58 24 28 37 |ELLER".....FX$(7|
00001380: 29 B2 22 C1 C5 C8 CC 2A D3 D7 DA 22 3A 46 59 24 |)."....*...":FY$|
00001390: 28 37 29 B2 22 D7 41 52 54 45 4E 2F D7 45 49 54 |(7).".ARTEN/.EIT|
000013A0: 45 52 22 00 CA 1B C2 F6 46 58 24 28 38 29 B2 22 |ER".....FX$(8)."|
000013B0: 2A 2A 2A 2A 2A 2A 2A 2A 22 3A 46 59 24 28 38 29 |********":FY$(8)|
000013C0: B2 22 DA 55 52 55 45 43 4B 22 00 F5 1B CC F6 46 |.".URUECK".....F|
000013D0: 58 24 28 39 29 B2 22 C5 2A 2A 2A 2A 2A 2A DA 22 |X$(9).".******."|
000013E0: 3A 46 59 24 28 39 29 B2 22 DA 55 53 41 45 54 5A |:FY$(9).".USAETZ|
000013F0: 4C 49 43 48 22 00 FB 1B E0 F6 8E 00 00 00 06 |LICH".......... |
..F.... DR. HANS J. MUELLER, GYMNASIUM B
EI ST. ANNA, AUGSBURG, 24.6.84...... MIT
ANREGUNGEN VON B. BROCKMANN, VERSION 2,
10.4.85.L.... SIEB DES ERATOSTHENES IM
BEREICH BIS 1000 ( MANUELL UND AUTOMATIS
CH ).R.(.:...D.. KONSTANTEN...N.. P(11).
?.X.P(0).2:P(1).3:P(2).5:P(3).7:P(4).11:
P(5).13:P(6).17:P(7).19:P(8).23:P(9).29.
U...P(10).31:P(11).37.....E$.". .
DAS SIEB DES ERATOSTHENES."...... 63000.
..... ************************* HAUPTPRO
GRAMM ******************************....
.. E$:.".... ES STEHEN FOLGENDE MOEGLICH
KEITEN ZUR".$...." AUSWAHL:".O...."...
. 1 . MANUELLES SIEBEN".~...."..
. 2 . AUTOMATISCHES SIEBEN":..
.&..".. . 0 . ENDE":. 3500.V.0.
. 3100: V.F(X$): . V.48 . V.51 . V.V.48:
. 600...:.. V.127 . V.V.128...D.. V.48
. V.69 . 60200...N.. 560...S.:.R.X.. E$:
. H(FU$,3)" IN WELCHEM HUNDERTERBEREICH
SIEBEN ?"...B.. H(FU$,5)" . 0 .
BEREICH 0 - 99":..H.L..I.1.2:Y.I
.100:." . "D(I)" . BEREICH "Y" -
"Y.99:....V..:." :":." :.".
&....I.7.9:Y.I.100:." . "D(I)" .
BEREICH "Y" - "Y.99:..,.....B.... ".
. Z . ZURUECK ZUM VERTEILER":. 35
00...... 3100:Z.F(X$):. Z.47 . Z.58 . Z.
Z.48:N.Z.100:N1.N.99:. 700...... Z.127 .
Z.Z.128.I.... Z.90 . 500...... Z.69 . 6
0200...... 670.....:.....FV.0:. 1000: .
TABELLE SCHREIBEN.#.F.. V . 800,900.@.P.
. FV.1 . 600,600,500,700...Z.. *********
************ ENDE DES HAUPTPROGRAMMS ***
*********************.....:... .. MANUEL
LE STEUERUNG...*.. H(FU$,23)"WELCHES SIE
B ( 1 -"N1") ? ";: FF.7: . 840. .4.. "."
BL$".LETZTES SIEB : ";S:F8.FF:FF.7:. 625
00:FF.F8.P.>.. H(FU$,23)"NAECHSTES SIEB
( 1 - "N1") ? ";.Y.H.. 3100: Z.F(X$): .
Z.47 . Z.58 . 860...J.. Z.127 . Z.Z.128.
..L.. Z.90 . FV.1: ....N.. Z.65 . FV.2:
..L.P.. Z.69 . 60200.V.R.. 840...W.:...\
..3000:. 5100:. S.1 . S.N1 . 830.".F.. 6
2500: . 2000: . FV.0 . 820.(.P.....Z.:.G
.... AUTOMAT. STEUERUNG.G...FF.7:. 62500
: M..(.(N.101))...... T.0 . 11:. P(T).M
. M.T.1:T.11............ L.0 . M:S.P(L):
. 2000:. FV.0 . L.M.M....: . FV.0 . ....
... 3510: . 3100 : ....J.:...... TABELLE
VON N BIS N+99...... E$.%...:. J.0 . 90
. 10.W...: . I.J.N . 9.J.N : .I.0.I.1.
." ";:. 1050.X...: A$." ".D(I):.
I(A$,4);.....: . I:.:. GX.80 . ....$.. J
: ......:...P.. DURCHFUEHRUNG DES SIEBES
.W.Z.S$.D(S):S$.J(S$,2)......".JETZT WIR
D MIT DEM .";S$;"-ER SIEB. GESIEBT!"....
.. S.N1 . ..A...J..(N.S).S: . J.0 . J.S.
S: . 2045.Y.... J.N . J.S . J.J.S.H....
J.N1 . ..{.... I.J . N1 . S.....:. F.1 .
FT:.:. 60000:. FV.0 . I.N1: . 2090.Y...
:I1.I.N:U..(I1.10):R.(I1.U.10).4: U.U.2.
3... .Q.G0.U.GX.R:. T.Q . Q.2:. T,160:..
..".:. H(FU$,U);.R);" ".C.%.:. PRINT
LEFT$(FU$,U);TAB(R);" ";.I.*...O.4...
U.>.:.|.... UP *** EINGABE NATUERL. ZAHL
***...B.Z.1:H$.X$:.X$;...L.. 3100...V.H
.F(X$):. H.13 . S.E(H$): ....... H.20 .
Z.0 . .". .";:Z.Z.1: H$.H(H$,Z): . 3020.
..... Z.4 . 3020.+.... H.47 . H.58 . . X
$;: Z.Z.1: H$.H$.X$.6.... 3020.<...:.V..
.. ZEICHEN UEBERNEHMEN.N.&.. I1.1 . 2: .
X$: ....0.. X$: . X$."" . 3120...:.....
D.:.J.... FU$;" BITTE ENTSPRECHENDES ZEI
CHEN EINGEBEN!.":....... FU$;" MIT BELIE
BIGER TASTE GEHT ES WEITER !.":......:..
.... FU$;BL$;".":..1.... H(FU$,23);BL$:
..L.`.. ZUSTANDSVERARBEITUNG.F.J.FV.0 :
. FF.7 . 60700.~.T.. FF$: . FF$."" . ...
.~.. 62000.E.... FF . 60100,60200,60300,
60400,60500,60600,60700,60800.K.....Q...
:...D.FV.2 : ....N.:...(..".": ....2.:..
.... HILFE (TASTENBELEGUNGEN).@....".WAE
HREND DES ABLAUFS SIND FOLGENDE".J. .."S
TEUERUNGSMOEGLICHKEITEN GEGEBEN :"......
FI.1 . FA:. ". . "H(FY$(FI),1).
" . = ";FY$(FI):.......".MIT ZUGELASSENE
R TASTE WEITER !": . 62500: F8.F9......
62900:. 62000:. FK.0 . 60350.!.H..".":F9
.F8:. FF.5 . FF.7.5.R.. FF.7 . FV.3:..A.
... 60040.G...:.J.... PARAMETER 'LANGSAM
ER' SETZEN.{....FT.80.FT.80......FT.1300
.FT.1300.....FT.FT.2:......:.W.T.F8.F9:.
62900:. 62000:. FF.5 . FF.F8:. 62500:..
..^.. 60040...H.:...... PARAMETER 'SCHNE
LLER' SETZEN...B..FT.80.FT.80.+.L.FT.FT.
2:..1.V.:.Z.... 62900: . 62000: . FK..0
. FF.7 . ..F.&.. 60040.L.0.:.Y...FV.1 :
.....:...H.. J.1 . FT: .: . : . VERZOEG
ERUNGSSCHLEIFE...R.:.U.0.. TASTENANALYSE
FUER ZUSTAND...:.FK.0:FH.F(FF$):.FH..32
.62100...D..FF.7.FK.7:.62200...N.FK.5:.6
2200.2....FH.128.FH.FH.128.E.... FI.1 .
FA:.G(FH).J(FX$(FF),FI,1).FK.FI:FI.FA.S.
...:.FK.0.......F9.FF:FF.FK:.62500:.....
.:...$.. SYSTEMZEILE SCHREIBEN......FU$;
H(".".FY$(FF).". ",16)."TASTEN
: ";:FX$.".".$.8.. FI.1 . FA: FH$.J(FX$(
FF),FI,1): . FH$."*" . 62540.:.B.: FX$.F
X$.FH$.",".L.L..:FL.C(FX$).1:. H(FX$,FL)
"."H(BL$,16.FL)".":..R.V.:..... WARTEN.
..... FF$: . FF$."" . 62910...H.....R.:.
K.... INITIALISIERUNG DER STEUERUNG...".
. 53272,23:. FX$(10),FY$(10)...,.F9.3:FA
.8:BL$." ":FU$."...".P.6..FI.1.3:BL$
.BL$.BL$:FU$.FU$.FU$:.:BL$.H(BL$,39):FU$
.".".FU$...@.G0. 985:GX.40:. IF PEEK(21
3)=79 THEN G0=32689:GX=80...J.:...|.FX$
(1)."********":FY$(1)."ANFANG".Z...FX$(2
)."********":FY$(2)."ENDE".....FX$(3)."A
E****WZ":FY$(3)."HILFE".(...FX$(4)."AEHL
PSWZ":FY$(4)."LANGSAMER".M...FX$(5)."AEH
LPSWZ":FY$(5)."PAUSE".V...FX$(6)."AEHLPS
WZ":FY$(6)."SCHNELLER".....FX$(7)."AEHL*
SWZ":FY$(7)."WARTEN/WEITER".J.B.FX$(8)."
********":FY$(8)."ZURUECK"...L.FX$(9)."E
******Z":FY$(9)."ZUSAETZLICH"..........
> CLICK IMAGE PREVIEW FOR FULL MODAL