7/2LEKTION.8
FILE INFORMATION
FILENAME(S): 7/2LEKTION.8
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-02 22:11:45
APPEARS ON: 1 disk(s)
FILE HASH
8bc68b85ea224b51854185f59f82a79d162bfe5abdb38642e0c926c6fdfad7f5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C 64 | 7/2LEKTION.8 | PRG | Treasure Chest - ToGuMi | 12 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 2E 04 0A 00 97 34 35 2C C2 28 31 37 34 29 |.......45,.(174)| 00000010: 3A 97 34 36 2C C2 28 31 37 35 29 3A 9C 3A 97 37 |:.46,.(175):.:.7| 00000020: 38 38 2C 35 32 3A 97 36 35 37 2C 31 32 38 00 52 |88,52:.657,128.R| 00000030: 04 14 00 97 35 33 32 38 30 2C 31 3A 97 35 33 32 |....53280,1:.532| 00000040: 38 31 2C 31 3A 5A 24 B2 C7 28 33 34 29 3A 89 31 |81,1:Z$..(34):.1| 00000050: 32 30 00 84 04 1E 00 99 22 93 1E 22 3A 81 49 B2 |20......"..":.I.| 00000060: 31 A4 33 39 3A 99 43 24 3B 3A 82 3A 81 49 B2 31 |1.39:.C$;:.:.I.1| 00000070: A4 32 32 3A 99 22 9D 11 22 43 24 3B 3A 82 3A 99 |.22:.".."C$;:.:.| 00000080: 22 9D 22 3B 00 A1 04 28 00 81 49 B2 31 A4 33 38 |".";...(..I.1.38| 00000090: 3A 99 22 9D 22 43 24 22 9D 22 3B 3A 82 3A 99 43 |:."."C$".";:.:.C| 000000A0: 24 00 BC 04 32 00 81 49 B2 31 A4 32 33 3A 99 22 |$...2..I.1.23:."| 000000B0: 91 22 43 24 22 9D 22 3B 3A 82 3A 8E 00 CE 04 3C |."C$".";:.:....<| 000000C0: 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 30 00 D6 |..A$:.A$."".60..| 000000D0: 04 46 00 99 3A 8E 00 F9 04 50 00 99 22 13 22 3A |.F..:....P..".":| 000000E0: 81 49 B2 30 A4 59 AB 31 3A 99 22 11 22 3B 3A 82 |.I.0.Y.1:.".";:.| 000000F0: 3A 99 22 91 91 22 3B 3A 8E 00 32 05 5A 00 81 4A |:."..";:..2.Z..J| 00000100: B2 31 A4 31 35 3A 99 22 3E 22 3B 3A 81 49 B2 31 |.1.15:.">";:.I.1| 00000110: A4 34 30 3A 82 3A 99 22 9D 12 3E 92 9D 22 3B 3A |.40:.:."..>..";:| 00000120: 81 4B B2 31 A4 32 30 3A 82 3A 82 3A 99 22 20 22 |.K.1.20:.:.:." "| 00000130: 3A 8E 00 77 05 64 00 59 B2 59 31 3A 8D 38 30 3A |:..w.d.Y.Y1:.80:| 00000140: 81 49 B2 30 A4 59 32 AB 59 31 3A 99 22 20 20 20 |.I.0.Y2.Y1:." | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000170: 20 20 20 20 22 3A 82 00 81 05 6E 00 8D 38 30 3A | ":....n..80:| 00000180: 8E 00 A8 05 78 00 99 22 93 22 A3 31 30 29 22 1C |....x..".".10)".| 00000190: 46 4F 52 2E 2E 2E 4E 45 58 54 2D 42 45 46 45 48 |FOR...NEXT-BEFEH| 000001A0: 4C 45 20 22 3A 8D 36 30 00 D5 05 82 00 99 22 1F |LE ":.60......".| 000001B0: 44 45 52 20 81 46 4F 52 2E 2E 2E 4E 45 58 54 1F |DER .FOR...NEXT.| 000001C0: 2D 42 45 46 45 48 4C 20 57 49 52 44 20 42 45 4E |-BEFEHL WIRD BEN| 000001D0: 55 54 5A 54 2C 00 20 06 8C 00 99 22 57 45 4E 4E |UTZT,. ...."WENN| 000001E0: 20 45 49 4E 45 20 42 45 53 54 49 4D 4D 54 45 81 | EINE BESTIMMTE.| 000001F0: 20 41 4E 5A 41 48 4C 20 56 4F 4E 20 53 43 48 4C | ANZAHL VON SCHL| 00000200: 45 49 46 45 4E 1F 41 55 53 47 45 46 55 45 48 52 |EIFEN.AUSGEFUEHR| 00000210: 54 20 57 45 52 44 45 4E 20 53 4F 4C 4C 45 4E 2E |T WERDEN SOLLEN.| 00000220: 00 4F 06 96 00 8D 36 30 3A 99 22 44 41 53 20 46 |.O....60:."DAS F| 00000230: 4F 4C 47 45 4E 44 45 20 50 52 4F 47 52 41 4D 4D |OLGENDE PROGRAMM| 00000240: 20 53 4F 4C 4C 20 44 49 45 20 57 45 52 54 45 00 | SOLL DIE WERTE.| 00000250: 90 06 A0 00 99 22 45 49 4E 45 53 20 56 45 4B 54 |....."EINES VEKT| 00000260: 4F 52 53 20 5A 55 4E 41 45 43 48 53 54 20 45 49 |ORS ZUNAECHST EI| 00000270: 4E 4C 45 53 45 4E 20 55 4E 44 22 3A 99 22 44 41 |NLESEN UND":."DA| 00000280: 4E 4E 20 44 52 55 43 4B 45 4E 2E 22 3A 8D 36 30 |NN DRUCKEN.":.60| 00000290: 00 D6 06 AA 00 99 22 1E 20 32 20 46 4F 52 20 49 |......". 2 FOR I| 000002A0: 3D 31 20 54 4F 20 31 30 22 3A 99 22 20 34 20 52 |=1 TO 10":." 4 R| 000002B0: 45 41 44 20 41 28 49 29 22 3A 99 22 20 36 20 50 |EAD A(I)":." 6 P| 000002C0: 52 49 4E 54 20 41 28 49 29 22 3A 99 22 20 38 20 |RINT A(I)":." 8 | 000002D0: 4E 45 58 54 20 49 00 1F 07 B4 00 99 22 20 39 20 |NEXT I......" 9 | 000002E0: 44 41 54 41 20 33 2E 31 2C 31 2E 34 2C 38 2C 39 |DATA 3.1,1.4,8,9| 000002F0: 2E 34 2C 32 2C 35 2C 37 2C 38 2E 36 2C 33 2C 31 |.4,2,5,7,8.6,3,1| 00000300: 34 2E 37 22 3A 8D 36 30 3A 99 22 1F 44 45 52 20 |4.7":.60:.".DER | 00000310: 81 12 46 4F 52 92 1F 2D 42 45 46 45 48 4C 22 00 |..FOR..-BEFEHL".| 00000320: 28 07 BE 00 59 B2 31 31 00 60 07 C8 00 8D 38 30 |(...Y.11.`....80| 00000330: 3A 8D 39 30 3A 8D 36 30 3A 59 B2 31 37 3A 8D 38 |:.90:.60:Y.17:.8| 00000340: 30 3A 99 A3 31 35 29 22 42 45 57 49 52 4B 54 20 |0:..15)"BEWIRKT | 00000350: 44 49 45 20 57 49 45 44 45 52 48 4F 4C 55 4E 47 |DIE WIEDERHOLUNG| 00000360: 00 A0 07 D2 00 99 22 44 45 52 20 41 4E 57 45 49 |......"DER ANWEI| 00000370: 53 55 4E 47 45 4E 2C 44 49 45 20 56 4F 52 20 44 |SUNGEN,DIE VOR D| 00000380: 45 4D 20 81 12 4E 45 58 54 92 1F 2D 42 45 46 45 |EM ..NEXT..-BEFE| 00000390: 48 4C 22 3A 59 B2 31 34 3A 8D 36 30 3A 8D 38 30 |HL":Y.14:.60:.80| 000003A0: 00 DC 07 DC 00 8D 39 30 3A 8D 36 30 3A 59 B2 31 |......90:.60:Y.1| 000003B0: 39 3A 8D 38 30 3A 99 22 53 54 45 48 45 4E 2C 20 |9:.80:."STEHEN, | 000003C0: 53 4F 4C 41 4E 47 45 20 42 49 53 20 44 45 52 20 |SOLANGE BIS DER | 000003D0: 45 4E 44 57 45 52 54 20 46 55 45 52 00 09 08 E6 |ENDWERT FUER....| 000003E0: 00 99 22 44 49 45 20 56 41 52 49 41 42 4C 45 20 |.."DIE VARIABLE | 000003F0: 49 20 28 49 3D 31 30 29 20 45 52 52 45 49 43 48 |I (I=10) ERREICH| 00000400: 54 20 49 53 54 2E 22 3A 99 00 35 08 F0 00 99 22 |T IST.":..5...."| 00000410: 44 49 45 20 41 4E 57 45 49 53 55 4E 47 45 4E 20 |DIE ANWEISUNGEN | 00000420: 57 45 52 44 45 4E 20 41 4C 53 4F 20 46 55 45 52 |WERDEN ALSO FUER| 00000430: 20 49 3D 31 2C 00 5F 08 FA 00 99 22 46 55 45 52 | I=1,._...."FUER| 00000440: 20 49 3D 32 2C 20 55 53 57 20 42 49 53 20 49 3D | I=2, USW BIS I=| 00000450: 31 30 20 41 55 53 47 45 46 55 45 48 52 54 2E 00 |10 AUSGEFUEHRT..| 00000460: A6 08 04 01 8D 36 30 3A 59 31 B2 31 37 3A 59 32 |.....60:Y1.17:Y2| 00000470: B2 32 33 3A 8D 31 30 30 3A 8D 38 30 3A 99 22 1C |.23:.100:.80:.".| 00000480: 42 45 4D 2E 3A 5A 55 20 4A 45 44 45 4D 20 12 46 |BEM.:ZU JEDEM .F| 00000490: 4F 52 92 2D 42 45 46 45 48 4C 20 47 45 48 4F 45 |OR.-BEFEHL GEHOE| 000004A0: 52 54 20 45 49 4E 00 C0 08 0E 01 99 22 20 20 20 |RT EIN......" | 000004B0: 20 20 12 4E 45 58 54 92 2D 42 45 46 45 48 4C 2E | .NEXT.-BEFEHL.| 000004C0: 00 F0 08 18 01 8D 36 30 3A 99 22 1F 93 45 49 4E |......60:."..EIN| 000004D0: 45 20 53 45 48 52 20 4E 55 45 54 5A 4C 49 43 48 |E SEHR NUETZLICH| 000004E0: 45 20 45 52 47 41 45 4E 5A 55 4E 47 20 5A 55 4D |E ERGAENZUNG ZUM| 000004F0: 00 26 09 22 01 99 22 12 81 46 4F 52 92 1F 2D 42 |.&.".."..FOR..-B| 00000500: 45 46 45 48 4C 20 49 53 54 20 44 49 45 20 81 12 |EFEHL IST DIE ..| 00000510: 53 54 45 50 92 1F 2D 41 4E 57 45 49 53 55 4E 47 |STEP..-ANWEISUNG| 00000520: 2E 22 3A 99 3A 99 00 55 09 2C 01 99 22 4D 49 54 |.":.:..U.,.."MIT| 00000530: 20 44 45 52 81 20 12 53 54 45 50 92 1F 2D 41 4E | DER. .STEP..-AN| 00000540: 57 45 49 53 55 4E 47 20 4C 45 47 45 4E 20 53 49 |WEISUNG LEGEN SI| 00000550: 45 20 44 49 45 00 87 09 36 01 99 22 81 53 43 48 |E DIE...6..".SCH| 00000560: 52 49 54 54 57 45 49 54 45 20 49 4D 20 12 46 4F |RITTWEITE IM .FO| 00000570: 52 2E 2E 2E 4E 45 58 54 92 1F 2D 42 45 46 45 48 |R...NEXT..-BEFEH| 00000580: 4C 20 46 45 53 54 2E 00 A5 09 40 01 99 22 48 49 |L FEST....@.."HI| 00000590: 45 52 20 45 49 4E 20 42 45 49 53 50 49 45 4C 3A |ER EIN BEISPIEL:| 000005A0: 22 3A 8D 36 30 00 BD 09 4A 01 99 22 1E 20 32 20 |":.60...J..". 2 | 000005B0: 20 46 4F 52 20 49 3D 31 20 54 4F 20 36 00 0D 0A | FOR I=1 TO 6...| 000005C0: 54 01 99 22 20 34 20 20 52 45 41 44 20 41 28 49 |T.." 4 READ A(I| 000005D0: 29 22 3A 99 22 20 36 20 20 4E 45 58 54 20 49 22 |)":." 6 NEXT I"| 000005E0: 3A 99 22 20 38 20 20 46 4F 52 20 49 3D 36 20 54 |:." 8 FOR I=6 T| 000005F0: 4F 20 31 20 53 54 45 50 20 2D 31 22 3A 99 22 20 |O 1 STEP -1":." | 00000600: 31 30 20 50 52 49 4E 54 20 41 28 49 29 00 48 0A |10 PRINT A(I).H.| 00000610: 5E 01 99 22 20 31 32 20 4E 45 58 54 20 49 22 3A |^.." 12 NEXT I":| 00000620: 99 22 20 31 34 20 44 41 54 41 20 33 2E 32 2C 20 |." 14 DATA 3.2, | 00000630: 32 2C 20 35 2E 31 2C 20 30 2E 31 2C 20 36 36 2C |2, 5.1, 0.1, 66,| 00000640: 20 2E 37 22 3A 8D 36 30 00 8E 0A 68 01 99 22 1F | .7":.60...h..".| 00000650: 5A 55 4E 41 45 43 48 53 54 20 57 45 52 44 45 4E |ZUNAECHST WERDEN| 00000660: 20 44 49 45 20 44 41 54 45 4E 20 49 4D 20 56 45 | DIE DATEN IM VE| 00000670: 4B 54 4F 52 20 41 20 20 47 45 53 50 45 49 43 48 |KTOR A GESPEICH| 00000680: 45 52 54 2E 22 3A 59 B2 31 31 3A 8D 36 30 00 C3 |ERT.":Y.11:.60..| 00000690: 0A 72 01 8D 38 30 3A 81 4D B2 31 A4 32 30 3A 99 |.r..80:.M.1.20:.| 000006A0: A3 39 29 22 12 41 28 49 29 91 22 3A 99 A3 39 29 |.9)".A(I).":..9)| 000006B0: 22 41 28 49 29 91 22 3A 81 4C B2 31 A4 36 30 3A |"A(I).":.L.1.60:| 000006C0: 82 3A 82 00 FD 0A 7C 01 59 B2 32 30 3A 8D 38 30 |.:....|.Y.20:.80| 000006D0: 3A 99 22 55 4E 44 20 44 41 4E 4E 20 57 45 52 44 |:."UND DANN WERD| 000006E0: 45 4E 20 44 49 45 20 44 41 54 45 4E 20 49 4E 20 |EN DIE DATEN IN | 000006F0: 44 45 52 20 5A 57 45 49 54 45 4E 22 3B 00 22 0B |DER ZWEITEN";.".| 00000700: 86 01 99 22 53 43 48 4C 45 49 46 45 20 28 5A 45 |..."SCHLEIFE (ZE| 00000710: 49 4C 45 20 38 20 42 49 53 20 31 32 29 22 3A 8D |ILE 8 BIS 12)":.| 00000720: 36 30 00 42 0B 90 01 81 59 B2 31 32 A4 31 34 3A |60.B....Y.12.14:| 00000730: 8D 38 30 3A 8D 39 30 3A 82 3A 59 B2 32 31 3A 8D |.80:.90:.:Y.21:.| 00000740: 38 30 00 74 0B 9A 01 99 3A 99 22 49 4E 20 55 4D |80.t....:."IN UM| 00000750: 47 45 4B 45 48 52 54 45 52 20 52 45 49 48 45 4E |GEKEHRTER REIHEN| 00000760: 46 4F 4C 47 45 20 47 45 44 52 55 43 4B 54 2E 22 |FOLGE GEDRUCKT."| 00000770: 3A 8D 36 30 00 A3 0B A4 01 99 22 44 41 20 44 49 |:.60......"DA DI| 00000780: 45 20 53 43 48 52 49 54 54 57 45 49 54 45 20 2D |E SCHRITTWEITE -| 00000790: 31 20 42 45 54 52 41 45 47 54 2C 20 48 41 54 20 |1 BETRAEGT, HAT | 000007A0: 12 49 92 00 EB 0B AE 01 99 22 5A 55 4E 41 45 43 |.I......."ZUNAEC| 000007B0: 48 53 54 20 44 45 4E 20 57 45 52 54 20 36 2C 20 |HST DEN WERT 6, | 000007C0: 44 41 4E 4E 20 49 3D 35 20 55 53 57 20 42 49 53 |DANN I=5 USW BIS| 000007D0: 22 3A 99 22 53 43 48 4C 49 45 53 53 4C 49 43 48 |":."SCHLIESSLICH| 000007E0: 20 47 49 4C 54 3A 20 49 3D 31 2E 00 1D 0C B8 01 | GILT: I=1......| 000007F0: 8D 36 30 3A 99 3A 99 22 57 45 4E 4E 20 4B 45 49 |.60:.:."WENN KEI| 00000800: 4E 45 20 53 43 48 52 49 54 54 57 45 49 54 45 20 |NE SCHRITTWEITE | 00000810: 41 4E 47 45 47 45 42 45 4E 20 49 53 54 00 4B 0C |ANGEGEBEN IST.K.| 00000820: C2 01 99 22 81 28 12 53 54 45 50 92 20 57 55 52 |...".(.STEP. WUR| 00000830: 44 45 20 57 45 47 47 45 4C 41 53 53 45 4E 29 1F |DE WEGGELASSEN).| 00000840: 2C 20 44 41 4E 4E 20 57 49 52 44 00 72 0C CC 01 |, DANN WIRD.r...| 00000850: 99 22 44 49 45 20 81 53 43 48 52 49 54 54 57 45 |."DIE .SCHRITTWE| 00000860: 49 54 45 20 31 1F 20 46 45 53 54 47 45 4C 45 47 |ITE 1. FESTGELEG| 00000870: 54 2E 00 A6 0C D6 01 8D 36 30 3A 99 22 93 44 45 |T.......60:.".DE| 00000880: 52 20 81 46 4F 52 2E 2E 2E 1F 2D 42 45 46 45 48 |R .FOR....-BEFEH| 00000890: 4C 20 48 41 54 20 44 41 53 20 46 4F 52 4D 41 54 |L HAT DAS FORMAT| 000008A0: 3A 22 3A 8D 36 30 00 E0 0C E0 01 99 22 12 81 5A |:":.60......"..Z| 000008B0: 45 49 4C 45 4E 23 92 20 46 4F 52 20 12 56 41 52 |EILEN#. FOR .VAR| 000008C0: 49 41 42 4C 45 92 20 3D 20 12 59 92 20 54 4F 20 |IABLE. = .Y. TO | 000008D0: 12 5A 92 20 53 54 45 50 20 12 53 22 3A 8D 36 30 |.Z. STEP .S":.60| 000008E0: 00 2B 0D EA 01 99 22 1F 57 4F 42 45 49 20 12 59 |.+....".WOBEI .Y| 000008F0: 2C 20 5A 2C 20 55 4E 44 20 53 92 20 5A 41 48 4C |, Z, UND S. ZAHL| 00000900: 45 4E 2C 20 56 41 52 49 41 42 4C 45 4E 20 22 3A |EN, VARIABLEN ":| 00000910: 99 22 4F 44 45 52 20 54 45 52 4D 45 20 53 45 49 |."ODER TERME SEI| 00000920: 4E 20 4B 4F 45 4E 4E 45 4E 2E 22 00 33 0D F4 01 |N KOENNEN.".3...| 00000930: 8D 36 30 00 60 0D FE 01 99 22 44 45 52 81 20 4E |.60.`...."DER. N| 00000940: 45 58 54 1F 2D 42 45 46 45 48 4C 20 48 41 54 20 |EXT.-BEFEHL HAT | 00000950: 44 41 53 20 46 4F 52 4D 41 54 3A 22 3A 8D 36 30 |DAS FORMAT:":.60| 00000960: 00 86 0D 08 02 99 22 12 81 5A 45 49 4C 45 4E 23 |......"..ZEILEN#| 00000970: 92 20 4E 45 58 54 20 12 56 41 52 49 41 42 4C 45 |. NEXT .VARIABLE| 00000980: 1F 22 3A 8D 36 30 00 CD 0D 12 02 99 22 57 4F 42 |.":.60......"WOB| 00000990: 45 49 20 44 49 45 20 47 4C 45 49 43 48 45 20 12 |EI DIE GLEICHE .| 000009A0: 56 41 52 49 41 42 4C 45 92 20 57 49 45 20 49 4D |VARIABLE. WIE IM| 000009B0: 22 3A 99 22 81 46 4F 52 1F 2D 42 45 46 45 48 4C |":.".FOR.-BEFEHL| 000009C0: 20 42 45 4E 55 54 5A 54 20 57 45 52 44 00 D5 0D | BENUTZT WERD...| 000009D0: 1C 02 8D 36 30 00 0D 0E 26 02 43 24 B2 22 12 20 |...60...&.C$.". | 000009E0: 22 3A 8D 33 30 3A 99 22 11 11 11 11 1D 1D 1D 1D |":.30:."........| 000009F0: 1D 1D 1D 1C 45 4E 44 45 20 56 4F 4E 20 4C 45 4B |....ENDE VON LEK| 00000A00: 54 49 4F 4E 20 37 20 54 45 49 4C 20 32 00 52 0E |TION 7 TEIL 2.R.| 00000A10: 30 02 99 22 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1F |0.."............| 00000A20: 42 49 54 54 45 20 57 41 52 54 45 4E 20 53 49 45 |BITTE WARTEN SIE| 00000A30: 2C 20 42 49 53 20 54 45 49 4C 20 33 22 3A 99 A3 |, BIS TEIL 3":..| 00000A40: 37 29 22 45 49 4E 47 45 4C 45 53 45 4E 20 49 53 |7)"EINGELESEN IS| 00000A50: 54 2E 00 63 0E 3A 02 99 22 11 11 11 11 11 11 11 |T..c.:..".......| 00000A60: 11 11 11 00 79 0E 44 02 93 22 37 2F 33 4C 45 4B |....y.D.."7/3LEK| 00000A70: 54 49 4F 4E 2E 38 22 2C 38 00 00 00 20 4C |TION.8",8... L |
.......45,B(174):.46,B(175):.:.788,52:.6
57,128.R....53280,1:.53281,1:Z$.G(34):.1
20......"..":.I.1.39:.C$;:.:.I.1.22:."..
"C$;:.:.".";...(..I.1.38:."."C$".";:.:.C
$...2..I.1.23:."."C$".";:.:..N.<..A$:.A$
."".60.V.F..:....P..".":.I.0.Y.1:.".";:.
:."..";:..2.Z..J.1.15:.">";:.I.1.40:.:."
..>..";:.K.1.20:.:.:." ":..W.D.Y.Y1:.80:
.I.0.Y2.Y1:."
":....N..80:....X..".".10)".
FOR...NEXT-BEFEHLE ":.60.U....".DER .FOR
...NEXT.-BEFEHL WIRD BENUTZT,. ...."WENN
EINE BESTIMMTE. ANZAHL VON SCHLEIFEN.AU
SGEFUEHRT WERDEN SOLLEN..O....60:."DAS F
OLGENDE PROGRAMM SOLL DIE WERTE... .."EI
NES VEKTORS ZUNAECHST EINLESEN UND":."DA
NN DRUCKEN.":.60.V....". 2 FOR I=1 TO 10
":." 4 READ A(I)":." 6 PRINT A(I)":." 8
NEXT I......" 9 DATA 3.1,1.4,8,9.4,2,5,7
,8.6,3,14.7":.60:.".DER ..FOR..-BEFEHL".
(...Y.11.`.H..80:.90:.60:Y.17:.80:..15)"
BEWIRKT DIE WIEDERHOLUNG. .R.."DER ANWEI
SUNGEN,DIE VOR DEM ..NEXT..-BEFEHL":Y.14
:.60:.80......90:.60:Y.19:.80:."STEHEN,
SOLANGE BIS DER ENDWERT FUER......"DIE V
ARIABLE I (I=10) ERREICHT IST.":..5...."
DIE ANWEISUNGEN WERDEN ALSO FUER I=1,._.
..."FUER I=2, USW BIS I=10 AUSGEFUEHRT..
.....60:Y1.17:Y2.23:.100:.80:.".BEM.:ZU
JEDEM .FOR.-BEFEHL GEHOERT EIN......"
.NEXT.-BEFEHL.......60:."..EINE SEHR N
UETZLICHE ERGAENZUNG ZUM.&.".."..FOR..-B
EFEHL IST DIE ..STEP..-ANWEISUNG.":.:..U
.,.."MIT DER. .STEP..-ANWEISUNG LEGEN SI
E DIE...6..".SCHRITTWEITE IM .FOR...NEXT
..-BEFEHL FEST....@.."HIER EIN BEISPIEL:
":.60...J..". 2 FOR I=1 TO 6...T.." 4
READ A(I)":." 6 NEXT I":." 8 FOR I=6 T
O 1 STEP -1":." 10 PRINT A(I).H.^.." 12
NEXT I":." 14 DATA 3.2, 2, 5.1, 0.1, 66,
.7":.60...H..".ZUNAECHST WERDEN DIE DAT
EN IM VEKTOR A GESPEICHERT.":Y.11:.60.C
.R..80:.M.1.20:..9)".A(I).":..9)"A(I).":
.L.1.60:.:....|.Y.20:.80:."UND DANN WERD
EN DIE DATEN IN DER ZWEITEN";."...."SCHL
EIFE (ZEILE 8 BIS 12)":.60.B....Y.12.14:
.80:.90:.:Y.21:.80.T....:."IN UMGEKEHRTE
R REIHENFOLGE GEDRUCKT.":.60......"DA DI
E SCHRITTWEITE -1 BETRAEGT, HAT .I......
."ZUNAECHST DEN WERT 6, DANN I=5 USW BIS
":."SCHLIESSLICH GILT: I=1.......60:.:."
WENN KEINE SCHRITTWEITE ANGEGEBEN IST.K.
B..".(.STEP. WURDE WEGGELASSEN)., DANN W
IRD.R.L.."DIE .SCHRITTWEITE 1. FESTGELEG
T....V..60:.".DER .FOR....-BEFEHL HAT DA
S FORMAT:":.60......"..ZEILEN#. FOR .VAR
IABLE. = .Y. TO .Z. STEP .S":.60.+....".
WOBEI .Y, Z, UND S. ZAHLEN, VARIABLEN ":
."ODER TERME SEIN KOENNEN.".3....60.`...
."DER. NEXT.-BEFEHL HAT DAS FORMAT:":.60
......"..ZEILEN#. NEXT .VARIABLE.":.60.M
...."WOBEI DIE GLEICHE .VARIABLE. WIE IM
":.".FOR.-BEFEHL BENUTZT WERD.U....60...
&.C$.". ":.30:."............ENDE VON LEK
TION 7 TEIL 2.R.0.."............BITTE WA
RTEN SIE, BIS TEIL 3":..7)"EINGELESEN IS
T..C.:.."...........Y.D.."7/3LEKTION.8",
8... L
> CLICK IMAGE PREVIEW FOR FULL MODAL