TEIL 14
FILE INFORMATION
FILENAME(S): TEIL 14
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-12-02 23:47:27
APPEARS ON: 1 disk(s)
FILE HASH
4b423a278a60868a9fe032ec00c4a2be67c0f1a9c2281761d1ccbb750de2dd7d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BASIC KURS | TEIL 14 | PRG | swasti, flohmarkt | 12 | 2 | 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 29 08 02 00 5A 24 B2 C7 |53281,1.)...Z$..| 00000020: 28 33 34 29 3A 89 31 38 30 00 5A 08 03 00 99 22 |(34):.180.Z...."| 00000030: 93 22 3A 81 49 B2 31 A4 33 39 3A 99 43 24 3B 3A |.":.I.1.39:.C$;:| 00000040: 82 3A 81 49 B2 31 A4 32 32 3A 99 22 9D 11 22 43 |.:.I.1.22:.".."C| 00000050: 24 3B 3A 82 3A 99 22 9D 22 3B 00 77 08 04 00 81 |$;:.:.".";.w....| 00000060: 49 B2 31 A4 33 38 3A 99 22 9D 22 43 24 22 9D 22 |I.1.38:."."C$"."| 00000070: 3B 3A 82 3A 99 43 24 00 92 08 05 00 81 49 B2 31 |;:.:.C$......I.1| 00000080: A4 32 33 3A 99 22 91 22 43 24 22 9D 22 3B 3A 82 |.23:."."C$".";:.| 00000090: 3A 8E 00 A3 08 06 00 A1 41 24 3A 8B 41 24 B2 22 |:.......A$:.A$."| 000000A0: 22 A7 36 00 AB 08 07 00 99 3A 8E 00 C5 08 B4 00 |".6......:......| 000000B0: 99 22 93 11 11 11 11 22 A3 31 38 29 22 47 4F 54 |.".....".18)"GOT| 000000C0: 4F 22 3A 8D 36 00 F3 08 B6 00 99 22 93 44 45 52 |O":.6......".DER| 000000D0: 20 47 4F 54 4F 2D 42 45 46 45 48 4C 20 45 52 4D | GOTO-BEFEHL ERM| 000000E0: 4F 45 47 4C 49 43 48 54 20 44 45 4E 20 53 50 52 |OEGLICHT DEN SPR| 000000F0: 55 4E 47 00 1E 09 B7 00 99 22 5A 55 20 49 52 47 |UNG......"ZU IRG| 00000100: 45 4E 44 45 49 4E 45 52 20 5A 45 49 4C 45 20 44 |ENDEINER ZEILE D| 00000110: 45 53 20 50 52 4F 47 52 41 4D 4D 45 53 2E 00 52 |ES PROGRAMMES..R| 00000120: 09 B8 00 8D 37 3A 99 22 44 41 42 45 49 20 4B 41 |....7:."DABEI KA| 00000130: 4E 4E 20 45 4E 54 57 45 44 45 52 20 5A 55 20 45 |NN ENTWEDER ZU E| 00000140: 49 4E 45 52 20 5A 45 49 4C 45 4E 23 20 56 4F 52 |INER ZEILEN# VOR| 00000150: 22 3B 00 7E 09 B9 00 99 22 44 45 4D 20 47 4F 54 |";.~...."DEM GOT| 00000160: 4F 2D 42 45 46 45 48 4C 20 4F 44 45 52 20 5A 55 |O-BEFEHL ODER ZU| 00000170: 20 45 49 4E 45 52 20 5A 45 49 4C 45 4E 23 00 B0 | EINER ZEILEN#..| 00000180: 09 BA 00 99 22 4E 41 43 48 20 44 45 4D 20 47 4F |...."NACH DEM GO| 00000190: 54 4F 2D 42 45 46 45 48 4C 20 47 45 53 50 52 55 |TO-BEFEHL GESPRU| 000001A0: 4E 47 45 4E 20 57 45 52 44 45 4E 2E 22 3A 8D 37 |NGEN WERDEN.":.7| 000001B0: 00 E8 09 BB 00 99 22 42 49 54 54 45 20 42 45 54 |......"BITTE BET| 000001C0: 52 41 43 48 54 45 4E 20 53 49 45 20 44 41 53 20 |RACHTEN SIE DAS | 000001D0: 46 4F 4C 47 45 4E 44 45 20 20 20 20 20 20 20 50 |FOLGENDE P| 000001E0: 52 4F 47 52 41 4D 4D 3A 00 22 0A BC 00 8D 36 3A |ROGRAMM:."....6:| 000001F0: 99 22 93 36 20 20 50 52 49 4E 54 20 22 5A 24 22 |.".6 PRINT "Z$"| 00000200: 45 49 4E 47 41 42 45 20 44 45 53 20 41 4C 54 45 |EINGABE DES ALTE| 00000210: 52 53 22 5A 24 3A 99 22 37 20 20 49 4E 50 55 54 |RS"Z$:."7 INPUT| 00000220: 20 41 00 65 0A BE 00 99 22 38 20 20 50 52 49 4E | A.e...."8 PRIN| 00000230: 54 22 5A 24 22 41 4C 54 45 52 20 49 4E 20 54 41 |T"Z$"ALTER IN TA| 00000240: 47 45 4E 20 4F 44 45 52 20 49 4E 20 4D 4F 4E 41 |GEN ODER IN MONA| 00000250: 54 45 4E 22 5A 24 3B 3A 99 22 31 30 20 49 4E 50 |TEN"Z$;:."10 INP| 00000260: 55 54 20 42 24 00 8A 0A C0 00 99 22 31 32 20 49 |UT B$......"12 I| 00000270: 46 20 42 24 3D 22 5A 24 22 54 41 47 45 22 5A 24 |F B$="Z$"TAGE"Z$| 00000280: 22 20 54 48 45 4E 20 31 38 22 00 BE 0A C1 00 99 |" THEN 18"......| 00000290: 22 31 34 20 50 52 49 4E 54 22 5A 24 22 53 49 45 |"14 PRINT"Z$"SIE| 000002A0: 20 53 49 4E 44 22 5A 24 22 31 32 2A 41 22 5A 24 | SIND"Z$"12*A"Z$| 000002B0: 22 4D 4F 4E 41 54 45 20 41 4C 54 22 5A 24 00 07 |"MONATE ALT"Z$..| 000002C0: 0B C2 00 99 22 31 36 20 47 4F 54 4F 32 30 22 3A |...."16 GOTO20":| 000002D0: 99 22 31 38 20 50 52 49 4E 54 22 5A 24 22 53 49 |."18 PRINT"Z$"SI| 000002E0: 45 20 53 49 4E 44 22 5A 24 22 33 36 35 2A 41 22 |E SIND"Z$"365*A"| 000002F0: 5A 24 22 54 41 47 45 20 41 4C 54 22 5A 24 3A 99 |Z$"TAGE ALT"Z$:.| 00000300: 22 32 30 20 45 4E 44 00 37 0B C3 00 8D 37 3A 99 |"20 END.7....7:.| 00000310: 22 44 49 45 53 45 53 20 50 52 4F 47 52 41 4D 4D |"DIESES PROGRAMM| 00000320: 20 42 45 52 45 43 48 4E 45 54 20 45 4E 54 57 45 | BERECHNET ENTWE| 00000330: 44 45 52 20 44 41 53 00 62 0B C4 00 99 22 41 4C |DER DAS.b...."AL| 00000340: 54 45 52 20 49 4E 20 54 41 47 45 4E 20 4F 44 45 |TER IN TAGEN ODE| 00000350: 52 20 49 4E 20 4D 4F 4E 41 54 45 4E 2C 20 41 42 |R IN MONATEN, AB| 00000360: 45 52 00 85 0B C5 00 99 22 12 4E 49 43 48 54 92 |ER......".NICHT.| 00000370: 20 42 45 49 44 45 53 20 5A 55 53 41 4D 4D 45 4E | BEIDES ZUSAMMEN| 00000380: 2E 22 3A 8D 37 00 AE 0B C6 00 99 22 57 45 4E 4E |.":.7......"WENN| 00000390: 20 41 55 46 20 44 49 45 20 46 52 41 47 45 20 56 | AUF DIE FRAGE V| 000003A0: 4F 4E 20 5A 45 49 4C 45 20 38 20 44 45 52 00 DE |ON ZEILE 8 DER..| 000003B0: 0B C7 00 99 22 53 54 52 49 4E 47 20 12 54 41 47 |...."STRING .TAG| 000003C0: 45 92 20 45 49 4E 47 45 47 45 42 45 4E 20 57 49 |E. EINGEGEBEN WI| 000003D0: 52 44 2C 20 53 4F 20 42 45 57 49 52 4B 54 00 04 |RD, SO BEWIRKT..| 000003E0: 0C C8 00 99 22 44 49 45 53 20 45 49 4E 45 4E 20 |...."DIES EINEN | 000003F0: 53 50 52 55 4E 47 20 5A 55 20 5A 45 49 4C 45 20 |SPRUNG ZU ZEILE | 00000400: 31 38 2E 22 00 35 0C C9 00 8D 37 3A 99 22 57 49 |18.".5....7:."WI| 00000410: 52 44 20 44 45 52 20 53 54 52 49 4E 47 20 12 4D |RD DER STRING .M| 00000420: 4F 4E 41 54 45 92 20 45 49 4E 47 45 47 45 42 45 |ONATE. EINGEGEBE| 00000430: 4E 2C 20 53 4F 00 66 0C CA 00 99 22 57 49 52 44 |N, SO.f...."WIRD| 00000440: 20 44 45 52 20 42 45 46 45 48 4C 20 49 4E 20 5A | DER BEFEHL IN Z| 00000450: 45 49 4C 45 20 31 34 20 41 55 53 47 45 46 55 45 |EILE 14 AUSGEFUE| 00000460: 48 52 54 2C 22 3B 00 92 0C CB 00 99 22 55 4E 44 |HRT,";......"UND| 00000470: 20 5A 45 49 4C 45 20 31 36 20 42 45 57 49 52 4B | ZEILE 16 BEWIRK| 00000480: 54 20 44 41 4E 4E 20 44 45 4E 20 53 50 52 55 4E |T DANN DEN SPRUN| 00000490: 47 22 00 C1 0C CC 00 99 22 5A 55 20 5A 45 49 4C |G"......"ZU ZEIL| 000004A0: 45 20 32 30 20 28 5A 45 49 4C 45 20 31 38 20 57 |E 20 (ZEILE 18 W| 000004B0: 49 52 44 20 41 55 53 47 45 4C 41 53 53 45 4E 29 |IRD AUSGELASSEN)| 000004C0: 2E 00 ED 0C CD 00 99 22 42 49 54 54 45 20 42 45 |......."BITTE BE| 000004D0: 41 43 48 54 45 4E 20 53 49 45 2C 20 44 45 52 20 |ACHTEN SIE, DER | 000004E0: 12 45 4E 44 92 2D 42 45 46 45 48 4C 22 00 1C 0D |.END.-BEFEHL"...| 000004F0: CE 00 99 22 42 45 45 4E 44 45 54 20 44 41 53 20 |..."BEENDET DAS | 00000500: 50 52 4F 47 52 41 4D 4D 20 49 4E 20 4A 45 44 45 |PROGRAMM IN JEDE| 00000510: 4D 20 46 41 4C 4C 2E 22 3B 3A 8D 36 00 53 0D CF |M FALL.";:.6.S..| 00000520: 00 99 22 93 35 20 20 49 4E 50 55 54 20 58 22 3A |..".5 INPUT X":| 00000530: 99 22 31 30 20 49 46 20 58 3E 3D 35 30 20 54 48 |."10 IF X>=50 TH| 00000540: 45 4E 20 35 30 22 3A 99 22 32 30 20 47 4F 54 4F |EN 50":."20 GOTO| 00000550: 20 34 30 00 75 0D D0 00 99 22 33 30 20 50 52 49 | 40.u...."30 PRI| 00000560: 4E 54 20 58 2A 31 30 22 3A 99 22 34 30 20 47 4F |NT X*10":."40 GO| 00000570: 54 4F 20 36 30 00 94 0D D1 00 99 22 35 30 20 50 |TO 60......"50 P| 00000580: 52 49 4E 54 20 58 22 3A 99 22 36 30 20 45 4E 44 |RINT X":."60 END| 00000590: 22 3A 8D 37 00 C5 0D D2 00 99 22 57 41 53 20 57 |":.7......"WAS W| 000005A0: 49 52 44 20 44 55 52 43 48 20 44 49 45 53 45 53 |IRD DURCH DIESES| 000005B0: 20 50 52 4F 47 52 41 4D 4D 20 47 45 44 52 55 43 | PROGRAMM GEDRUC| 000005C0: 4B 54 2C 22 3B 00 F4 0D D3 00 99 22 57 45 4E 4E |KT,";......"WENN| 000005D0: 20 46 55 45 52 20 58 20 44 45 52 20 57 45 52 54 | FUER X DER WERT| 000005E0: 20 32 35 20 45 49 4E 47 45 47 45 42 45 4E 20 57 | 25 EINGEGEBEN W| 000005F0: 55 52 44 45 00 32 0E D5 00 99 22 12 31 2E 92 20 |URDE.2....".1.. | 00000600: 32 35 30 22 3A 99 22 12 32 2E 92 20 32 35 22 3A |250":.".2.. 25":| 00000610: 99 22 12 33 2E 92 20 45 53 20 57 49 52 44 20 4E |.".3.. ES WIRD N| 00000620: 49 43 48 54 53 20 47 45 44 52 55 43 4B 54 22 3A |ICHTS GEDRUCKT":| 00000630: 8D 37 00 59 0E D6 00 99 22 28 31 2C 20 32 20 4F |.7.Y...."(1, 2 O| 00000640: 44 45 52 20 33 29 22 3B 3A 85 41 24 3A 8B C5 28 |DER 3)";:.A$:..(| 00000650: 41 24 29 B1 33 A7 32 31 36 00 70 0E D7 00 91 C5 |A$).3.216.p.....| 00000660: 28 41 24 29 89 32 31 37 2C 32 31 37 2C 32 32 30 |(A$).217,217,220| 00000670: 00 7D 0E D8 00 99 51 24 3A 89 32 30 37 00 CA 0E |.}....Q$:.207...| 00000680: D9 00 99 22 11 4E 45 49 4E 2C 20 44 41 20 44 49 |...".NEIN, DA DI| 00000690: 45 20 42 45 44 49 4E 47 55 4E 47 20 49 4E 20 5A |E BEDINGUNG IN Z| 000006A0: 45 49 4C 45 20 31 30 20 46 55 45 52 22 3A 99 22 |EILE 10 FUER":."| 000006B0: 58 3D 32 35 20 4E 49 43 48 54 20 45 52 46 55 45 |X=25 NICHT ERFUE| 000006C0: 4C 4C 54 20 49 53 54 2C 22 3B 00 00 0F DA 00 99 |LLT IST,";......| 000006D0: 22 20 57 49 52 44 20 44 41 53 22 3A 99 22 50 52 |" WIRD DAS":."PR| 000006E0: 4F 47 52 41 4D 4D 20 4D 49 54 20 5A 45 49 4C 45 |OGRAMM MIT ZEILE| 000006F0: 20 32 30 20 46 4F 52 54 47 45 53 45 54 5A 54 2E | 20 FORTGESETZT.| 00000700: 00 2C 0F DB 00 8D 37 3A 99 22 56 45 52 53 55 43 |.,....7:."VERSUC| 00000710: 48 45 4E 20 53 49 45 20 45 53 20 4E 4F 43 48 4D |HEN SIE ES NOCHM| 00000720: 41 4C 21 22 3A 8D 36 3A 89 32 30 37 00 58 0F DC |AL!":.6:.207.X..| 00000730: 00 99 22 11 52 49 43 48 54 49 47 21 21 21 20 20 |..".RICHTIG!!! | 00000740: 45 53 20 57 49 52 44 20 4E 49 43 48 54 53 20 47 |ES WIRD NICHTS G| 00000750: 45 44 52 55 43 4B 54 2E 00 89 0F DD 00 99 22 46 |EDRUCKT......."F| 00000760: 55 45 52 20 58 3D 32 35 20 57 49 52 44 20 5A 55 |UER X=25 WIRD ZU| 00000770: 4E 41 45 43 48 53 54 20 5A 45 49 4C 45 20 32 30 |NAECHST ZEILE 20| 00000780: 20 41 55 53 47 45 2D 22 3B 00 BA 0F DE 00 99 22 | AUSGE-";......"| 00000790: 46 55 45 48 52 54 2C 20 5A 45 49 4C 45 20 34 30 |FUEHRT, ZEILE 40| 000007A0: 20 42 45 57 49 52 4B 54 20 44 41 4E 4E 20 44 45 | BEWIRKT DANN DE| 000007B0: 4E 20 53 50 52 55 4E 47 22 3B 00 ED 0F DF 00 99 |N SPRUNG";......| 000007C0: 22 5A 55 20 5A 45 49 4C 45 20 36 30 20 28 5A 45 |"ZU ZEILE 60 (ZE| 000007D0: 49 4C 45 20 35 30 20 57 49 52 44 20 41 55 53 47 |ILE 50 WIRD AUSG| 000007E0: 45 4C 41 53 53 45 4E 29 2E 22 3A 8D 36 00 15 10 |ELASSEN).":.6...| 000007F0: E0 00 99 22 93 42 45 56 4F 52 20 53 49 45 20 44 |...".BEVOR SIE D| 00000800: 45 4E 20 4B 55 52 53 20 4D 49 54 20 4C 45 4B 54 |EN KURS MIT LEKT| 00000810: 49 4F 4E 20 36 00 3F 10 E1 00 99 22 46 4F 52 54 |ION 6.?...."FORT| 00000820: 53 45 54 5A 45 4E 2C 20 56 45 52 53 55 43 48 45 |SETZEN, VERSUCHE| 00000830: 4E 20 53 49 45 20 42 49 54 54 45 20 45 49 4E 00 |N SIE BITTE EIN.| 00000840: 6A 10 E2 00 99 22 50 52 4F 47 52 41 4D 4D 20 5A |j...."PROGRAMM Z| 00000850: 55 20 53 43 48 52 45 49 42 45 4E 2C 20 44 41 53 |U SCHREIBEN, DAS| 00000860: 20 44 45 4E 20 4C 4F 48 4E 22 00 8F 10 E3 00 99 | DEN LOHN"......| 00000870: 22 45 49 4E 45 53 20 41 52 42 45 49 54 45 52 53 |"EINES ARBEITERS| 00000880: 20 42 45 52 45 43 48 4E 45 54 2E 22 3A 8D 37 00 | BERECHNET.":.7.| 00000890: BA 10 E4 00 99 22 44 45 52 20 41 52 42 45 49 54 |....."DER ARBEIT| 000008A0: 45 52 20 53 4F 4C 4C 20 44 4D 20 38 2E 33 35 20 |ER SOLL DM 8.35 | 000008B0: 50 52 4F 20 53 54 55 4E 44 45 00 02 11 E5 00 99 |PRO STUNDE......| 000008C0: 22 56 45 52 44 49 45 4E 45 4E 20 55 4E 44 20 46 |"VERDIENEN UND F| 000008D0: 55 45 52 20 4A 45 44 45 20 55 45 42 45 52 53 54 |UER JEDE UEBERST| 000008E0: 55 4E 44 45 20 44 41 53 22 3A 99 22 45 49 4E 45 |UNDE DAS":."EINE| 000008F0: 49 4E 48 41 4C 42 46 41 43 48 45 20 44 45 53 20 |INHALBFACHE DES | 00000900: 22 3B 00 44 11 E6 00 99 22 4C 4F 48 4E 45 53 20 |";.D...."LOHNES | 00000910: 42 45 4B 4F 4D 4D 45 4E 2E 11 22 3A 99 22 45 53 |BEKOMMEN..":."ES| 00000920: 20 53 4F 4C 4C 20 4E 41 43 48 20 45 49 4E 47 41 | SOLL NACH EINGA| 00000930: 42 45 20 44 45 52 20 47 45 41 52 42 45 49 54 45 |BE DER GEARBEITE| 00000940: 54 45 4E 22 00 70 11 E8 00 99 22 53 54 55 4E 44 |TEN".p...."STUND| 00000950: 45 4E 20 44 45 52 20 4C 4F 48 4E 20 47 45 44 52 |EN DER LOHN GEDR| 00000960: 55 43 4B 54 20 57 45 52 44 45 4E 2E 22 3A 8D 37 |UCKT WERDEN.":.7| 00000970: 00 9C 11 E9 00 99 22 12 42 49 54 54 45 20 4E 4F |......".BITTE NO| 00000980: 54 49 45 52 45 4E 20 53 49 45 20 44 49 45 20 41 |TIEREN SIE DIE A| 00000990: 55 46 47 41 42 45 2C 20 20 20 20 92 00 CC 11 EA |UFGABE, .....| 000009A0: 00 99 22 12 42 45 56 4F 52 20 53 49 45 20 44 49 |..".BEVOR SIE DI| 000009B0: 45 20 53 50 41 43 45 2D 54 41 53 54 45 20 44 52 |E SPACE-TASTE DR| 000009C0: 55 45 43 4B 45 4E 2E 92 22 3A 8D 36 00 FA 11 90 |UECKEN..":.6....| 000009D0: 01 43 24 B2 22 12 2A 22 3A 8D 33 3A 99 22 11 11 |.C$.".*":.3:."..| 000009E0: 11 11 22 A3 31 30 29 22 45 4E 44 45 20 56 4F 4E |..".10)"ENDE VON| 000009F0: 20 4C 45 4B 54 49 4F 4E 20 35 00 2A 12 92 01 99 | LEKTION 5.*....| 00000A00: 22 11 11 11 1D 1D 57 45 4E 4E 20 53 49 45 20 42 |".....WENN SIE B| 00000A10: 45 52 45 49 54 20 53 49 4E 44 20 46 55 45 52 20 |EREIT SIND FUER | 00000A20: 4C 45 4B 54 49 4F 4E 20 36 2C 00 62 12 93 01 99 |LEKTION 6,.b....| 00000A30: 22 11 11 1D 1D 1D 54 49 50 50 45 4E 20 53 49 45 |".....TIPPEN SIE| 00000A40: 20 42 49 54 54 45 20 20 4C 20 4F 20 41 20 44 20 | BITTE L O A D | 00000A50: 20 45 49 4E 2E 22 3A 99 22 11 11 11 11 11 11 11 | EIN.":.".......| 00000A60: 11 11 00 6C 12 94 01 89 37 30 30 30 00 97 12 88 |...l....7000....| 00000A70: 13 99 22 13 22 3B 3A 81 49 B2 31 A4 59 31 3A 99 |..".";:.I.1.Y1:.| 00000A80: 22 11 22 3B 3A 82 3A 99 22 91 22 3B 3A 81 4A B2 |".";:.:.".";:.J.| 00000A90: 30 A4 59 32 AB 59 31 00 A3 12 89 13 99 22 22 3A |0.Y2.Y1......"":| 00000AA0: 82 3A 8E 00 C5 12 70 17 99 22 13 22 3B 3A 81 49 |.:....p..".";:.I| 00000AB0: B2 31 A4 59 31 3A 99 22 11 22 3B 3A 82 3A 99 22 |.1.Y1:.".";:.:."| 00000AC0: 91 22 3B 3A 8E 00 D6 12 58 1B 93 22 54 45 49 4C |.";:....X.."TEIL| 00000AD0: 20 31 35 22 2C 38 00 00 00 00 58 0F 90 01 43 24 | 15",8....X...C$| 00000AE0: B2 22 12 D7 22 3A 8D 33 3A 99 22 11 11 11 11 22 |."..":.3:."...."| 00000AF0: A3 37 29 22 45 4E 44 45 20 56 4F 4E 20 4C 45 4B |.7)"ENDE VON LEK| 00000B00: 54 49 4F 4E 20 35 20 54 45 49 4C 20 32 00 86 0F |TION 5 TEIL 2...| 00000B10: 91 01 99 22 11 11 11 11 1D 1D 1D 1D 20 20 42 49 |..."........ BI| 00000B20: 54 54 45 20 57 41 52 54 45 4E 20 53 49 45 2C 20 |TTE WARTEN SIE, | 00000B30: 42 49 53 20 54 45 49 4C 20 33 22 00 A4 0F 92 01 |BIS TEIL 3".....| 00000B40: 99 22 11 11 1D 1D 1D 1D 20 20 45 49 4E 47 45 4C |."...... EINGEL| 00000B50: 45 53 45 4E 20 49 53 54 2E 00 B4 0F 93 01 99 22 |ESEN IST......."| 00000B60: 11 11 11 11 11 11 11 11 11 00 BE 0F 94 01 89 37 |...............7| 00000B70: 30 30 30 00 E9 0F 88 13 99 22 13 22 3B 3A 81 49 |000......".";:.I| 00000B80: B2 31 A4 59 31 3A 99 22 11 22 3B 3A 82 3A 99 22 |.1.Y1:.".";:.:."| 00000B90: 91 22 3B 3A 81 4A B2 30 A4 59 32 AB 59 31 00 1C |.";:.J.0.Y2.Y1..| 00000BA0: 10 89 13 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." | 00000BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000BC0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 3A | ":.:| 00000BD0: 8E 00 3E 10 70 17 99 22 13 22 3B 3A 81 49 B2 31 |..>.p..".";:.I.1| 00000BE0: A4 59 31 3A 99 22 11 22 3B 3A 82 3A 99 22 91 22 |.Y1:.".";:.:."."| 00000BF0: 3B 3A 8E 00 44 10 58 1B 93 00 00 00 01 4D 4D 4D |;:..D.X......MMM| 00000C00: 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D |MMMMMMMMMMMMMMMM| 00000C10: 4D 4D 4D 4D 00 9A 0F 96 19 8F 4D 4D 4D 00 A0 0F |MMMM......MMM...| 00000C20: 58 1B 00 01 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D |X...MMMMMMMMMMMM| 00000C30: 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 4D 00 9A 0F 96 19 |MMMMMMMMMMM.....| 00000C40: 8F 4D 4D 4D 00 A0 0F 58 1B 93 00 00 00 00 4D 4D |.MMM...X......MM| 00000C50: 4D 4D 4D 00 9A 0F 96 19 8F 4D 4D 4D 00 A0 0F 58 |MMM......MMM...X| 00000C60: 1B 93 00 00 00 24 24 24 24 24 24 24 24 24 24 24 |.....$$$$$$$$$$$| 00000C70: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C80: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000C90: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000CA0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000CB0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000CC0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000CD0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000CE0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000CF0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000D00: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 |$$$$$$$$$$$$$$$$| 00000D10: 24 24 24 24 24 24 24 24 24 FF FF |$$$$$$$$$.. |
.......53280,1:.53281,1.)...Z$.G(34):.18
0.Z....".":.I.1.39:.C$;:.:.I.1.22:.".."C
$;:.:.".";.W....I.1.38:."."C$".";:.:.C$.
.....I.1.23:."."C$".";:.:.......A$:.A$."
".6......:..E....".....".18)"GOTO":.6...
...".DER GOTO-BEFEHL ERMOEGLICHT DEN SPR
UNG......"ZU IRGENDEINER ZEILE DES PROGR
AMMES..R....7:."DABEI KANN ENTWEDER ZU E
INER ZEILEN# VOR";.~...."DEM GOTO-BEFEHL
ODER ZU EINER ZEILEN#......"NACH DEM GO
TO-BEFEHL GESPRUNGEN WERDEN.":.7......"B
ITTE BETRACHTEN SIE DAS FOLGENDE P
ROGRAMM:."....6:.".6 PRINT "Z$"EINGABE
DES ALTERS"Z$:."7 INPUT A.E...."8 PRIN
T"Z$"ALTER IN TAGEN ODER IN MONATEN"Z$;:
."10 INPUT B$......"12 IF B$="Z$"TAGE"Z$
" THEN 18"...A.."14 PRINT"Z$"SIE SIND"Z$
"12*A"Z$"MONATE ALT"Z$...B.."16 GOTO20":
."18 PRINT"Z$"SIE SIND"Z$"365*A"Z$"TAGE
ALT"Z$:."20 END.7.C..7:."DIESES PROGRAMM
BERECHNET ENTWEDER DAS.B.D.."ALTER IN T
AGEN ODER IN MONATEN, ABER...E..".NICHT.
BEIDES ZUSAMMEN.":.7...F.."WENN AUF DIE
FRAGE VON ZEILE 8 DER...G.."STRING .TAG
E. EINGEGEBEN WIRD, SO BEWIRKT...H.."DIE
S EINEN SPRUNG ZU ZEILE 18.".5.I..7:."WI
RD DER STRING .MONATE. EINGEGEBEN, SO.F.
J.."WIRD DER BEFEHL IN ZEILE 14 AUSGEFUE
HRT,";...K.."UND ZEILE 16 BEWIRKT DANN D
EN SPRUNG".A.L.."ZU ZEILE 20 (ZEILE 18 W
IRD AUSGELASSEN)....M.."BITTE BEACHTEN S
IE, DER .END.-BEFEHL"...N.."BEENDET DAS
PROGRAMM IN JEDEM FALL.";:.6.S.O..".5 I
NPUT X":."10 IF X>=50 THEN 50":."20 GOTO
40.U.P.."30 PRINT X*10":."40 GOTO 60...
Q.."50 PRINT X":."60 END":.7.E.R.."WAS W
IRD DURCH DIESES PROGRAMM GEDRUCKT,";...
S.."WENN FUER X DER WERT 25 EINGEGEBEN W
URDE.2.U..".1.. 250":.".2.. 25":.".3.. E
S WIRD NICHTS GEDRUCKT":.7.Y.V.."(1, 2 O
DER 3)";:.A$:.E(A$).3.216.P.W..E(A$).217
,217,220.}.X..Q$:.207.J.Y..".NEIN, DA DI
E BEDINGUNG IN ZEILE 10 FUER":."X=25 NIC
HT ERFUELLT IST,";...Z.." WIRD DAS":."PR
OGRAMM MIT ZEILE 20 FORTGESETZT..,....7:
."VERSUCHEN SIE ES NOCHMAL!":.6:.207.X..
..".RICHTIG!!! ES WIRD NICHTS GEDRUCKT.
......"FUER X=25 WIRD ZUNAECHST ZEILE 20
AUSGE-";......"FUEHRT, ZEILE 40 BEWIRKT
DANN DEN SPRUNG";......"ZU ZEILE 60 (ZE
ILE 50 WIRD AUSGELASSEN).":.6......".BEV
OR SIE DEN KURS MIT LEKTION 6.?...."FORT
SETZEN, VERSUCHEN SIE BITTE EIN.J...."PR
OGRAMM ZU SCHREIBEN, DAS DEN LOHN"......
"EINES ARBEITERS BERECHNET.":.7......"DE
R ARBEITER SOLL DM 8.35 PRO STUNDE......
"VERDIENEN UND FUER JEDE UEBERSTUNDE DAS
":."EINEINHALBFACHE DES ";.D...."LOHNES
BEKOMMEN..":."ES SOLL NACH EINGABE DER G
EARBEITETEN".P...."STUNDEN DER LOHN GEDR
UCKT WERDEN.":.7......".BITTE NOTIEREN S
IE DIE AUFGABE, ..L....".BEVOR SIE DI
E SPACE-TASTE DRUECKEN..":.6.....C$.".*"
:.3:."....".10)"ENDE VON LEKTION 5.*....
".....WENN SIE BEREIT SIND FUER LEKTION
6,.B....".....TIPPEN SIE BITTE L O A D
EIN.":."..........L....7000......".";:.
I.1.Y1:.".";:.:.".";:.J.0.Y2.Y1......"":
.:..E.P..".";:.I.1.Y1:.".";:.:.".";:..V.
X.."TEIL 15",8....X...C$.".W":.3:."...."
.7)"ENDE VON LEKTION 5 TEIL 2......"....
.... BITTE WARTEN SIE, BIS TEIL 3".....
."...... EINGELESEN IST......."........
.......7000......".";:.I.1.Y1:.".";:.:."
.";:.J.0.Y2.Y1......"
":.:..>.P..".";:.I.1
.Y1:.".";:.:.".";:..D.X......MMMMMMMMMMM
MMMMMMMMMMMM......MMM. .X...MMMMMMMMMMMM
MMMMMMMMMMM......MMM. .X......MMMMM.....
.MMM. .X.....$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$..
> CLICK IMAGE PREVIEW FOR FULL MODAL