8/2LEKTION.8
FILE INFORMATION
FILENAME(S): 8/2LEKTION.8
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 16:15:15
APPEARS ON: 2 disk(s)
FILE HASH
4508868f6a6675809819527a303355fc159c107b4067d8775d8617c2a59325a7
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE 6 | 8/2LEKTION.8 | PRG | BrainSkull, Andraes Maurer | 10 | 1 | DOWNLOAD FILE |
| BASIC KURS | 8/2LEKTION.8 | PRG | BrainSkull, Andraes Maurer | 10 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 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 69 |88,52:.657,128.i| 00000030: 08 14 00 97 35 33 32 38 30 2C 31 3A 97 35 33 32 |....53280,1:.532| 00000040: 38 31 2C 31 3A 51 24 B2 22 91 20 20 20 20 20 20 |81,1:Q$.". | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000060: 20 20 20 91 22 3A 89 38 30 00 9B 08 1E 00 99 22 | .":.80......"| 00000070: 93 1E 22 3A 81 49 B2 31 A4 33 39 3A 99 43 24 3B |..":.I.1.39:.C$;| 00000080: 3A 82 3A 81 49 B2 31 A4 32 32 3A 99 22 9D 11 22 |:.:.I.1.22:.".."| 00000090: 43 24 3B 3A 82 3A 99 22 9D 22 3B 00 B8 08 28 00 |C$;:.:.".";...(.| 000000A0: 81 49 B2 31 A4 33 38 3A 99 22 9D 22 43 24 22 9D |.I.1.38:."."C$".| 000000B0: 22 3B 3A 82 3A 99 43 24 00 D3 08 32 00 81 49 B2 |";:.:.C$...2..I.| 000000C0: 31 A4 32 33 3A 99 22 91 22 43 24 22 9D 22 3B 3A |1.23:."."C$".";:| 000000D0: 82 3A 8E 00 E5 08 3C 00 A1 41 24 3A 8B 41 24 B2 |.:....<..A$:.A$.| 000000E0: 22 22 A7 36 30 00 ED 08 46 00 99 3A 8E 00 25 09 |"".60...F..:..%.| 000000F0: 50 00 99 22 93 11 11 11 11 22 A3 34 29 22 1C 47 |P..".....".4)".G| 00000100: 4F 53 55 42 20 1F 28 46 4F 52 54 53 45 54 5A 55 |OSUB .(FORTSETZU| 00000110: 4E 47 20 56 4F 4E 20 38 2E 31 29 22 3A 8D 36 30 |NG VON 8.1)":.60| 00000120: 3A 99 22 93 22 00 2E 09 5A 00 99 22 93 22 00 6D |:."."...Z..".".m| 00000130: 09 64 00 99 22 1E 20 32 20 20 4C 45 54 20 41 3D |.d..". 2 LET A=| 00000140: 31 22 3A 99 22 20 34 20 20 47 4F 53 55 42 31 30 |1":." 4 GOSUB10| 00000150: 22 3A 99 22 20 36 20 20 50 52 49 4E 54 20 41 22 |":." 6 PRINT A"| 00000160: 3A 99 22 20 38 20 20 47 4F 54 4F 31 32 00 8F 09 |:." 8 GOTO12...| 00000170: 6E 00 99 22 20 31 30 20 4C 45 54 20 41 3D 41 2A |n.." 10 LET A=A*| 00000180: 31 30 22 3A 99 22 20 31 32 20 45 4E 44 11 22 00 |10":." 12 END.".| 00000190: D7 09 78 00 99 22 1F 57 41 53 20 57 49 52 44 20 |..x..".WAS WIRD | 000001A0: 42 45 49 20 44 45 52 20 41 55 53 46 55 45 48 52 |BEI DER AUSFUEHR| 000001B0: 55 4E 47 20 44 45 53 20 4F 42 49 47 45 4E 22 3A |UNG DES OBIGEN":| 000001C0: 99 22 50 52 4F 47 52 41 4D 4D 53 20 47 45 44 52 |."PROGRAMMS GEDR| 000001D0: 55 43 4B 54 3F 11 22 00 05 0A 82 00 99 22 12 31 |UCKT?."......".1| 000001E0: 2E 92 20 31 20 20 20 20 20 20 20 12 32 2E 92 20 |.. 1 .2.. | 000001F0: 31 30 20 20 20 20 20 20 20 20 12 33 2E 92 20 4E |10 .3.. N| 00000200: 49 43 48 54 53 00 2F 0A 8C 00 85 22 28 31 2C 32 |ICHTS./...."(1,2| 00000210: 20 4F 44 45 52 20 33 29 22 3B 41 24 3A 91 C5 28 | ODER 3)";A$:..(| 00000220: 41 24 29 89 31 36 30 2C 31 39 30 2C 32 30 30 00 |A$).160,190,200.| 00000230: 3B 0A 96 00 99 51 24 3A 89 39 30 00 6A 0A A0 00 |;....Q$:.90.j...| 00000240: 99 22 11 81 4E 45 49 4E 1F 2C 20 53 49 45 20 48 |."..NEIN., SIE H| 00000250: 41 42 45 4E 20 4E 49 43 48 54 20 44 41 52 41 4E |ABEN NICHT DARAN| 00000260: 20 47 45 44 41 43 48 54 2C 22 00 B5 0A AA 00 99 | GEDACHT,"......| 00000270: 22 44 41 53 53 20 44 45 52 20 47 4F 53 55 42 2D |"DASS DER GOSUB-| 00000280: 42 45 46 45 48 4C 20 49 4E 20 5A 45 49 4C 45 20 |BEFEHL IN ZEILE | 00000290: 34 20 44 45 4E 22 3A 99 22 53 50 52 55 4E 47 20 |4 DEN":."SPRUNG | 000002A0: 5A 55 20 5A 45 49 4C 45 20 31 30 20 42 45 57 49 |ZU ZEILE 10 BEWI| 000002B0: 52 4B 54 2E 11 00 DC 0A B4 00 99 22 55 45 42 45 |RKT........"UEBE| 000002C0: 52 4C 45 47 45 4E 20 53 49 45 20 4E 4F 43 48 4D |RLEGEN SIE NOCHM| 000002D0: 41 4C 21 22 3A 8D 36 30 3A 89 39 30 00 0B 0B BE |AL!":.60:.90....| 000002E0: 00 99 22 11 81 4E 45 49 4E 1F 2C 20 44 45 52 20 |.."..NEIN., DER | 000002F0: 52 45 54 55 52 4E 2D 42 45 46 45 48 4C 20 46 45 |RETURN-BEFEHL FE| 00000300: 48 4C 54 21 11 22 3A 89 31 38 30 00 3A 0B C8 00 |HLT!.":.180.:...| 00000310: 99 22 11 1E 47 41 4E 5A 20 47 45 4E 41 55 1F 2C |."..GANZ GENAU.,| 00000320: 20 45 53 20 57 49 52 44 20 4E 49 43 48 54 53 20 | ES WIRD NICHTS | 00000330: 47 45 44 52 55 43 4B 54 2E 11 00 64 0B D2 00 99 |GEDRUCKT...d....| 00000340: 22 57 45 4E 4E 20 12 41 92 20 47 45 44 52 55 43 |"WENN .A. GEDRUC| 00000350: 4B 54 20 57 45 52 44 45 4E 20 53 4F 4C 4C 2C 20 |KT WERDEN SOLL, | 00000360: 4D 55 53 53 00 91 0B DC 00 99 22 44 45 4D 20 50 |MUSS......"DEM P| 00000370: 52 4F 47 52 41 4D 4D 20 44 49 45 20 46 4F 4C 47 |ROGRAMM DIE FOLG| 00000380: 45 4E 44 45 20 5A 45 49 4C 45 20 48 49 4E 5A 55 |ENDE ZEILE HINZU| 00000390: 2D 00 BE 0B E6 00 99 22 47 45 46 55 45 47 54 20 |-......"GEFUEGT | 000003A0: 57 45 52 44 45 4E 3A 11 22 3A 99 22 20 1E 12 31 |WERDEN:.":." ..1| 000003B0: 31 20 52 45 54 55 52 4E 1F 22 3A 8D 36 30 00 02 |1 RETURN.":.60..| 000003C0: 0C F0 00 99 22 93 22 A3 31 33 29 22 1C 4F 4E 2E |....".".13)".ON.| 000003D0: 2E 2E 47 4F 54 4F 22 3A 99 22 11 1F 53 49 45 20 |..GOTO":."..SIE | 000003E0: 57 49 53 53 45 4E 20 53 43 48 4F 4E 2C 20 44 41 |WISSEN SCHON, DA| 000003F0: 53 53 20 44 45 52 20 47 4F 54 4F 2D 42 45 46 45 |SS DER GOTO-BEFE| 00000400: 48 4C 00 2D 0C FA 00 99 22 44 45 4E 20 53 50 52 |HL.-...."DEN SPR| 00000410: 55 4E 47 20 5A 55 20 45 49 4E 45 52 20 53 50 45 |UNG ZU EINER SPE| 00000420: 5A 49 45 4C 4C 45 4E 20 5A 45 49 4C 45 00 59 0C |ZIELLEN ZEILE.Y.| 00000430: 04 01 99 22 57 41 45 48 52 45 4E 44 20 44 45 53 |..."WAEHREND DES| 00000440: 20 50 52 4F 47 52 4D 4D 41 42 4C 41 55 46 53 20 | PROGRMMABLAUFS | 00000450: 42 45 57 49 52 4B 54 2E 11 00 8B 0C 0E 01 99 22 |BEWIRKT........"| 00000460: 44 45 52 20 81 12 4F 4E 2E 2E 2E 47 4F 54 4F 92 |DER ..ON...GOTO.| 00000470: 1F 2D 42 45 46 45 48 4C 20 42 45 57 49 52 4B 54 |.-BEFEHL BEWIRKT| 00000480: 20 44 45 4E 20 53 50 52 55 4E 47 00 B8 0C 18 01 | DEN SPRUNG.....| 00000490: 99 22 5A 55 20 45 49 4E 45 52 20 5A 45 49 4C 45 |."ZU EINER ZEILE| 000004A0: 2C 20 44 45 52 45 4E 20 4E 55 4D 4D 45 52 20 44 |, DEREN NUMMER D| 000004B0: 55 52 43 48 20 44 45 4E 00 E4 0C 22 01 99 22 57 |URCH DEN...".."W| 000004C0: 45 52 54 20 45 49 4E 45 52 20 56 41 52 49 41 42 |ERT EINER VARIAB| 000004D0: 4C 45 4E 20 4F 44 45 52 20 45 49 4E 45 53 20 54 |LEN ODER EINES T| 000004E0: 45 52 4D 53 00 FA 0C 2C 01 99 22 42 45 53 54 49 |ERMS...,.."BESTI| 000004F0: 4D 4D 54 20 57 49 52 44 2E 11 00 37 0D 36 01 99 |MMT WIRD...7.6..| 00000500: 22 48 49 45 52 20 45 49 4E 20 42 45 49 53 50 49 |"HIER EIN BEISPI| 00000510: 45 4C 20 46 55 45 52 20 45 49 4E 45 4E 22 3A 99 |EL FUER EINEN":.| 00000520: 22 12 81 4F 4E 2E 2E 2E 47 4F 54 4F 92 1F 2D 42 |"..ON...GOTO..-B| 00000530: 45 46 45 48 4C 3A 11 00 84 0D 40 01 99 22 1E 20 |EFEHL:....@..". | 00000540: 20 38 30 20 4F 4E 20 4A 20 47 4F 54 4F 20 31 30 | 80 ON J GOTO 10| 00000550: 2C 20 39 30 11 22 3A 99 22 1F 41 4E 47 45 4E 4F |, 90.":.".ANGENO| 00000560: 4D 4D 45 4E 2C 20 4A 20 48 41 54 20 44 45 4E 20 |MMEN, J HAT DEN | 00000570: 57 45 52 54 20 31 2C 20 53 4F 20 42 45 57 49 52 |WERT 1, SO BEWIR| 00000580: 4B 54 22 3B 00 A7 0D 4A 01 99 22 44 49 45 53 20 |KT";...J.."DIES | 00000590: 44 45 4E 20 53 50 52 55 4E 47 20 5A 55 20 5A 45 |DEN SPRUNG ZU ZE| 000005A0: 49 4C 45 20 31 30 2E 00 D8 0D 54 01 99 22 41 4E |ILE 10....T.."AN| 000005B0: 47 45 4E 4F 4D 4D 45 4E 2C 20 4A 20 48 41 54 20 |GENOMMEN, J HAT | 000005C0: 44 45 4E 20 57 45 52 54 20 32 2C 20 53 4F 20 42 |DEN WERT 2, SO B| 000005D0: 45 57 49 52 4B 54 22 3B 00 29 0E 5E 01 99 22 44 |EWIRKT";.).^.."D| 000005E0: 49 45 53 20 44 45 4E 20 53 50 52 55 4E 47 20 5A |IES DEN SPRUNG Z| 000005F0: 55 20 5A 45 49 4C 45 20 39 30 2E 11 22 3A 99 22 |U ZEILE 90..":."| 00000600: 9C 48 41 54 20 4A 20 49 52 47 45 4E 44 45 49 4E |.HAT J IRGENDEIN| 00000610: 45 4E 20 41 4E 44 45 52 45 4E 20 57 45 52 54 2C |EN ANDEREN WERT,| 00000620: 20 53 4F 20 57 49 52 44 22 00 59 0E 68 01 99 22 | SO WIRD".Y.h.."| 00000630: 44 49 45 20 5A 45 49 4C 45 20 4E 41 43 48 20 5A |DIE ZEILE NACH Z| 00000640: 45 49 4C 45 20 38 30 20 41 55 53 47 45 46 55 45 |EILE 80 AUSGEFUE| 00000650: 48 52 54 2E 22 3A 8D 36 30 00 96 0E 72 01 99 22 |HRT.":.60...r.."| 00000660: 93 1F 44 45 52 20 81 4F 4E 2E 2E 2E 47 4F 54 4F |..DER .ON...GOTO| 00000670: 1F 2D 42 45 46 45 48 4C 20 48 41 54 20 44 41 53 |.-BEFEHL HAT DAS| 00000680: 20 46 4F 4C 47 45 4E 44 45 22 3A 99 22 46 4F 52 | FOLGENDE":."FOR| 00000690: 4D 41 54 3A 11 22 00 C7 0E 7C 01 99 22 81 12 5A |MAT:."...|.."..Z| 000006A0: 45 49 4C 45 4E 23 92 20 4F 4E 20 12 58 92 20 47 |EILEN#. ON .X. G| 000006B0: 4F 54 4F 20 12 4C 49 53 54 45 20 56 4F 4E 20 5A |OTO .LISTE VON Z| 000006C0: 45 49 4C 45 4E 23 11 00 04 0F 86 01 99 22 1F 57 |EILEN#.......".W| 000006D0: 4F 42 45 49 20 12 58 92 20 45 49 4E 45 20 56 41 |OBEI .X. EINE VA| 000006E0: 52 49 41 42 4C 45 20 4F 44 45 52 20 45 49 4E 20 |RIABLE ODER EIN | 000006F0: 54 45 52 4D 20 53 45 49 4E 22 3A 99 22 4B 41 4E |TERM SEIN":."KAN| 00000700: 4E 2E 3A 11 00 23 0F 90 01 99 22 5A 57 45 49 20 |N.:..#...."ZWEI | 00000710: 57 45 49 54 45 52 45 20 42 45 49 53 50 49 45 4C |WEITERE BEISPIEL| 00000720: 45 3A 11 00 64 0F 9A 01 99 22 1E 32 20 20 4F 4E |E:..d....".2 ON| 00000730: 20 46 20 47 4F 54 4F 20 35 2C 20 35 2C 20 36 11 | F GOTO 5, 5, 6.| 00000740: 22 3A 99 22 31 34 20 4F 4E 20 56 2B 32 20 47 4F |":."14 ON V+2 GO| 00000750: 54 4F 20 33 33 2C 20 31 30 2C 20 32 2C 20 32 22 |TO 33, 10, 2, 2"| 00000760: 3A 8D 36 30 00 A6 0F A4 01 99 22 93 1F 57 45 4C |:.60......"..WEL| 00000770: 43 48 45 52 20 44 45 52 20 46 4F 4C 47 45 4E 44 |CHER DER FOLGEND| 00000780: 45 4E 20 4F 4E 2E 2E 2E 47 4F 54 4F 2D 42 45 46 |EN ON...GOTO-BEF| 00000790: 45 48 4C 45 22 3A 99 22 49 53 54 20 52 49 43 48 |EHLE":."IST RICH| 000007A0: 54 49 47 3F 3A 11 00 EC 0F AE 01 99 22 1E 32 30 |TIG?:.......".20| 000007B0: 20 4F 4E 20 4B 2D 32 20 47 4F 54 4F 20 31 30 2C | ON K-2 GOTO 10,| 000007C0: 20 4A 2C 20 33 30 11 22 3A 99 22 35 30 20 4F 4E | J, 30.":."50 ON| 000007D0: 20 28 55 2D 56 29 2F 4C 20 47 4F 54 4F 20 36 38 | (U-V)/L GOTO 68| 000007E0: 2C 20 35 35 2C 20 32 2C 20 38 38 11 00 2F 10 B8 |, 55, 2, 88../..| 000007F0: 01 99 22 37 30 20 4F 4E 20 58 2C 59 20 47 4F 54 |.."70 ON X,Y GOT| 00000800: 4F 20 38 39 2C 36 36 11 22 3A 85 22 12 28 32 30 |O 89,66.":.".(20| 00000810: 2C 20 35 30 20 4F 44 45 52 20 37 30 29 92 22 3B |, 50 ODER 70).";| 00000820: 41 24 3A 8B 41 24 B2 22 37 30 22 A7 35 31 30 00 |A$:.A$."70".510.| 00000830: 40 10 C2 01 8B 41 24 B2 22 35 30 22 A7 35 33 30 |@....A$."50".530| 00000840: 00 51 10 CC 01 8B 41 24 B2 22 32 30 22 A7 34 38 |.Q....A$."20".48| 00000850: 30 00 62 10 D6 01 99 51 24 22 91 91 22 3A 89 34 |0.b....Q$"..":.4| 00000860: 34 30 00 92 10 E0 01 99 22 11 81 4E 45 49 4E 1F |40......"..NEIN.| 00000870: 2C 20 44 49 45 53 45 52 20 42 45 46 45 48 4C 20 |, DIESER BEFEHL | 00000880: 49 53 54 20 4E 49 43 48 54 20 52 49 43 48 54 49 |IST NICHT RICHTI| 00000890: 47 21 00 DB 10 EA 01 99 22 49 4E 20 44 45 52 20 |G!......"IN DER | 000008A0: 4C 49 53 54 45 20 44 45 52 20 5A 45 49 4C 45 4E |LISTE DER ZEILEN| 000008B0: 4E 55 4D 4D 45 52 4E 20 44 55 45 52 46 45 4E 22 |NUMMERN DUERFEN"| 000008C0: 3A 99 22 4B 45 49 4E 45 20 56 41 52 49 41 42 4C |:."KEINE VARIABL| 000008D0: 45 4E 20 53 54 45 48 45 4E 2E 11 00 03 11 F4 01 |EN STEHEN.......| 000008E0: 99 22 55 45 42 45 52 4C 45 47 45 4E 20 53 49 45 |."UEBERLEGEN SIE| 000008F0: 20 4E 4F 43 48 4D 41 4C 21 22 3A 8D 36 30 3A 89 | NOCHMAL!":.60:.| 00000900: 34 32 30 00 33 11 FE 01 99 22 11 81 4E 45 49 4E |420.3...."..NEIN| 00000910: 1F 2C 20 44 49 45 53 45 52 20 42 45 46 45 48 4C |., DIESER BEFEHL| 00000920: 20 49 53 54 20 4E 49 43 48 54 20 52 49 43 48 54 | IST NICHT RICHT| 00000930: 47 21 22 00 77 11 08 02 99 22 49 4E 20 45 49 4E |G!".w...."IN EIN| 00000940: 45 4D 20 4F 4E 2E 2E 2E 47 4F 54 4F 2D 42 45 46 |EM ON...GOTO-BEF| 00000950: 45 48 4C 20 44 41 52 46 20 4E 49 43 48 54 22 3A |EHL DARF NICHT":| 00000960: 99 22 12 58 2C 20 59 92 20 53 54 45 48 45 4E 2E |.".X, Y. STEHEN.| 00000970: 11 22 3A 89 35 30 30 00 8A 11 12 02 99 22 11 1E |.":.500......"..| 00000980: 52 49 43 48 54 49 47 21 21 1F 00 B4 11 1C 02 99 |RICHTIG!!.......| 00000990: 22 5A 45 49 4C 45 20 32 30 20 49 53 54 20 4E 49 |"ZEILE 20 IST NI| 000009A0: 43 48 54 20 4B 4F 52 52 45 4B 54 2C 20 44 41 20 |CHT KORREKT, DA | 000009B0: 45 49 4E 45 00 ED 11 26 02 99 22 56 41 52 49 41 |EINE...&.."VARIA| 000009C0: 42 4C 45 20 49 4E 20 44 45 52 20 4C 49 53 54 45 |BLE IN DER LISTE| 000009D0: 20 44 45 52 20 5A 45 49 4C 45 4E 4E 55 4D 4D 45 | DER ZEILENNUMME| 000009E0: 52 4E 22 3A 99 22 53 54 45 48 54 2E 11 00 1B 12 |RN":."STEHT.....| 000009F0: 30 02 99 22 5A 45 49 4C 45 20 37 30 20 49 53 54 |0.."ZEILE 70 IST| 00000A00: 20 4E 49 43 48 54 20 4B 4F 52 52 45 4B 54 2C 20 | NICHT KORREKT, | 00000A10: 44 41 20 12 58 2C 20 59 92 20 22 00 56 12 3A 02 |DA .X, Y. ".V.:.| 00000A20: 99 22 49 4E 20 45 49 4E 45 4D 20 4F 4E 2E 2E 2E |."IN EINEM ON...| 00000A30: 47 4F 54 4F 2D 42 45 46 45 48 4C 20 4E 49 43 48 |GOTO-BEFEHL NICH| 00000A40: 54 20 53 54 45 48 45 4E 22 3A 99 22 44 41 52 46 |T STEHEN":."DARF| 00000A50: 2E 22 3A 8D 36 30 00 9A 12 44 02 99 22 93 22 A3 |.":.60...D..".".| 00000A60: 31 33 29 22 1C 4F 4E 2E 2E 2E 47 4F 53 55 42 11 |13)".ON...GOSUB.| 00000A70: 22 3A 99 22 1F 45 49 4E 20 44 45 4D 20 81 4F 4E |":.".EIN DEM .ON| 00000A80: 2E 2E 2E 47 4F 54 4F 1F 20 53 45 48 52 20 41 45 |...GOTO. SEHR AE| 00000A90: 48 4E 4C 49 43 48 45 52 20 22 00 C7 12 4E 02 99 |HNLICHER "...N..| 00000AA0: 22 42 45 46 45 48 4C 20 49 53 54 20 44 45 52 20 |"BEFEHL IST DER | 00000AB0: 81 12 4F 4E 2E 2E 2E 47 4F 53 55 42 92 1F 2D 42 |..ON...GOSUB..-B| 00000AC0: 45 46 45 48 4C 2E 22 00 F5 12 58 02 99 22 11 44 |EFEHL."...X..".D| 00000AD0: 45 52 20 81 12 4F 4E 2E 2E 2E 47 4F 53 55 42 92 |ER ..ON...GOSUB.| 00000AE0: 1F 2D 42 45 46 45 48 4C 20 42 45 57 49 52 4B 54 |.-BEFEHL BEWIRKT| 00000AF0: 20 44 45 4E 22 00 24 13 62 02 99 22 81 53 50 52 | DEN".$.b..".SPR| 00000B00: 55 4E 47 20 5A 55 20 45 49 4E 45 52 20 53 55 42 |UNG ZU EINER SUB| 00000B10: 52 4F 55 54 49 4E 45 1F 2C 20 44 49 45 20 44 55 |ROUTINE., DIE DU| 00000B20: 52 43 48 22 00 67 13 6C 02 99 22 44 45 4E 20 57 |RCH".g.l.."DEN W| 00000B30: 45 52 54 20 45 49 4E 45 52 20 56 41 52 49 41 42 |ERT EINER VARIAB| 00000B40: 4C 45 4E 20 4F 44 45 52 20 45 49 4E 45 53 22 3A |LEN ODER EINES":| 00000B50: 99 22 54 45 52 4D 53 20 42 45 53 54 49 4D 4D 54 |."TERMS BESTIMMT| 00000B60: 20 57 49 52 44 2E 11 00 9A 13 76 02 99 22 4E 41 | WIRD.....v.."NA| 00000B70: 43 48 20 44 45 4D 20 81 52 45 54 55 52 4E 1F 2D |CH DEM .RETURN.-| 00000B80: 42 45 46 45 48 4C 20 57 49 52 44 20 44 41 53 20 |BEFEHL WIRD DAS | 00000B90: 50 52 4F 47 52 41 4D 4D 22 3B 00 DD 13 80 02 99 |PROGRAMM";......| 00000BA0: 22 49 4E 20 44 45 52 20 5A 45 49 4C 45 20 4E 41 |"IN DER ZEILE NA| 00000BB0: 43 48 20 44 45 4D 20 81 12 4F 4E 2E 2E 2E 47 4F |CH DEM ..ON...GO| 00000BC0: 53 55 42 92 1F 2D 42 45 46 45 48 4C 22 3A 99 22 |SUB..-BEFEHL":."| 00000BD0: 46 4F 52 54 47 45 53 45 54 5A 54 2E 11 00 08 14 |FORTGESETZT.....| 00000BE0: 8A 02 99 22 9C 44 45 52 20 52 45 54 55 52 4E 2D |...".DER RETURN-| 00000BF0: 42 45 46 45 48 4C 20 42 45 57 49 52 4B 54 20 41 |BEFEHL BEWIRKT A| 00000C00: 4C 53 4F 20 44 41 53 22 00 3F 14 94 02 99 22 47 |LSO DAS".?...."G| 00000C10: 4C 45 49 43 48 45 20 57 49 45 20 49 4D 20 47 4F |LEICHE WIE IM GO| 00000C20: 53 55 42 2D 42 45 46 45 48 4C 2E 22 3A 8D 36 30 |SUB-BEFEHL.":.60| 00000C30: 3A 99 22 93 1F 42 45 49 53 50 49 45 4C 3A 11 00 |:."..BEISPIEL:..| 00000C40: 5A 14 9E 02 99 22 1E 37 20 4F 4E 20 45 20 47 4F |Z....".7 ON E GO| 00000C50: 53 55 42 20 35 2C 20 32 11 11 00 94 14 A8 02 99 |SUB 5, 2........| 00000C60: 22 1F 44 45 52 81 20 4F 4E 2E 2E 2E 47 4F 53 55 |".DER. ON...GOSU| 00000C70: 42 1F 2D 42 45 46 45 48 4C 20 48 41 54 20 46 4F |B.-BEFEHL HAT FO| 00000C80: 4C 47 45 4E 44 45 53 22 3A 99 22 46 4F 52 4D 41 |LGENDES":."FORMA| 00000C90: 54 3A 11 22 00 C6 14 B2 02 99 22 81 12 5A 45 49 |T:."......"..ZEI| 00000CA0: 4C 45 4E 23 92 20 4F 4E 20 12 58 92 20 47 4F 53 |LEN#. ON .X. GOS| 00000CB0: 55 42 20 12 4C 49 53 54 45 20 56 4F 4E 20 5A 45 |UB .LISTE VON ZE| 00000CC0: 49 4C 45 4E 23 11 00 06 15 BC 02 99 22 1F 57 4F |ILEN#.......".WO| 00000CD0: 42 45 49 20 12 58 92 20 45 49 4E 45 20 56 41 52 |BEI .X. EINE VAR| 00000CE0: 49 41 42 4C 45 20 4F 44 45 52 20 45 49 4E 20 54 |IABLE ODER EIN T| 00000CF0: 45 52 4D 20 53 45 49 4E 22 3A 99 22 4B 41 4E 4E |ERM SEIN":."KANN| 00000D00: 2E 22 3A 8D 36 30 00 37 15 C6 02 43 24 B2 22 12 |.":.60.7...C$.".| 00000D10: 23 22 3A 8D 33 30 3A 99 22 11 11 11 11 11 22 A3 |#":.30:.".....".| 00000D20: 31 30 29 22 1C 45 4E 44 45 20 56 4F 4E 20 4C 45 |10)".ENDE VON LE| 00000D30: 4B 54 49 4F 4E 20 38 00 6F 15 D0 02 99 22 11 11 |KTION 8.o...."..| 00000D40: 11 11 11 22 A3 31 29 22 1F 53 49 4E 44 20 53 49 |...".1)".SIND SI| 00000D50: 45 20 42 45 52 45 49 54 20 53 49 4E 44 20 46 55 |E BEREIT SIND FU| 00000D60: 45 52 20 4C 45 4B 54 49 4F 4E 20 39 20 3F 22 00 |ER LEKTION 9 ?".| 00000D70: 81 15 DA 02 99 A3 31 36 29 22 11 28 4A 2F 4E 29 |......16)".(J/N)| 00000D80: 22 00 95 15 E4 02 A1 41 24 3A 8B 41 24 B2 22 4E |"......A$:.A$."N| 00000D90: 22 A7 38 31 30 00 A6 15 EE 02 8B 41 24 B3 B1 22 |".810......A$.."| 00000DA0: 4A 22 A7 37 34 30 00 D2 15 F8 02 99 22 11 11 1D |J".740......"...| 00000DB0: 1D 1D 1D 1D 1D 1D 12 9C 20 20 20 20 20 20 20 20 |........ | 00000DC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000DD0: 20 22 00 FB 15 02 03 99 22 1D 1D 1D 1D 1D 1D 1D | "......".......| 00000DE0: 12 20 41 55 46 20 5A 55 52 20 4C 45 54 5A 54 45 |. AUF ZUR LETZTE| 00000DF0: 4E 20 52 55 4E 44 45 20 21 20 22 00 24 16 0C 03 |N RUNDE ! ".$...| 00000E00: 99 22 1D 1D 1D 1D 1D 1D 1D 12 20 20 20 20 20 20 |."........ | 00000E10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000E20: 20 20 20 22 00 3A 16 16 03 93 22 39 2F 31 4C 45 | ".:...."9/1LE| 00000E30: 4B 54 49 4F 4E 2E 38 22 2C 38 00 43 16 20 03 89 |KTION.8",8.C. ..| 00000E40: 38 30 30 00 7C 16 2A 03 99 22 13 11 11 11 11 11 |800.|.*.."......| 00000E50: 11 11 11 11 11 1D 1D 20 1F 20 20 20 20 20 20 20 |....... . | 00000E60: 42 45 49 4D 20 4E 41 45 43 48 53 54 45 4E 20 4D |BEIM NAECHSTEN M| 00000E70: 41 4C 20 20 20 20 20 20 20 20 20 22 00 AB 16 34 |AL "...4| 00000E80: 03 99 22 11 1D 20 20 20 20 20 20 20 20 57 45 52 |..".. WER| 00000E90: 44 45 4E 20 57 49 52 20 45 4E 44 47 55 45 4C 54 |DEN WIR ENDGUELT| 00000EA0: 49 47 20 20 20 20 20 20 20 20 22 00 DA 16 3E 03 |IG "...>.| 00000EB0: 99 22 11 1D 20 20 20 20 20 20 20 20 44 45 4E 20 |.".. DEN | 00000EC0: 47 49 50 46 45 4C 20 45 52 53 54 55 45 52 4D 45 |GIPFEL ERSTUERME| 00000ED0: 4E 2E 20 20 20 20 20 20 20 22 00 EA 16 48 03 81 |N. "...H..| 00000EE0: 49 B2 31 A4 37 30 30 3A 82 49 00 F5 16 52 03 9E |I.1.700:.I...R..| 00000EF0: 36 34 37 33 38 00 00 00 52 00 |64738...R. |
.......45,B(174):.46,B(175):.:.788,52:.6
57,128.I....53280,1:.53281,1:Q$.".
.":.80......"..":.I.1
.39:.C$;:.:.I.1.22:.".."C$;:.:.".";...(.
.I.1.38:."."C$".";:.:.C$.S.2..I.1.23:.".
"C$".";:.:....<..A$:.A$."".60...F..:..%.
P..".....".4)".GOSUB .(FORTSETZUNG VON 8
.1)":.60:."."...Z..".".M.D..". 2 LET A=
1":." 4 GOSUB10":." 6 PRINT A":." 8 G
OTO12...N.." 10 LET A=A*10":." 12 END.".
W.X..".WAS WIRD BEI DER AUSFUEHRUNG DES
OBIGEN":."PROGRAMMS GEDRUCKT?."......".1
.. 1 .2.. 10 .3.. NICHTS./.
..."(1,2 ODER 3)";A$:.E(A$).160,190,200.
;....Q$:.90.J. .."..NEIN., SIE HABEN NIC
HT DARAN GEDACHT,"......"DASS DER GOSUB-
BEFEHL IN ZEILE 4 DEN":."SPRUNG ZU ZEILE
10 BEWIRKT........"UEBERLEGEN SIE NOCHM
AL!":.60:.90......"..NEIN., DER RETURN-B
EFEHL FEHLT!.":.180.:.H.."..GANZ GENAU.,
ES WIRD NICHTS GEDRUCKT...D.R.."WENN .A
. GEDRUCKT WERDEN SOLL, MUSS......"DEM P
ROGRAMM DIE FOLGENDE ZEILE HINZU-......"
GEFUEGT WERDEN:.":." ..11 RETURN.":.60..
....".".13)".ON...GOTO":."..SIE WISSEN S
CHON, DASS DER GOTO-BEFEHL.-...."DEN SPR
UNG ZU EINER SPEZIELLEN ZEILE.Y...."WAEH
REND DES PROGRMMABLAUFS BEWIRKT........"
DER ..ON...GOTO..-BEFEHL BEWIRKT DEN SPR
UNG......"ZU EINER ZEILE, DEREN NUMMER D
URCH DEN...".."WERT EINER VARIABLEN ODER
EINES TERMS...,.."BESTIMMT WIRD...7.6..
"HIER EIN BEISPIEL FUER EINEN":."..ON...
GOTO..-BEFEHL:....@..". 80 ON J GOTO 10
, 90.":.".ANGENOMMEN, J HAT DEN WERT 1,
SO BEWIRKT";...J.."DIES DEN SPRUNG ZU ZE
ILE 10..X.T.."ANGENOMMEN, J HAT DEN WERT
2, SO BEWIRKT";.).^.."DIES DEN SPRUNG Z
U ZEILE 90..":.".HAT J IRGENDEINEN ANDER
EN WERT, SO WIRD".Y.H.."DIE ZEILE NACH Z
EILE 80 AUSGEFUEHRT.":.60...R.."..DER .O
N...GOTO.-BEFEHL HAT DAS FOLGENDE":."FOR
MAT:.".G.|.."..ZEILEN#. ON .X. GOTO .LIS
TE VON ZEILEN#.......".WOBEI .X. EINE VA
RIABLE ODER EIN TERM SEIN":."KANN.:..#..
.."ZWEI WEITERE BEISPIELE:..D....".2 ON
F GOTO 5, 5, 6.":."14 ON V+2 GOTO 33, 1
0, 2, 2":.60......"..WELCHER DER FOLGEND
EN ON...GOTO-BEFEHLE":."IST RICHTIG?:...
....".20 ON K-2 GOTO 10, J, 30.":."50 ON
(U-V)/L GOTO 68, 55, 2, 88../...."70 ON
X,Y GOTO 89,66.":.".(20, 50 ODER 70).";
A$:.A$."70".510.@.B..A$."50".530.Q.L..A$
."20".480.B.V..Q$"..":.440......"..NEIN.
, DIESER BEFEHL IST NICHT RICHTIG!......
"IN DER LISTE DER ZEILENNUMMERN DUERFEN"
:."KEINE VARIABLEN STEHEN........"UEBERL
EGEN SIE NOCHMAL!":.60:.420.3...."..NEIN
., DIESER BEFEHL IST NICHT RICHTG!".W...
."IN EINEM ON...GOTO-BEFEHL DARF NICHT":
.".X, Y. STEHEN..":.500......"..RICHTIG!
!......."ZEILE 20 IST NICHT KORREKT, DA
EINE...&.."VARIABLE IN DER LISTE DER ZEI
LENNUMMERN":."STEHT.....0.."ZEILE 70 IST
NICHT KORREKT, DA .X, Y. ".V.:.."IN EIN
EM ON...GOTO-BEFEHL NICHT STEHEN":."DARF
.":.60...D..".".13)".ON...GOSUB.":.".EIN
DEM .ON...GOTO. SEHR AEHNLICHER ".G.N..
"BEFEHL IST DER ..ON...GOSUB..-BEFEHL.".
..X..".DER ..ON...GOSUB..-BEFEHL BEWIRKT
DEN".$.B..".SPRUNG ZU EINER SUBROUTINE.
, DIE DURCH".G.L.."DEN WERT EINER VARIAB
LEN ODER EINES":."TERMS BESTIMMT WIRD...
..V.."NACH DEM .RETURN.-BEFEHL WIRD DAS
PROGRAMM";......"IN DER ZEILE NACH DEM .
.ON...GOSUB..-BEFEHL":."FORTGESETZT.....
...".DER RETURN-BEFEHL BEWIRKT ALSO DAS"
.?...."GLEICHE WIE IM GOSUB-BEFEHL.":.60
:."..BEISPIEL:..Z....".7 ON E GOSUB 5, 2
........".DER. ON...GOSUB.-BEFEHL HAT FO
LGENDES":."FORMAT:.".F...."..ZEILEN#. ON
.X. GOSUB .LISTE VON ZEILEN#.......".WO
BEI .X. EINE VARIABLE ODER EIN TERM SEIN
":."KANN.":.60.7.F.C$.".#":.30:.".....".
10)".ENDE VON LEKTION 8.O.P..".....".1)"
.SIND SIE BEREIT SIND FUER LEKTION 9 ?".
..Z...16)".(J/N)"......A$:.A$."N".810...
...A$.."J".740.R...."...........
"......"........ AUF ZU
R LETZTEN RUNDE ! ".$...."........
".:...."9/1LEKTION.8"
,8.C. ..800.|.*.."............. .
BEIM NAECHSTEN MAL "...4.."..
WERDEN WIR ENDGUELTIG ".Z.>.
.".. DEN GIPFEL ERSTUERMEN.
"...H..I.1.700:.I...R..64738...R.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL