TEIL 12
FILE INFORMATION
FILENAME(S): TEIL 12
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-12-02 23:47:27
APPEARS ON: 1 disk(s)
FILE HASH
a8c2c4fddfcca74d8348498e03d32e526d33f33b9321d632e63f321bfa649495
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BASIC KURS | TEIL 12 | PRG | swasti, flohmarkt | 13 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 01 00 97 35 33 32 38 30 2C 31 3A 97 |.......53280,1:.| 00000010: 35 33 32 38 31 2C 31 00 28 08 02 00 5A 24 B2 C7 |53281,1.(...Z$..| 00000020: 28 33 34 29 3A 89 31 30 00 59 08 03 00 99 22 93 |(34):.10.Y....".| 00000030: 22 3A 81 49 B2 31 A4 33 39 3A 99 43 24 3B 3A 82 |":.I.1.39:.C$;:.| 00000040: 3A 81 49 B2 31 A4 32 32 3A 99 22 9D 11 22 43 24 |:.I.1.22:.".."C$| 00000050: 3B 3A 82 3A 99 22 9D 22 3B 00 76 08 04 00 81 49 |;:.:.".";.v....I| 00000060: B2 31 A4 33 38 3A 99 22 9D 22 43 24 22 9D 22 3B |.1.38:."."C$".";| 00000070: 3A 82 3A 99 43 24 00 91 08 05 00 81 49 B2 31 A4 |:.:.C$......I.1.| 00000080: 32 33 3A 99 22 91 22 43 24 22 9D 22 3B 3A 82 3A |23:."."C$".";:.:| 00000090: 8E 00 A2 08 06 00 A1 41 24 3A 8B 41 24 B2 22 22 |.......A$:.A$.""| 000000A0: A7 36 00 AA 08 07 00 99 3A 8E 00 D3 08 0A 00 43 |.6......:......C| 000000B0: 24 B2 22 D1 22 3A 8D 33 3A 99 A3 31 35 29 22 11 |$.".":.3:..15)".| 000000C0: 11 11 11 11 11 4C 45 4B 54 49 4F 4E 20 35 22 3A |.....LEKTION 5":| 000000D0: 99 3A 99 00 F1 08 0B 00 99 A3 31 32 29 22 31 2E |.:........12)"1.| 000000E0: 20 50 52 4F 47 52 41 4D 4D 42 45 49 53 50 49 45 | PROGRAMMBEISPIE| 000000F0: 4C 00 25 09 0C 00 99 A3 31 32 29 22 11 32 2E 20 |L.%.....12)".2. | 00000100: 49 46 2F 54 48 45 4E 2D 42 45 46 45 48 4C 22 3A |IF/THEN-BEFEHL":| 00000110: 99 A3 31 32 29 22 11 33 2E 20 47 4F 54 4F 2D 42 |..12)".3. GOTO-B| 00000120: 45 46 45 48 4C 00 48 09 0E 00 99 A3 31 32 29 22 |EFEHL.H.....12)"| 00000130: 11 34 2E 20 50 52 4F 47 52 41 4D 4D 42 45 49 53 |.4. PROGRAMMBEIS| 00000140: 50 49 45 4C 22 3A 8D 36 00 74 09 10 00 99 22 93 |PIEL":.6.t....".| 00000150: 41 4D 20 53 43 48 4C 55 53 53 20 56 4F 4E 20 4C |AM SCHLUSS VON L| 00000160: 45 4B 54 49 4F 4E 20 34 20 57 55 52 44 45 20 49 |EKTION 4 WURDE I| 00000170: 48 4E 45 4E 00 9F 09 11 00 99 22 56 4F 52 47 45 |HNEN......"VORGE| 00000180: 53 43 48 4C 41 47 45 4E 2C 20 45 49 4E 20 50 52 |SCHLAGEN, EIN PR| 00000190: 4F 47 52 41 4D 4D 20 46 55 45 52 20 44 45 4E 00 |OGRAMM FUER DEN.| 000001A0: E7 09 12 00 99 22 44 55 52 43 48 53 43 48 4E 49 |....."DURCHSCHNI| 000001B0: 54 54 4C 49 43 48 45 4E 20 42 45 4E 5A 49 4E 56 |TTLICHEN BENZINV| 000001C0: 45 52 42 52 41 55 43 48 20 41 55 46 22 3A 99 22 |ERBRAUCH AUF":."| 000001D0: 31 30 30 4B 4D 20 5A 55 20 53 43 48 52 45 49 42 |100KM ZU SCHREIB| 000001E0: 45 4E 2E 22 3A 8D 37 00 15 0A 14 00 99 22 48 49 |EN.":.7......"HI| 000001F0: 45 52 46 55 45 52 20 47 49 42 54 20 45 53 20 56 |ERFUER GIBT ES V| 00000200: 45 52 53 43 48 49 45 44 45 4E 45 20 52 49 43 48 |ERSCHIEDENE RICH| 00000210: 54 49 47 45 22 00 58 0A 15 00 99 22 4D 4F 45 47 |TIGE".X...."MOEG| 00000220: 4C 49 43 48 4B 45 49 54 45 4E 2C 20 45 49 4E 45 |LICHKEITEN, EINE| 00000230: 20 44 41 56 4F 4E 20 49 53 54 20 44 41 53 22 3A | DAVON IST DAS":| 00000240: 99 22 46 4F 4C 47 45 4E 44 45 20 50 52 4F 47 52 |."FOLGENDE PROGR| 00000250: 41 4D 4D 2E 22 3A 8D 36 00 85 0A 16 00 99 22 93 |AMM.":.6......".| 00000260: 32 20 50 52 49 4E 54 20 22 5A 24 22 4B 45 4E 4E |2 PRINT "Z$"KENN| 00000270: 5A 45 49 43 48 45 4E 2C 20 4B 4D 2C 20 4C 49 54 |ZEICHEN, KM, LIT| 00000280: 45 52 22 5A 24 00 B4 0A 18 00 99 22 34 20 49 4E |ER"Z$......"4 IN| 00000290: 50 55 54 20 4B 5A 24 2C 20 4B 4D 2C 20 4C 22 3A |PUT KZ$, KM, L":| 000002A0: 99 22 36 20 4C 45 54 20 41 20 3D 20 31 30 30 2A |."6 LET A = 100*| 000002B0: 4C 2F 4B 4D 00 F4 0A 1A 00 99 22 38 20 50 52 49 |L/KM......"8 PRI| 000002C0: 4E 54 22 5A 24 22 44 45 52 20 57 41 47 45 4E 22 |NT"Z$"DER WAGEN"| 000002D0: 5A 24 22 4B 5A 24 22 5A 24 22 56 45 52 42 52 41 |Z$"KZ$"Z$"VERBRA| 000002E0: 55 43 48 54 22 5A 24 22 41 22 5A 24 22 4C 49 54 |UCHT"Z$"A"Z$"LIT| 000002F0: 45 52 22 3B 00 0C 0B 1B 00 81 49 B2 31 A4 33 39 |ER";......I.1.39| 00000300: 3A 99 22 A8 22 3B 3A 82 3A 99 3A 99 00 4D 0B 1C |:.".";:.:.:..M..| 00000310: 00 99 22 53 45 48 45 4E 20 53 49 45 20 4E 55 4E |.."SEHEN SIE NUN| 00000320: 2C 20 57 41 53 20 42 45 49 4D 20 50 52 4F 47 52 |, WAS BEIM PROGR| 00000330: 41 4D 4D 41 42 4C 41 55 46 22 3A 99 22 50 41 53 |AMMABLAUF":."PAS| 00000340: 53 49 45 52 54 2E 22 3A 8D 36 3A 8D 37 00 8E 0B |SIERT.":.6:.7...| 00000350: 1E 00 99 22 12 42 49 54 54 45 20 47 45 42 45 4E |...".BITTE GEBEN| 00000360: 20 53 49 45 20 45 49 4E 20 4B 45 4E 4E 5A 45 49 | SIE EIN KENNZEI| 00000370: 43 48 45 4E 20 55 4E 44 20 5A 57 45 49 20 5A 41 |CHEN UND ZWEI ZA| 00000380: 48 4C 45 4E 20 45 49 4E 2E 92 22 3A 8D 37 00 BD |HLEN EIN..":.7..| 00000390: 0B 20 00 99 22 52 55 4E 22 3A 99 22 4B 45 4E 4E |. .."RUN":."KENN| 000003A0: 5A 45 49 43 48 45 4E 2C 20 4B 4D 2C 20 4C 49 54 |ZEICHEN, KM, LIT| 000003B0: 45 52 22 3A 85 4B 5A 24 2C 4B 4D 2C 4C 00 F1 0B |ER":.KZ$,KM,L...| 000003C0: 22 00 99 22 44 45 52 20 57 41 47 45 4E 20 22 4B |".."DER WAGEN "K| 000003D0: 5A 24 22 20 56 45 52 42 52 41 55 43 48 54 22 31 |Z$" VERBRAUCHT"1| 000003E0: 30 30 AC 4C AD 4B 4D 22 4C 49 54 45 52 22 3A 8D |00.L.KM"LITER":.| 000003F0: 36 00 33 0C 24 00 99 22 93 22 A3 31 36 29 22 49 |6.3.$..".".16)"I| 00000400: 46 2F 54 48 45 4E 22 3A 8D 37 3A 99 22 43 4F 4D |F/THEN":.7:."COM| 00000410: 50 55 54 45 52 50 52 4F 47 52 41 4D 4D 45 20 57 |PUTERPROGRAMME W| 00000420: 45 52 44 45 4E 20 44 55 52 43 48 20 53 50 52 55 |ERDEN DURCH SPRU| 00000430: 4E 47 2D 00 5B 0C 26 00 99 22 42 45 46 45 48 4C |NG-.[.&.."BEFEHL| 00000440: 45 20 53 45 48 52 20 56 49 45 4C 20 46 4C 45 58 |E SEHR VIEL FLEX| 00000450: 49 42 4C 45 52 2E 22 20 3A 8D 37 00 88 0C 29 00 |IBLER." :.7...).| 00000460: 99 22 42 45 54 52 41 43 48 54 45 4E 20 53 49 45 |."BETRACHTEN SIE| 00000470: 20 46 4F 4C 47 45 4E 44 45 53 20 42 45 49 53 50 | FOLGENDES BEISP| 00000480: 49 45 4C 3A 22 3A 8D 36 00 B2 0C 2A 00 99 22 93 |IEL:":.6...*..".| 00000490: 20 32 20 50 52 49 4E 54 20 22 5A 24 22 45 49 4E | 2 PRINT "Z$"EIN| 000004A0: 47 41 42 45 20 44 45 53 20 41 4C 54 45 52 53 22 |GABE DES ALTERS"| 000004B0: 5A 24 00 F5 0C 2C 00 99 22 20 34 20 49 4E 50 55 |Z$...,.." 4 INPU| 000004C0: 54 20 41 22 3A 99 22 20 36 20 50 52 49 4E 54 22 |T A":." 6 PRINT"| 000004D0: 5A 24 22 41 4E 47 41 42 45 20 49 4E 20 54 41 47 |Z$"ANGABE IN TAG| 000004E0: 45 4E 3F 28 4A 41 20 4F 44 45 52 20 4E 45 49 4E |EN?(JA ODER NEIN| 000004F0: 29 22 5A 24 3B 00 29 0D 2E 00 99 22 20 38 20 49 |)"Z$;.)...." 8 I| 00000500: 4E 50 55 54 20 42 24 22 3A 99 22 31 30 20 49 46 |NPUT B$":."10 IF| 00000510: 20 42 24 3D 22 5A 24 22 4E 45 49 4E 22 5A 24 22 | B$="Z$"NEIN"Z$"| 00000520: 20 54 48 45 4E 20 31 34 22 00 5F 0D 30 00 99 22 | THEN 14"._.0.."| 00000530: 31 32 20 50 52 49 4E 54 20 22 5A 24 22 53 49 45 |12 PRINT "Z$"SIE| 00000540: 20 53 49 4E 44 22 5A 24 22 20 33 36 35 2A 41 20 | SIND"Z$" 365*A | 00000550: 22 5A 24 22 54 41 47 45 20 41 4C 54 22 5A 24 00 |"Z$"TAGE ALT"Z$.| 00000560: A2 0D 32 00 99 22 31 34 20 50 52 49 4E 54 20 22 |..2.."14 PRINT "| 00000570: 5A 24 22 53 49 45 20 53 49 4E 44 22 5A 24 22 20 |Z$"SIE SIND"Z$" | 00000580: 31 32 2A 41 20 22 5A 24 22 4D 4F 4E 41 54 45 20 |12*A "Z$"MONATE | 00000590: 41 4C 54 22 5A 24 3A 59 31 B2 31 30 3A 59 32 B2 |ALT"Z$:Y1.10:Y2.| 000005A0: 32 34 00 B8 0D 3C 00 81 49 B2 31 A4 33 39 3A 99 |24...<..I.1.39:.| 000005B0: 22 A8 22 3B 3A 82 3A 99 00 FC 0D 52 00 8D 37 3A |".";:.:....R..7:| 000005C0: 99 22 5A 45 49 4C 45 20 32 20 42 45 57 49 52 4B |."ZEILE 2 BEWIRK| 000005D0: 54 20 44 45 4E 20 44 52 55 43 4B 20 56 4F 4E 3A |T DEN DRUCK VON:| 000005E0: 22 3A 99 22 20 20 20 12 45 49 4E 47 41 42 45 20 |":." .EINGABE | 000005F0: 44 45 53 20 41 4C 54 45 52 53 92 22 00 2A 0E 54 |DES ALTERS.".*.T| 00000600: 00 99 3A 20 99 22 5A 45 49 4C 45 20 34 20 42 45 |..: ."ZEILE 4 BE| 00000610: 57 49 52 4B 54 20 44 49 45 20 41 55 46 46 4F 52 |WIRKT DIE AUFFOR| 00000620: 44 45 52 55 4E 47 20 5A 55 52 00 6B 0E 55 00 99 |DERUNG ZUR.k.U..| 00000630: 22 45 49 4E 47 41 42 45 20 45 49 4E 45 52 20 5A |"EINGABE EINER Z| 00000640: 41 48 4C 20 28 5A 2E 42 2E 20 31 30 29 20 44 55 |AHL (Z.B. 10) DU| 00000650: 52 43 48 20 44 41 53 22 3A 99 22 5A 45 49 43 48 |RCH DAS":."ZEICH| 00000660: 45 4E 20 12 3F 92 2E 22 3A 8D 37 00 91 0E 58 00 |EN .?..":.7...X.| 00000670: 99 22 5A 45 49 4C 45 20 36 20 42 45 57 49 52 4B |."ZEILE 6 BEWIRK| 00000680: 54 20 44 45 4E 20 44 52 55 43 4B 20 56 4F 4E 3A |T DEN DRUCK VON:| 00000690: 22 00 BB 0E 5A 00 99 22 20 20 20 12 41 4E 47 41 |"...Z.." .ANGA| 000006A0: 42 45 20 49 4E 20 54 41 47 45 4E 3F 28 4A 41 20 |BE IN TAGEN?(JA | 000006B0: 4F 44 45 52 20 4E 45 49 4E 29 22 00 E7 0E 5C 00 |ODER NEIN)"...\.| 000006C0: 99 22 11 5A 45 49 4C 45 20 38 20 42 45 57 49 52 |.".ZEILE 8 BEWIR| 000006D0: 4B 54 20 44 49 45 20 41 55 46 46 4F 52 44 45 52 |KT DIE AUFFORDER| 000006E0: 55 4E 47 20 5A 55 52 00 2D 0F 5E 00 99 22 45 49 |UNG ZUR.-.^.."EI| 000006F0: 4E 47 41 42 45 20 44 45 52 20 53 54 52 49 4E 47 |NGABE DER STRING| 00000700: 53 20 12 4A 41 92 20 4F 44 45 52 20 12 4E 45 49 |S .JA. ODER .NEI| 00000710: 4E 92 20 22 3A 99 22 44 55 52 43 48 20 44 41 53 |N. ":."DURCH DAS| 00000720: 20 5A 45 49 43 48 45 4E 20 12 3F 92 2E 00 6A 0F | ZEICHEN .?...j.| 00000730: 60 00 8D 36 3A 8D 35 30 30 30 3A 8D 36 30 30 30 |`..6:.5000:.6000| 00000740: 3A 99 22 5A 45 49 4C 45 20 31 30 20 42 45 57 49 |:."ZEILE 10 BEWI| 00000750: 52 4B 54 20 44 49 45 20 50 52 55 45 46 55 4E 47 |RKT DIE PRUEFUNG| 00000760: 20 44 45 53 20 49 4E 20 42 24 00 8A 0F 61 00 99 | DES IN B$...a..| 00000770: 22 47 45 53 50 45 49 43 48 45 52 54 45 4E 20 53 |"GESPEICHERTEN S| 00000780: 54 52 49 4E 47 53 2C 22 3A 99 00 BB 0F 62 00 99 |TRINGS,":....b..| 00000790: 22 55 4E 44 20 46 55 45 52 20 42 24 3D 4E 45 49 |"UND FUER B$=NEI| 000007A0: 4E 2C 20 44 45 4E 20 53 50 52 55 4E 47 20 5A 55 |N, DEN SPRUNG ZU| 000007B0: 20 5A 45 49 4C 45 20 31 34 22 3B 00 E3 0F 63 00 | ZEILE 14";...c.| 000007C0: 99 22 28 5A 45 49 4C 45 20 31 32 20 57 49 52 44 |."(ZEILE 12 WIRD| 000007D0: 20 41 4C 53 4F 20 41 55 53 47 45 4C 41 53 53 45 | ALSO AUSGELASSE| 000007E0: 4E 2E 29 00 25 10 64 00 99 3A 99 22 46 55 45 52 |N.).%.d..:."FUER| 000007F0: 20 42 24 3D 4A 41 20 57 49 52 44 20 44 41 53 20 | B$=JA WIRD DAS | 00000800: 50 52 4F 47 52 41 4D 4D 20 4D 49 54 22 3A 99 22 |PROGRAMM MIT":."| 00000810: 5A 45 49 4C 45 20 31 32 20 46 4F 52 54 47 45 53 |ZEILE 12 FORTGES| 00000820: 45 54 5A 54 2E 00 6D 10 66 00 8D 37 3A 99 22 5A |ETZT..m.f..7:."Z| 00000830: 45 49 4C 45 20 31 32 20 42 45 57 49 52 4B 54 20 |EILE 12 BEWIRKT | 00000840: 44 45 4E 20 44 52 55 43 4B 20 56 4F 4E 3A 22 3A |DEN DRUCK VON:":| 00000850: 99 22 20 20 20 12 53 49 45 20 53 49 4E 44 20 33 |." .SIE SIND 3| 00000860: 36 35 30 20 54 41 47 45 20 41 4C 54 92 00 B7 10 |650 TAGE ALT....| 00000870: 68 00 8D 37 3A 99 22 5A 45 49 4C 45 20 31 34 20 |h..7:."ZEILE 14 | 00000880: 42 45 57 49 52 4B 54 20 44 45 4E 20 44 52 55 43 |BEWIRKT DEN DRUC| 00000890: 4B 20 56 4F 4E 3A 22 3A 99 22 20 20 20 20 12 53 |K VON:":." .S| 000008A0: 49 45 20 53 49 4E 44 20 31 30 30 20 4D 4F 4E 41 |IE SIND 100 MONA| 000008B0: 54 45 20 41 4C 54 92 00 DE 10 6A 00 99 22 44 41 |TE ALT....j.."DA| 000008C0: 4D 49 54 20 49 53 54 20 44 41 53 20 50 52 4F 47 |MIT IST DAS PROG| 000008D0: 52 41 4D 4D 20 42 45 45 4E 44 45 54 2E 22 00 EA |RAMM BEENDET."..| 000008E0: 10 72 00 8D 36 3A 89 34 30 30 00 3A 11 74 00 99 |.r..6:.400.:.t..| 000008F0: 22 11 59 45 53 2C 20 54 48 45 20 50 52 4F 47 52 |".YES, THE PROGR| 00000900: 41 4D 20 41 4C 4C 4F 57 53 20 54 48 45 20 55 53 |AM ALLOWS THE US| 00000910: 45 52 20 54 4F 22 3A 99 22 53 50 45 43 49 46 59 |ER TO":."SPECIFY| 00000920: 20 57 48 45 54 48 45 52 20 54 48 45 20 41 47 45 | WHETHER THE AGE| 00000930: 20 53 48 4F 55 4C 44 20 42 45 00 86 11 76 00 99 | SHOULD BE...v..| 00000940: 22 50 52 49 4E 54 45 44 20 49 4E 20 4D 4F 4E 54 |"PRINTED IN MONT| 00000950: 48 53 20 4F 4E 4C 59 20 28 12 4E 4F 92 29 20 4F |HS ONLY (.NO.) O| 00000960: 52 20 42 4F 54 48 22 3A 99 22 44 41 59 53 20 41 |R BOTH":."DAYS A| 00000970: 4E 44 20 4D 4F 4E 54 48 53 20 28 12 59 45 53 92 |ND MONTHS (.YES.| 00000980: 29 2E 22 3A 8D 36 00 BA 11 90 01 43 24 B2 22 12 |).":.6.....C$.".| 00000990: D1 22 3A 8D 33 3A 99 22 11 11 11 11 22 A3 37 29 |.":.3:."....".7)| 000009A0: 22 45 4E 44 45 20 56 4F 4E 20 4C 45 4B 54 49 4F |"ENDE VON LEKTIO| 000009B0: 4E 20 35 20 54 45 49 4C 20 31 00 E8 11 91 01 99 |N 5 TEIL 1......| 000009C0: 22 11 11 11 11 1D 1D 1D 1D 20 20 42 49 54 54 45 |"........ BITTE| 000009D0: 20 57 41 52 54 45 4E 20 53 49 45 2C 20 42 49 53 | WARTEN SIE, BIS| 000009E0: 20 54 45 49 4C 20 32 22 00 07 12 92 01 99 22 11 | TEIL 2"......".| 000009F0: 11 1D 1D 1D 1D 20 20 45 49 4E 47 45 4C 45 53 45 |..... EINGELESE| 00000A00: 4E 20 49 53 54 2E 22 00 17 12 93 01 99 22 11 11 |N IST."......"..| 00000A10: 11 11 11 11 11 11 11 00 21 12 94 01 89 37 30 30 |........!....700| 00000A20: 30 00 4C 12 88 13 99 22 13 22 3B 3A 81 49 B2 31 |0.L....".";:.I.1| 00000A30: A4 59 31 3A 99 22 11 22 3B 3A 82 3A 99 22 91 22 |.Y1:.".";:.:."."| 00000A40: 3B 3A 81 4A B2 30 A4 59 32 AB 59 31 00 7F 12 89 |;:.J.0.Y2.Y1....| 00000A50: 13 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." | 00000A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000A70: 20 20 20 20 20 20 20 20 20 20 22 3A 82 3A 8E 00 | ":.:..| 00000A80: A1 12 70 17 99 22 13 22 3B 3A 81 49 B2 31 A4 59 |..p..".";:.I.1.Y| 00000A90: 31 3A 99 22 11 22 3B 3A 82 3A 99 22 91 22 3B 3A |1:.".";:.:.".";:| 00000AA0: 8E 00 B2 12 58 1B 93 22 54 45 49 4C 20 31 33 22 |....X.."TEIL 13"| 00000AB0: 2C 38 00 00 00 01 24 24 24 24 24 24 24 24 24 24 |,8....$$$$$$$$$$| 00000AC0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000AD0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000AE0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000AF0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B00: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B10: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B20: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B30: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B40: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B50: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B60: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B70: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B80: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000B90: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000BA0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000BB0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000BC0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000BD0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000BE0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000BF0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C00: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C10: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C20: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C30: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C40: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C50: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C60: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C70: 24 24 24 24 24 24 24 22 00 A2 D0 FF |$$$$$$$".... |
.......53280,1:.53281,1.(...Z$.G(34):.10 .Y....".":.I.1.39:.C$;:.:.I.1.22:.".."C$ ;:.:.".";.V....I.1.38:."."C$".";:.:.C$.. ....I.1.23:."."C$".";:.:.......A$:.A$."" .6......:..S...C$."Q":.3:..15)"......LEK TION 5":.:........12)"1. PROGRAMMBEISPIE L.%.....12)".2. IF/THEN-BEFEHL":..12)".3 . GOTO-BEFEHL.H.....12)".4. PROGRAMMBEIS PIEL":.6.T....".AM SCHLUSS VON LEKTION 4 WURDE IHNEN......"VORGESCHLAGEN, EIN PR OGRAMM FUER DEN......"DURCHSCHNITTLICHEN BENZINVERBRAUCH AUF":."100KM ZU SCHREIB EN.":.7......"HIERFUER GIBT ES VERSCHIED ENE RICHTIGE".X...."MOEGLICHKEITEN, EINE DAVON IST DAS":."FOLGENDE PROGRAMM.":.6 ......".2 PRINT "Z$"KENNZEICHEN, KM, LIT ER"Z$......"4 INPUT KZ$, KM, L":."6 LET A = 100*L/KM......"8 PRINT"Z$"DER WAGEN" Z$"KZ$"Z$"VERBRAUCHT"Z$"A"Z$"LITER";.... ..I.1.39:.".";:.:.:..M...."SEHEN SIE NUN , WAS BEIM PROGRAMMABLAUF":."PASSIERT.": .6:.7......".BITTE GEBEN SIE EIN KENNZEI CHEN UND ZWEI ZAHLEN EIN..":.7... .."RUN ":."KENNZEICHEN, KM, LITER":.KZ$,KM,L... ".."DER WAGEN "KZ$" VERBRAUCHT"100.L.KM" LITER":.6.3.$..".".16)"IF/THEN":.7:."COM PUTERPROGRAMME WERDEN DURCH SPRUNG-.[.&. ."BEFEHLE SEHR VIEL FLEXIBLER." :.7...). ."BETRACHTEN SIE FOLGENDES BEISPIEL:":.6 ...*..". 2 PRINT "Z$"EINGABE DES ALTERS" Z$...,.." 4 INPUT A":." 6 PRINT"Z$"ANGAB E IN TAGEN?(JA ODER NEIN)"Z$;.)...." 8 I NPUT B$":."10 IF B$="Z$"NEIN"Z$" THEN 14 "._.0.."12 PRINT "Z$"SIE SIND"Z$" 365*A "Z$"TAGE ALT"Z$...2.."14 PRINT "Z$"SIE S IND"Z$" 12*A "Z$"MONATE ALT"Z$:Y1.10:Y2. 24...<..I.1.39:.".";:.:....R..7:."ZEILE 2 BEWIRKT DEN DRUCK VON:":." .EINGABE DES ALTERS.".*.T..: ."ZEILE 4 BEWIRKT DI E AUFFORDERUNG ZUR.K.U.."EINGABE EINER Z AHL (Z.B. 10) DURCH DAS":."ZEICHEN .?.." :.7...X.."ZEILE 6 BEWIRKT DEN DRUCK VON: "...Z.." .ANGABE IN TAGEN?(JA ODER NEI N)"...\..".ZEILE 8 BEWIRKT DIE AUFFORDER UNG ZUR.-.^.."EINGABE DER STRINGS .JA. O DER .NEIN. ":."DURCH DAS ZEICHEN .?...J. `..6:.5000:.6000:."ZEILE 10 BEWIRKT DIE PRUEFUNG DES IN B$...A.."GESPEICHERTEN S TRINGS,":....B.."UND FUER B$=NEIN, DEN S PRUNG ZU ZEILE 14";...C.."(ZEILE 12 WIRD ALSO AUSGELASSEN.).%.D..:."FUER B$=JA W IRD DAS PROGRAMM MIT":."ZEILE 12 FORTGES ETZT..M.F..7:."ZEILE 12 BEWIRKT DEN DRUC K VON:":." .SIE SIND 3650 TAGE ALT.... H..7:."ZEILE 14 BEWIRKT DEN DRUCK VON:": ." .SIE SIND 100 MONATE ALT....J.."DA MIT IST DAS PROGRAMM BEENDET."...R..6:.4 00.:.T..".YES, THE PROGRAM ALLOWS THE US ER TO":."SPECIFY WHETHER THE AGE SHOULD BE...V.."PRINTED IN MONTHS ONLY (.NO.) O R BOTH":."DAYS AND MONTHS (.YES.).":.6.. ...C$.".Q":.3:."....".7)"ENDE VON LEKTIO N 5 TEIL 1......"........ BITTE WARTEN SIE, BIS TEIL 2"......"...... EINGELESE N IST."......"..........!....7000.L...." .";:.I.1.Y1:.".";:.:.".";:.J.0.Y2.Y1... .." ":.:....P..".";:.I.1.Y1:.".";:.:.".";: ....X.."TEIL 13",8....$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"..P.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL