7/1LEKTION
FILE INFORMATION
FILENAME(S): 7/1LEKTION
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-10-20 00:37:03
APPEARS ON: 1 disk(s)
FILE HASH
3452728413cb504eeae39914843b2066f2ef97532d67199f8d9cb79b2c20f180
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ALDEBARAN | 7/1LEKTION | PRG | Treasure Chest - Holger | 24 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 01 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 48 |88,52:.657,128.H| 00000030: 08 02 00 97 35 33 32 38 30 2C 31 3A 97 35 33 32 |....53280,1:.532| 00000040: 38 31 2C 31 3A 89 31 36 00 7A 08 03 00 99 22 93 |81,1:.16.z....".| 00000050: 1E 22 3A 81 49 B2 31 A4 33 39 3A 99 43 24 3B 3A |.":.I.1.39:.C$;:| 00000060: 82 3A 81 49 B2 31 A4 32 32 3A 99 22 9D 11 22 43 |.:.I.1.22:.".."C| 00000070: 24 3B 3A 82 3A 99 22 9D 22 3B 00 97 08 04 00 81 |$;:.:.".";......| 00000080: 49 B2 31 A4 33 38 3A 99 22 9D 22 43 24 22 9D 22 |I.1.38:."."C$"."| 00000090: 3B 3A 82 3A 99 43 24 00 B2 08 05 00 81 49 B2 31 |;:.:.C$......I.1| 000000A0: A4 32 33 3A 99 22 91 22 43 24 22 9D 22 3B 3A 82 |.23:."."C$".";:.| 000000B0: 3A 8E 00 C3 08 07 00 A1 41 24 3A 8B 41 24 B2 22 |:.......A$:.A$."| 000000C0: 22 A7 37 00 CB 08 08 00 99 3A 8E 00 EE 08 09 00 |".7......:......| 000000D0: 99 22 13 22 3A 81 49 B2 30 A4 59 AB 31 3A 99 22 |.".":.I.0.Y.1:."| 000000E0: 11 22 3B 3A 82 3A 99 22 91 91 22 3B 3A 8E 00 27 |.";:.:."..";:..'| 000000F0: 09 0B 00 81 4A B2 31 A4 31 35 3A 99 22 3E 22 3B |....J.1.15:.">";| 00000100: 3A 81 49 B2 31 A4 34 30 3A 82 3A 99 22 9D 12 3E |:.I.1.40:.:."..>| 00000110: 92 9D 22 3B 3A 81 4B B2 31 A4 32 30 3A 82 3A 82 |..";:.K.1.20:.:.| 00000120: 3A 99 22 20 22 3A 8E 00 6B 09 0D 00 59 B2 59 31 |:." ":..k...Y.Y1| 00000130: 3A 8D 39 3A 81 49 B2 30 A4 59 32 AB 59 31 3A 99 |:.9:.I.0.Y2.Y1:.| 00000140: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" | 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 22 3A 82 00 74 09 0E 00 | ":..t...| 00000170: 8D 39 3A 8E 00 86 09 0F 00 81 49 B2 31 A4 31 30 |.9:.......I.1.10| 00000180: 30 30 3A 82 3A 8E 00 BB 09 10 00 5A 24 B2 C7 28 |00:.:......Z$..(| 00000190: 33 34 29 3A 43 24 B2 22 A6 22 3A 8D 33 3A 99 22 |34):C$.".":.3:."| 000001A0: 13 11 11 11 11 11 22 A3 31 32 29 22 1C 4C 45 4B |......".12)".LEK| 000001B0: 54 49 4F 4E 20 37 11 11 11 11 22 00 D2 09 11 00 |TION 7....".....| 000001C0: 99 A3 39 29 22 1F 31 2E 20 53 43 48 4C 45 49 46 |..9)".1. SCHLEIF| 000001D0: 45 4E 00 08 0A 12 00 99 A3 39 29 22 32 2E 20 46 |EN.......9)"2. F| 000001E0: 4F 52 2E 2E 2E 4E 45 58 54 2D 42 45 46 45 48 4C |OR...NEXT-BEFEHL| 000001F0: 45 22 3A 99 A3 39 29 22 33 2E 20 52 45 4D 2D 41 |E":..9)"3. REM-A| 00000200: 4E 57 45 49 53 55 4E 47 00 29 0A 13 00 99 A3 39 |NWEISUNG.).....9| 00000210: 29 22 34 2E 20 50 52 4F 47 52 41 4D 4D 42 45 49 |)"4. PROGRAMMBEI| 00000220: 53 50 49 45 4C 22 3A 8D 37 00 6D 0A 14 00 99 22 |SPIEL":.7.m...."| 00000230: 93 22 A3 31 32 29 22 1C 53 43 48 4C 45 49 46 45 |.".12)".SCHLEIFE| 00000240: 4E 22 3A 8D 37 3A 99 22 1F 45 49 4E 45 20 44 45 |N":.7:.".EINE DE| 00000250: 52 20 4E 55 45 54 5A 4C 49 43 48 53 54 45 4E 20 |R NUETZLICHSTEN | 00000260: 45 49 47 45 4E 53 43 48 41 46 54 45 4E 00 9C 0A |EIGENSCHAFTEN...| 00000270: 16 00 99 22 49 48 52 45 53 20 43 42 4D 20 36 34 |..."IHRES CBM 64| 00000280: 20 49 53 54 20 44 49 45 20 4D 4F 45 47 4C 49 43 | IST DIE MOEGLIC| 00000290: 48 4B 45 49 54 2C 20 53 49 43 48 22 00 C6 0A 17 |HKEIT, SICH"....| 000002A0: 00 99 22 4F 46 54 20 57 49 45 44 45 52 48 4F 4C |.."OFT WIEDERHOL| 000002B0: 45 4E 44 45 20 56 4F 52 47 41 45 4E 47 45 20 45 |ENDE VORGAENGE E| 000002C0: 49 4E 46 41 43 48 00 EA 0A 18 00 99 22 55 4E 44 |INFACH......"UND| 000002D0: 20 53 43 48 4E 45 4C 4C 20 41 55 53 5A 55 46 55 | SCHNELL AUSZUFU| 000002E0: 45 48 52 45 4E 2E 22 3A 8D 37 00 13 0B 20 00 99 |EHREN.":.7... ..| 000002F0: 22 93 45 53 20 53 4F 4C 4C 20 4E 55 4E 20 41 4E |".ES SOLL NUN AN| 00000300: 20 45 49 4E 45 4D 20 50 52 4F 47 52 41 4D 4D 20 | EINEM PROGRAMM | 00000310: 5A 55 52 00 41 0B 21 00 99 22 42 45 52 45 43 48 |ZUR.A.!.."BERECH| 00000320: 4E 55 4E 47 20 56 45 52 53 43 48 49 45 44 45 4E |NUNG VERSCHIEDEN| 00000330: 45 52 20 41 52 42 45 49 54 53 4C 4F 45 48 4E 45 |ER ARBEITSLOEHNE| 00000340: 22 00 7D 0B 22 00 99 22 44 45 52 20 47 45 42 52 |".}.".."DER GEBR| 00000350: 41 55 43 48 20 56 4F 4E 20 81 53 43 48 4C 45 49 |AUCH VON .SCHLEI| 00000360: 46 45 4E 20 1F 49 4C 4C 55 53 54 52 49 45 52 54 |FEN .ILLUSTRIERT| 00000370: 20 22 3A 99 22 57 45 52 44 45 4E 3A 22 00 BC 0B | ":."WERDEN:"...| 00000380: 24 00 8D 37 3A 99 22 1E 20 39 35 20 20 52 45 41 |$..7:.". 95 REA| 00000390: 44 20 4E 24 2C 52 2C 48 22 3A 99 22 20 31 30 30 |D N$,R,H":." 100| 000003A0: 20 49 46 20 4E 24 3D 22 5A 24 22 45 4E 44 45 22 | IF N$="Z$"ENDE"| 000003B0: 5A 24 22 20 54 48 45 4E 20 37 35 35 00 F9 0B 26 |Z$" THEN 755...&| 000003C0: 00 99 22 20 31 31 30 20 50 52 49 4E 54 22 5A 24 |.." 110 PRINT"Z$| 000003D0: 22 44 45 52 20 4C 4F 48 4E 20 46 55 45 52 22 5A |"DER LOHN FUER"Z| 000003E0: 24 22 4E 24 22 5A 24 22 42 45 54 52 41 45 47 54 |$"N$"Z$"BETRAEGT| 000003F0: 22 5A 24 22 52 2A 48 22 3B 00 0C 0C 27 00 99 22 |"Z$"R*H";...'.."| 00000400: 20 31 31 35 20 47 4F 54 4F 20 39 35 00 5D 0C 28 | 115 GOTO 95.].(| 00000410: 00 99 22 20 31 32 30 20 44 41 54 41 20 22 5A 24 |.." 120 DATA "Z$| 00000420: 22 52 2E 20 42 52 41 55 4E 22 5A 24 22 2C 20 33 |"R. BRAUN"Z$", 3| 00000430: 2E 35 30 2C 20 34 30 22 3A 99 22 20 31 32 35 20 |.50, 40":." 125 | 00000440: 44 41 54 41 20 22 5A 24 22 4B 2E 20 42 4C 41 55 |DATA "Z$"K. BLAU| 00000450: 22 5A 24 22 2C 33 2E 37 35 2C 20 32 30 00 8A 0C |"Z$",3.75, 20...| 00000460: 2A 00 99 22 20 31 33 30 20 44 41 54 41 20 22 5A |*.." 130 DATA "Z| 00000470: 24 22 48 41 4E 53 20 44 41 4D 50 46 22 5A 24 22 |$"HANS DAMPF"Z$"| 00000480: 2C 20 34 2E 30 30 2C 20 33 38 00 D5 0C 2C 00 99 |, 4.00, 38...,..| 00000490: 22 20 31 34 30 20 44 41 54 41 20 22 5A 24 22 41 |" 140 DATA "Z$"A| 000004A0: 4E 4E 41 20 52 4F 53 22 5A 24 22 2C 20 34 2E 31 |NNA ROS"Z$", 4.1| 000004B0: 30 2C 20 34 30 22 3A 99 22 20 31 39 39 20 44 41 |0, 40":." 199 DA| 000004C0: 54 41 20 22 5A 24 22 45 4E 44 45 22 5A 24 22 2C |TA "Z$"ENDE"Z$",| 000004D0: 20 30 2C 20 30 00 0D 0D 2E 00 99 22 20 37 35 35 | 0, 0......" 755| 000004E0: 20 45 4E 44 22 3A 8D 37 3A 99 22 1F 44 41 53 20 | END":.7:.".DAS | 000004F0: 4F 42 49 47 45 20 50 52 4F 47 52 41 4D 4D 20 57 |OBIGE PROGRAMM W| 00000500: 49 45 44 45 52 48 4F 4C 54 20 44 49 45 00 34 0D |IEDERHOLT DIE.4.| 00000510: 2F 00 99 22 42 45 46 45 48 4C 45 20 44 45 52 20 |/.."BEFEHLE DER | 00000520: 1E 5A 45 49 4C 45 4E 20 39 35 20 42 49 53 20 31 |.ZEILEN 95 BIS 1| 00000530: 31 35 1F 2C 00 53 0D 30 00 8D 37 3A 81 59 B2 36 |15.,.S.0..7:.Y.6| 00000540: A4 39 3A 8D 39 3A 8D 31 31 3A 82 3A 59 B2 31 38 |.9:.9:.11:.:Y.18| 00000550: 3A 8D 39 00 94 0D 32 00 99 A3 33 31 29 22 53 4F |:.9...2...31)"SO| 00000560: 4C 41 4E 47 45 22 3A 99 22 42 49 53 20 49 4E 1E |LANGE":."BIS IN.| 00000570: 20 5A 45 49 4C 45 20 31 39 39 1F 20 12 45 4E 44 | ZEILE 199. .END| 00000580: 45 92 20 55 4E 44 20 44 49 45 20 57 45 52 54 45 |E. UND DIE WERTE| 00000590: 20 30 2C 22 00 B8 0D 33 00 99 22 30 20 45 49 4E | 0,"...3.."0 EIN| 000005A0: 47 45 4C 45 53 45 4E 20 57 4F 52 44 45 4E 20 53 |GELESEN WORDEN S| 000005B0: 49 4E 44 2E 22 3A 8D 37 00 F6 0D 34 00 59 B2 31 |IND.":.7...4.Y.1| 000005C0: 34 3A 8D 39 3A 8D 31 31 3A 8D 37 3A 59 B2 32 32 |4:.9:.11:.7:Y.22| 000005D0: 3A 8D 39 3A 99 22 44 49 45 81 20 53 43 48 4C 45 |:.9:."DIE. SCHLE| 000005E0: 49 46 45 1F 20 57 49 52 44 20 44 55 52 43 48 20 |IFE. WIRD DURCH | 000005F0: 44 45 4E 20 22 3B 00 29 0E 35 00 99 22 12 47 4F |DEN ";.).5..".GO| 00000600: 54 4F 92 2D 42 45 46 45 48 4C 22 3A 99 22 49 4E |TO.-BEFEHL":."IN| 00000610: 20 1E 5A 45 49 4C 45 20 31 31 35 20 1F 47 45 53 | .ZEILE 115 .GES| 00000620: 43 48 4C 4F 53 53 45 4E 2E 00 3E 0E 36 00 8D 37 |CHLOSSEN..>.6..7| 00000630: 3A 59 B2 39 3A 8D 39 3A 8D 31 31 3A 8D 37 00 5A |:Y.9:.9:.11:.7.Z| 00000640: 0E 37 00 59 31 B2 31 37 3A 59 32 B2 32 33 3A 8D |.7.Y1.17:Y2.23:.| 00000650: 31 33 3A 59 B2 31 37 3A 8D 39 00 A7 0E 38 00 99 |13:Y.17:.9...8..| 00000660: 22 44 45 52 20 49 46 2D 42 45 46 45 48 4C 20 49 |"DER IF-BEFEHL I| 00000670: 4E 20 1E 5A 45 49 4C 45 20 31 30 30 1F 20 42 45 |N .ZEILE 100. BE| 00000680: 45 4E 44 45 54 20 44 49 45 22 3A 99 22 81 53 43 |ENDET DIE":.".SC| 00000690: 48 4C 45 49 46 45 1F 2C 53 4F 42 41 4C 44 20 12 |HLEIFE.,SOBALD .| 000006A0: 45 4E 44 45 92 22 3B 00 DA 0E 3A 00 99 22 20 45 |ENDE.";...:.." E| 000006B0: 49 4E 47 45 4C 45 53 45 4E 20 57 55 52 44 45 2E |INGELESEN WURDE.| 000006C0: 22 3A 8D 37 3A 59 B2 37 3A 8D 39 3A 8D 31 31 3A |":.7:Y.7:.9:.11:| 000006D0: 8D 37 3A 59 B2 32 30 3A 8D 39 00 07 0F 3C 00 99 |.7:Y.20:.9...<..| 000006E0: 22 44 45 52 20 45 49 47 45 4E 54 4C 49 43 48 45 |"DER EIGENTLICHE| 000006F0: 20 57 45 52 54 20 44 49 45 53 45 53 20 50 52 4F | WERT DIESES PRO| 00000700: 47 52 41 4D 4D 45 53 00 34 0F 3D 00 99 22 57 49 |GRAMMES.4.=.."WI| 00000710: 52 44 20 45 52 53 54 20 4F 46 46 45 4E 53 49 43 |RD ERST OFFENSIC| 00000720: 48 54 4C 49 43 48 2C 20 57 45 4E 4E 20 45 53 20 |HTLICH, WENN ES | 00000730: 46 55 45 52 00 6E 0F 3E 00 99 22 56 49 45 4C 45 |FUER.n.>.."VIELE| 00000740: 20 41 52 42 45 49 54 45 52 20 44 55 52 43 48 47 | ARBEITER DURCHG| 00000750: 45 46 55 45 48 52 54 20 57 49 52 44 2E 22 3A 8D |EFUEHRT WIRD.":.| 00000760: 37 3A 59 32 B2 32 34 3A 8D 31 33 3A 8D 39 00 9C |7:Y2.24:.13:.9..| 00000770: 0F 40 00 99 22 55 4D 20 44 41 53 20 50 52 4F 47 |.@.."UM DAS PROG| 00000780: 52 41 4D 4D 20 46 55 45 52 20 4D 45 48 52 20 41 |RAMM FUER MEHR A| 00000790: 52 42 45 49 54 45 52 20 41 55 53 2D 00 CB 0F 41 |RBEITER AUS-...A| 000007A0: 00 99 22 5A 55 46 55 45 48 52 45 4E 2C 4D 55 45 |.."ZUFUEHREN,MUE| 000007B0: 53 53 45 4E 20 4E 55 52 20 4D 45 48 52 20 44 41 |SSEN NUR MEHR DA| 000007C0: 54 41 2D 42 45 46 45 48 4C 45 22 00 05 10 42 00 |TA-BEFEHLE"...B.| 000007D0: 99 22 47 45 47 45 42 45 4E 20 57 45 52 44 45 4E |."GEGEBEN WERDEN| 000007E0: 20 28 46 55 45 52 20 4A 45 44 45 4E 20 41 52 42 | (FUER JEDEN ARB| 000007F0: 45 49 54 45 52 22 3A 99 22 45 49 4E 45 52 29 2E |EITER":."EINER).| 00000800: 91 22 3A 8D 37 00 2A 10 48 00 8D 31 33 3A 8D 39 |.":.7.*.H..13:.9| 00000810: 3A 99 22 9C 45 49 4E 20 51 55 49 5A 21 1F 22 3A |:.".EIN QUIZ!.":| 00000820: 8D 37 3A 43 B2 30 3A 8D 31 33 00 64 10 4A 00 99 |.7:C.0:.13.d.J..| 00000830: 22 57 49 45 20 4F 46 54 20 46 55 45 48 52 54 20 |"WIE OFT FUEHRT | 00000840: 44 45 52 20 43 4F 4D 50 55 54 45 52 20 1E 42 45 |DER COMPUTER .BE| 00000850: 46 45 48 4C 20 39 35 1F 22 3A 99 22 41 55 53 22 |FEHL 95.":."AUS"| 00000860: 3A 59 B2 36 00 94 10 4B 00 8D 39 3A 8D 31 31 3A |:Y.6...K..9:.11:| 00000870: 59 B2 31 38 3A 8D 39 3A 85 22 1D 1D 1D 1D 28 31 |Y.18:.9:."....(1| 00000880: 2C 20 34 20 4F 44 45 52 20 35 29 20 4D 41 4C 20 |, 4 ODER 5) MAL | 00000890: 22 3B 41 24 00 C1 10 4C 00 8B 41 24 B3 B1 22 31 |";A$...L..A$.."1| 000008A0: 22 AF 41 24 B3 B1 22 34 22 AF 41 24 B3 B1 22 35 |".A$.."4".A$.."5| 000008B0: 22 A7 99 51 24 3A 99 22 91 91 91 91 22 3A 89 37 |"..Q$:."....":.7| 000008C0: 34 00 E0 10 4D 00 8D 31 33 3A 59 B2 31 37 3A 8D |4...M..13:Y.17:.| 000008D0: 39 3A 8B 41 24 B2 22 35 22 AF 43 B2 30 A7 39 38 |9:.A$."5".C.0.98| 000008E0: 00 F4 10 4E 00 8B 41 24 B2 22 35 22 AF 43 B2 31 |...N..A$."5".C.1| 000008F0: A7 31 30 30 00 04 11 4F 00 8B 41 24 B2 22 35 22 |.100...O..A$."5"| 00000900: A7 31 30 34 00 13 11 50 00 8B 41 24 B2 22 34 22 |.104...P..A$."4"| 00000910: A7 39 32 00 42 11 52 00 43 B2 43 AA 31 3A 99 22 |.92.B.R.C.C.1:."| 00000920: 81 4E 45 49 4E 1F 2C 20 44 45 4E 4B 45 4E 20 53 |.NEIN., DENKEN S| 00000930: 49 45 20 44 41 52 41 4E 2C 20 44 41 53 53 20 44 |IE DARAN, DASS D| 00000940: 45 52 00 73 11 53 00 99 22 81 47 4F 54 4F 1F 42 |ER.s.S..".GOTO.B| 00000950: 45 46 45 48 4C 20 44 49 45 20 57 49 45 44 45 52 |EFEHL DIE WIEDER| 00000960: 48 4F 4C 55 4E 47 20 44 45 52 20 42 45 46 45 48 |HOLUNG DER BEFEH| 00000970: 4C 45 22 00 A1 11 54 00 99 22 49 4E 20 44 45 4E |LE"...T.."IN DEN| 00000980: 20 1E 5A 45 49 4C 45 4E 20 39 35 20 42 49 53 20 | .ZEILEN 95 BIS | 00000990: 31 31 35 1F 20 42 45 57 49 52 4B 54 2E 22 3A 8D |115. BEWIRKT.":.| 000009A0: 37 00 D2 11 55 00 99 22 44 45 52 81 20 49 46 1F |7...U.."DER. IF.| 000009B0: 42 45 46 45 48 4C 20 42 45 45 4E 44 45 54 20 44 |BEFEHL BEENDET D| 000009C0: 49 45 20 53 43 48 4C 45 49 46 45 20 45 52 53 54 |IE SCHLEIFE ERST| 000009D0: 2C 22 00 19 12 56 00 99 22 57 45 4E 4E 20 44 55 |,"...V.."WENN DU| 000009E0: 52 43 48 20 44 45 4E 20 42 45 46 45 48 4C 20 49 |RCH DEN BEFEHL I| 000009F0: 4E 1E 20 5A 45 49 4C 45 20 31 39 39 1F 20 12 45 |N. ZEILE 199. .E| 00000A00: 4E 44 45 92 22 3A 99 22 45 49 4E 47 45 4C 45 53 |NDE.":."EINGELES| 00000A10: 45 4E 20 57 55 52 44 45 2E 00 33 12 58 00 8D 37 |EN WURDE..3.X..7| 00000A20: 3A 59 B2 31 34 3A 8D 39 3A 8D 31 31 3A 8D 37 3A |:Y.14:.9:.11:.7:| 00000A30: 8D 31 33 00 68 12 5A 00 59 B2 31 37 3A 8D 39 3A |.13.h.Z.Y.17:.9:| 00000A40: 99 22 56 45 52 53 55 43 48 45 4E 20 53 49 45 20 |."VERSUCHEN SIE | 00000A50: 45 53 20 4E 4F 43 48 4D 41 4C 21 22 3A 8D 37 3A |ES NOCHMAL!":.7:| 00000A60: 8D 31 33 3A 59 B2 31 37 00 73 12 5B 00 8D 39 3A |.13:Y.17.s.[..9:| 00000A70: 8D 37 34 00 9B 12 5C 00 99 22 81 4E 45 49 4E 1F |.74...\..".NEIN.| 00000A80: 2C 20 34 20 4D 41 4C 20 49 53 54 20 4E 49 43 48 |, 4 MAL IST NICH| 00000A90: 54 20 52 49 43 48 54 49 47 2E 22 00 CA 12 5D 00 |T RICHTIG."...].| 00000AA0: 99 22 42 45 41 43 48 54 45 4E 20 53 49 45 2C 20 |."BEACHTEN SIE, | 00000AB0: 44 41 53 53 20 1E 5A 45 49 4C 45 20 39 35 1F 20 |DASS .ZEILE 95. | 00000AC0: 46 55 45 52 20 4A 45 44 45 4E 00 14 13 5E 00 99 |FUER JEDEN...^..| 00000AD0: 22 44 41 54 41 2D 42 45 46 45 48 4C 20 45 49 4E |"DATA-BEFEHL EIN| 00000AE0: 53 43 48 4C 49 45 53 53 4C 49 43 48 1E 20 5A 45 |SCHLIESSLICH. ZE| 00000AF0: 49 4C 45 20 31 39 39 1F 22 3A 99 22 45 49 4E 4D |ILE 199.":."EINM| 00000B00: 41 4C 20 41 55 53 47 45 46 55 45 48 52 54 20 57 |AL AUSGEFUEHRT W| 00000B10: 49 52 44 2E 00 41 13 5F 00 8D 37 3A 99 22 56 45 |IRD..A._..7:."VE| 00000B20: 52 53 55 43 48 45 4E 20 53 49 45 20 45 53 20 4E |RSUCHEN SIE ES N| 00000B30: 4F 43 48 4D 41 4C 21 22 3A 43 B2 43 AA 31 3A 8D |OCHMAL!":C.C.1:.| 00000B40: 37 00 55 13 60 00 8D 31 33 3A 59 B2 31 37 3A 8D |7.U.`..13:Y.17:.| 00000B50: 39 3A 89 37 34 00 7A 13 62 00 99 22 1E 41 55 46 |9:.74.z.b..".AUF| 00000B60: 20 41 4E 48 49 45 42 20 52 49 43 48 54 49 47 21 | ANHIEB RICHTIG!| 00000B70: 21 22 3A 8D 37 3A 89 31 30 36 00 A8 13 64 00 99 |!":.7:.106...d..| 00000B80: 22 1E 42 45 49 4D 20 5A 57 45 49 54 45 4E 20 56 |".BEIM ZWEITEN V| 00000B90: 45 52 53 55 43 48 20 52 49 43 48 54 49 47 21 22 |ERSUCH RICHTIG!"| 00000BA0: 3A 8D 37 3A 89 31 30 36 00 B8 13 68 00 99 22 1E |:.7:.106...h..".| 00000BB0: 52 49 43 48 54 49 47 2E 00 E8 13 6A 00 99 22 1F |RICHTIG....j..".| 00000BC0: 44 45 52 20 52 45 41 44 2D 42 45 46 45 48 4C 20 |DER READ-BEFEHL | 00000BD0: 57 49 52 44 20 35 20 4D 41 4C 20 41 55 53 47 45 |WIRD 5 MAL AUSGE| 00000BE0: 46 55 45 48 52 54 2C 22 00 0E 14 6B 00 99 22 46 |FUEHRT,"...k.."F| 00000BF0: 55 45 52 20 4A 45 44 45 4E 20 44 41 54 45 4E 2D |UER JEDEN DATEN-| 00000C00: 42 45 46 45 48 4C 20 45 49 4E 4D 41 4C 2E 00 48 |BEFEHL EINMAL..H| 00000C10: 14 D2 00 8D 37 3A 43 24 B2 22 12 20 22 3A 8D 33 |....7:C$.". ":.3| 00000C20: 3A 99 22 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1C 45 |:."............E| 00000C30: 4E 44 45 20 56 4F 4E 20 4C 45 4B 54 49 4F 4E 20 |NDE VON LEKTION | 00000C40: 37 20 54 45 49 4C 20 31 00 74 14 D3 00 99 22 11 |7 TEIL 1.t....".| 00000C50: 11 11 1D 1D 1D 1D 1D 1F 42 49 54 54 45 20 57 41 |........BITTE WA| 00000C60: 52 54 45 4E 20 53 49 45 2C 20 42 49 53 20 54 45 |RTEN SIE, BIS TE| 00000C70: 49 4C 20 32 00 8F 14 D4 00 99 22 1D 1D 1D 1D 1D |IL 2......".....| 00000C80: 45 49 4E 47 45 4C 45 53 45 4E 20 49 53 54 2E 00 |EINGELESEN IST..| 00000C90: A1 14 D6 00 93 22 37 2F 32 4C 45 4B 54 49 4F 4E |....."7/2LEKTION| 00000CA0: 22 00 00 00 01 |".... |
.......45,B(174):.46,B(175):.:.788,52:.6 57,128.H....53280,1:.53281,1:.16.Z....". .":.I.1.39:.C$;:.:.I.1.22:.".."C$;:.:.". ";......I.1.38:."."C$".";:.:.C$......I.1 .23:."."C$".";:.:..C....A$:.A$."".7.K... .:.......".":.I.0.Y.1:.".";:.:."..";:..' ....J.1.15:.">";:.I.1.40:.:."..>..";:.K. 1.20:.:.:." ":..K...Y.Y1:.9:.I.0.Y2.Y1:. " ":..T....9:.......I.1.1000:.:......Z$.G( 34):C$.".":.3:."......".12)".LEKTION 7.. ..".R.....9)".1. SCHLEIFEN.......9)"2. F OR...NEXT-BEFEHLE":..9)"3. REM-ANWEISUNG .).....9)"4. PROGRAMMBEISPIEL":.7.M...." .".12)".SCHLEIFEN":.7:.".EINE DER NUETZL ICHSTEN EIGENSCHAFTEN......"IHRES CBM 64 IST DIE MOEGLICHKEIT, SICH".F...."OFT W IEDERHOLENDE VORGAENGE EINFACH......"UND SCHNELL AUSZUFUEHREN.":.7... ..".ES SOL L NUN AN EINEM PROGRAMM ZUR.A.!.."BERECH NUNG VERSCHIEDENER ARBEITSLOEHNE".}.".." DER GEBRAUCH VON .SCHLEIFEN .ILLUSTRIERT ":."WERDEN:"...$..7:.". 95 READ N$,R,H ":." 100 IF N$="Z$"ENDE"Z$" THEN 755...& .." 110 PRINT"Z$"DER LOHN FUER"Z$"N$"Z$" BETRAEGT"Z$"R*H";...'.." 115 GOTO 95.].( .." 120 DATA "Z$"R. BRAUN"Z$", 3.50, 40" :." 125 DATA "Z$"K. BLAU"Z$",3.75, 20... *.." 130 DATA "Z$"HANS DAMPF"Z$", 4.00, 38.U.,.." 140 DATA "Z$"ANNA ROS"Z$", 4.1 0, 40":." 199 DATA "Z$"ENDE"Z$", 0, 0... ..." 755 END":.7:.".DAS OBIGE PROGRAMM W IEDERHOLT DIE.4./.."BEFEHLE DER .ZEILEN 95 BIS 115.,.S.0..7:.Y.6.9:.9:.11:.:Y.18 :.9...2...31)"SOLANGE":."BIS IN. ZEILE 1 99. .ENDE. UND DIE WERTE 0,"...3.."0 EIN GELESEN WORDEN SIND.":.7...4.Y.14:.9:.11 :.7:Y.22:.9:."DIE. SCHLEIFE. WIRD DURCH DEN ";.).5..".GOTO.-BEFEHL":."IN .ZEILE 115 .GESCHLOSSEN..>.6..7:Y.9:.9:.11:.7.Z .7.Y1.17:Y2.23:.13:Y.17:.9...8.."DER IF- BEFEHL IN .ZEILE 100. BEENDET DIE":.".SC HLEIFE.,SOBALD .ENDE.";.Z.:.." EINGELESE N WURDE.":.7:Y.7:.9:.11:.7:Y.20:.9...<.. "DER EIGENTLICHE WERT DIESES PROGRAMMES. 4.=.."WIRD ERST OFFENSICHTLICH, WENN ES FUER.N.>.."VIELE ARBEITER DURCHGEFUEHRT WIRD.":.7:Y2.24:.13:.9...@.."UM DAS PROG RAMM FUER MEHR ARBEITER AUS-.K.A.."ZUFUE HREN,MUESSEN NUR MEHR DATA-BEFEHLE"...B. ."GEGEBEN WERDEN (FUER JEDEN ARBEITER":. "EINER)..":.7.*.H..13:.9:.".EIN QUIZ!.": .7:C.0:.13.D.J.."WIE OFT FUEHRT DER COMP UTER .BEFEHL 95.":."AUS":Y.6...K..9:.11: Y.18:.9:."....(1, 4 ODER 5) MAL ";A$.A.L ..A$.."1".A$.."4".A$.."5"..Q$:."....":.7 4...M..13:Y.17:.9:.A$."5".C.0.98...N..A$ ."5".C.1.100...O..A$."5".104...P..A$."4" .92.B.R.C.C.1:.".NEIN., DENKEN SIE DARAN , DASS DER.S.S..".GOTO.BEFEHL DIE WIEDER HOLUNG DER BEFEHLE"...T.."IN DEN .ZEILEN 95 BIS 115. BEWIRKT.":.7.R.U.."DER. IF. BEFEHL BEENDET DIE SCHLEIFE ERST,"...V.. "WENN DURCH DEN BEFEHL IN. ZEILE 199. .E NDE.":."EINGELESEN WURDE..3.X..7:Y.14:.9 :.11:.7:.13.H.Z.Y.17:.9:."VERSUCHEN SIE ES NOCHMAL!":.7:.13:Y.17.S.[..9:.74...\. .".NEIN., 4 MAL IST NICHT RICHTIG.".J.]. ."BEACHTEN SIE, DASS .ZEILE 95. FUER JED EN...^.."DATA-BEFEHL EINSCHLIESSLICH. ZE ILE 199.":."EINMAL AUSGEFUEHRT WIRD..A._ ..7:."VERSUCHEN SIE ES NOCHMAL!":C.C.1:. 7.U.`..13:Y.17:.9:.74.Z.B..".AUF ANHIEB RICHTIG!!":.7:.106...D..".BEIM ZWEITEN V ERSUCH RICHTIG!":.7:.106...H..".RICHTIG. ...J..".DER READ-BEFEHL WIRD 5 MAL AUSGE FUEHRT,"...K.."FUER JEDEN DATEN-BEFEHL E INMAL..H.R..7:C$.". ":.3:."............E NDE VON LEKTION 7 TEIL 1.T.S.."......... BITTE WARTEN SIE, BIS TEIL 2...T.."..... EINGELESEN IST....V.."7/2LEKTION"....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL