5/2LEKTION
FILE INFORMATION
FILENAME(S): 5/2LEKTION
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-10-20 00:37:03
APPEARS ON: 1 disk(s)
FILE HASH
c5e8fb7f4ff7d1d3162349b7976b27fe26f74ff03cbfa11d042b9b385ff22231
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ALDEBARAN | 5/2LEKTION | PRG | Treasure Chest - Holger | 13 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 00 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 44 |88,52:.657,128.D|
00000030: 08 01 00 97 35 33 32 38 30 2C 31 3A 97 35 33 32 |....53280,1:.532|
00000040: 38 31 2C 31 00 84 08 02 00 51 24 B2 22 91 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 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 20 91 91 22 3A 5A 24 B2 C7 28 33 34 29 | ..":Z$..(34)|
00000080: 3A 89 31 30 00 B6 08 03 00 99 22 93 1E 22 3A 81 |:.10......"..":.|
00000090: 49 B2 31 A4 33 39 3A 99 43 24 3B 3A 82 3A 81 49 |I.1.39:.C$;:.:.I|
000000A0: B2 31 A4 32 32 3A 99 22 9D 11 22 43 24 3B 3A 82 |.1.22:.".."C$;:.|
000000B0: 3A 99 22 9D 22 3B 00 D3 08 04 00 81 49 B2 31 A4 |:.".";......I.1.|
000000C0: 33 38 3A 99 22 9D 22 43 24 22 9D 22 3B 3A 82 3A |38:."."C$".";:.:|
000000D0: 99 43 24 00 EE 08 05 00 81 49 B2 31 A4 32 33 3A |.C$......I.1.23:|
000000E0: 99 22 91 22 43 24 22 9D 22 3B 3A 82 3A 8E 00 FF |."."C$".";:.:...|
000000F0: 08 06 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 00 |....A$:.A$."".6.|
00000100: 07 09 07 00 99 3A 8E 00 4B 09 0A 00 99 22 93 11 |.....:..K...."..|
00000110: 11 11 11 11 22 3A 99 A3 31 30 29 22 1C 49 46 2E |....":..10)".IF.|
00000120: 2E 2E 54 48 45 4E 2D 42 45 46 45 48 4C 22 3A 99 |..THEN-BEFEHL":.|
00000130: A3 31 31 29 22 1F 11 11 11 11 28 46 4F 52 54 53 |.11)".....(FORTS|
00000140: 45 54 5A 55 4E 47 29 22 3A 8D 36 00 78 09 78 00 |ETZUNG)":.6.x.x.|
00000150: 99 22 93 44 45 52 20 49 46 2E 2E 2E 54 48 45 4E |.".DER IF...THEN|
00000160: 2D 42 45 46 45 48 4C 20 45 52 4D 4F 45 47 4C 49 |-BEFEHL ERMOEGLI|
00000170: 43 48 54 20 45 49 4E 45 00 A5 09 79 00 99 22 42 |CHT EINE...y.."B|
00000180: 45 44 49 4E 47 54 45 20 41 45 4E 44 45 52 55 4E |EDINGTE AENDERUN|
00000190: 47 20 44 45 52 20 52 45 49 48 45 4E 46 4F 4C 47 |G DER REIHENFOLG|
000001A0: 45 20 44 45 52 00 F4 09 7A 00 99 22 50 52 4F 47 |E DER...z.."PROG|
000001B0: 52 41 4D 4D 53 43 48 52 49 54 54 45 2C 20 49 4E |RAMMSCHRITTE, IN|
000001C0: 20 41 42 48 41 45 4E 47 49 47 4B 45 49 54 20 56 | ABHAENGIGKEIT V|
000001D0: 4F 4E 20 20 44 45 52 20 81 45 52 46 55 45 4C 4C |ON DER .ERFUELL|
000001E0: 55 4E 47 20 45 49 4E 45 52 20 42 45 44 49 4E 47 |UNG EINER BEDING|
000001F0: 55 4E 47 2E 00 21 0A 7B 00 8D 37 3A 99 22 1F 45 |UNG..!.{..7:.".E|
00000200: 49 4E 45 20 81 42 45 44 49 4E 47 55 4E 47 1F 20 |INE .BEDINGUNG. |
00000210: 48 41 54 20 44 49 45 20 46 4F 52 4D 3A 22 3A 8D |HAT DIE FORM:":.|
00000220: 37 00 4F 0A 7C 00 99 22 81 20 20 20 20 12 41 55 |7.O.|..". .AU|
00000230: 53 44 52 55 43 4B 92 20 52 45 4C 41 54 49 4F 4E |SDRUCK. RELATION|
00000240: 20 12 41 55 53 44 52 55 43 4B 92 22 3A 8D 37 00 | .AUSDRUCK.":.7.|
00000250: 82 0A 7D 00 99 22 1F 57 4F 42 45 49 20 46 4F 47 |..}..".WOBEI FOG|
00000260: 45 4E 44 45 20 52 45 4C 41 54 49 4F 4E 45 4E 20 |ENDE RELATIONEN |
00000270: 5A 55 4C 41 45 53 53 49 47 22 3A 99 22 53 49 4E |ZULAESSIG":."SIN|
00000280: 44 3A 00 C0 0A 7E 00 99 22 81 20 20 20 20 20 12 |D:...~..". .|
00000290: 52 45 4C 41 54 49 4F 4E 92 20 12 42 45 44 45 55 |RELATION. .BEDEU|
000002A0: 54 55 4E 47 92 22 3A 99 3A 99 22 1E 20 20 20 20 |TUNG.":.:.". |
000002B0: 20 20 20 20 3D 20 20 20 20 20 47 4C 45 49 43 48 | = GLEICH|
000002C0: 00 FE 0A 7F 00 99 22 20 20 20 20 20 20 20 20 3E |......" >|
000002D0: 20 20 20 20 20 47 52 4F 45 53 53 45 52 20 41 4C | GROESSER AL|
000002E0: 53 22 3A 99 22 20 20 20 20 20 20 20 20 3C 20 20 |S":." < |
000002F0: 20 20 20 4B 4C 45 49 4E 45 52 20 41 4C 53 00 46 | KLEINER ALS.F|
00000300: 0B 80 00 99 22 20 20 20 20 20 20 20 20 3E 3D 20 |...." >= |
00000310: 20 20 20 47 52 4F 45 53 53 45 52 20 41 4C 53 20 | GROESSER ALS |
00000320: 4F 44 45 52 20 47 4C 45 49 43 48 22 3A 99 22 20 |ODER GLEICH":." |
00000330: 20 20 20 20 20 20 20 3C 3D 20 20 20 20 4B 4C 45 | <= KLE|
00000340: 49 4E 45 52 22 3B 00 7E 0B 81 00 99 22 41 4C 53 |INER";.~...."ALS|
00000350: 20 4F 44 45 52 20 47 4C 45 49 43 48 22 3A 99 22 | ODER GLEICH":."|
00000360: 20 20 20 20 20 20 20 20 3C 3E 20 20 20 20 4E 49 | <> NI|
00000370: 43 48 54 20 47 4C 45 49 43 48 22 3A 8D 36 00 9C |CHT GLEICH":.6..|
00000380: 0B 82 00 59 31 B2 39 3A 59 32 B2 32 32 3A 8D 35 |...Y1.9:Y2.22:.5|
00000390: 30 30 30 3A 8D 36 30 30 30 3A 8D 37 00 D2 0B 84 |000:.6000:.7....|
000003A0: 00 99 22 1F 45 49 4E 20 49 46 2E 2E 2E 54 48 45 |..".EIN IF...THE|
000003B0: 4E 2D 42 45 46 45 48 4C 20 48 41 54 20 46 4F 4C |N-BEFEHL HAT FOL|
000003C0: 47 45 4E 44 45 53 20 22 3A 99 22 46 4F 52 4D 41 |GENDES ":."FORMA|
000003D0: 54 3A 00 0B 0C 88 00 99 22 81 11 12 5A 45 49 4C |T:......"...ZEIL|
000003E0: 45 4E 23 31 92 20 49 46 20 12 42 45 44 49 4E 47 |EN#1. IF .BEDING|
000003F0: 55 4E 47 92 20 54 48 45 4E 20 12 5A 45 49 4C 45 |UNG. THEN .ZEILE|
00000400: 4E 23 32 92 22 3A 8D 37 3A 8D 37 00 32 0C 8E 00 |N#2.":.7:.7.2...|
00000410: 99 22 1F 44 49 45 20 42 45 44 49 4E 47 55 4E 47 |.".DIE BEDINGUNG|
00000420: 20 49 53 54 20 45 49 4E 20 54 45 53 54 2E 22 3A | IST EIN TEST.":|
00000430: 8D 37 00 6F 0C 90 00 99 22 49 53 54 20 44 49 45 |.7.o...."IST DIE|
00000440: 20 81 42 45 44 49 4E 47 55 4E 47 20 45 52 46 55 | .BEDINGUNG ERFU|
00000450: 45 4C 4C 54 1F 2C 20 53 4F 20 57 49 52 44 20 49 |ELLT., SO WIRD I|
00000460: 4D 20 20 4E 41 45 43 48 53 54 45 4E 20 22 3B 00 |M NAECHSTEN ";.|
00000470: B2 0C 92 00 99 22 50 52 4F 47 52 41 4D 4D 53 43 |....."PROGRAMMSC|
00000480: 48 52 49 54 54 20 44 45 52 20 42 45 46 45 48 4C |HRITT DER BEFEHL|
00000490: 20 49 4E 22 3A 99 22 12 5A 45 49 4C 45 4E 23 32 | IN":.".ZEILEN#2|
000004A0: 92 20 41 55 53 47 45 46 55 45 48 52 54 2E 22 3A |. AUSGEFUEHRT.":|
000004B0: 8D 37 00 EE 0C 94 00 99 22 49 53 54 20 44 49 45 |.7......"IST DIE|
000004C0: 20 81 42 45 44 49 4E 47 55 4E 47 20 4E 49 43 48 | .BEDINGUNG NICH|
000004D0: 54 20 45 52 46 55 45 4C 4C 54 1F 2C 20 53 4F 20 |T ERFUELLT., SO |
000004E0: 20 20 20 57 49 52 44 20 41 4C 53 20 22 3B 00 36 | WIRD ALS ";.6|
000004F0: 0D 95 00 99 22 4E 41 45 43 48 53 54 45 53 20 44 |...."NAECHSTES D|
00000500: 45 52 20 42 45 46 45 48 4C 20 49 4E 20 44 45 52 |ER BEFEHL IN DER|
00000510: 22 3A 99 22 5A 45 49 4C 45 20 4E 41 43 48 20 12 |":."ZEILE NACH .|
00000520: 5A 45 49 4C 45 4E 23 31 92 20 41 55 53 47 45 46 |ZEILEN#1. AUSGEF|
00000530: 55 45 48 52 54 2E 00 3D 0D 96 00 8D 36 00 71 0D |UEHRT..=....6.q.|
00000540: 9C 00 99 22 93 45 49 4E 49 47 45 20 42 45 49 53 |...".EINIGE BEIS|
00000550: 50 49 45 4C 45 20 46 55 45 52 20 49 46 2E 2E 2E |PIELE FUER IF...|
00000560: 54 48 45 4E 2D 42 45 46 45 48 4C 45 3A 22 3A 8D |THEN-BEFEHLE:":.|
00000570: 37 00 A5 0D 9E 00 99 22 1E 32 20 49 46 20 41 3D |7......".2 IF A=|
00000580: 30 20 54 48 45 4E 20 31 30 22 3A 8D 37 3A 99 22 |0 THEN 10":.7:."|
00000590: 34 20 49 46 20 58 3C 3D 39 39 20 54 48 45 4E 20 |4 IF X<=99 THEN |
000005A0: 32 22 3A 8D 37 00 CB 0D 9F 00 99 22 36 20 49 46 |2":.7......"6 IF|
000005B0: 20 52 2B 57 3E 50 2D 54 2B 31 20 54 48 45 4E 20 | R+W>P-T+1 THEN |
000005C0: 35 35 22 3A 8D 37 9B 31 35 39 AB 00 F1 0D A0 00 |55":.7.159......|
000005D0: 99 22 38 20 49 46 20 41 24 3D 22 5A 24 22 4E 45 |."8 IF A$="Z$"NE|
000005E0: 49 4E 22 5A 24 22 54 48 45 4E 20 38 38 22 3A 8D |IN"Z$"THEN 88":.|
000005F0: 36 00 2C 0E A3 00 99 22 93 1E 31 20 49 46 20 41 |6.,...."..1 IF A|
00000600: 3D 32 2A 42 2B 43 43 20 54 48 45 4E 20 31 30 22 |=2*B+CC THEN 10"|
00000610: 3A 99 22 32 20 49 46 20 50 2A 33 2B 55 2F 31 2E |:."2 IF P*3+U/1.|
00000620: 35 20 3E 20 54 48 45 4E 20 31 38 22 00 50 0E A4 |5 > THEN 18".P..|
00000630: 00 99 22 33 20 49 46 20 41 24 3D 22 5A 24 22 4E |.."3 IF A$="Z$"N|
00000640: 45 49 4E 22 5A 24 22 20 54 48 45 4E 20 31 30 30 |EIN"Z$" THEN 100|
00000650: 00 92 0E A5 00 99 3A 99 22 1F 57 45 4C 43 48 45 |......:.".WELCHE|
00000660: 20 44 45 52 20 4F 42 49 47 45 4E 20 41 4E 57 45 | DER OBIGEN ANWE|
00000670: 49 53 55 4E 47 45 4E 20 49 53 54 20 12 4B 45 49 |ISUNGEN IST .KEI|
00000680: 4E 92 20 20 5A 55 4C 41 45 53 53 49 47 45 52 20 |N. ZULAESSIGER |
00000690: 22 3B 00 C1 0E A6 00 99 22 49 46 2E 2E 2E 54 48 |";......"IF...TH|
000006A0: 45 4E 2D 42 45 46 45 48 4C 20 28 31 2C 20 32 20 |EN-BEFEHL (1, 2 |
000006B0: 4F 44 45 52 20 33 29 22 3B 3A 85 58 24 3A 99 3A |ODER 3)";:.X$:.:|
000006C0: 99 00 D8 0E A7 00 91 C5 28 58 24 29 89 31 36 39 |........(X$).169|
000006D0: 2C 31 37 34 2C 31 37 32 00 E5 0E A8 00 99 51 24 |,174,172......Q$|
000006E0: 3A 89 31 36 33 00 10 0F A9 00 99 22 81 4E 45 49 |:.163......".NEI|
000006F0: 4E 2C 20 44 49 45 53 45 52 20 42 45 46 45 48 4C |N, DIESER BEFEHL|
00000700: 20 49 53 54 20 4B 4F 52 52 45 4B 54 21 22 3A 99 | IST KORREKT!":.|
00000710: 00 5D 0F AA 00 99 22 1F 45 49 4E 45 20 52 45 4C |.]....".EINE REL|
00000720: 41 54 49 4F 4E 20 5A 57 49 53 43 48 45 4E 20 45 |ATION ZWISCHEN E|
00000730: 49 4E 45 52 20 56 41 52 49 41 42 4C 45 4E 20 20 |INER VARIABLEN |
00000740: 55 4E 44 20 45 49 4E 45 4D 20 54 45 52 4D 20 49 |UND EINEM TERM I|
00000750: 53 54 20 5A 55 4C 41 45 53 53 49 47 2E 00 97 0F |ST ZULAESSIG....|
00000760: AB 00 99 3A 99 22 42 49 54 54 45 2C 20 56 45 52 |...:."BITTE, VER|
00000770: 53 55 43 48 45 4E 20 53 49 45 20 45 53 20 4E 4F |SUCHEN SIE ES NO|
00000780: 43 48 45 49 4E 4D 41 4C 21 22 3A 8D 36 3A 99 22 |CHEINMAL!":.6:."|
00000790: 93 22 3A 89 31 36 33 00 E4 0F AC 00 99 22 81 4E |.":.163......".N|
000007A0: 45 49 4E 2C 20 44 49 45 53 45 52 20 42 45 46 45 |EIN, DIESER BEFE|
000007B0: 48 4C 20 49 53 54 20 4B 4F 52 52 45 4B 54 21 22 |HL IST KORREKT!"|
000007C0: 3A 99 3A 99 22 1F 45 49 4E 45 20 52 45 4C 41 54 |:.:.".EINE RELAT|
000007D0: 49 4F 4E 20 5A 57 49 53 43 48 45 4E 20 45 49 4E |ION ZWISCHEN EIN|
000007E0: 45 4D 22 3B 00 22 10 AD 00 99 22 20 53 54 52 49 |EM";."...." STRI|
000007F0: 4E 47 20 55 4E 44 20 45 49 4E 45 52 20 53 54 52 |NG UND EINER STR|
00000800: 49 4E 47 56 41 52 49 41 42 4C 45 4E 20 49 53 54 |INGVARIABLEN IST|
00000810: 20 5A 55 4C 41 45 53 53 49 47 2E 22 20 3A 89 31 | ZULAESSIG." :.1|
00000820: 37 31 00 6D 10 AE 00 99 22 11 1E 47 41 4E 5A 20 |71.m...."..GANZ |
00000830: 47 45 4E 41 55 21 1F 20 5A 45 49 4C 45 20 32 20 |GENAU!. ZEILE 2 |
00000840: 49 53 54 20 46 41 4C 53 43 48 2C 44 41 20 52 45 |IST FALSCH,DA RE|
00000850: 43 48 54 53 4E 45 42 45 4E 20 44 45 52 20 52 45 |CHTSNEBEN DER RE|
00000860: 4C 41 54 49 4F 4E 20 4B 45 49 4E 22 3B 00 8D 10 |LATION KEIN";...|
00000870: AF 00 99 22 20 41 55 53 44 52 55 43 4B 20 53 54 |..." AUSDRUCK ST|
00000880: 45 48 54 2E 22 3A 8D 36 3A 89 32 30 30 00 D7 10 |EHT.":.6:.200...|
00000890: B0 00 99 22 93 1F 4D 4F 45 43 48 54 45 4E 20 53 |..."..MOECHTEN S|
000008A0: 49 45 20 44 45 4E 20 41 42 53 43 48 4E 49 54 54 |IE DEN ABSCHNITT|
000008B0: 20 55 45 42 45 52 22 3A 99 22 49 46 2E 2E 54 48 | UEBER":."IF..TH|
000008C0: 45 4E 2D 42 45 46 45 48 4C 45 20 4E 4F 43 48 20 |EN-BEFEHLE NOCH |
000008D0: 45 49 4E 4D 41 4C 22 00 03 11 B2 00 85 22 4C 45 |EINMAL"......"LE|
000008E0: 53 45 4E 20 28 4A 41 20 4F 44 45 52 20 4E 45 49 |SEN (JA ODER NEI|
000008F0: 4E 29 22 3B 41 24 3A 8B 41 24 B2 22 4A 41 22 A7 |N)";A$:.A$."JA".|
00000900: 31 32 30 00 16 11 B3 00 8B 41 24 B2 22 4E 45 49 |120......A$."NEI|
00000910: 4E 22 A7 34 30 30 00 23 11 B4 00 99 51 24 3A 89 |N".400.#....Q$:.|
00000920: 31 37 36 00 72 11 C8 00 99 22 93 4E 4F 43 48 20 |176.r....".NOCH |
00000930: 45 49 4E 45 20 41 4E 44 45 52 45 20 46 4F 52 4D |EINE ANDERE FORM|
00000940: 20 44 45 53 20 49 46 2E 2E 2E 54 48 45 4E 2D 20 | DES IF...THEN- |
00000950: 20 20 20 42 45 46 45 48 4C 53 20 49 53 54 20 4D | BEFEHLS IST M|
00000960: 4F 45 47 4C 49 43 48 2C 20 4E 41 45 4D 4C 49 43 |OEGLICH, NAEMLIC|
00000970: 48 3A 00 A8 11 CA 00 8D 37 3A 99 22 81 20 20 12 |H:......7:.". .|
00000980: 5A 45 49 4C 45 4E 23 92 20 49 46 20 12 42 45 44 |ZEILEN#. IF .BED|
00000990: 49 4E 47 55 4E 47 92 20 54 48 45 4E 20 12 42 45 |INGUNG. THEN .BE|
000009A0: 46 45 48 4C 22 3A 8D 37 00 F2 11 CC 00 99 22 1F |FEHL":.7......".|
000009B0: 49 53 54 20 44 49 45 81 20 42 45 44 49 4E 47 55 |IST DIE. BEDINGU|
000009C0: 4E 47 20 45 52 46 55 45 4C 4C 54 1F 2C 20 53 4F |NG ERFUELLT., SO|
000009D0: 20 57 49 52 44 20 44 45 52 20 12 42 45 46 45 48 | WIRD DER .BEFEH|
000009E0: 4C 92 20 55 4E 44 20 44 41 4E 4E 20 44 45 52 20 |L. UND DANN DER |
000009F0: 22 3B 00 2C 12 CD 00 99 22 42 45 46 45 48 4C 20 |";.,...."BEFEHL |
00000A00: 44 45 52 20 5A 45 49 4C 45 20 20 20 20 4E 41 43 |DER ZEILE NAC|
00000A10: 48 20 12 5A 45 49 4C 45 4E 23 92 20 41 55 53 47 |H .ZEILEN#. AUSG|
00000A20: 45 46 55 45 48 52 54 2E 22 3A 8D 37 00 78 12 CF |EFUEHRT.":.7.x..|
00000A30: 00 99 22 49 53 54 20 44 49 45 20 81 42 45 44 49 |.."IST DIE .BEDI|
00000A40: 4E 47 55 4E 47 20 4E 49 43 48 54 20 45 52 46 55 |NGUNG NICHT ERFU|
00000A50: 45 4C 4C 54 1F 2C 20 57 49 52 44 20 20 12 42 45 |ELLT., WIRD .BE|
00000A60: 46 45 48 4C 92 20 41 55 53 47 45 4C 41 53 53 45 |FEHL. AUSGELASSE|
00000A70: 4E 20 55 4E 44 20 22 3B 00 BD 12 D0 00 99 22 44 |N UND ";......"D|
00000A80: 41 53 20 50 52 4F 47 52 41 4D 4D 20 57 49 52 44 |AS PROGRAMM WIRD|
00000A90: 4D 49 54 20 44 45 52 20 5A 45 49 4C 45 20 4E 41 |MIT DER ZEILE NA|
00000AA0: 43 48 20 12 5A 45 49 4C 45 4E 23 92 20 46 4F 52 |CH .ZEILEN#. FOR|
00000AB0: 54 47 45 53 45 54 5A 54 2E 22 3A 8D 37 00 00 13 |TGESETZT.":.7...|
00000AC0: D1 00 99 22 45 49 4E 49 47 45 20 42 45 49 53 50 |..."EINIGE BEISP|
00000AD0: 49 45 4C 45 3A 22 3A 8D 37 3A 99 22 1E 20 20 34 |IELE:":.7:.". 4|
00000AE0: 35 20 49 46 20 58 3E 31 32 20 54 48 45 4E 20 50 |5 IF X>12 THEN P|
00000AF0: 52 49 4E 54 20 22 5A 24 22 4A 41 22 5A 24 3A 99 |RINT "Z$"JA"Z$:.|
00000B00: 00 4A 13 D2 00 99 22 20 20 36 35 20 49 46 20 41 |.J...." 65 IF A|
00000B10: 24 3D 22 5A 24 22 4E 45 49 4E 22 5A 24 22 20 54 |$="Z$"NEIN"Z$" T|
00000B20: 48 45 4E 20 49 4E 50 55 54 20 42 24 22 3A 99 3A |HEN INPUT B$":.:|
00000B30: 99 22 20 20 38 20 49 46 20 52 3D 54 20 54 48 45 |." 8 IF R=T THE|
00000B40: 4E 20 56 3D 56 2B 31 22 3A 99 00 6C 13 D4 00 99 |N V=V+1":..l....|
00000B50: 22 20 20 37 20 49 46 20 4C 3E 3D 31 30 30 20 54 |" 7 IF L>=100 T|
00000B60: 48 45 4E 20 45 4E 44 22 3B 3A 8D 36 00 75 13 FA |HEN END";:.6.u..|
00000B70: 00 89 31 37 36 00 AA 13 90 01 43 24 B2 22 12 FF |..176.....C$."..|
00000B80: 22 3A 8D 33 3A 99 22 11 11 11 11 22 A3 37 29 22 |":.3:."....".7)"|
00000B90: 1C 45 4E 44 45 20 56 4F 4E 20 4C 45 4B 54 49 4F |.ENDE VON LEKTIO|
00000BA0: 4E 20 35 20 54 45 49 4C 20 32 00 F1 13 92 01 99 |N 5 TEIL 2......|
00000BB0: 22 11 11 11 11 1D 1D 1D 1D 20 1F 20 42 49 54 54 |"........ . BITT|
00000BC0: 45 20 57 41 52 54 45 4E 20 53 49 45 2C 20 42 49 |E WARTEN SIE, BI|
00000BD0: 53 20 54 45 49 4C 20 33 22 3A 99 22 1D 1D 1D 1D |S TEIL 3":."....|
00000BE0: 20 20 45 49 4E 47 45 4C 45 53 45 4E 20 49 53 54 | EINGELESEN IST|
00000BF0: 2E 00 02 14 93 01 99 22 11 11 11 11 11 11 11 11 |......."........|
00000C00: 11 11 00 0C 14 94 01 89 37 30 30 30 00 37 14 88 |........7000.7..|
00000C10: 13 99 22 13 22 3B 3A 81 49 B2 31 A4 59 31 3A 99 |..".";:.I.1.Y1:.|
00000C20: 22 11 22 3B 3A 82 3A 99 22 91 22 3B 3A 81 4A B2 |".";:.:.".";:.J.|
00000C30: 30 A4 59 32 AB 59 31 00 6A 14 89 13 99 22 20 20 |0.Y2.Y1.j...." |
00000C40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C60: 20 20 20 20 20 22 3A 82 3A 8E 00 8C 14 70 17 99 | ":.:....p..|
00000C70: 22 13 22 3B 3A 81 49 B2 31 A4 59 31 3A 99 22 11 |".";:.I.1.Y1:.".|
00000C80: 22 3B 3A 82 3A 99 22 91 22 3B 3A 8E 00 9E 14 58 |";:.:.".";:....X|
00000C90: 1B 93 22 35 2F 33 4C 45 4B 54 49 4F 4E 22 00 00 |.."5/3LEKTION"..|
00000CA0: 00 01 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D |..MMMMMMMMMMMMMM|
00000CB0: 4D 4D 4D 4D 4D 4D 4D 4D 4D 00 9A 0F 96 19 8F 4D |MMMMMMMMM......M|
00000CC0: 4D 4D 00 A0 0F 58 1B 93 00 00 00 01 |MM...X...... |
.......45,B(174):.46,B(175):.:.788,52:.6
57,128.D....53280,1:.53281,1.....Q$.".
..":
Z$.G(34):.10......"..":.I.1.39:.C$;:.:.I
.1.22:.".."C$;:.:.".";.S....I.1.38:."."C
$".";:.:.C$......I.1.23:."."C$".";:.:...
....A$:.A$."".6......:..K...."......":..
10)".IF...THEN-BEFEHL":..11)".....(FORTS
ETZUNG)":.6.X.X..".DER IF...THEN-BEFEHL
ERMOEGLICHT EINE...Y.."BEDINGTE AENDERUN
G DER REIHENFOLGE DER...Z.."PROGRAMMSCHR
ITTE, IN ABHAENGIGKEIT VON DER .ERFUELL
UNG EINER BEDINGUNG..!.{..7:.".EINE .BED
INGUNG. HAT DIE FORM:":.7.O.|..". .AU
SDRUCK. RELATION .AUSDRUCK.":.7...}..".W
OBEI FOGENDE RELATIONEN ZULAESSIG":."SIN
D:...~..". .RELATION. .BEDEUTUNG.":.
:.". = GLEICH....." >
GROESSER ALS":." < KLEIN
ER ALS.F...." >= GROESSER ALS
ODER GLEICH":." <= KLEINER";.~
...."ALS ODER GLEICH":." <> NI
CHT GLEICH":.6.....Y1.9:Y2.22:.5000:.600
0:.7.R....".EIN IF...THEN-BEFEHL HAT FOL
GENDES ":."FORMAT:......"...ZEILEN#1. IF
.BEDINGUNG. THEN .ZEILEN#2.":.7:.7.2...
.".DIE BEDINGUNG IST EIN TEST.":.7.O....
"IST DIE .BEDINGUNG ERFUELLT., SO WIRD I
M NAECHSTEN ";......"PROGRAMMSCHRITT DE
R BEFEHL IN":.".ZEILEN#2. AUSGEFUEHRT.":
.7......"IST DIE .BEDINGUNG NICHT ERFUEL
LT., SO WIRD ALS ";.6...."NAECHSTES D
ER BEFEHL IN DER":."ZEILE NACH .ZEILEN#1
. AUSGEFUEHRT..=....6.Q....".EINIGE BEIS
PIELE FUER IF...THEN-BEFEHLE:":.7......"
.2 IF A=0 THEN 10":.7:."4 IF X<=99 THEN
2":.7.K...."6 IF R+W>P-T+1 THEN 55":.7.1
59.... .."8 IF A$="Z$"NEIN"Z$"THEN 88":.
6.,...."..1 IF A=2*B+CC THEN 10":."2 IF
P*3+U/1.5 > THEN 18".P...."3 IF A$="Z$"N
EIN"Z$" THEN 100......:.".WELCHE DER OBI
GEN ANWEISUNGEN IST .KEIN. ZULAESSIGER
";.A...."IF...THEN-BEFEHL (1, 2 ODER 3)"
;:.X$:.:..X....E(X$).169,174,172......Q$
:.163......".NEIN, DIESER BEFEHL IST KOR
REKT!":..]....".EINE RELATION ZWISCHEN E
INER VARIABLEN UND EINEM TERM IST ZULAE
SSIG.......:."BITTE, VERSUCHEN SIE ES NO
CHEINMAL!":.6:.".":.163......".NEIN, DIE
SER BEFEHL IST KORREKT!":.:.".EINE RELAT
ION ZWISCHEN EINEM";."...." STRING UND E
INER STRINGVARIABLEN IST ZULAESSIG." :.1
71.M...."..GANZ GENAU!. ZEILE 2 IST FALS
CH,DA RECHTSNEBEN DER RELATION KEIN";...
..." AUSDRUCK STEHT.":.6:.200.W...."..MO
ECHTEN SIE DEN ABSCHNITT UEBER":."IF..TH
EN-BEFEHLE NOCH EINMAL"......"LESEN (JA
ODER NEIN)";A$:.A$."JA".120......A$."NEI
N".400.#....Q$:.176.R.H..".NOCH EINE AND
ERE FORM DES IF...THEN- BEFEHLS IST M
OEGLICH, NAEMLICH:...J..7:.". .ZEILEN#.
IF .BEDINGUNG. THEN .BEFEHL":.7...L..".
IST DIE. BEDINGUNG ERFUELLT., SO WIRD DE
R .BEFEHL. UND DANN DER ";.,.M.."BEFEHL
DER ZEILE NACH .ZEILEN#. AUSGEFUEHRT.
":.7.X.O.."IST DIE .BEDINGUNG NICHT ERFU
ELLT., WIRD .BEFEHL. AUSGELASSEN UND ";
...P.."DAS PROGRAMM WIRDMIT DER ZEILE NA
CH .ZEILEN#. FORTGESETZT.":.7...Q.."EINI
GE BEISPIELE:":.7:.". 45 IF X>12 THEN P
RINT "Z$"JA"Z$:..J.R.." 65 IF A$="Z$"NE
IN"Z$" THEN INPUT B$":.:." 8 IF R=T THE
N V=V+1":..L.T.." 7 IF L>=100 THEN END"
;:.6.U....176.....C$."..":.3:."....".7)"
.ENDE VON LEKTION 5 TEIL 2......".......
. . BITTE WARTEN SIE, BIS TEIL 3":."....
EINGELESEN IST......."................
7000.7....".";:.I.1.Y1:.".";:.:.".";:.J.
0.Y2.Y1.J...."
":.:....P..".";:.I.1.Y1:.".
";:.:.".";:....X.."5/3LEKTION"....MMMMMM
MMMMMMMMMMMMMMMMM......MMM. .X......
> CLICK IMAGE PREVIEW FOR FULL MODAL