5/3LEKTION
FILE INFORMATION
FILENAME(S): 5/3LEKTION
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-10-20 00:37:03
APPEARS ON: 1 disk(s)
FILE HASH
886aa4254497e763b95dbb4545418b7dbd939c3c16dd788a0bcc208bae71e7aa
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ALDEBARAN | 5/3LEKTION | PRG | Treasure Chest - Holger | 23 | 5 | 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 7F 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 91 91 91 91 | ....|
00000070: 22 3A 5A 24 B2 C7 28 33 34 29 3A 89 31 38 30 00 |":Z$..(34):.180.|
00000080: B1 08 03 00 99 22 93 1E 22 3A 81 49 B2 31 A4 33 |....."..":.I.1.3|
00000090: 39 3A 99 43 24 3B 3A 82 3A 81 49 B2 31 A4 32 32 |9:.C$;:.:.I.1.22|
000000A0: 3A 99 22 9D 11 22 43 24 3B 3A 82 3A 99 22 9D 22 |:.".."C$;:.:."."|
000000B0: 3B 00 CE 08 04 00 81 49 B2 31 A4 33 38 3A 99 22 |;......I.1.38:."|
000000C0: 9D 22 43 24 22 9D 22 3B 3A 82 3A 99 43 24 00 E9 |."C$".";:.:.C$..|
000000D0: 08 05 00 81 49 B2 31 A4 32 33 3A 99 22 91 22 43 |....I.1.23:."."C|
000000E0: 24 22 9D 22 3B 3A 82 3A 8E 00 FA 08 06 00 A1 41 |$".";:.:.......A|
000000F0: 24 3A 8B 41 24 B2 22 22 A7 36 00 02 09 07 00 99 |$:.A$."".6......|
00000100: 3A 8E 00 1D 09 B4 00 99 22 93 11 11 11 11 22 A3 |:.......".....".|
00000110: 31 36 29 22 1C 47 4F 54 4F 22 3A 8D 36 00 4F 09 |16)".GOTO":.6.O.|
00000120: B6 00 99 22 93 1F 44 45 52 20 81 47 4F 54 4F 1F |..."..DER .GOTO.|
00000130: 2D 42 45 46 45 48 4C 20 45 52 4D 4F 45 47 4C 49 |-BEFEHL ERMOEGLI|
00000140: 43 48 54 20 44 45 4E 20 81 53 50 52 55 4E 47 00 |CHT DEN .SPRUNG.|
00000150: 7A 09 B7 00 99 22 5A 55 20 49 52 47 45 4E 44 45 |z...."ZU IRGENDE|
00000160: 49 4E 45 52 20 5A 45 49 4C 45 20 44 45 53 20 50 |INER ZEILE DES P|
00000170: 52 4F 47 52 41 4D 4D 45 53 2E 00 AF 09 B8 00 8D |ROGRAMMES.......|
00000180: 37 3A 99 22 1F 44 41 42 45 49 20 4B 41 4E 4E 20 |7:.".DABEI KANN |
00000190: 45 4E 54 57 45 44 45 52 20 5A 55 20 45 49 4E 45 |ENTWEDER ZU EINE|
000001A0: 52 20 5A 45 49 4C 45 4E 23 20 56 4F 52 22 3B 00 |R ZEILEN# VOR";.|
000001B0: DB 09 B9 00 99 22 44 45 4D 20 47 4F 54 4F 2D 42 |....."DEM GOTO-B|
000001C0: 45 46 45 48 4C 20 4F 44 45 52 20 5A 55 20 45 49 |EFEHL ODER ZU EI|
000001D0: 4E 45 52 20 5A 45 49 4C 45 4E 23 00 0D 0A BA 00 |NER ZEILEN#.....|
000001E0: 99 22 4E 41 43 48 20 44 45 4D 20 47 4F 54 4F 2D |."NACH DEM GOTO-|
000001F0: 42 45 46 45 48 4C 20 47 45 53 50 52 55 4E 47 45 |BEFEHL GESPRUNGE|
00000200: 4E 20 57 45 52 44 45 4E 2E 22 3A 8D 37 00 45 0A |N WERDEN.":.7.E.|
00000210: BB 00 99 22 42 49 54 54 45 20 42 45 54 52 41 43 |..."BITTE BETRAC|
00000220: 48 54 45 4E 20 53 49 45 20 44 41 53 20 46 4F 4C |HTEN SIE DAS FOL|
00000230: 47 45 4E 44 45 20 20 20 20 20 20 20 50 52 4F 47 |GENDE PROG|
00000240: 52 41 4D 4D 3A 00 80 0A BC 00 8D 36 3A 99 22 93 |RAMM:......6:.".|
00000250: 1E 36 20 20 50 52 49 4E 54 20 22 5A 24 22 45 49 |.6 PRINT "Z$"EI|
00000260: 4E 47 41 42 45 20 44 45 53 20 41 4C 54 45 52 53 |NGABE DES ALTERS|
00000270: 22 5A 24 3A 99 22 37 20 20 49 4E 50 55 54 20 41 |"Z$:."7 INPUT A|
00000280: 00 C3 0A BE 00 99 22 38 20 20 50 52 49 4E 54 22 |......"8 PRINT"|
00000290: 5A 24 22 41 4C 54 45 52 20 49 4E 20 54 41 47 45 |Z$"ALTER IN TAGE|
000002A0: 4E 20 4F 44 45 52 20 49 4E 20 4D 4F 4E 41 54 45 |N ODER IN MONATE|
000002B0: 4E 22 5A 24 3B 3A 99 22 31 30 20 49 4E 50 55 54 |N"Z$;:."10 INPUT|
000002C0: 20 42 24 00 E8 0A C0 00 99 22 31 32 20 49 46 20 | B$......"12 IF |
000002D0: 42 24 3D 22 5A 24 22 54 41 47 45 22 5A 24 22 20 |B$="Z$"TAGE"Z$" |
000002E0: 54 48 45 4E 20 31 38 22 00 1C 0B C1 00 99 22 31 |THEN 18"......"1|
000002F0: 34 20 50 52 49 4E 54 22 5A 24 22 53 49 45 20 53 |4 PRINT"Z$"SIE S|
00000300: 49 4E 44 22 5A 24 22 31 32 2A 41 22 5A 24 22 4D |IND"Z$"12*A"Z$"M|
00000310: 4F 4E 41 54 45 20 41 4C 54 22 5A 24 00 65 0B C2 |ONATE ALT"Z$.e..|
00000320: 00 99 22 31 36 20 47 4F 54 4F 32 30 22 3A 99 22 |.."16 GOTO20":."|
00000330: 31 38 20 50 52 49 4E 54 22 5A 24 22 53 49 45 20 |18 PRINT"Z$"SIE |
00000340: 53 49 4E 44 22 5A 24 22 33 36 35 2A 41 22 5A 24 |SIND"Z$"365*A"Z$|
00000350: 22 54 41 47 45 20 41 4C 54 22 5A 24 3A 99 22 32 |"TAGE ALT"Z$:."2|
00000360: 30 20 45 4E 44 00 98 0B C3 00 8D 37 3A 99 22 1F |0 END......7:.".|
00000370: 44 49 45 53 45 53 20 50 52 4F 47 52 41 4D 4D 20 |DIESES PROGRAMM |
00000380: 42 45 52 45 43 48 4E 45 54 20 1E 45 4E 54 57 45 |BERECHNET .ENTWE|
00000390: 44 45 52 20 1F 44 41 53 00 C5 0B C4 00 99 22 41 |DER .DAS......"A|
000003A0: 4C 54 45 52 20 49 4E 20 54 41 47 45 4E 20 1E 4F |LTER IN TAGEN .O|
000003B0: 44 45 52 1F 20 49 4E 20 4D 4F 4E 41 54 45 4E 2C |DER. IN MONATEN,|
000003C0: 20 41 42 45 52 00 E8 0B C5 00 99 22 12 4E 49 43 | ABER......".NIC|
000003D0: 48 54 92 20 42 45 49 44 45 53 20 5A 55 53 41 4D |HT. BEIDES ZUSAM|
000003E0: 4D 45 4E 2E 22 3A 8D 37 00 11 0C C6 00 99 22 57 |MEN.":.7......"W|
000003F0: 45 4E 4E 20 41 55 46 20 44 49 45 20 46 52 41 47 |ENN AUF DIE FRAG|
00000400: 45 20 56 4F 4E 20 5A 45 49 4C 45 20 38 20 44 45 |E VON ZEILE 8 DE|
00000410: 52 00 41 0C C7 00 99 22 53 54 52 49 4E 47 20 12 |R.A...."STRING .|
00000420: 54 41 47 45 92 20 45 49 4E 47 45 47 45 42 45 4E |TAGE. EINGEGEBEN|
00000430: 20 57 49 52 44 2C 20 53 4F 20 42 45 57 49 52 4B | WIRD, SO BEWIRK|
00000440: 54 00 67 0C C8 00 99 22 44 49 45 53 20 45 49 4E |T.g...."DIES EIN|
00000450: 45 4E 20 53 50 52 55 4E 47 20 5A 55 20 5A 45 49 |EN SPRUNG ZU ZEI|
00000460: 4C 45 20 31 38 2E 22 00 98 0C C9 00 8D 37 3A 99 |LE 18."......7:.|
00000470: 22 57 49 52 44 20 44 45 52 20 53 54 52 49 4E 47 |"WIRD DER STRING|
00000480: 20 12 4D 4F 4E 41 54 45 92 20 45 49 4E 47 45 47 | .MONATE. EINGEG|
00000490: 45 42 45 4E 2C 20 53 4F 00 C9 0C CA 00 99 22 57 |EBEN, SO......"W|
000004A0: 49 52 44 20 44 45 52 20 42 45 46 45 48 4C 20 49 |IRD DER BEFEHL I|
000004B0: 4E 20 5A 45 49 4C 45 20 31 34 20 41 55 53 47 45 |N ZEILE 14 AUSGE|
000004C0: 46 55 45 48 52 54 2C 22 3B 00 F5 0C CB 00 99 22 |FUEHRT,";......"|
000004D0: 55 4E 44 20 5A 45 49 4C 45 20 31 36 20 42 45 57 |UND ZEILE 16 BEW|
000004E0: 49 52 4B 54 20 44 41 4E 4E 20 44 45 4E 20 53 50 |IRKT DANN DEN SP|
000004F0: 52 55 4E 47 22 00 24 0D CC 00 99 22 5A 55 20 5A |RUNG".$...."ZU Z|
00000500: 45 49 4C 45 20 32 30 20 28 5A 45 49 4C 45 20 31 |EILE 20 (ZEILE 1|
00000510: 38 20 57 49 52 44 20 41 55 53 47 45 4C 41 53 53 |8 WIRD AUSGELASS|
00000520: 45 4E 29 2E 00 57 0D CD 00 99 22 81 42 49 54 54 |EN)..W....".BITT|
00000530: 45 20 42 45 41 43 48 54 45 4E 20 53 49 45 2C 44 |E BEACHTEN SIE,D|
00000540: 41 53 53 20 44 45 52 20 1E 12 45 4E 44 92 81 2D |ASS DER ..END..-|
00000550: 42 45 46 45 48 4C 22 00 86 0D CE 00 99 22 44 41 |BEFEHL"......"DA|
00000560: 53 20 50 52 4F 47 52 41 4D 4D 20 49 4E 20 4A 45 |S PROGRAMM IN JE|
00000570: 44 45 4D 20 46 41 4C 4C 20 42 45 45 4E 44 45 54 |DEM FALL BEENDET|
00000580: 2E 22 3B 3A 8D 36 00 BE 0D CF 00 99 22 93 1E 35 |.";:.6......"..5|
00000590: 20 20 49 4E 50 55 54 20 58 22 3A 99 22 31 30 20 | INPUT X":."10 |
000005A0: 49 46 20 58 3E 3D 35 30 20 54 48 45 4E 20 35 30 |IF X>=50 THEN 50|
000005B0: 22 3A 99 22 32 30 20 47 4F 54 4F 20 34 30 00 E0 |":."20 GOTO 40..|
000005C0: 0D D0 00 99 22 33 30 20 50 52 49 4E 54 20 58 2A |...."30 PRINT X*|
000005D0: 31 30 22 3A 99 22 34 30 20 47 4F 54 4F 20 36 30 |10":."40 GOTO 60|
000005E0: 00 FF 0D D1 00 99 22 35 30 20 50 52 49 4E 54 20 |......"50 PRINT |
000005F0: 58 22 3A 99 22 36 30 20 45 4E 44 22 3A 8D 37 00 |X":."60 END":.7.|
00000600: 31 0E D2 00 99 22 1F 57 41 53 20 57 49 52 44 20 |1....".WAS WIRD |
00000610: 44 55 52 43 48 20 44 49 45 53 45 53 20 50 52 4F |DURCH DIESES PRO|
00000620: 47 52 41 4D 4D 20 47 45 44 52 55 43 4B 54 2C 22 |GRAMM GEDRUCKT,"|
00000630: 3B 00 60 0E D3 00 99 22 57 45 4E 4E 20 46 55 45 |;.`...."WENN FUE|
00000640: 52 20 58 20 44 45 52 20 57 45 52 54 20 32 35 20 |R X DER WERT 25 |
00000650: 45 49 4E 47 45 47 45 42 45 4E 20 57 55 52 44 45 |EINGEGEBEN WURDE|
00000660: 00 9E 0E D5 00 99 22 12 31 2E 92 20 32 35 30 22 |......".1.. 250"|
00000670: 3A 99 22 12 32 2E 92 20 32 35 22 3A 99 22 12 33 |:.".2.. 25":.".3|
00000680: 2E 92 20 45 53 20 57 49 52 44 20 4E 49 43 48 54 |.. ES WIRD NICHT|
00000690: 53 20 47 45 44 52 55 43 4B 54 22 3A 8D 37 00 C5 |S GEDRUCKT":.7..|
000006A0: 0E D6 00 99 22 28 31 2C 20 32 20 4F 44 45 52 20 |...."(1, 2 ODER |
000006B0: 33 29 22 3B 3A 85 41 24 3A 8B C5 28 41 24 29 B1 |3)";:.A$:..(A$).|
000006C0: 33 A7 32 31 36 00 DC 0E D7 00 91 C5 28 41 24 29 |3.216.......(A$)|
000006D0: 89 32 31 37 2C 32 31 37 2C 32 32 30 00 E9 0E D8 |.217,217,220....|
000006E0: 00 99 51 24 3A 89 32 30 37 00 38 0F D9 00 99 22 |..Q$:.207.8...."|
000006F0: 11 81 4E 45 49 4E 1F 2C 20 44 41 20 44 49 45 20 |..NEIN., DA DIE |
00000700: 42 45 44 49 4E 47 55 4E 47 20 49 4E 20 5A 45 49 |BEDINGUNG IN ZEI|
00000710: 4C 45 20 31 30 20 46 55 45 52 22 3A 99 22 58 3D |LE 10 FUER":."X=|
00000720: 32 35 20 4E 49 43 48 54 20 45 52 46 55 45 4C 4C |25 NICHT ERFUELL|
00000730: 54 20 49 53 54 2C 22 3B 00 6E 0F DA 00 99 22 20 |T IST,";.n...." |
00000740: 57 49 52 44 20 44 41 53 22 3A 99 22 50 52 4F 47 |WIRD DAS":."PROG|
00000750: 52 41 4D 4D 20 4D 49 54 20 5A 45 49 4C 45 20 32 |RAMM MIT ZEILE 2|
00000760: 30 20 46 4F 52 54 47 45 53 45 54 5A 54 2E 00 9A |0 FORTGESETZT...|
00000770: 0F DB 00 8D 37 3A 99 22 56 45 52 53 55 43 48 45 |....7:."VERSUCHE|
00000780: 4E 20 53 49 45 20 45 53 20 4E 4F 43 48 4D 41 4C |N SIE ES NOCHMAL|
00000790: 21 22 3A 8D 36 3A 89 32 30 37 00 C8 0F DC 00 99 |!":.6:.207......|
000007A0: 22 11 1E 52 49 43 48 54 49 47 21 21 21 1F 20 20 |"..RICHTIG!!!. |
000007B0: 45 53 20 57 49 52 44 20 4E 49 43 48 54 53 20 47 |ES WIRD NICHTS G|
000007C0: 45 44 52 55 43 4B 54 2E 00 F9 0F DD 00 99 22 46 |EDRUCKT......."F|
000007D0: 55 45 52 20 58 3D 32 35 20 57 49 52 44 20 5A 55 |UER X=25 WIRD ZU|
000007E0: 4E 41 45 43 48 53 54 20 5A 45 49 4C 45 20 32 30 |NAECHST ZEILE 20|
000007F0: 20 41 55 53 47 45 2D 22 3B 00 2A 10 DE 00 99 22 | AUSGE-";.*...."|
00000800: 46 55 45 48 52 54 2C 20 5A 45 49 4C 45 20 34 30 |FUEHRT, ZEILE 40|
00000810: 20 42 45 57 49 52 4B 54 20 44 41 4E 4E 20 44 45 | BEWIRKT DANN DE|
00000820: 4E 20 53 50 52 55 4E 47 22 3B 00 5D 10 DF 00 99 |N SPRUNG";.]....|
00000830: 22 5A 55 20 5A 45 49 4C 45 20 36 30 20 28 5A 45 |"ZU ZEILE 60 (ZE|
00000840: 49 4C 45 20 35 30 20 57 49 52 44 20 41 55 53 47 |ILE 50 WIRD AUSG|
00000850: 45 4C 41 53 53 45 4E 29 2E 22 3A 8D 36 00 85 10 |ELASSEN).":.6...|
00000860: E0 00 99 22 93 42 45 56 4F 52 20 53 49 45 20 44 |...".BEVOR SIE D|
00000870: 45 4E 20 4B 55 52 53 20 4D 49 54 20 4C 45 4B 54 |EN KURS MIT LEKT|
00000880: 49 4F 4E 20 36 00 B0 10 E1 00 99 22 46 4F 52 54 |ION 6......"FORT|
00000890: 53 45 54 5A 45 4E 2C 20 56 45 52 53 55 43 48 45 |SETZEN, VERSUCHE|
000008A0: 4E 20 53 49 45 20 42 49 54 54 54 45 20 45 49 4E |N SIE BITTTE EIN|
000008B0: 00 DD 10 E2 00 99 22 50 52 4F 47 52 41 4D 4D 20 |......"PROGRAMM |
000008C0: 5A 55 20 53 43 48 52 45 49 42 45 4E 2C 20 44 41 |ZU SCHREIBEN, DA|
000008D0: 53 53 20 44 45 4E 20 9C 4C 4F 48 4E 22 00 03 11 |SS DEN .LOHN"...|
000008E0: E3 00 99 22 45 49 4E 45 53 20 41 52 42 45 49 54 |..."EINES ARBEIT|
000008F0: 45 52 53 20 1F 42 45 52 45 43 48 4E 45 54 2E 22 |ERS .BERECHNET."|
00000900: 3A 8D 37 00 31 11 E4 00 99 22 44 45 52 20 41 52 |:.7.1...."DER AR|
00000910: 42 45 49 54 45 52 20 53 4F 4C 4C 20 9C 20 44 4D |BEITER SOLL . DM|
00000920: 20 38 2E 33 35 20 20 50 52 4F 20 53 54 55 4E 44 | 8.35 PRO STUND|
00000930: 45 00 7B 11 E5 00 99 22 1F 56 45 52 44 49 45 4E |E.{....".VERDIEN|
00000940: 45 4E 20 55 4E 44 20 46 55 45 52 20 9C 4A 45 44 |EN UND FUER .JED|
00000950: 45 20 55 45 42 45 52 53 54 55 4E 44 45 20 44 41 |E UEBERSTUNDE DA|
00000960: 53 22 3A 99 22 45 49 4E 45 49 4E 48 41 4C 42 46 |S":."EINEINHALBF|
00000970: 41 43 48 45 20 44 45 53 20 22 3B 00 BE 11 E6 00 |ACHE DES ";.....|
00000980: 99 22 4C 4F 48 4E 45 53 1F 20 42 45 4B 4F 4D 4D |."LOHNES. BEKOMM|
00000990: 45 4E 2E 11 22 3A 99 22 45 53 20 53 4F 4C 4C 20 |EN..":."ES SOLL |
000009A0: 4E 41 43 48 20 45 49 4E 47 41 42 45 20 44 45 52 |NACH EINGABE DER|
000009B0: 20 47 45 41 52 42 45 49 54 45 54 45 4E 22 00 EA | GEARBEITETEN"..|
000009C0: 11 E8 00 99 22 53 54 55 4E 44 45 4E 20 44 45 52 |...."STUNDEN DER|
000009D0: 20 4C 4F 48 4E 20 47 45 44 52 55 43 4B 54 20 57 | LOHN GEDRUCKT W|
000009E0: 45 52 44 45 4E 2E 22 3A 8D 37 00 1C 12 E9 00 99 |ERDEN.":.7......|
000009F0: 22 9C 12 42 49 54 54 45 20 4E 4F 54 49 45 52 45 |"..BITTE NOTIERE|
00000A00: 4E 20 53 49 45 20 44 49 45 20 41 55 46 47 41 42 |N SIE DIE AUFGAB|
00000A10: 45 2C 20 20 20 20 20 20 20 20 20 92 00 51 12 EA |E, ..Q..|
00000A20: 00 99 22 12 42 45 56 4F 52 20 53 49 45 20 45 49 |..".BEVOR SIE EI|
00000A30: 4E 45 20 42 45 4C 49 45 42 49 47 45 20 54 41 53 |NE BELIEBIGE TAS|
00000A40: 54 45 20 44 52 55 45 43 4B 45 4E 2E 92 22 3A 8D |TE DRUECKEN..":.|
00000A50: 36 00 80 12 90 01 43 24 B2 22 12 FF 22 3A 8D 33 |6.....C$."..":.3|
00000A60: 3A 99 22 11 11 11 11 22 A3 31 30 29 22 1C 45 4E |:."....".10)".EN|
00000A70: 44 45 20 56 4F 4E 20 4C 45 4B 54 49 4F 4E 20 35 |DE VON LEKTION 5|
00000A80: 00 8A 12 94 01 89 38 30 30 30 00 B5 12 88 13 99 |......8000......|
00000A90: 22 13 22 3B 3A 81 49 B2 31 A4 59 31 3A 99 22 11 |".";:.I.1.Y1:.".|
00000AA0: 22 3B 3A 82 3A 99 22 91 22 3B 3A 81 4A B2 30 A4 |";:.:.".";:.J.0.|
00000AB0: 59 32 AB 59 31 00 E8 12 89 13 99 22 20 20 20 20 |Y2.Y1......" |
00000AC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AE0: 20 20 20 22 3A 82 3A 8E 00 0A 13 70 17 99 22 13 | ":.:....p..".|
00000AF0: 22 3B 3A 81 49 B2 31 A4 59 31 3A 99 22 11 22 3B |";:.I.1.Y1:.".";|
00000B00: 3A 82 3A 99 22 91 22 3B 3A 8E 00 1F 13 58 1B A1 |:.:.".";:....X..|
00000B10: 41 24 3A 8B 41 24 B2 22 4E 22 A7 38 30 30 30 00 |A$:.A$."N".8000.|
00000B20: 31 13 62 1B 8B 41 24 B3 B1 22 4A 22 A7 37 30 30 |1.b..A$.."J".700|
00000B30: 30 00 63 13 6C 1B 99 22 11 11 11 11 11 11 1D 1D |0.c.l.."........|
00000B40: 56 45 52 53 43 48 4E 41 55 46 45 4E 20 53 49 45 |VERSCHNAUFEN SIE|
00000B50: 20 45 49 4E 45 4E 20 4D 4F 4D 45 4E 54 2C 20 42 | EINEN MOMENT, B|
00000B60: 49 53 22 00 8E 13 76 1B 99 22 11 1D 1D 1D 1D 1D |IS"...v.."......|
00000B70: 1D 1D 1D 12 1C 4C 45 4B 54 49 4F 4E 20 36 92 20 |.....LEKTION 6. |
00000B80: 1F 47 45 4C 41 44 45 4E 20 49 53 54 2E 22 00 A0 |.GELADEN IST."..|
00000B90: 13 80 1B 93 22 36 2F 31 4C 45 4B 54 49 4F 4E 22 |...."6/1LEKTION"|
00000BA0: 00 D1 13 40 1F 99 22 11 11 1D 1D 12 20 4C 45 4B |...@.."..... LEK|
00000BB0: 54 49 4F 4E 20 36 20 55 53 57 2E 20 42 45 46 49 |TION 6 USW. BEFI|
00000BC0: 4E 44 45 54 20 53 49 43 48 20 41 55 46 20 20 92 |NDET SICH AUF .|
00000BD0: 22 00 00 14 4A 1F 99 22 1D 1D 12 20 44 45 52 20 |"...J.."... DER |
00000BE0: 52 55 45 43 4B 53 45 49 54 45 20 44 45 52 20 4B |RUECKSEITE DER K|
00000BF0: 41 53 53 45 54 54 45 2E 20 20 20 20 20 20 92 22 |ASSETTE. ."|
00000C00: 00 2F 14 54 1F 99 22 1D 1D 12 20 53 50 55 4C 45 |./.T.."... SPULE|
00000C10: 4E 20 53 49 45 20 44 45 53 48 41 4C 42 20 56 4F |N SIE DESHALB VO|
00000C20: 52 20 42 45 41 4E 54 57 4F 52 54 45 4E 92 22 00 |R BEANTWORTEN.".|
00000C30: 5E 14 5E 1F 99 22 1D 1D 12 20 44 45 52 20 46 52 |^.^.."... DER FR|
00000C40: 41 47 45 20 41 4E 20 44 41 53 20 42 41 4E 44 45 |AGE AN DAS BANDE|
00000C50: 4E 44 45 20 55 4E 44 20 20 20 20 20 92 22 00 8D |NDE UND ."..|
00000C60: 14 68 1F 99 22 1D 1D 12 20 44 52 45 48 45 4E 20 |.h.."... DREHEN |
00000C70: 53 49 45 20 44 49 45 20 4B 41 53 53 45 54 54 45 |SIE DIE KASSETTE|
00000C80: 20 55 4D 20 21 20 20 20 20 20 20 92 22 00 BF 14 | UM ! ."...|
00000C90: 72 1F 99 22 11 11 11 1D 1D 1F 57 45 4E 4E 20 53 |r.."......WENN S|
00000CA0: 49 45 20 42 45 52 45 49 54 20 53 49 4E 44 20 46 |IE BEREIT SIND F|
00000CB0: 55 45 52 20 4C 45 4B 54 49 4F 4E 20 36 2C 22 00 |UER LEKTION 6,".|
00000CC0: E9 14 7C 1F 99 22 1D 1D 41 4E 54 57 4F 52 54 45 |..|.."..ANTWORTE|
00000CD0: 4E 20 53 49 45 20 42 49 54 54 45 20 4D 49 54 20 |N SIE BITTE MIT |
00000CE0: 4A 20 20 28 3D 4A 41 29 22 00 18 15 86 1F 99 22 |J (=JA)"......"|
00000CF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000D00: 53 4F 4E 53 54 20 4D 49 54 20 4E 20 20 28 3D 4E |SONST MIT N (=N|
00000D10: 45 49 4E 29 11 11 11 22 00 2C 15 90 1F A1 41 24 |EIN)...".,....A$|
00000D20: 3A 8B 41 24 B2 22 22 A7 38 30 38 30 00 4B 15 9A |:.A$."".8080.K..|
00000D30: 1F 8B 41 24 B2 22 4A 22 A7 99 22 11 22 3A 93 22 |..A$."J"..".":."|
00000D40: 36 2F 31 4C 45 4B 54 49 4F 4E 22 00 62 15 A4 1F |6/1LEKTION".b...|
00000D50: 8B 41 24 B2 22 4E 22 A7 99 20 22 41 41 41 41 41 |.A$."N".. "AAAAA|
00000D60: 41 41 00 6C 15 AE 1F 89 38 30 38 30 00 00 00 43 |AA.l....8080...C|
00000D70: 24 B2 22 12 FF 22 3A 8D 33 3A 99 22 11 11 11 11 |$."..":.3:."....|
00000D80: 22 A3 37 29 22 45 4E 44 45 20 56 4F 4E 20 4C 45 |".7)"ENDE VON LE|
00000D90: 4B 54 49 4F 4E 20 35 20 54 45 49 4C 20 32 00 82 |KTION 5 TEIL 2..|
00000DA0: 0F 92 01 99 22 11 11 11 11 1D 1D 1D 1D 20 20 42 |...."........ B|
00000DB0: 49 54 54 45 20 57 41 52 54 45 4E 20 53 49 45 2C |ITTE WARTEN SIE,|
00000DC0: 20 42 49 53 20 54 45 49 4C 20 33 22 3A 99 22 1D | BIS TEIL 3":.".|
00000DD0: 1D 1D 1D 20 20 45 49 4E 47 45 4C 45 53 45 4E 20 |... EINGELESEN |
00000DE0: 49 53 54 2E 00 93 0F 93 01 99 22 11 11 11 11 11 |IST.......".....|
00000DF0: 11 11 11 11 11 00 9D 0F 94 01 89 37 30 30 30 00 |...........7000.|
00000E00: C4 0F E8 03 8F 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |.....LLLLLLLLLLL|
00000E10: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |LLLLLLLLLLLLLLLL|
00000E20: 4C 4C 4C 4C 4C 4C 00 EB 0F E9 03 8F 4C 4C 4C 4C |LLLLLL......LLLL|
00000E30: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |LLLLLLLLLLLLLLLL|
00000E40: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 00 12 10 |LLLLLLLLLLLLL...|
00000E50: EA 03 8F 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |...LLLLLLLLLLLLL|
00000E60: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |LLLLLLLLLLLLLLLL|
00000E70: 4C 4C 4C 4C 00 39 10 EB 03 8F 4C 4C 4C 4C 4C 4C |LLLL.9....LLLLLL|
00000E80: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |LLLLLLLLLLLLLLLL|
00000E90: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 00 64 10 88 13 |LLLLLLLLLLL.d...|
00000EA0: 99 22 39 10 EB 03 8F 4C 4C 4C 4C 4C 4C 4C 4C 4C |."9....LLLLLLLLL|
00000EB0: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |LLLLLLLLLLLLLLLL|
00000EC0: 4C 4C 4C 4C 4C 4C 4C 4C 00 64 10 88 13 99 22 39 |LLLLLLLL.d...."9|
00000ED0: 10 EB 03 8F 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |....LLLLLLLLLLLL|
00000EE0: 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C 4C |LLLLLLLLLLLL |
.......45,B(174):.46,B(175):.:.788,52:.6
57,128.D....53280,1:.53281,1....Q$.".
....":Z$.G(3
4):.180......"..":.I.1.39:.C$;:.:.I.1.22
:.".."C$;:.:.".";.N....I.1.38:."."C$".";
:.:.C$......I.1.23:."."C$".";:.:.......A
$:.A$."".6......:.......".....".16)".GOT
O":.6.O...."..DER .GOTO.-BEFEHL ERMOEGLI
CHT DEN .SPRUNG.Z...."ZU IRGENDEINER ZEI
LE DES PROGRAMMES.......7:.".DABEI KANN
ENTWEDER ZU EINER ZEILEN# VOR";......"DE
M GOTO-BEFEHL ODER ZU EINER ZEILEN#.....
."NACH DEM GOTO-BEFEHL GESPRUNGEN WERDEN
.":.7.E...."BITTE BETRACHTEN SIE DAS FOL
GENDE PROGRAMM:......6:."..6 PRIN
T "Z$"EINGABE DES ALTERS"Z$:."7 INPUT A
.C...."8 PRINT"Z$"ALTER IN TAGEN ODER I
N 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$.E.B
.."16 GOTO20":."18 PRINT"Z$"SIE SIND"Z$"
365*A"Z$"TAGE ALT"Z$:."20 END...C..7:.".
DIESES PROGRAMM BERECHNET .ENTWEDER .DAS
.E.D.."ALTER IN TAGEN .ODER. IN MONATEN,
ABER...E..".NICHT. BEIDES ZUSAMMEN.":.7
...F.."WENN AUF DIE FRAGE VON ZEILE 8 DE
R.A.G.."STRING .TAGE. EINGEGEBEN WIRD, S
O BEWIRKT.G.H.."DIES EINEN SPRUNG ZU ZEI
LE 18."...I..7:."WIRD DER STRING .MONATE
. EINGEGEBEN, SO.I.J.."WIRD DER BEFEHL I
N ZEILE 14 AUSGEFUEHRT,";...K.."UND ZEIL
E 16 BEWIRKT DANN DEN SPRUNG".$.L.."ZU Z
EILE 20 (ZEILE 18 WIRD AUSGELASSEN)..W.M
..".BITTE BEACHTEN SIE,DASS DER ..END..-
BEFEHL"...N.."DAS PROGRAMM IN JEDEM FALL
BEENDET.";:.6...O.."..5 INPUT X":."10
IF X>=50 THEN 50":."20 GOTO 40...P.."30
PRINT X*10":."40 GOTO 60...Q.."50 PRINT
X":."60 END":.7.1.R..".WAS WIRD DURCH DI
ESES PROGRAMM GEDRUCKT,";.`.S.."WENN FUE
R X DER WERT 25 EINGEGEBEN WURDE...U..".
1.. 250":.".2.. 25":.".3.. ES WIRD NICHT
S GEDRUCKT":.7.E.V.."(1, 2 ODER 3)";:.A$
:.E(A$).3.216...W..E(A$).217,217,220...X
..Q$:.207.8.Y.."..NEIN., DA DIE BEDINGUN
G IN ZEILE 10 FUER":."X=25 NICHT ERFUELL
T IST,";.N.Z.." WIRD DAS":."PROGRAMM MIT
ZEILE 20 FORTGESETZT.......7:."VERSUCHE
N SIE ES NOCHMAL!":.6:.207.H...."..RICHT
IG!!!. ES WIRD NICHTS GEDRUCKT......."F
UER X=25 WIRD ZUNAECHST ZEILE 20 AUSGE-"
;.*...."FUEHRT, ZEILE 40 BEWIRKT DANN DE
N SPRUNG";.]...."ZU ZEILE 60 (ZEILE 50 W
IRD AUSGELASSEN).":.6......".BEVOR SIE D
EN KURS MIT LEKTION 6......"FORTSETZEN,
VERSUCHEN SIE BITTTE EIN......"PROGRAMM
ZU SCHREIBEN, DASS DEN .LOHN"......"EINE
S ARBEITERS .BERECHNET.":.7.1...."DER AR
BEITER SOLL . DM 8.35 PRO STUNDE.{...."
.VERDIENEN UND FUER .JEDE UEBERSTUNDE DA
S":."EINEINHALBFACHE DES ";......"LOHNES
. BEKOMMEN..":."ES SOLL NACH EINGABE DER
GEARBEITETEN"......"STUNDEN DER LOHN GE
DRUCKT WERDEN.":.7......"..BITTE NOTIERE
N SIE DIE AUFGABE, ..Q....".BEVO
R SIE EINE BELIEBIGE TASTE DRUECKEN..":.
6.....C$."..":.3:."....".10)".ENDE VON L
EKTION 5......8000......".";:.I.1.Y1:.".
";:.:.".";:.J.0.Y2.Y1......"
":.:....P..".
";:.I.1.Y1:.".";:.:.".";:....X..A$:.A$."
N".8000.1.B..A$.."J".7000.C.L.."........
VERSCHNAUFEN SIE EINEN MOMENT, BIS"...V.
."...........LEKTION 6. .GELADEN IST.".
...."6/1LEKTION".Q.@.."..... LEKTION 6 U
SW. BEFINDET SICH AUF ."...J.."... DER
RUECKSEITE DER KASSETTE. ."./.T..".
.. SPULEN SIE DESHALB VOR BEANTWORTEN.".
^.^.."... DER FRAGE AN DAS BANDENDE UND
."...H.."... DREHEN SIE DIE KASSETTE
UM ! ."...R.."......WENN SIE BEREI
T SIND FUER LEKTION 6,"...|.."..ANTWORTE
N SIE BITTE MIT J (=JA)"......"........
........SONST MIT N (=NEIN)...".,....A$
:.A$."".8080.K....A$."J"..".":."6/1LEKTI
ON".B....A$."N".. "AAAAAAA.L....8080...C
$."..":.3:."....".7)"ENDE VON LEKTION 5
TEIL 2......"........ BITTE WARTEN SIE,
BIS TEIL 3":.".... EINGELESEN IST.....
.."................7000.D....LLLLLLLLLLL
LLLLLLLLLLLLLLLLLLLLLL......LLLLLLLLLLLL
LLLLLLLLLLLLLLLLLLLLL......LLLLLLLLLLLLL
LLLLLLLLLLLLLLLLLLLL.9....LLLLLLLLLLLLLL
LLLLLLLLLLLLLLLLLLL.D...."9....LLLLLLLLL
LLLLLLLLLLLLLLLLLLLLLLLL.D...."9....LLLL
LLLLLLLLLLLLLLLLLLLL
> CLICK IMAGE PREVIEW FOR FULL MODAL