5/2LEKTION.8
FILE INFORMATION
FILENAME(S): 5/2LEKTION.8
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 16:15:15
APPEARS ON: 2 disk(s)
FILE HASH
c37a0eedd4ebd8b0b33801cbc7f66a6af1d128f525a78ff65c84158815d525bb
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE 6 | 5/2LEKTION.8 | PRG | BrainSkull, Andraes Maurer | 13 | 5 | DOWNLOAD FILE |
| BASIC KURS | 5/2LEKTION.8 | PRG | BrainSkull, Andraes Maurer | 13 | 5 | 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 44 |88,52:.657,128.D| 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 00 84 08 1E 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 39 30 00 B6 08 28 00 99 22 93 1E 22 3A 81 |:.90...(.."..":.| 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 32 00 81 49 B2 31 A4 |:.".";...2..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 3C 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 00 |."."C$".";:.:...| 000000F0: 09 46 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 37 30 |.F..A$:.A$."".70| 00000100: 00 08 09 50 00 99 3A 8E 00 4D 09 5A 00 99 22 93 |...P..:..M.Z..".| 00000110: 11 11 11 11 11 22 3A 99 A3 31 30 29 22 1C 49 46 |.....":..10)".IF| 00000120: 2E 2E 2E 54 48 45 4E 2D 42 45 46 45 48 4C 22 3A |...THEN-BEFEHL":| 00000130: 99 A3 31 31 29 22 1F 11 11 11 11 28 46 4F 52 54 |..11)".....(FORT| 00000140: 53 45 54 5A 55 4E 47 29 22 3A 8D 37 30 00 7A 09 |SETZUNG)":.70.z.| 00000150: 64 00 99 22 93 44 45 52 20 49 46 2E 2E 2E 54 48 |d..".DER IF...TH| 00000160: 45 4E 2D 42 45 46 45 48 4C 20 45 52 4D 4F 45 47 |EN-BEFEHL ERMOEG| 00000170: 4C 49 43 48 54 20 45 49 4E 45 00 A7 09 6E 00 99 |LICHT EINE...n..| 00000180: 22 42 45 44 49 4E 47 54 45 20 41 45 4E 44 45 52 |"BEDINGTE AENDER| 00000190: 55 4E 47 20 44 45 52 20 52 45 49 48 45 4E 46 4F |UNG DER REIHENFO| 000001A0: 4C 47 45 20 44 45 52 00 F6 09 78 00 99 22 50 52 |LGE DER...x.."PR| 000001B0: 4F 47 52 41 4D 4D 53 43 48 52 49 54 54 45 2C 20 |OGRAMMSCHRITTE, | 000001C0: 49 4E 20 41 42 48 41 45 4E 47 49 47 4B 45 49 54 |IN ABHAENGIGKEIT| 000001D0: 20 56 4F 4E 20 20 44 45 52 20 81 45 52 46 55 45 | VON DER .ERFUE| 000001E0: 4C 4C 55 4E 47 20 45 49 4E 45 52 20 42 45 44 49 |LLUNG EINER BEDI| 000001F0: 4E 47 55 4E 47 2E 00 25 0A 82 00 8D 38 30 3A 99 |NGUNG..%....80:.| 00000200: 22 1F 45 49 4E 45 20 81 42 45 44 49 4E 47 55 4E |".EINE .BEDINGUN| 00000210: 47 1F 20 48 41 54 20 44 49 45 20 46 4F 52 4D 3A |G. HAT DIE FORM:| 00000220: 22 3A 8D 38 30 00 54 0A 8C 00 99 22 81 20 20 20 |":.80.T....". | 00000230: 20 12 41 55 53 44 52 55 43 4B 92 20 52 45 4C 41 | .AUSDRUCK. RELA| 00000240: 54 49 4F 4E 20 12 41 55 53 44 52 55 43 4B 92 22 |TION .AUSDRUCK."| 00000250: 3A 8D 38 30 00 87 0A 96 00 99 22 1F 57 4F 42 45 |:.80......".WOBE| 00000260: 49 20 46 4F 47 45 4E 44 45 20 52 45 4C 41 54 49 |I FOGENDE RELATI| 00000270: 4F 4E 45 4E 20 5A 55 4C 41 45 53 53 49 47 22 3A |ONEN ZULAESSIG":| 00000280: 99 22 53 49 4E 44 3A 00 C5 0A A0 00 99 22 81 20 |."SIND:......". | 00000290: 20 20 20 20 12 52 45 4C 41 54 49 4F 4E 92 20 12 | .RELATION. .| 000002A0: 42 45 44 45 55 54 55 4E 47 92 22 3A 99 3A 99 22 |BEDEUTUNG.":.:."| 000002B0: 1E 20 20 20 20 20 20 20 20 3D 20 20 20 20 20 47 |. = G| 000002C0: 4C 45 49 43 48 00 03 0B AA 00 99 22 20 20 20 20 |LEICH......" | 000002D0: 20 20 20 20 3E 20 20 20 20 20 47 52 4F 45 53 53 | > GROESS| 000002E0: 45 52 20 41 4C 53 22 3A 99 22 20 20 20 20 20 20 |ER ALS":." | 000002F0: 20 20 3C 20 20 20 20 20 4B 4C 45 49 4E 45 52 20 | < KLEINER | 00000300: 41 4C 53 00 4B 0B B4 00 99 22 20 20 20 20 20 20 |ALS.K...." | 00000310: 20 20 3E 3D 20 20 20 20 47 52 4F 45 53 53 45 52 | >= GROESSER| 00000320: 20 41 4C 53 20 4F 44 45 52 20 47 4C 45 49 43 48 | ALS ODER GLEICH| 00000330: 22 3A 99 22 20 20 20 20 20 20 20 20 3C 3D 20 20 |":." <= | 00000340: 20 20 4B 4C 45 49 4E 45 52 22 3B 00 84 0B BE 00 | KLEINER";.....| 00000350: 99 22 41 4C 53 20 4F 44 45 52 20 47 4C 45 49 43 |."ALS ODER GLEIC| 00000360: 48 22 3A 99 22 20 20 20 20 20 20 20 20 3C 3E 20 |H":." <> | 00000370: 20 20 20 4E 49 43 48 54 20 47 4C 45 49 43 48 22 | NICHT GLEICH"| 00000380: 3A 8D 37 30 00 A1 0B C8 00 59 31 B2 39 3A 59 32 |:.70.....Y1.9:Y2| 00000390: B2 32 32 3A 8D 36 34 30 3A 8D 36 36 30 3A 8D 38 |.22:.640:.660:.8| 000003A0: 30 00 D7 0B D2 00 99 22 1F 45 49 4E 20 49 46 2E |0......".EIN IF.| 000003B0: 2E 2E 54 48 45 4E 2D 42 45 46 45 48 4C 20 48 41 |..THEN-BEFEHL HA| 000003C0: 54 20 46 4F 4C 47 45 4E 44 45 53 20 22 3A 99 22 |T FOLGENDES ":."| 000003D0: 46 4F 52 4D 41 54 3A 00 12 0C DC 00 99 22 81 11 |FORMAT:......"..| 000003E0: 12 5A 45 49 4C 45 4E 23 31 92 20 49 46 20 12 42 |.ZEILEN#1. IF .B| 000003F0: 45 44 49 4E 47 55 4E 47 92 20 54 48 45 4E 20 12 |EDINGUNG. THEN .| 00000400: 5A 45 49 4C 45 4E 23 32 92 22 3A 8D 38 30 3A 8D |ZEILEN#2.":.80:.| 00000410: 38 30 00 3A 0C E6 00 99 22 1F 44 49 45 20 42 45 |80.:....".DIE BE| 00000420: 44 49 4E 47 55 4E 47 20 49 53 54 20 45 49 4E 20 |DINGUNG IST EIN | 00000430: 54 45 53 54 2E 22 3A 8D 38 30 00 77 0C F0 00 99 |TEST.":.80.w....| 00000440: 22 49 53 54 20 44 49 45 20 81 42 45 44 49 4E 47 |"IST DIE .BEDING| 00000450: 55 4E 47 20 45 52 46 55 45 4C 4C 54 1F 2C 20 53 |UNG ERFUELLT., S| 00000460: 4F 20 57 49 52 44 20 49 4D 20 20 4E 41 45 43 48 |O WIRD IM NAECH| 00000470: 53 54 45 4E 20 22 3B 00 BB 0C FA 00 99 22 50 52 |STEN ";......"PR| 00000480: 4F 47 52 41 4D 4D 53 43 48 52 49 54 54 20 44 45 |OGRAMMSCHRITT DE| 00000490: 52 20 42 45 46 45 48 4C 20 49 4E 22 3A 99 22 12 |R BEFEHL IN":.".| 000004A0: 5A 45 49 4C 45 4E 23 32 92 20 41 55 53 47 45 46 |ZEILEN#2. AUSGEF| 000004B0: 55 45 48 52 54 2E 22 3A 8D 38 30 00 F7 0C 04 01 |UEHRT.":.80.....| 000004C0: 99 22 49 53 54 20 44 49 45 20 81 42 45 44 49 4E |."IST DIE .BEDIN| 000004D0: 47 55 4E 47 20 4E 49 43 48 54 20 45 52 46 55 45 |GUNG NICHT ERFUE| 000004E0: 4C 4C 54 1F 2C 20 53 4F 20 20 20 20 57 49 52 44 |LLT., SO WIRD| 000004F0: 20 41 4C 53 20 22 3B 00 3F 0D 0E 01 99 22 4E 41 | ALS ";.?...."NA| 00000500: 45 43 48 53 54 45 53 20 44 45 52 20 42 45 46 45 |ECHSTES DER BEFE| 00000510: 48 4C 20 49 4E 20 44 45 52 22 3A 99 22 5A 45 49 |HL IN DER":."ZEI| 00000520: 4C 45 20 4E 41 43 48 20 12 5A 45 49 4C 45 4E 23 |LE NACH .ZEILEN#| 00000530: 31 92 20 41 55 53 47 45 46 55 45 48 52 54 2E 00 |1. AUSGEFUEHRT..| 00000540: 47 0D 18 01 8D 37 30 00 7C 0D 22 01 99 22 93 45 |G....70.|."..".E| 00000550: 49 4E 49 47 45 20 42 45 49 53 50 49 45 4C 45 20 |INIGE BEISPIELE | 00000560: 46 55 45 52 20 49 46 2E 2E 2E 54 48 45 4E 2D 42 |FUER IF...THEN-B| 00000570: 45 46 45 48 4C 45 3A 22 3A 8D 38 30 00 B2 0D 2C |EFEHLE:":.80...,| 00000580: 01 99 22 1E 32 20 49 46 20 41 3D 30 20 54 48 45 |..".2 IF A=0 THE| 00000590: 4E 20 31 30 22 3A 8D 38 30 3A 99 22 34 20 49 46 |N 10":.80:."4 IF| 000005A0: 20 58 3C 3D 39 39 20 54 48 45 4E 20 32 22 3A 8D | X<=99 THEN 2":.| 000005B0: 38 30 00 D9 0D 36 01 99 22 36 20 49 46 20 52 2B |80...6.."6 IF R+| 000005C0: 57 3E 50 2D 54 2B 31 20 54 48 45 4E 20 35 35 22 |W>P-T+1 THEN 55"| 000005D0: 3A 8D 38 30 9B 33 31 30 AB 00 00 0E 40 01 99 22 |:.80.310....@.."| 000005E0: 38 20 49 46 20 41 24 3D 22 5A 24 22 4E 45 49 4E |8 IF A$="Z$"NEIN| 000005F0: 22 5A 24 22 54 48 45 4E 20 38 38 22 3A 8D 37 30 |"Z$"THEN 88":.70| 00000600: 00 3B 0E 4A 01 99 22 93 1E 31 20 49 46 20 41 3D |.;.J.."..1 IF A=| 00000610: 32 2A 42 2B 43 43 20 54 48 45 4E 20 31 30 22 3A |2*B+CC THEN 10":| 00000620: 99 22 32 20 49 46 20 50 2A 33 2B 55 2F 31 2E 35 |."2 IF P*3+U/1.5| 00000630: 20 3E 20 54 48 45 4E 20 31 38 22 00 5F 0E 54 01 | > THEN 18"._.T.| 00000640: 99 22 33 20 49 46 20 41 24 3D 22 5A 24 22 4E 45 |."3 IF A$="Z$"NE| 00000650: 49 4E 22 5A 24 22 20 54 48 45 4E 20 31 30 30 00 |IN"Z$" THEN 100.| 00000660: A1 0E 5E 01 99 3A 99 22 1F 57 45 4C 43 48 45 20 |..^..:.".WELCHE | 00000670: 44 45 52 20 4F 42 49 47 45 4E 20 41 4E 57 45 49 |DER OBIGEN ANWEI| 00000680: 53 55 4E 47 45 4E 20 49 53 54 20 12 4B 45 49 4E |SUNGEN IST .KEIN| 00000690: 92 20 20 5A 55 4C 41 45 53 53 49 47 45 52 20 22 |. ZULAESSIGER "| 000006A0: 3B 00 D0 0E 68 01 99 22 49 46 2E 2E 2E 54 48 45 |;...h.."IF...THE| 000006B0: 4E 2D 42 45 46 45 48 4C 20 28 31 2C 20 32 20 4F |N-BEFEHL (1, 2 O| 000006C0: 44 45 52 20 33 29 22 3B 3A 85 58 24 3A 99 3A 99 |DER 3)";:.X$:.:.| 000006D0: 00 E7 0E 72 01 91 C5 28 58 24 29 89 33 39 30 2C |...r...(X$).390,| 000006E0: 34 34 30 2C 34 32 30 00 F4 0E 7C 01 99 51 24 3A |440,420...|..Q$:| 000006F0: 89 33 33 30 00 1F 0F 86 01 99 22 81 4E 45 49 4E |.330......".NEIN| 00000700: 2C 20 44 49 45 53 45 52 20 42 45 46 45 48 4C 20 |, DIESER BEFEHL | 00000710: 49 53 54 20 4B 4F 52 52 45 4B 54 21 22 3A 99 00 |IST KORREKT!":..| 00000720: 6C 0F 90 01 99 22 1F 45 49 4E 45 20 52 45 4C 41 |l....".EINE RELA| 00000730: 54 49 4F 4E 20 5A 57 49 53 43 48 45 4E 20 45 49 |TION ZWISCHEN EI| 00000740: 4E 45 52 20 56 41 52 49 41 42 4C 45 4E 20 20 55 |NER VARIABLEN U| 00000750: 4E 44 20 45 49 4E 45 4D 20 54 45 52 4D 20 49 53 |ND EINEM TERM IS| 00000760: 54 20 5A 55 4C 41 45 53 53 49 47 2E 00 A7 0F 9A |T ZULAESSIG.....| 00000770: 01 99 3A 99 22 42 49 54 54 45 2C 20 56 45 52 53 |..:."BITTE, VERS| 00000780: 55 43 48 45 4E 20 53 49 45 20 45 53 20 4E 4F 43 |UCHEN SIE ES NOC| 00000790: 48 45 49 4E 4D 41 4C 21 22 3A 8D 37 30 3A 99 22 |HEINMAL!":.70:."| 000007A0: 93 22 3A 89 33 33 30 00 F4 0F A4 01 99 22 81 4E |.":.330......".N| 000007B0: 45 49 4E 2C 20 44 49 45 53 45 52 20 42 45 46 45 |EIN, DIESER BEFE| 000007C0: 48 4C 20 49 53 54 20 4B 4F 52 52 45 4B 54 21 22 |HL IST KORREKT!"| 000007D0: 3A 99 3A 99 22 1F 45 49 4E 45 20 52 45 4C 41 54 |:.:.".EINE RELAT| 000007E0: 49 4F 4E 20 5A 57 49 53 43 48 45 4E 20 45 49 4E |ION ZWISCHEN EIN| 000007F0: 45 4D 22 3B 00 32 10 AE 01 99 22 20 53 54 52 49 |EM";.2...." STRI| 00000800: 4E 47 20 55 4E 44 20 45 49 4E 45 52 20 53 54 52 |NG UND EINER STR| 00000810: 49 4E 47 56 41 52 49 41 42 4C 45 4E 20 49 53 54 |INGVARIABLEN IST| 00000820: 20 5A 55 4C 41 45 53 53 49 47 2E 22 20 3A 89 34 | ZULAESSIG." :.4| 00000830: 31 30 00 7D 10 B8 01 99 22 11 1E 47 41 4E 5A 20 |10.}...."..GANZ | 00000840: 47 45 4E 41 55 21 1F 20 5A 45 49 4C 45 20 32 20 |GENAU!. ZEILE 2 | 00000850: 49 53 54 20 46 41 4C 53 43 48 2C 44 41 20 52 45 |IST FALSCH,DA RE| 00000860: 43 48 54 53 4E 45 42 45 4E 20 44 45 52 20 52 45 |CHTSNEBEN DER RE| 00000870: 4C 41 54 49 4F 4E 20 4B 45 49 4E 22 3B 00 9E 10 |LATION KEIN";...| 00000880: C2 01 99 22 20 41 55 53 44 52 55 43 4B 20 53 54 |..." AUSDRUCK ST| 00000890: 45 48 54 2E 22 3A 8D 37 30 3A 89 35 30 30 00 E8 |EHT.":.70:.500..| 000008A0: 10 CC 01 99 22 93 1F 4D 4F 45 43 48 54 45 4E 20 |...."..MOECHTEN | 000008B0: 53 49 45 20 44 45 4E 20 41 42 53 43 48 4E 49 54 |SIE DEN ABSCHNIT| 000008C0: 54 20 55 45 42 45 52 22 3A 99 22 49 46 2E 2E 54 |T UEBER":."IF..T| 000008D0: 48 45 4E 2D 42 45 46 45 48 4C 45 20 4E 4F 43 48 |HEN-BEFEHLE NOCH| 000008E0: 20 45 49 4E 4D 41 4C 22 00 14 11 D6 01 85 22 4C | EINMAL"......"L| 000008F0: 45 53 45 4E 20 28 4A 41 20 4F 44 45 52 20 4E 45 |ESEN (JA ODER NE| 00000900: 49 4E 29 22 3B 41 24 3A 8B 41 24 B2 22 4A 41 22 |IN)";A$:.A$."JA"| 00000910: A7 31 30 30 00 27 11 E0 01 8B 41 24 B2 22 4E 45 |.100.'....A$."NE| 00000920: 49 4E 22 A7 36 30 30 00 34 11 EA 01 99 51 24 3A |IN".600.4....Q$:| 00000930: 89 34 36 30 00 83 11 F4 01 99 22 93 4E 4F 43 48 |.460......".NOCH| 00000940: 20 45 49 4E 45 20 41 4E 44 45 52 45 20 46 4F 52 | EINE ANDERE FOR| 00000950: 4D 20 44 45 53 20 49 46 2E 2E 2E 54 48 45 4E 2D |M DES IF...THEN-| 00000960: 20 20 20 20 42 45 46 45 48 4C 53 20 49 53 54 20 | BEFEHLS IST | 00000970: 4D 4F 45 47 4C 49 43 48 2C 20 4E 41 45 4D 4C 49 |MOEGLICH, NAEMLI| 00000980: 43 48 3A 00 BB 11 FE 01 8D 38 30 3A 99 22 81 20 |CH:......80:.". | 00000990: 20 12 5A 45 49 4C 45 4E 23 92 20 49 46 20 12 42 | .ZEILEN#. IF .B| 000009A0: 45 44 49 4E 47 55 4E 47 92 20 54 48 45 4E 20 12 |EDINGUNG. THEN .| 000009B0: 42 45 46 45 48 4C 22 3A 8D 38 30 00 05 12 08 02 |BEFEHL":.80.....| 000009C0: 99 22 1F 49 53 54 20 44 49 45 81 20 42 45 44 49 |.".IST DIE. BEDI| 000009D0: 4E 47 55 4E 47 20 45 52 46 55 45 4C 4C 54 1F 2C |NGUNG ERFUELLT.,| 000009E0: 20 53 4F 20 57 49 52 44 20 44 45 52 20 12 42 45 | SO WIRD DER .BE| 000009F0: 46 45 48 4C 92 20 55 4E 44 20 44 41 4E 4E 20 44 |FEHL. UND DANN D| 00000A00: 45 52 20 22 3B 00 40 12 12 02 99 22 42 45 46 45 |ER ";.@...."BEFE| 00000A10: 48 4C 20 44 45 52 20 5A 45 49 4C 45 20 20 20 20 |HL DER ZEILE | 00000A20: 4E 41 43 48 20 12 5A 45 49 4C 45 4E 23 92 20 41 |NACH .ZEILEN#. A| 00000A30: 55 53 47 45 46 55 45 48 52 54 2E 22 3A 8D 38 30 |USGEFUEHRT.":.80| 00000A40: 00 8C 12 1C 02 99 22 49 53 54 20 44 49 45 20 81 |......"IST DIE .| 00000A50: 42 45 44 49 4E 47 55 4E 47 20 4E 49 43 48 54 20 |BEDINGUNG NICHT | 00000A60: 45 52 46 55 45 4C 4C 54 1F 2C 20 57 49 52 44 20 |ERFUELLT., WIRD | 00000A70: 20 12 42 45 46 45 48 4C 92 20 41 55 53 47 45 4C | .BEFEHL. AUSGEL| 00000A80: 41 53 53 45 4E 20 55 4E 44 20 22 3B 00 D2 12 26 |ASSEN UND ";...&| 00000A90: 02 99 22 44 41 53 20 50 52 4F 47 52 41 4D 4D 20 |.."DAS PROGRAMM | 00000AA0: 57 49 52 44 4D 49 54 20 44 45 52 20 5A 45 49 4C |WIRDMIT DER ZEIL| 00000AB0: 45 20 4E 41 43 48 20 12 5A 45 49 4C 45 4E 23 92 |E NACH .ZEILEN#.| 00000AC0: 20 46 4F 52 54 47 45 53 45 54 5A 54 2E 22 3A 8D | FORTGESETZT.":.| 00000AD0: 38 30 00 16 13 30 02 99 22 45 49 4E 49 47 45 20 |80...0.."EINIGE | 00000AE0: 42 45 49 53 50 49 45 4C 45 3A 22 3A 8D 38 30 3A |BEISPIELE:":.80:| 00000AF0: 99 22 1E 20 20 34 35 20 49 46 20 58 3E 31 32 20 |.". 45 IF X>12 | 00000B00: 54 48 45 4E 20 50 52 49 4E 54 20 22 5A 24 22 4A |THEN PRINT "Z$"J| 00000B10: 41 22 5A 24 3A 99 00 60 13 3A 02 99 22 20 20 36 |A"Z$:..`.:.." 6| 00000B20: 35 20 49 46 20 41 24 3D 22 5A 24 22 4E 45 49 4E |5 IF A$="Z$"NEIN| 00000B30: 22 5A 24 22 20 54 48 45 4E 20 49 4E 50 55 54 20 |"Z$" THEN INPUT | 00000B40: 42 24 22 3A 99 3A 99 22 20 20 38 20 49 46 20 52 |B$":.:." 8 IF R| 00000B50: 3D 54 20 54 48 45 4E 20 56 3D 56 2B 31 22 3A 99 |=T THEN V=V+1":.| 00000B60: 00 83 13 44 02 99 22 20 20 37 20 49 46 20 4C 3E |...D.." 7 IF L>| 00000B70: 3D 31 30 30 20 54 48 45 4E 20 45 4E 44 22 3B 3A |=100 THEN END";:| 00000B80: 8D 37 30 00 8C 13 4E 02 89 34 36 30 00 C2 13 58 |.70...N..460...X| 00000B90: 02 43 24 B2 22 12 FF 22 3A 8D 34 30 3A 99 22 11 |.C$."..":.40:.".| 00000BA0: 11 11 11 22 A3 37 29 22 1C 45 4E 44 45 20 56 4F |...".7)".ENDE VO| 00000BB0: 4E 20 4C 45 4B 54 49 4F 4E 20 35 20 54 45 49 4C |N LEKTION 5 TEIL| 00000BC0: 20 32 00 09 14 62 02 99 22 11 11 11 11 1D 1D 1D | 2...b..".......| 00000BD0: 1D 20 1F 20 42 49 54 54 45 20 57 41 52 54 45 4E |. . BITTE WARTEN| 00000BE0: 20 53 49 45 2C 20 42 49 53 20 54 45 49 4C 20 33 | SIE, BIS TEIL 3| 00000BF0: 22 3A 99 22 1D 1D 1D 1D 20 20 45 49 4E 47 45 4C |":.".... EINGEL| 00000C00: 45 53 45 4E 20 49 53 54 2E 00 1A 14 6C 02 99 22 |ESEN IST....l.."| 00000C10: 11 11 11 11 11 11 11 11 11 11 00 23 14 76 02 89 |...........#.v..| 00000C20: 36 37 30 00 4E 14 80 02 99 22 13 22 3B 3A 81 49 |670.N....".";:.I| 00000C30: B2 31 A4 59 31 3A 99 22 11 22 3B 3A 82 3A 99 22 |.1.Y1:.".";:.:."| 00000C40: 91 22 3B 3A 81 4A B2 30 A4 59 32 AB 59 31 00 81 |.";:.J.0.Y2.Y1..| 00000C50: 14 8A 02 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." | 00000C60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000C70: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 3A | ":.:| 00000C80: 8E 00 A3 14 94 02 99 22 13 22 3B 3A 81 49 B2 31 |.......".";:.I.1| 00000C90: A4 59 31 3A 99 22 11 22 3B 3A 82 3A 99 22 91 22 |.Y1:.".";:.:."."| 00000CA0: 3B 3A 8E 00 B9 14 9E 02 93 22 35 2F 33 4C 45 4B |;:......."5/3LEK| 00000CB0: 54 49 4F 4E 2E 38 22 2C 38 00 00 00 0F BF |TION.8",8..... |
.......45,B(174):.46,B(175):.:.788,52:.6
57,128.D....53280,1:.53281,1.....Q$.".
..":
Z$.G(34):.90...(.."..":.I.1.39:.C$;:.:.I
.1.22:.".."C$;:.:.".";.S.2..I.1.38:."."C
$".";:.:.C$...<..I.1.23:."."C$".";:.:...
.F..A$:.A$."".70...P..:..M.Z.."......":.
.10)".IF...THEN-BEFEHL":..11)".....(FORT
SETZUNG)":.70.Z.D..".DER IF...THEN-BEFEH
L ERMOEGLICHT EINE...N.."BEDINGTE AENDER
UNG DER REIHENFOLGE DER...X.."PROGRAMMSC
HRITTE, IN ABHAENGIGKEIT VON DER .ERFUE
LLUNG EINER BEDINGUNG..%....80:.".EINE .
BEDINGUNG. HAT DIE FORM:":.80.T....".
.AUSDRUCK. RELATION .AUSDRUCK.":.80....
..".WOBEI FOGENDE RELATIONEN ZULAESSIG":
."SIND:.E. ..". .RELATION. .BEDEUTUN
G.":.:.". = GLEICH......"
> GROESSER ALS":." <
KLEINER ALS.K...." >= GROESSER
ALS ODER GLEICH":." <= KLEINE
R";......"ALS ODER GLEICH":." <>
NICHT GLEICH":.70...H.Y1.9:Y2.22:.640
:.660:.80.W.R..".EIN IF...THEN-BEFEHL HA
T FOLGENDES ":."FORMAT:......"...ZEILEN#
1. IF .BEDINGUNG. THEN .ZEILEN#2.":.80:.
80.:....".DIE BEDINGUNG IST EIN TEST.":.
80.W...."IST DIE .BEDINGUNG ERFUELLT., S
O WIRD IM NAECHSTEN ";......"PROGRAMMSC
HRITT DER BEFEHL IN":.".ZEILEN#2. AUSGEF
UEHRT.":.80......"IST DIE .BEDINGUNG NIC
HT ERFUELLT., SO WIRD ALS ";.?...."NA
ECHSTES DER BEFEHL IN DER":."ZEILE NACH
.ZEILEN#1. AUSGEFUEHRT..G....70.|."..".E
INIGE BEISPIELE FUER IF...THEN-BEFEHLE:"
:.80...,..".2 IF A=0 THEN 10":.80:."4 IF
X<=99 THEN 2":.80.Y.6.."6 IF R+W>P-T+1
THEN 55":.80.310....@.."8 IF A$="Z$"NEIN
"Z$"THEN 88":.70.;.J.."..1 IF A=2*B+CC T
HEN 10":."2 IF P*3+U/1.5 > THEN 18"._.T.
."3 IF A$="Z$"NEIN"Z$" THEN 100...^..:."
.WELCHE DER OBIGEN ANWEISUNGEN IST .KEIN
. ZULAESSIGER ";.P.H.."IF...THEN-BEFEHL
(1, 2 ODER 3)";:.X$:.:....R..E(X$).390,
440,420...|..Q$:.330......".NEIN, DIESER
BEFEHL IST KORREKT!":..L....".EINE RELA
TION ZWISCHEN EINER VARIABLEN UND EINEM
TERM IST ZULAESSIG.......:."BITTE, VERS
UCHEN SIE ES NOCHEINMAL!":.70:.".":.330.
.....".NEIN, DIESER BEFEHL IST KORREKT!"
:.:.".EINE RELATION ZWISCHEN EINEM";.2..
.." STRING UND EINER STRINGVARIABLEN IST
ZULAESSIG." :.410.}...."..GANZ GENAU!.
ZEILE 2 IST FALSCH,DA RECHTSNEBEN DER RE
LATION KEIN";...B.." AUSDRUCK STEHT.":.7
0:.500...L.."..MOECHTEN SIE DEN ABSCHNIT
T UEBER":."IF..THEN-BEFEHLE NOCH EINMAL"
...V.."LESEN (JA ODER NEIN)";A$:.A$."JA"
.100.'....A$."NEIN".600.4....Q$:.460....
..".NOCH EINE ANDERE FORM DES IF...THEN-
BEFEHLS IST MOEGLICH, NAEMLICH:.....
.80:.". .ZEILEN#. IF .BEDINGUNG. THEN .
BEFEHL":.80......".IST DIE. BEDINGUNG ER
FUELLT., SO WIRD DER .BEFEHL. UND DANN D
ER ";.@...."BEFEHL DER ZEILE NACH .ZE
ILEN#. AUSGEFUEHRT.":.80......"IST DIE .
BEDINGUNG NICHT ERFUELLT., WIRD .BEFEHL
. AUSGELASSEN UND ";.R.&.."DAS PROGRAMM
WIRDMIT DER ZEILE NACH .ZEILEN#. FORTGES
ETZT.":.80...0.."EINIGE BEISPIELE:":.80:
.". 45 IF X>12 THEN PRINT "Z$"JA"Z$:..`
.:.." 65 IF A$="Z$"NEIN"Z$" THEN INPUT
B$":.:." 8 IF R=T THEN V=V+1":....D.."
7 IF L>=100 THEN END";:.70...N..460.B.X
.C$."..":.40:."....".7)".ENDE VON LEKTIO
N 5 TEIL 2...B.."........ . BITTE WARTEN
SIE, BIS TEIL 3":.".... EINGELESEN IST
....L.."...........#.V..670.N....".";:.I
.1.Y1:.".";:.:.".";:.J.0.Y2.Y1......"
":.:
.......".";:.I.1.Y1:.".";:.:.".";:......
."5/3LEKTION.8",8.....
> CLICK IMAGE PREVIEW FOR FULL MODAL