ERSTE SCHRITTE 3
FILE INFORMATION
FILENAME(S): ERSTE SCHRITTE 3
FILE TYPE(S): PRG
FILE SIZE: 21.2K
FIRST SEEN: 2025-11-30 20:14:33
APPEARS ON: 1 disk(s)
FILE HASH
7916042bf4786c2f8b0005e2a99ffe9f95375679c663dbe863ecc9e95db2c6ec
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| THOMAS SEITE 1 | ERSTE SCHRITTE 3 | PRG | Curtcool, LPN | 13 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 00 00 8A 30 30 31 30 30 00 19 08 01 |.......00100....|
00000010: 00 8F 22 14 14 14 14 14 14 00 3C 08 02 00 8F 22 |..".......<...."|
00000020: 14 14 14 14 14 14 28 43 29 20 31 39 38 33 20 48 |......(C) 1983 H|
00000030: 4F 52 41 20 53 4F 46 54 57 41 52 45 00 49 08 03 |ORA SOFTWARE.I..|
00000040: 00 8F 22 14 14 14 14 14 14 00 72 08 05 00 56 46 |..".......r...VF|
00000050: 36 34 2E 47 2E 33 20 56 45 52 53 49 91 20 37 20 |64.G.3 VERSI. 7 |
00000060: 33 30 AD 30 37 AD 38 36 2C 20 31 37 2E 30 39 2E |30.07.86, 17.09.|
00000070: 38 36 00 B6 08 06 00 8F 20 41 24 3D 22 30 3A 45 |86...... A$="0:E|
00000080: 52 53 54 45 20 53 43 48 52 49 54 54 45 20 33 22 |RSTE SCHRITTE 3"|
00000090: 3A 4F 50 45 4E 31 2C 38 2C 31 35 2C 22 53 22 2B |:OPEN1,8,15,"S"+|
000000A0: 41 24 3A 53 41 56 45 41 24 2C 38 3A 56 45 52 49 |A$:SAVEA$,8:VERI|
000000B0: 46 59 41 24 2C 38 00 D6 08 07 00 81 4A B2 31 A4 |FYA$,8......J.1.|
000000C0: 31 30 30 30 3A 82 3A 97 31 39 38 2C 30 3A 8D 36 |1000:.:.198,0:.6|
000000D0: 33 30 35 30 3A 8E 00 E8 08 08 00 81 4A B2 31 A4 |3050:.......J.1.|
000000E0: 31 30 30 30 3A 82 3A 8E 00 F9 08 28 00 81 44 4C |1000:.:....(..DL|
000000F0: B2 31 A4 36 30 30 30 3A 8E 00 11 09 64 00 97 35 |.1.6000:....d..5|
00000100: 33 32 38 31 2C 31 35 3A 97 35 33 32 38 30 2C 31 |3281,15:.53280,1|
00000110: 34 00 42 09 67 00 99 22 93 1C B0 C0 C0 C0 C0 C0 |4.B.g.."........|
00000120: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000130: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000140: AE 22 00 75 09 68 00 99 22 DD 20 12 1F 20 20 20 |.".u.h..". .. |
00000150: 20 20 20 20 20 20 20 45 52 53 54 45 20 53 43 48 | ERSTE SCH|
00000160: 52 49 54 54 45 20 2D 33 2D 20 20 20 20 20 20 20 |RITTE -3- |
00000170: 1C 92 20 DD 22 00 A6 09 69 00 99 22 1C AD C0 C0 |.. ."...i.."....|
00000180: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000190: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000001A0: C0 C0 C0 BD 90 22 00 CC 09 96 00 99 22 1F 11 11 |....."......"...|
000001B0: 11 11 11 11 11 22 A3 31 32 29 22 28 43 29 20 31 |.....".12)"(C) 1|
000001C0: 39 38 34 20 48 4F 52 41 53 4F 46 54 00 F5 09 A0 |984 HORASOFT....|
000001D0: 00 99 22 11 11 22 A3 31 34 29 22 42 59 20 4A 55 |.."..".14)"BY JU|
000001E0: 41 4E 20 48 4F 4C 5A 22 3A 44 4C B2 36 30 3A 8D |AN HOLZ":DL.60:.|
000001F0: 35 30 30 30 30 00 19 0A AA 00 53 4E 24 B2 22 31 |50000.....SN$."1|
00000200: 33 30 30 22 3A 8D 36 33 32 30 30 3A 8D 36 33 36 |300":.63200:.636|
00000210: 30 30 3A 8D 36 30 30 30 30 00 4C 0A E8 03 99 22 |00:.60000.L...."|
00000220: 93 12 1C 20 20 20 57 49 4C 4C 4B 4F 4D 4D 45 4E |... WILLKOMMEN|
00000230: 20 5A 55 52 20 44 52 49 54 54 45 4E 20 4C 45 4B | ZUR DRITTEN LEK|
00000240: 54 49 4F 4E 20 20 20 20 20 20 20 22 00 6F 0A FC |TION ".o..|
00000250: 03 99 22 11 D1 1F 44 49 45 53 45 20 4C 45 4B 54 |.."...DIESE LEKT|
00000260: 49 4F 4E 20 48 41 4E 44 45 4C 54 20 56 4F 4E 00 |ION HANDELT VON.|
00000270: 8E 0A 10 04 99 22 11 11 20 20 20 20 20 20 20 20 |.....".. |
00000280: 20 20 1C D1 1F 56 41 52 49 41 42 4C 45 4E 00 B6 | ...VARIABLEN..|
00000290: 0A 1A 04 99 22 11 20 20 20 20 20 20 20 20 20 20 |....". |
000002A0: 1C D1 1F 1C 42 41 53 49 43 1F 2D 41 4E 57 45 49 |....BASIC.-ANWEI|
000002B0: 53 55 4E 47 45 4E 00 E1 0A 24 04 99 22 11 20 20 |SUNGEN...$..". |
000002C0: 20 20 20 20 20 20 20 20 1C D1 1F 45 49 4E 5A 45 | ...EINZE|
000002D0: 49 4C 49 47 45 4E 20 50 52 4F 47 52 41 4D 4D 45 |ILIGEN PROGRAMME|
000002E0: 4E 00 FF 0A 2E 04 99 22 11 20 20 20 20 20 20 20 |N......". |
000002F0: 20 20 20 1C D1 1F 53 43 48 4C 45 49 46 45 4E 00 | ...SCHLEIFEN.|
00000300: 34 0B 30 04 99 22 11 20 20 20 20 20 20 20 20 20 |4.0..". |
00000310: 20 1C D1 1F 44 45 4D 20 1C 50 52 4F 47 52 41 4D | ...DEM .PROGRAM|
00000320: 4D 49 45 52 1F 4B 4F 4E 5A 45 50 54 11 22 3A 99 |MIER.KONZEPT.":.|
00000330: 4C 24 4C 24 00 77 0B 38 04 99 22 1C D1 1F 46 4F |L$L$.w.8.."...FO|
00000340: 4C 47 45 4E 20 53 49 45 20 44 45 4E 20 41 4E 57 |LGEN SIE DEN ANW|
00000350: 45 49 53 55 4E 47 45 4E 20 44 45 52 20 20 20 20 |EISUNGEN DER |
00000360: 20 20 20 20 20 20 11 55 4E 54 45 52 53 54 45 4E | .UNTERSTEN|
00000370: 20 5A 45 49 4C 45 22 00 82 0B 42 04 8D 36 33 30 | ZEILE"...B..630|
00000380: 30 30 00 B3 0B 4C 04 97 42 4B 2C 36 3A 97 42 44 |00...L..BK,6:.BD|
00000390: 2C 36 3A 99 22 93 05 20 20 20 20 20 20 20 20 20 |,6:.".. |
000003A0: 20 20 20 41 52 42 45 49 54 53 41 4E 4C 45 49 54 | ARBEITSANLEIT|
000003B0: 55 4E 47 00 E8 0B 74 04 99 4C 24 22 12 20 44 45 |UNG...t..L$". DE|
000003C0: 52 20 4F 42 45 52 45 20 54 45 49 4C 20 44 45 53 |R OBERE TEIL DES|
000003D0: 20 42 49 4C 44 53 43 48 49 52 4D 53 20 49 53 54 | BILDSCHIRMS IST|
000003E0: 20 44 45 52 20 20 22 3B 00 1B 0C 7E 04 99 4C 24 | DER ";...~..L$|
000003F0: 22 55 45 42 55 4E 47 53 42 45 52 45 49 43 48 2E |"UEBUNGSBEREICH.|
00000400: 20 44 45 52 20 55 4E 54 45 52 45 20 54 45 49 4C | DER UNTERE TEIL|
00000410: 20 45 4E 54 2D 20 20 20 20 22 3B 00 4F 0C 88 04 | ENT- ";.O...|
00000420: 99 4C 24 22 48 41 45 4C 54 20 41 4E 57 45 49 53 |.L$"HAELT ANWEIS|
00000430: 55 4E 47 45 4E 20 55 4E 44 20 44 49 45 20 45 52 |UNGEN UND DIE ER|
00000440: 47 45 42 4E 49 53 53 45 2E 20 20 20 22 4C 24 00 |GEBNISSE. "L$.|
00000450: 89 0C 92 04 99 22 91 05 A5 22 3A 99 47 24 22 57 |....."...":.G$"W|
00000460: 49 52 20 57 4F 4C 4C 45 4E 20 4E 55 4E 20 45 58 |IR WOLLEN NUN EX|
00000470: 50 45 52 49 4D 45 4E 54 49 45 52 45 4E 2E 20 20 |PERIMENTIEREN. |
00000480: 20 20 20 20 22 3A 99 47 24 00 B7 0C 97 04 99 47 | ":.G$......G|
00000490: 24 22 53 4F 4C 41 4E 47 45 20 53 49 45 20 53 45 |$"SOLANGE SIE SE|
000004A0: 4C 42 53 54 20 4D 49 54 20 44 45 4D 20 43 20 36 |LBST MIT DEM C 6|
000004B0: 34 20 22 3A 99 47 24 00 E5 0C 99 04 99 47 24 22 |4 ":.G$......G$"|
000004C0: 41 52 42 45 49 54 45 4E 2C 20 4B 4F 45 4E 4E 45 |ARBEITEN, KOENNE|
000004D0: 4E 20 4D 45 52 4B 57 55 45 52 44 49 47 45 20 45 |N MERKWUERDIGE E|
000004E0: 52 47 45 42 2D 00 19 0D 9B 04 99 47 24 3A 99 47 |RGEB-......G$:.G|
000004F0: 24 22 4E 49 53 53 45 20 4F 44 45 52 20 53 4F 47 |$"NISSE ODER SOG|
00000500: 41 52 20 46 45 48 4C 45 52 20 41 55 46 54 52 45 |AR FEHLER AUFTRE|
00000510: 54 45 4E 2E 22 3A 99 47 24 00 50 0D 9E 04 99 47 |TEN.":.G$.P....G|
00000520: 24 22 9E 12 9D 22 4C 24 22 20 53 49 45 20 4B 4F |$"..."L$" SIE KO|
00000530: 45 4E 4E 45 4E 20 4A 45 44 4F 43 48 20 49 4D 4D |ENNEN JEDOCH IMM|
00000540: 45 52 20 4D 49 54 20 20 20 20 20 20 20 20 22 3B |ER MIT ";|
00000550: 00 90 0D A1 04 99 22 20 20 22 4C 24 22 20 20 46 |......" "L$" F|
00000560: 37 20 5A 55 52 20 4E 41 45 43 48 53 54 45 4E 20 |7 ZUR NAECHSTEN |
00000570: 53 45 49 54 45 20 4B 4F 4D 4D 45 4E 2E 20 20 20 |SEITE KOMMEN. |
00000580: 20 20 20 20 20 20 22 4C 24 3A 8D 36 33 30 30 30 | "L$:.63000|
00000590: 00 BB 0D 14 05 97 42 4B 2C 36 3A 99 22 93 05 11 |......BK,6:."...|
000005A0: 11 11 20 20 20 57 41 53 20 49 53 54 20 45 49 4E |.. WAS IST EIN|
000005B0: 45 20 56 41 52 49 41 42 4C 45 3F 00 FE 0D 19 05 |E VARIABLE?.....|
000005C0: 81 49 B2 31 A4 31 30 30 30 3A 82 3A 99 22 11 9E |.I.1.1000:.:."..|
000005D0: 22 4C 24 22 20 20 47 45 4D 41 45 53 53 20 44 45 |"L$" GEMAESS DE|
000005E0: 4D 20 57 4F 45 52 54 45 52 42 55 43 48 20 49 53 |M WOERTERBUCH IS|
000005F0: 54 20 45 49 4E 45 20 20 20 20 20 20 22 3B 00 33 |T EINE ";.3|
00000600: 0E 1E 05 99 4C 24 22 20 20 56 41 52 49 41 42 4C |....L$" VARIABL|
00000610: 45 20 45 54 57 41 53 2C 20 44 41 53 20 47 45 41 |E ETWAS, DAS GEA|
00000620: 45 4E 44 45 52 54 20 57 45 52 44 45 4E 20 20 22 |ENDERT WERDEN "|
00000630: 4C 24 3B 00 66 0E 23 05 99 22 12 20 20 4B 41 4E |L$;.f.#..". KAN|
00000640: 4E 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |N. |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000660: 20 20 20 22 4C 24 00 A8 0E 28 05 81 49 B2 31 A4 | "L$...(..I.1.|
00000670: 31 30 30 30 3A 82 3A 99 22 05 22 4C 24 22 20 20 |1000:.:."."L$" |
00000680: 46 55 45 52 20 4D 49 43 48 20 53 49 4E 44 20 56 |FUER MICH SIND V|
00000690: 41 52 49 41 42 4C 45 4E 20 50 4C 41 54 5A 48 41 |ARIABLEN PLATZHA|
000006A0: 4C 54 45 52 20 20 22 3B 00 DC 0E 32 05 99 4C 24 |LTER ";...2..L$|
000006B0: 22 20 20 46 55 45 52 20 5A 41 48 4C 45 4E 20 4F |" FUER ZAHLEN O|
000006C0: 44 45 52 20 57 4F 52 54 45 2E 2E 2E 20 20 20 20 |DER WORTE... |
000006D0: 20 20 20 20 20 20 20 20 20 22 4C 24 00 10 0F 3C | "L$...<|
000006E0: 05 81 49 B2 31 A4 31 30 30 30 3A 82 3A 99 22 11 |..I.1.1000:.:.".|
000006F0: 05 22 A3 32 31 29 22 2E 2E 2E 5A 55 4D 20 42 45 |.".21)"...ZUM BE|
00000700: 49 53 50 49 45 4C 20 3A 22 3A 8D 36 33 30 30 30 |ISPIEL :":.63000|
00000710: 00 4A 0F 46 05 99 22 93 12 1C 20 20 20 20 20 20 |.J.F.."... |
00000720: 20 20 20 20 56 41 52 49 41 42 4C 45 4E 2D 4E 41 | VARIABLEN-NA|
00000730: 4D 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 |MEN |
00000740: 20 20 22 3A 97 42 4B 2C 31 35 00 5D 0F 49 05 99 | ":.BK,15.].I..|
00000750: 22 11 4A 4F 45 20 3D 20 31 32 2B 31 32 00 6A 0F |".JOE = 12+12.j.|
00000760: 4A 05 99 22 11 11 3F 4A 4F 45 00 7B 0F 4C 05 99 |J.."..?JOE.{.L..|
00000770: 22 11 11 11 11 11 11 1F 22 4C 24 00 AB 0F 4F 05 |"......."L$...O.|
00000780: 99 22 11 1C D1 1F 53 4F 4C 4C 20 49 43 48 20 4D |."....SOLL ICH M|
00000790: 49 43 48 20 41 4E 20 45 49 4E 45 4E 20 57 45 52 |ICH AN EINEN WER|
000007A0: 54 20 45 52 49 4E 4E 45 52 4E 2C 00 D1 0F 52 05 |T ERINNERN,...R.|
000007B0: 99 22 20 53 4F 20 47 49 42 54 20 4D 41 4E 20 49 |." SO GIBT MAN I|
000007C0: 48 4D 20 45 49 4E 45 4E 20 1C 4E 41 4D 45 4E 1F |HM EINEN .NAMEN.|
000007D0: 2E 00 FF 0F 55 05 99 22 11 1C D1 1F 49 4E 20 44 |....U.."....IN D|
000007E0: 45 52 20 55 45 42 55 4E 47 53 5A 45 49 4C 45 20 |ER UEBUNGSZEILE |
000007F0: 49 53 54 20 27 52 45 54 55 52 4E 27 20 5A 55 00 |IST 'RETURN' ZU.|
00000800: 38 10 58 05 99 22 20 44 52 55 45 43 4B 45 4E 20 |8.X.." DRUECKEN |
00000810: 55 4E 44 20 41 55 46 20 1C 3F 4A 4F 45 1F 20 4E |UND AUF .?JOE. N|
00000820: 4F 43 48 20 45 49 4E 4D 41 4C 20 20 20 20 20 20 |OCH EINMAL |
00000830: 20 52 45 54 55 52 4E 2E 00 4A 10 5E 05 8D 37 3A | RETURN..J.^..7:|
00000840: 99 22 13 11 11 1C 1D 1D 22 3B 00 61 10 6E 05 53 |."......";.a.n.S|
00000850: 4E 24 B2 22 30 31 34 30 30 22 3A 89 36 33 33 30 |N$."01400":.6330|
00000860: 30 00 9B 10 78 05 8D 36 30 30 30 30 3A 99 22 93 |0...x..60000:.".|
00000870: 12 1C 20 20 20 20 20 20 20 20 20 20 20 20 56 41 |.. VA|
00000880: 52 49 41 42 4C 45 4E 2D 4E 41 4D 45 4E 20 20 20 |RIABLEN-NAMEN |
00000890: 20 20 20 20 20 20 20 20 20 20 22 00 BD 10 82 05 | ".....|
000008A0: 99 22 11 4A 4F 45 3D 31 32 2B 31 32 3A 53 41 4D |.".JOE=12+12:SAM|
000008B0: 3D 32 2A 38 3A 4D 49 4B 45 3D 33 5E 33 00 DF 10 |=2*8:MIKE=3^3...|
000008C0: 84 05 99 22 11 11 43 4C 41 53 53 3D 4A 4F 45 2B |..."..CLASS=JOE+|
000008D0: 53 41 4D 2B 4D 49 4B 45 3A 3F 43 4C 41 53 53 00 |SAM+MIKE:?CLASS.|
000008E0: E8 10 86 05 99 22 11 11 00 F5 10 87 05 99 22 11 |....."........".|
000008F0: 11 1C 22 4C 24 00 26 11 8C 05 99 22 11 D1 1F 57 |.."L$.&...."...W|
00000900: 49 52 20 4B 4F 45 4E 4E 45 4E 20 4D 45 48 52 45 |IR KOENNEN MEHRE|
00000910: 52 45 20 41 4E 57 45 49 53 55 4E 47 45 4E 20 49 |RE ANWEISUNGEN I|
00000920: 4E 20 45 49 4E 45 00 54 11 96 05 99 22 91 20 5A |N EINE.T....". Z|
00000930: 45 49 4C 45 20 53 43 48 52 45 49 42 45 4E 2C 20 |EILE SCHREIBEN, |
00000940: 47 45 54 52 45 4E 4E 54 20 44 55 52 43 48 20 45 |GETRENNT DURCH E|
00000950: 49 4E 45 4E 00 7F 11 9B 05 99 22 11 20 1C 44 4F |INEN......". .DO|
00000960: 50 50 45 4C 50 55 4E 4B 54 20 DD 91 9D B0 C0 AE |PPELPUNKT ......|
00000970: 11 9D DD 9D 9D 9D 11 AD C0 BD 91 9D 9D 3A 1F 00 |.............:..|
00000980: AC 11 A0 05 99 22 11 1C D1 1F 4D 41 4E 20 4B 41 |....."....MAN KA|
00000990: 4E 4E 20 56 41 52 49 41 42 4C 45 4E 20 4B 4F 4D |NN VARIABLEN KOM|
000009A0: 42 49 4E 49 45 52 45 4E 2C 20 55 4D 00 E8 11 A5 |BINIEREN, UM....|
000009B0: 05 99 22 20 45 49 4E 45 20 4E 45 55 45 20 56 41 |.." EINE NEUE VA|
000009C0: 52 49 41 42 4C 45 20 46 55 45 52 20 44 41 53 20 |RIABLE FUER DAS |
000009D0: 45 52 47 45 42 4E 49 53 20 20 20 20 5A 55 20 45 |ERGEBNIS ZU E|
000009E0: 52 48 41 4C 54 45 4E 2E 00 FA 11 CD 05 8D 37 3A |RHALTEN.......7:|
000009F0: 99 22 13 11 11 1F 1D 1D 22 3B 00 11 12 D2 05 53 |."......";.....S|
00000A00: 4E 24 B2 22 30 31 35 30 30 22 3A 89 36 33 33 30 |N$."01500":.6330|
00000A10: 30 00 4B 12 DC 05 8D 36 30 30 30 30 3A 99 22 93 |0.K....60000:.".|
00000A20: 12 1C 20 20 20 20 20 20 20 20 20 20 20 20 56 41 |.. VA|
00000A30: 52 49 41 42 4C 45 4E 2D 4E 41 4D 45 4E 20 20 20 |RIABLEN-NAMEN |
00000A40: 20 20 20 20 20 20 20 20 20 20 22 00 5C 12 E6 05 | ".\...|
00000A50: 99 22 11 53 41 4D 3D 31 32 2B 31 32 00 72 12 E8 |.".SAM=12+12.r..|
00000A60: 05 99 22 11 11 53 41 4C 4C 59 3D 32 30 3A 3F 53 |.."..SALLY=20:?S|
00000A70: 41 4D 00 7B 12 EA 05 99 22 11 11 00 88 12 EB 05 |AM.{....".......|
00000A80: 99 22 11 11 1C 22 4C 24 00 B4 12 F0 05 99 22 D1 |."..."L$......".|
00000A90: 1F 49 43 48 20 45 52 49 4E 4E 45 52 45 20 4D 49 |.ICH ERINNERE MI|
00000AA0: 43 48 20 4E 55 52 20 41 4E 20 44 49 45 20 42 45 |CH NUR AN DIE BE|
00000AB0: 49 44 45 4E 00 E3 12 FA 05 99 22 20 45 52 53 54 |IDEN......" ERST|
00000AC0: 45 4E 20 42 55 43 48 53 54 41 42 45 4E 20 44 45 |EN BUCHSTABEN DE|
00000AD0: 53 20 56 41 52 49 41 42 4C 45 4E 2D 4E 41 4D 45 |S VARIABLEN-NAME|
00000AE0: 4E 53 2E 00 11 13 04 06 99 22 1C D1 1F 49 43 48 |NS......."...ICH|
00000AF0: 20 45 52 49 4E 4E 45 52 45 20 4D 49 43 48 20 4E | ERINNERE MICH N|
00000B00: 55 52 20 41 4E 20 44 45 4E 20 4C 45 54 5A 54 45 |UR AN DEN LETZTE|
00000B10: 4E 00 31 13 09 06 99 22 20 57 45 52 54 20 44 45 |N.1...." WERT DE|
00000B20: 52 20 56 41 52 49 41 42 4C 45 4E 20 1C 53 41 1F |R VARIABLEN .SA.|
00000B30: 2E 00 43 13 0E 06 99 22 11 1C D1 1F 55 45 42 55 |..C...."....UEBU|
00000B40: 4E 47 3A 00 71 13 13 06 99 22 20 47 45 48 45 4E |NG:.q...." GEHEN|
00000B50: 20 53 49 45 20 5A 55 20 1C 53 41 4D 3D 31 32 2B | SIE ZU .SAM=12+|
00000B60: 31 32 1F 20 55 4E 44 20 27 52 45 54 55 52 4E 27 |12. UND 'RETURN'|
00000B70: 2E 00 A2 13 18 06 99 22 20 4A 45 54 5A 54 20 41 |......." JETZT A|
00000B80: 55 46 20 1C 53 41 4C 4C 59 1F 20 55 4E 44 20 4E |UF .SALLY. UND N|
00000B90: 4F 43 48 4D 41 4C 20 27 52 45 54 55 52 4E 27 2E |OCHMAL 'RETURN'.|
00000BA0: 22 3B 00 B4 13 31 06 8D 37 3A 99 22 13 11 11 1F |";...1..7:."....|
00000BB0: 1D 1D 22 3B 00 CB 13 36 06 53 4E 24 B2 22 30 31 |..";...6.SN$."01|
00000BC0: 36 30 30 22 3A 89 36 33 33 30 30 00 D6 13 40 06 |600":.63300...@.|
00000BD0: 8D 36 30 30 30 30 00 0D 14 42 06 9C 3A 44 35 24 |.60000...B..:D5$|
00000BE0: B2 22 CA DB CB 22 3A 44 34 24 B2 22 20 DD DD 22 |."...":D4$." .."|
00000BF0: 3A 44 31 24 B2 22 D5 DB C9 22 3A 44 32 24 B2 22 |:D1$."...":D2$."|
00000C00: DD DD 22 3A 44 33 24 B2 22 20 CA DB C9 00 3D 14 |..":D3$." ....=.|
00000C10: 4C 06 44 36 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |L.D6$.".........|
00000C20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000C30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 69 14 |............".i.|
00000C40: 4E 06 51 4D 24 B2 44 31 24 AA 44 36 24 AA 44 32 |N.QM$.D1$.D6$.D2|
00000C50: 24 AA 44 36 24 AA 44 33 24 AA 44 36 24 AA 44 34 |$.D6$.D3$.D6$.D4|
00000C60: 24 AA 44 36 24 AA 44 35 24 00 95 14 50 06 97 35 |$.D6$.D5$...P..5|
00000C70: 33 32 38 31 2C 36 3A 99 22 93 05 22 A3 31 35 29 |3281,6:."..".15)|
00000C80: 3A 81 49 B2 31 A4 34 3A 99 51 4D 24 AA 22 20 20 |:.I.1.4:.QM$." |
00000C90: 20 22 3B 3A 82 00 B7 14 51 06 99 22 13 1D 1D 1D | ";:....Q.."....|
00000CA0: 22 3B 3A 81 49 B2 31 A4 34 3A 99 51 4D 24 AA 22 |";:.I.1.4:.QM$."|
00000CB0: 20 20 20 22 3B 3A 82 00 E1 14 52 06 99 22 13 11 | ";:....R.."..|
00000CC0: 11 11 11 11 11 11 11 1D 1D 1D 22 3B 3A 81 49 B2 |..........";:.I.|
00000CD0: 31 A4 32 3A 99 51 4D 24 AA 22 20 20 20 22 3B 3A |1.2:.QM$." ";:|
00000CE0: 82 00 0C 15 56 06 99 22 13 22 A3 32 37 29 3A 81 |....V..".".27):.|
00000CF0: 49 B2 31 A4 32 3A 99 51 4D 24 AA 22 20 20 20 22 |I.1.2:.QM$." "|
00000D00: 3B 3A 82 3A 9C 3A 8D 36 30 30 30 30 00 4F 15 59 |;:.:.:.60000.O.Y|
00000D10: 06 99 43 24 28 31 30 29 43 31 24 28 37 29 22 45 |..C$(10)C1$(7)"E|
00000D20: 49 4E 45 20 46 52 41 47 45 3A 20 53 49 4E 44 20 |INE FRAGE: SIND |
00000D30: 44 41 53 20 44 4F 4C 4C 41 52 53 20 4F 44 45 52 |DAS DOLLARS ODER|
00000D40: 20 50 45 53 4F 53 3F 22 3A 8D 36 33 30 30 30 00 | PESOS?":.63000.|
00000D50: 84 15 60 06 99 22 93 11 11 11 11 11 11 20 44 49 |..`.."....... DI|
00000D60: 45 53 4D 41 4C 20 48 41 54 20 45 53 20 4E 49 43 |ESMAL HAT ES NIC|
00000D70: 48 54 53 20 4D 49 54 20 47 45 4C 44 20 5A 55 20 |HTS MIT GELD ZU |
00000D80: 54 55 4E 2E 00 BD 15 62 06 99 22 11 11 11 05 22 |TUN....b.."...."|
00000D90: 4C 24 22 20 44 41 53 20 44 4F 4C 4C 41 52 2D 5A |L$" DAS DOLLAR-Z|
00000DA0: 45 49 43 48 45 4E 20 57 49 52 44 20 42 45 4E 55 |EICHEN WIRD BENU|
00000DB0: 54 5A 54 2C 20 55 4D 20 20 20 20 22 3B 00 F0 15 |TZT, UM ";...|
00000DC0: 64 06 99 4C 24 22 20 53 54 52 49 4E 47 2D 56 41 |d..L$" STRING-VA|
00000DD0: 52 49 41 42 4C 45 4E 20 56 4F 4E 20 4E 55 4D 45 |RIABLEN VON NUME|
00000DE0: 52 49 53 43 48 45 4E 20 20 20 20 20 20 20 22 3B |RISCHEN ";|
00000DF0: 00 24 16 66 06 99 4C 24 22 20 56 41 52 49 41 42 |.$.f..L$" VARIAB|
00000E00: 4C 45 4E 20 5A 55 20 55 4E 54 45 52 53 43 48 45 |LEN ZU UNTERSCHE|
00000E10: 49 44 45 4E 2E 20 20 20 20 20 20 20 20 20 20 20 |IDEN. |
00000E20: 20 22 4C 24 00 36 16 68 06 8D 36 33 30 30 30 3A | "L$.6.h..63000:|
00000E30: 97 42 4B 2C 31 35 00 69 16 75 06 99 22 93 12 1C |.BK,15.i.u.."...|
00000E40: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 52 49 | STRI|
00000E50: 4E 47 2D 56 41 52 49 41 42 4C 45 4E 20 20 20 20 |NG-VARIABLEN |
00000E60: 20 20 20 20 20 20 20 20 22 00 8A 16 78 06 99 22 | "...x.."|
00000E70: 11 43 49 54 59 24 3D 22 43 24 22 49 20 D3 20 4E |.CITY$="C$"I . N|
00000E80: 45 57 20 59 4F 52 4B 22 43 24 00 97 16 7B 06 99 |EW YORK"C$...{..|
00000E90: 22 11 11 3F 43 49 24 00 A6 16 7E 06 99 22 11 11 |"..?CI$...~.."..|
00000EA0: 11 11 1C 22 4C 24 00 D6 16 81 06 99 22 D1 1F 48 |..."L$......"..H|
00000EB0: 49 45 52 20 57 55 52 44 45 20 44 45 4D 20 4E 41 |IER WURDE DEM NA|
00000EC0: 4D 45 4E 20 27 43 49 54 59 27 20 45 49 4E 20 44 |MEN 'CITY' EIN D|
00000ED0: 4F 4C 4C 41 52 2D 00 F1 16 84 06 99 22 91 20 5A |OLLAR-......". Z|
00000EE0: 45 49 43 48 45 4E 20 41 4E 47 45 46 55 45 47 54 |EICHEN ANGEFUEGT|
00000EF0: 2E 00 20 17 87 06 99 22 11 1C D1 1F 49 43 48 20 |.. ...."....ICH |
00000F00: 4B 41 4E 4E 20 4D 49 43 48 20 41 55 43 48 20 41 |KANN MICH AUCH A|
00000F10: 4E 20 4E 41 4D 45 4E 2C 20 53 41 45 54 5A 45 2C |N NAMEN, SAETZE,|
00000F20: 00 4F 17 8A 06 99 22 20 4A 45 44 45 20 1C 5A 45 |.O...." JEDE .ZE|
00000F30: 49 43 48 45 4E 4B 45 54 54 45 1F 20 28 3D 53 54 |ICHENKETTE. (=ST|
00000F40: 52 49 4E 47 29 20 45 52 49 4E 4E 45 52 4E 2E 00 |RING) ERINNERN..|
00000F50: 7A 17 8D 06 99 22 11 1C D1 1F 57 55 52 44 45 4E |z...."....WURDEN|
00000F60: 20 44 49 45 53 45 20 56 41 52 49 41 42 4C 45 4E | DIESE VARIABLEN|
00000F70: 20 4E 49 43 48 54 20 41 4C 53 00 A9 17 90 06 99 | NICHT ALS......|
00000F80: 22 20 1C 41 24 2C 20 59 24 20 4F 44 45 52 20 53 |" .A$, Y$ ODER S|
00000F90: 41 4D 24 1F 20 42 45 5A 45 49 43 48 4E 45 54 2C |AM$. BEZEICHNET,|
00000FA0: 20 53 4F 20 48 41 4C 54 45 00 D3 17 93 06 99 22 | SO HALTE......"|
00000FB0: 20 49 43 48 20 53 49 45 20 46 55 45 52 20 4E 55 | ICH SIE FUER NU|
00000FC0: 4D 45 52 49 53 43 48 45 20 56 41 52 49 41 42 4C |MERISCHE VARIABL|
00000FD0: 45 4E 2E 00 E5 17 99 06 8D 37 3A 99 22 13 11 11 |EN.......7:."...|
00000FE0: 90 1D 1D 22 3B 00 FC 17 9A 06 53 4E 24 B2 22 30 |...";.....SN$."0|
00000FF0: 31 37 30 30 22 3A 89 36 33 33 30 30 00 19 18 A4 |1700":.63300....|
00001000: 06 8D 36 30 30 30 30 3A 97 42 4B 2C 36 3A 97 42 |..60000:.BK,6:.B|
00001010: 44 2C 36 3A 99 22 93 05 22 00 37 18 A8 06 99 22 |D,6:."..".7...."|
00001020: 11 20 20 4D 41 4E 20 4D 55 53 53 20 45 58 41 4B |. MAN MUSS EXAK|
00001030: 54 20 53 45 49 4E 3A 00 6F 18 AC 06 99 22 11 11 |T SEIN:.o...."..|
00001040: 9E 22 4C 24 22 20 20 44 41 53 20 45 52 53 54 45 |."L$" DAS ERSTE|
00001050: 20 5A 45 49 43 48 45 4E 20 45 49 4E 45 53 20 56 | ZEICHEN EINES V|
00001060: 41 52 49 41 42 4C 45 4E 2D 20 20 20 20 22 3B 00 |ARIABLEN- ";.|
00001070: A3 18 AE 06 99 4C 24 22 20 20 4E 41 4D 45 4E 53 |.....L$" NAMENS|
00001080: 20 4D 55 53 53 20 45 49 4E 20 42 55 43 48 53 54 | MUSS EIN BUCHST|
00001090: 41 42 45 20 53 45 49 4E 2E 20 20 20 20 20 20 20 |ABE SEIN. |
000010A0: 22 4C 24 00 DA 18 B0 06 99 22 11 05 22 4C 24 22 |"L$......".."L$"|
000010B0: 20 20 44 41 53 20 5A 57 45 49 54 45 20 5A 45 49 | DAS ZWEITE ZEI|
000010C0: 43 48 45 4E 20 4B 41 4E 4E 20 45 49 4E 20 42 55 |CHEN KANN EIN BU|
000010D0: 43 48 53 54 41 42 45 20 22 3B 00 04 19 B3 06 99 |CHSTABE ";......|
000010E0: 4C 24 22 20 20 4F 44 45 52 20 45 49 4E 45 20 5A |L$" ODER EINE Z|
000010F0: 41 48 4C 20 53 45 49 4E 2E 22 4C 24 CA 28 4C 24 |AHL SEIN."L$.(L$|
00001100: 2C 32 34 29 00 16 19 B8 06 8D 36 33 30 30 30 3A |,24)......63000:|
00001110: 97 42 4B 2C 31 35 00 3B 19 D9 06 99 22 93 1F 11 |.BK,15.;...."...|
00001120: 11 41 38 3D 31 32 2B 31 32 3A 20 41 38 24 3D 22 |.A8=12+12: A8$="|
00001130: 43 24 22 31 32 2B 31 32 22 43 24 00 50 19 DC 06 |C$"12+12"C$.P...|
00001140: 99 22 11 11 50 52 49 4E 54 20 41 38 2C 41 38 24 |."..PRINT A8,A8$|
00001150: 00 59 19 DF 06 99 22 11 11 00 66 19 E2 06 99 22 |.Y...."...f...."|
00001160: 11 11 1C 22 4C 24 00 B0 19 E5 06 99 22 1C D1 1F |..."L$......"...|
00001170: 90 41 38 1F 20 55 4E 44 20 90 41 38 24 1F 20 53 |.A8. UND .A8$. S|
00001180: 49 4E 44 20 56 45 52 53 43 48 49 45 44 45 4E 45 |IND VERSCHIEDENE|
00001190: 20 56 41 52 49 41 42 4C 45 4E 20 20 55 4E 44 20 | VARIABLEN UND |
000011A0: 49 43 48 20 4B 45 4E 4E 45 20 42 45 49 44 45 2E |ICH KENNE BEIDE.|
000011B0: 00 DE 19 E8 06 99 22 11 1C D1 1F 49 43 48 20 42 |......"....ICH B|
000011C0: 45 52 45 43 48 4E 45 20 44 49 45 20 57 45 52 54 |ERECHNE DIE WERT|
000011D0: 45 20 5A 57 49 53 43 48 45 4E 20 44 45 4E 00 1E |E ZWISCHEN DEN..|
000011E0: 1A EB 06 99 22 20 41 4E 46 55 45 48 52 55 4E 47 |...." ANFUEHRUNG|
000011F0: 53 5A 45 49 43 48 45 4E 20 45 49 4E 45 52 20 53 |SZEICHEN EINER S|
00001200: 54 52 49 4E 47 2D 20 20 20 20 20 20 20 20 56 41 |TRING- VA|
00001210: 52 49 41 42 4C 45 4E 20 4E 49 43 48 54 2E 00 4D |RIABLEN NICHT..M|
00001220: 1A EE 06 99 22 11 1C D1 1F 55 45 42 52 49 47 45 |...."....UEBRIGE|
00001230: 4E 53 20 1C 4D 55 45 53 53 45 4E 1F 20 53 54 52 |NS .MUESSEN. STR|
00001240: 49 4E 47 2D 56 41 52 49 41 42 4C 45 4E 00 78 1A |ING-VARIABLEN.x.|
00001250: F1 06 99 22 20 49 4E 20 41 4E 46 55 45 48 52 55 |..." IN ANFUEHRU|
00001260: 4E 47 53 5A 45 49 43 48 45 4E 20 53 54 45 48 45 |NGSZEICHEN STEHE|
00001270: 4E 2C 20 53 4F 4E 53 54 00 A1 1A F4 06 99 22 20 |N, SONST......" |
00001280: 45 52 48 41 4C 54 45 4E 20 53 49 45 20 45 49 4E |ERHALTEN SIE EIN|
00001290: 45 20 46 45 48 4C 45 52 2D 4D 45 4C 44 55 4E 47 |E FEHLER-MELDUNG|
000012A0: 3A 00 BE 1A F7 06 99 22 1C 20 3F 54 59 50 45 20 |:......". ?TYPE |
000012B0: 4D 49 53 4D 41 54 43 48 20 45 52 52 4F 52 00 DB |MISMATCH ERROR..|
000012C0: 1A FA 06 81 49 B2 31 A4 35 30 30 3A 82 3A 97 31 |....I.1.500:.:.1|
000012D0: 39 38 2C 30 3A 8D 36 33 30 35 30 00 EF 1A FD 06 |98,0:.63050.....|
000012E0: 99 22 13 11 90 20 22 3B 3A 97 31 39 38 2C 30 00 |."... ";:.198,0.|
000012F0: 06 1B FE 06 53 4E 24 B2 22 30 31 38 30 30 22 3A |....SN$."01800":|
00001300: 89 36 33 33 30 30 00 11 1B 08 07 8D 36 30 30 30 |.63300......6000|
00001310: 30 00 3C 1B 09 07 97 42 44 2C 31 35 3A 97 42 4B |0.<....BD,15:.BK|
00001320: 2C 31 35 3A 99 22 1F 93 20 20 20 20 20 20 20 20 |,15:.".. |
00001330: 20 20 20 20 50 52 4F 42 4C 45 4D 3A 00 78 1B 0B | PROBLEM:.x..|
00001340: 07 99 22 11 1C 47 45 42 45 4E 20 53 49 45 20 41 |.."..GEBEN SIE A|
00001350: 55 46 20 44 45 4D 20 42 49 4C 44 53 43 48 49 52 |UF DEM BILDSCHIR|
00001360: 4D 20 41 4C 4C 45 20 5A 41 48 4C 45 4E 5A 57 49 |M ALLE ZAHLENZWI|
00001370: 53 43 48 45 4E 20 22 3B 00 BF 1B 0E 07 99 22 31 |SCHEN ";......"1|
00001380: 30 31 20 90 12 55 4E 44 92 1C 20 31 31 30 20 41 |01 ..UND.. 110 A|
00001390: 55 53 2C 20 4E 55 52 20 44 49 45 20 20 20 20 20 |US, NUR DIE |
000013A0: 20 20 56 41 52 49 41 42 4C 45 20 53 41 20 42 45 | VARIABLE SA BE|
000013B0: 4E 55 54 5A 45 4E 2E 22 3A 99 22 1F 22 4C 24 00 |NUTZEN.":."."L$.|
000013C0: EA 1B 0F 07 99 22 97 44 45 52 20 41 4E 46 41 4E |.....".DER ANFAN|
000013D0: 47 53 57 45 52 54 20 90 12 46 55 45 52 20 53 41 |GSWERT ..FUER SA|
000013E0: 92 97 20 49 53 54 20 31 30 31 00 0B 1C 11 07 99 |.. IST 101......|
000013F0: 22 55 4E 44 20 4D 41 4E 20 4B 4F 45 4E 4E 54 45 |"UND MAN KOENNTE|
00001400: 20 53 43 48 52 45 49 42 45 4E 3A 00 36 1C 13 07 | SCHREIBEN:.6...|
00001410: 99 22 11 1F 53 41 3D 31 30 31 3A 50 52 49 4E 54 |."..SA=101:PRINT|
00001420: 20 53 41 20 20 20 20 90 20 5F 20 45 52 53 54 45 | SA . _ ERSTE|
00001430: 52 20 57 45 52 54 00 63 1C 14 07 99 22 1F 53 41 |R WERT.c....".SA|
00001440: 3D 31 30 32 3A 50 52 49 4E 54 20 53 41 20 20 20 |=102:PRINT SA |
00001450: 20 90 20 5F 20 44 45 52 20 12 4E 41 45 43 48 53 | . _ DER .NAECHS|
00001460: 54 45 92 00 90 1C 15 07 99 22 1F 53 41 3D 31 30 |TE.......".SA=10|
00001470: 33 3A 50 52 49 4E 54 20 53 41 20 20 20 20 90 20 |3:PRINT SA . |
00001480: 5F 20 44 45 52 20 12 4E 41 45 43 48 53 54 45 92 |_ DER .NAECHSTE.|
00001490: 00 BD 1C 16 07 99 22 1F 53 41 3D 31 30 34 3A 50 |......".SA=104:P|
000014A0: 52 49 4E 54 20 53 41 20 20 20 20 90 20 5F 20 44 |RINT SA . _ D|
000014B0: 45 52 20 12 4E 41 45 43 48 53 54 45 92 00 CB 1C |ER .NAECHSTE....|
000014C0: 18 07 99 22 20 20 20 20 20 20 DD 00 D9 1C 19 07 |..." ......|
000014D0: 99 22 20 20 20 20 20 20 DD 00 11 1D 1C 07 99 22 |." ......."|
000014E0: 1F 53 41 3D 31 31 30 3A 50 52 49 4E 54 20 53 41 |.SA=110:PRINT SA|
000014F0: 20 20 20 20 90 20 5F 20 44 45 52 20 4C 45 54 5A | . _ DER LETZ|
00001500: 54 45 20 57 45 52 54 22 3A 99 22 11 1F 22 4C 24 |TE WERT":.".."L$|
00001510: 3B 00 44 1D 1D 07 99 22 20 44 49 45 53 20 57 41 |;.D...." DIES WA|
00001520: 52 20 4E 55 52 20 46 55 45 52 20 31 30 20 5A 41 |R NUR FUER 10 ZA|
00001530: 48 4C 45 4E 2E 20 20 20 20 20 20 20 20 20 20 20 |HLEN. |
00001540: 22 4C 24 3B 00 7D 1D 1E 07 99 22 20 55 4E 44 20 |"L$;.}...." UND |
00001550: 57 41 53 20 45 52 53 54 20 42 45 49 20 31 30 30 |WAS ERST BEI 100|
00001560: 30 20 5A 41 48 4C 45 4E 21 20 20 20 20 20 20 20 |0 ZAHLEN! |
00001570: 20 20 20 22 4C 24 3A 8D 36 33 30 30 30 00 A5 1D | "L$:.63000...|
00001580: 20 07 97 42 4B 2C 36 3A 97 42 44 2C 36 3A 42 52 | ..BK,6:.BD,6:BR|
00001590: 24 B2 C8 28 4C 24 2C 32 36 29 3A 99 22 93 11 11 |$..(L$,26):."...|
000015A0: 9F 22 42 52 24 00 CC 1D 21 07 99 22 12 20 49 4E |."BR$...!..". IN|
000015B0: 20 4D 45 49 4E 45 52 20 42 41 53 49 43 2D 53 50 | MEINER BASIC-SP|
000015C0: 52 41 43 48 45 20 22 3A 99 42 52 24 00 11 1E 22 |RACHE ":.BR$..."|
000015D0: 07 99 22 12 20 47 49 42 54 20 45 53 20 45 49 4E |..". GIBT ES EIN|
000015E0: 45 20 42 45 53 4F 4E 44 45 52 45 20 20 22 3A 99 |E BESONDERE ":.|
000015F0: 42 52 24 3A 99 22 12 20 41 42 4B 55 45 52 5A 55 |BR$:.". ABKUERZU|
00001600: 4E 47 20 48 49 45 52 46 55 45 52 2C 20 20 20 20 |NG HIERFUER, |
00001610: 22 00 3D 1E 23 07 99 42 52 24 3A 99 22 12 20 4D |".=.#..BR$:.". M|
00001620: 41 4E 20 4E 45 4E 4E 54 20 53 49 45 20 3A 20 20 |AN NENNT SIE : |
00001630: 20 20 20 20 20 20 20 22 3A 99 42 52 24 00 58 1E | ":.BR$.X.|
00001640: 24 07 99 22 05 11 11 11 20 20 20 20 20 20 20 20 |$..".... |
00001650: 53 43 48 4C 45 49 46 45 00 6D 1E 25 07 99 A3 32 |SCHLEIFE.m.%...2|
00001660: 35 29 22 DD 20 5F C3 C3 C3 C3 C0 C0 AE 00 82 1E |5)". _..........|
00001670: 27 07 99 A3 32 35 29 22 DD 20 20 20 20 20 20 20 |'...25)". |
00001680: 20 DD 00 97 1E 28 07 99 A3 32 35 29 22 DD 53 43 | ....(...25)".SC|
00001690: 48 4C 45 49 46 45 DD 00 AC 1E 29 07 99 A3 32 35 |HLEIFE....)...25|
000016A0: 29 22 DD 20 20 20 20 20 20 20 20 DD 00 C9 1E 2A |)". ....*|
000016B0: 07 99 A3 32 35 29 22 AD C0 C3 C3 C3 C3 C0 C0 C0 |...25)".........|
000016C0: BD 22 3A 8D 36 33 30 30 30 00 FB 1E 2B 07 97 42 |.":.63000...+..B|
000016D0: 44 2C 31 35 3A 97 42 4B 2C 31 35 3A 99 22 93 1F |D,15:.BK,15:."..|
000016E0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000016F0: 20 20 20 20 20 20 20 20 20 20 22 00 1E 1F 2C 07 | "...,.|
00001700: 99 22 12 1F 53 43 48 4C 45 49 46 45 4E 20 48 41 |."..SCHLEIFEN HA|
00001710: 42 45 4E 20 33 20 54 45 49 4C 45 3A 20 22 00 47 |BEN 3 TEILE: ".G|
00001720: 1F 2D 07 99 22 1F 12 20 20 20 20 20 20 20 20 20 |.-..".. |
00001730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001740: 91 92 22 3B 3A 8D 38 00 70 1F 2E 07 99 22 05 20 |..";:.8.p....". |
00001750: 46 4F 52 2C 20 22 3B 3A 8D 38 3A 99 22 1C 54 4F |FOR, ";:.8:.".TO|
00001760: 2C 20 22 3B 3A 8D 38 3A 99 22 90 4E 45 58 54 22 |, ";:.8:.".NEXT"|
00001770: 00 A4 1F 2F 07 99 22 11 11 11 1F 20 20 20 46 4F |.../..".... FO|
00001780: 52 20 53 41 3D 31 30 31 20 1C 54 4F 20 31 31 30 |R SA=101 .TO 110|
00001790: 3A 1F 50 52 49 4E 54 20 53 41 3A 90 4E 45 58 54 |:.PRINT SA:.NEXT|
000017A0: 20 53 41 1F 00 D3 1F 30 07 47 31 24 B2 22 1D 1D | SA....0.G1$."..|
000017B0: 1D 1D 1D 1D 1D 5E 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.....^..........|
000017C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DD 22 3A 99 |.............":.|
000017D0: 47 31 24 00 02 20 31 07 47 32 24 B2 22 1D 1D 1D |G1$.. 1.G2$."...|
000017E0: 1D 1D 1D 1D DD 20 20 20 20 20 20 5F 5A 55 52 55 |..... _ZURU|
000017F0: 45 43 4B 20 20 20 20 1D 1D 1D 1D DD 22 3A 99 47 |ECK .....":.G|
00001800: 32 24 00 38 20 32 07 47 33 24 B2 22 1D 1D 1D 1D |2$.8 2.G3$."....|
00001810: 1D 1D 1D AD C3 C3 C0 C0 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00001820: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 BD 22 3A 99 47 33 |...........":.G3|
00001830: 24 3A 8D 36 33 30 30 30 00 6A 20 33 07 99 43 41 |$:.63000.j 3..CA|
00001840: 24 22 91 91 1F 22 4C 31 24 3A 99 22 12 20 49 4D |$"..."L1$:.". IM|
00001850: 20 45 52 53 54 45 4E 20 54 45 49 4C 20 20 20 20 | ERSTEN TEIL |
00001860: 22 3A 99 4C 31 24 3B 3A 8D 38 00 83 20 34 07 99 |":.L1$;:.8.. 4..|
00001870: 22 1D 1D 1D 1D 92 91 46 4F 52 20 53 41 20 3D 20 |"......FOR SA = |
00001880: 31 30 31 00 C6 20 35 07 99 22 13 11 11 11 11 1C |101.. 5.."......|
00001890: 20 20 12 20 20 20 20 20 20 20 20 20 20 20 20 22 | . "|
000018A0: 3A 99 22 20 20 12 20 46 4F 52 20 53 41 3D 31 30 |:." . FOR SA=10|
000018B0: 31 20 22 3A 99 22 20 20 12 20 20 20 20 20 20 20 |1 ":." . |
000018C0: 20 20 20 20 20 22 00 EC 20 38 07 99 43 41 24 22 | ".. 8..CA$"|
000018D0: 11 12 1F 20 47 45 53 43 48 45 48 45 4E 20 32 20 |... GESCHEHEN 2 |
000018E0: 44 49 4E 47 45 20 22 3A 99 4C 31 24 00 28 21 3A |DINGE ":.L1$.(!:|
000018F0: 07 99 43 41 24 22 11 11 11 11 11 20 20 31 2E 2D |..CA$"..... 1.-|
00001900: 20 12 20 45 49 4E 45 20 56 41 52 49 41 42 4C 45 | . EINE VARIABLE|
00001910: 20 57 49 52 44 20 44 45 46 49 4E 49 45 52 54 20 | WIRD DEFINIERT |
00001920: 92 91 1C 22 3B 3A 8D 38 00 4A 21 3B 07 99 22 12 |...";:.8.J!;..".|
00001930: 20 20 20 20 11 9D 9D 9D 9D 20 53 41 20 11 9D 9D | ..... SA ...|
00001940: 9D 9D 20 20 20 20 22 3A 8D 38 00 6F 21 3C 07 99 |.. ":.8.o!<..|
00001950: 22 20 20 1F 32 2E 2D 20 12 20 44 49 45 53 45 52 |" .2.- . DIESER|
00001960: 20 57 49 52 44 20 45 49 4E 20 20 20 20 20 11 00 | WIRD EIN ..|
00001970: 99 21 3D 07 99 22 92 91 20 20 20 20 20 20 12 20 |.!=..".. . |
00001980: 41 4E 46 41 4E 47 53 57 45 52 54 20 47 45 47 45 |ANFANGSWERT GEGE|
00001990: 42 45 4E 20 22 3B 3A 8D 38 00 D4 21 3E 07 99 22 |BEN ";:.8..!>.."|
000019A0: 92 1C 20 20 20 20 20 20 91 12 20 20 20 20 20 11 |.. .. .|
000019B0: 9D 9D 9D 9D 9D 20 31 30 31 20 11 9D 9D 9D 9D 9D |..... 101 ......|
000019C0: 20 20 20 20 20 1F 22 3A 8D 36 33 30 30 30 3A 99 | .":.63000:.|
000019D0: 43 41 24 3B 00 19 22 44 07 99 22 91 12 20 49 4D |CA$;.."D..".. IM|
000019E0: 20 5A 57 45 49 54 45 4E 20 54 45 49 4C 20 20 20 | ZWEITEN TEIL |
000019F0: 92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00001A00: 20 20 22 3A 99 4C 31 24 3A 99 53 32 24 53 32 24 | ":.L1$:.S2$S2$|
00001A10: 53 32 24 53 32 24 53 32 24 00 44 22 46 07 8D 38 |S2$S2$S2$.D"F..8|
00001A20: 3A 99 43 41 24 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D |:.CA$"..........|
00001A30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 4F |..............TO|
00001A40: 20 31 31 30 00 81 22 47 07 99 22 13 11 11 11 11 | 110.."G..".....|
00001A50: 9B 20 20 22 4C 31 24 3A 99 22 20 20 1F 20 46 4F |. "L1$:." . FO|
00001A60: 52 20 53 41 3D 31 30 31 20 22 3A 99 22 20 20 20 |R SA=101 ":." |
00001A70: 20 20 20 20 5E 20 20 20 20 20 20 20 20 22 3A 8D | ^ ":.|
00001A80: 38 00 BF 22 49 07 99 22 13 11 11 11 11 20 20 20 |8.."I.."..... |
00001A90: 20 20 20 20 20 20 20 1C 20 20 20 12 20 20 20 20 | . . |
00001AA0: 20 20 20 20 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D | ":."........|
00001AB0: 1D 1D 1D 1D 1D 12 20 54 4F 20 31 31 30 3A 22 00 |...... TO 110:".|
00001AC0: E1 22 4A 07 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."J.."..........|
00001AD0: 1C 20 20 20 12 20 20 20 20 20 20 20 20 22 3A 8D |. . ":.|
00001AE0: 38 00 23 23 4E 07 99 22 1F 11 11 11 11 11 11 1D |8.##N.."........|
00001AF0: 1D 1D 22 4C 31 24 22 20 22 3A 99 22 20 20 20 12 |.."L1$" ":." .|
00001B00: 20 57 49 52 44 20 44 45 52 20 45 4E 44 57 45 52 | WIRD DER ENDWER|
00001B10: 54 20 20 20 22 3A 99 22 91 20 20 20 22 4C 31 24 |T ":.". "L1$|
00001B20: 22 20 22 00 51 23 4F 07 99 22 20 20 20 12 20 46 |" ".Q#O.." . F|
00001B30: 55 45 52 20 44 49 45 20 56 41 52 49 41 42 4C 45 |UER DIE VARIABLE|
00001B40: 20 20 22 3A 99 22 91 20 20 20 22 4C 31 24 22 20 | ":.". "L1$" |
00001B50: 22 00 80 23 50 07 99 22 20 20 20 12 20 53 41 20 |"..#P.." . SA |
00001B60: 41 4E 47 45 47 45 42 45 4E 20 20 20 20 20 20 20 |ANGEGEBEN |
00001B70: 22 3A 99 22 91 20 20 20 22 4C 31 24 22 20 22 3B |":.". "L1$" ";|
00001B80: 00 B6 23 51 07 8D 38 3A 99 22 91 91 91 91 1D 1D |..#Q..8:."......|
00001B90: 1D 12 1C 20 20 20 20 20 11 9D 9D 9D 9D 9D 20 31 |... ...... 1|
00001BA0: 31 30 20 11 9D 9D 9D 9D 9D 20 20 20 20 20 22 3A |10 ...... ":|
00001BB0: 8D 36 33 30 30 30 00 FF 23 53 07 99 43 41 24 22 |.63000..#S..CA$"|
00001BC0: 91 1F 12 20 49 4D 20 4C 45 54 5A 54 45 4E 20 54 |... IM LETZTEN T|
00001BD0: 45 49 4C 20 20 20 92 20 20 20 20 20 20 20 20 20 |EIL . |
00001BE0: 20 20 20 20 20 20 20 20 22 3A 99 4C 31 24 3A 99 | ":.L1$:.|
00001BF0: 53 32 24 53 32 24 53 32 24 53 32 24 53 32 24 00 |S2$S2$S2$S2$S2$.|
00001C00: 3D 24 54 07 99 22 13 11 11 11 11 20 20 20 20 20 |=$T.."..... |
00001C10: 20 20 20 20 20 1C 20 20 20 20 20 20 20 20 20 20 | . |
00001C20: 20 20 22 3A 99 22 1F 1D 1D 1D 1D 1D 1D 1D 1D 1D | ":."..........|
00001C30: 1D 1D 1D 1D 20 54 4F 20 31 31 30 3A 22 00 5E 24 |.... TO 110:".^$|
00001C40: 55 07 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1C 20 |U.."........... |
00001C50: 20 20 20 20 20 20 20 20 20 20 22 3A 8D 38 00 94 | ":.8..|
00001C60: 24 56 07 99 22 13 11 11 11 11 20 20 20 20 20 20 |$V.."..... |
00001C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001C80: 20 20 20 1C 20 20 20 20 20 12 20 20 20 20 20 20 | . . |
00001C90: 20 20 20 22 00 C6 24 57 07 99 22 1F 1D 1D 1D 1D | "..$W..".....|
00001CA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001CB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 3A 1C 12 20 4E 45 58 |.........:.. NEX|
00001CC0: 54 20 53 41 20 22 00 F7 24 58 07 99 22 1D 1D 1D |T SA "..$X.."...|
00001CD0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001CE0: 1D 1D 1D 1D 20 20 1C 20 20 20 20 20 12 20 20 20 |.... . . |
00001CF0: 20 20 20 20 20 20 22 00 27 25 59 07 8D 38 3A 99 | ".'%Y..8:.|
00001D00: 43 41 24 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |CA$"............|
00001D10: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 4E 45 58 54 |............NEXT|
00001D20: 20 53 41 22 3A 8D 38 00 69 25 5A 07 99 22 11 11 | SA":.8.i%Z.."..|
00001D30: 1C 20 20 20 22 4C 33 24 3A 99 22 20 20 20 12 20 |. "L3$:." . |
00001D40: 57 49 52 44 20 44 45 52 20 57 45 52 54 20 56 4F |WIRD DER WERT VO|
00001D50: 4E 20 53 41 20 55 4D 20 31 20 45 52 2D 22 3A 99 |N SA UM 1 ER-":.|
00001D60: 22 91 20 20 20 22 4C 33 24 00 9E 25 5B 07 99 22 |". "L3$..%[.."|
00001D70: 20 20 20 12 20 48 4F 45 48 54 2C 20 55 4E 44 20 | . HOEHT, UND |
00001D80: 44 49 45 20 50 52 4F 5A 45 44 55 52 20 57 49 52 |DIE PROZEDUR WIR|
00001D90: 44 20 22 3A 99 22 91 20 20 20 22 4C 33 24 00 D3 |D ":.". "L3$..|
00001DA0: 25 5C 07 99 22 20 20 20 12 20 41 42 20 46 4F 52 |%\.." . AB FOR|
00001DB0: 20 57 49 45 44 45 52 48 4F 4C 54 2C 20 42 49 53 | WIEDERHOLT, BIS|
00001DC0: 20 53 41 20 20 20 20 22 3A 99 22 91 20 20 20 22 | SA ":.". "|
00001DD0: 4C 33 24 00 08 26 5D 07 99 22 20 20 20 12 20 44 |L3$..&].." . D|
00001DE0: 45 4E 20 4D 41 58 49 4D 41 4C 57 45 52 54 20 31 |EN MAXIMALWERT 1|
00001DF0: 31 30 20 45 52 52 45 49 43 48 54 2E 22 3A 99 22 |10 ERREICHT.":."|
00001E00: 91 20 20 20 22 4C 33 24 00 3B 26 5E 07 99 42 54 |. "L3$.;&^..BT|
00001E10: 24 22 20 20 20 20 20 20 57 45 49 54 45 52 20 4D |$" WEITER M|
00001E20: 49 54 20 27 53 50 41 43 45 27 20 20 20 4D 3D 4D |IT 'SPACE' M=M|
00001E30: 45 4E 55 45 20 20 20 20 20 22 3B 00 63 26 5F 07 |ENUE ";.c&_.|
00001E40: 99 22 9B 22 43 24 28 35 29 A3 32 36 29 C9 28 47 |."."C$(5).26).(G|
00001E50: 31 24 2C 35 29 3A 99 A3 32 36 29 C9 28 47 32 24 |1$,5):..26).(G2$|
00001E60: 2C 35 29 00 75 26 60 07 99 A3 32 36 29 C9 28 47 |,5).u&`...26).(G|
00001E70: 33 24 2C 35 29 00 9E 26 61 07 99 43 24 28 37 29 |3$,5)..&a..C$(7)|
00001E80: A3 31 35 29 CA 28 47 33 24 2C 32 30 2C 31 31 29 |.15).(G3$,20,11)|
00001E90: 3A 99 22 91 22 C8 28 47 33 24 2C 31 35 29 00 CE |:.".".(G3$,15)..|
00001EA0: 26 62 07 99 22 91 91 22 C8 28 47 32 24 2C 32 35 |&b.."..".(G2$,25|
00001EB0: 29 3A 99 22 91 91 22 C8 28 47 31 24 2C 39 29 3A |):."..".(G1$,9):|
00001EC0: 8B C2 28 45 53 29 B2 36 30 A7 31 39 30 30 00 F6 |..(ES).60.1900..|
00001ED0: 26 63 07 99 22 90 22 43 24 28 35 29 A3 32 36 29 |&c.."."C$(5).26)|
00001EE0: C9 28 47 31 24 2C 35 29 3A 99 A3 32 36 29 C9 28 |.(G1$,5):..26).(|
00001EF0: 47 32 24 2C 35 29 00 08 27 64 07 99 A3 32 36 29 |G2$,5)..'d...26)|
00001F00: C9 28 47 33 24 2C 35 29 00 31 27 65 07 99 43 24 |.(G3$,5).1'e..C$|
00001F10: 28 37 29 A3 31 35 29 CA 28 47 33 24 2C 32 30 2C |(7).15).(G3$,20,|
00001F20: 31 31 29 3A 99 22 91 22 C8 28 47 33 24 2C 31 35 |11):.".".(G3$,15|
00001F30: 29 00 62 27 66 07 99 22 91 91 22 C8 28 47 32 24 |).b'f.."..".(G2$|
00001F40: 2C 32 35 29 3A 99 22 91 91 22 C8 28 47 31 24 2C |,25):."..".(G1$,|
00001F50: 39 29 3A 8B C2 28 45 53 29 B3 B1 36 30 A7 31 38 |9):..(ES)..60.18|
00001F60: 38 37 00 97 27 6C 07 99 22 13 11 11 11 11 20 20 |87..'l.."..... |
00001F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F80: 20 20 20 20 20 20 20 1C 20 20 20 20 20 20 20 20 | . |
00001F90: 20 20 20 20 20 20 22 00 C8 27 6E 07 99 22 1F 1D | "..'n.."..|
00001FA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001FB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 3A 1F 20 4E |............:. N|
00001FC0: 45 58 54 20 53 41 20 22 00 E9 27 70 07 99 43 35 |EXT SA "..'p..C5|
00001FD0: 24 53 32 24 53 32 24 53 32 24 53 32 24 53 32 24 |$S2$S2$S2$S2$S2$|
00001FE0: 53 32 24 53 32 24 53 32 24 00 23 28 71 07 99 43 |S2$S2$S2$.#(q..C|
00001FF0: 24 28 39 29 22 1F 20 20 20 22 4C 31 24 3A 99 22 |$(9)". "L1$:."|
00002000: 91 20 20 20 12 20 44 49 45 53 45 52 20 54 45 49 |. . DIESER TEI|
00002010: 4C 20 57 55 52 44 45 20 22 3A 99 22 20 20 20 22 |L WURDE ":." "|
00002020: 4C 31 24 00 50 28 72 07 99 22 91 20 20 20 12 20 |L1$.P(r..". . |
00002030: 4E 49 43 48 54 20 56 45 52 47 45 53 53 45 4E 20 |NICHT VERGESSEN |
00002040: 20 20 22 3A 99 22 20 20 20 22 4C 31 24 3A 8D 38 | ":." "L1$:.8|
00002050: 00 79 28 76 07 99 43 24 28 39 29 3A 81 49 B2 32 |.y(v..C$(9):.I.2|
00002060: 32 A4 32 36 3A 99 A3 49 29 22 C3 22 3B 3A 8D 34 |2.26:..I)".";:.4|
00002070: 30 3A 82 3A 99 22 BD 22 3B 00 99 28 77 07 8D 34 |0:.:.".";..(w..4|
00002080: 30 3A 81 4A B2 31 A4 35 3A 99 22 9D 91 DD 22 3B |0:.J.1.5:."...";|
00002090: 3A 8D 34 30 3A 82 3A 8D 38 00 CC 28 78 07 99 22 |:.40:.:.8..(x.."|
000020A0: 13 11 11 11 11 22 A3 32 30 29 22 1C 12 20 20 20 |.....".20)".. |
000020B0: 20 20 20 20 20 20 20 22 3A 99 A3 32 30 29 22 1C | ":..20)".|
000020C0: 12 20 50 52 49 4E 54 20 53 41 20 22 00 E4 28 79 |. PRINT SA "..(y|
000020D0: 07 99 A3 32 30 29 22 12 20 20 20 20 20 20 20 20 |...20)". |
000020E0: 20 20 1F 22 00 27 29 7A 07 99 43 24 28 39 29 22 | .".')z..C$(9)"|
000020F0: 11 11 11 11 11 11 1C 22 4C 24 22 20 53 4F 4C 41 |......."L$" SOLA|
00002100: 4E 47 45 20 4D 41 4E 20 92 20 49 4E 4E 45 52 48 |NGE MAN . INNERH|
00002110: 41 4C 42 20 12 20 44 45 52 20 53 43 48 4C 45 49 |ALB . DER SCHLEI|
00002120: 46 45 20 20 20 22 3B 00 5A 29 7B 07 99 4C 24 22 |FE ";.Z){..L$"|
00002130: 20 49 53 54 2C 20 57 49 52 44 20 4A 45 57 45 49 | IST, WIRD JEWEI|
00002140: 4C 53 20 44 45 52 20 41 4B 54 55 45 4C 4C 45 20 |LS DER AKTUELLE |
00002150: 20 20 20 20 20 20 20 20 22 3B 00 8E 29 80 07 99 | ";..)...|
00002160: 4C 24 22 20 57 45 52 54 20 56 4F 4E 20 53 41 20 |L$" WERT VON SA |
00002170: 41 55 53 47 45 47 45 42 45 4E 2E 20 20 20 20 20 |AUSGEGEBEN. |
00002180: 20 20 20 20 20 20 20 20 20 20 20 22 4C 24 00 C2 | "L$..|
00002190: 29 8A 07 8D 36 33 30 30 30 3A 97 42 4B 2C 36 3A |)...63000:.BK,6:|
000021A0: 97 42 44 2C 36 3A 99 22 13 13 93 11 11 11 11 11 |.BD,6:."........|
000021B0: 05 20 20 20 55 4E 44 20 4E 55 4E 2E 2E 2E 22 3A |. UND NUN...":|
000021C0: 8D 38 00 E7 29 8B 07 99 22 11 11 11 11 20 20 20 |.8..)...".... |
000021D0: 2E 2E 2E 45 49 4E 49 47 45 20 55 45 42 55 4E 47 |...EINIGE UEBUNG|
000021E0: 45 4E 2E 22 3A 8D 38 00 1C 2A 9E 07 99 22 93 11 |EN.":.8..*..."..|
000021F0: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 |......... |
00002200: 4C 49 56 45 20 53 48 4F 57 22 3A 81 49 B2 31 A4 |LIVE SHOW":.I.1.|
00002210: 31 30 30 30 3A 82 3A 97 42 44 2C 36 00 56 2A D0 |1000:.:.BD,6.V*.|
00002220: 07 97 42 4B 2C 31 35 3A 99 22 93 12 1C 20 20 20 |..BK,15:."... |
00002230: 20 20 20 20 20 20 20 20 20 20 20 20 53 43 48 4C | SCHL|
00002240: 45 49 46 45 4E 20 20 20 20 20 20 20 20 20 20 20 |EIFEN |
00002250: 20 20 20 20 20 22 00 7E 2A D2 07 99 22 11 46 4F | ".~*...".FO|
00002260: 52 20 53 41 3D 31 30 31 54 4F 31 31 30 3A 50 52 |R SA=101TO110:PR|
00002270: 49 4E 54 20 53 41 3A 4E 45 58 54 20 53 41 00 96 |INT SA:NEXT SA..|
00002280: 2A D5 07 99 22 11 11 11 11 11 11 11 11 11 11 11 |*..."...........|
00002290: 11 11 1C 22 4C 24 00 C6 2A DA 07 99 22 11 11 1C |..."L$..*..."...|
000022A0: D1 1F 44 52 55 45 43 4B 45 4E 20 53 49 45 20 52 |..DRUECKEN SIE R|
000022B0: 45 54 55 52 4E 20 55 4E 44 20 53 45 48 45 4E 20 |ETURN UND SEHEN |
000022C0: 53 49 45 2E 2E 2E 00 D8 2A 25 08 8D 37 3A 99 22 |SIE.....*%..7:."|
000022D0: 13 11 11 1F 1D 1D 22 3B 00 EF 2A 2A 08 53 4E 24 |......";..**.SN$|
000022E0: B2 22 30 32 31 30 30 22 3A 89 36 33 33 30 30 00 |."02100":.63300.|
000022F0: 29 2B 34 08 8D 36 30 30 30 30 3A 99 22 93 12 1C |)+4..60000:."...|
00002300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 | S|
00002310: 43 48 4C 45 49 46 45 4E 20 20 20 20 20 20 20 20 |CHLEIFEN |
00002320: 20 20 20 20 20 20 20 20 22 00 53 2B 36 08 99 22 | ".S+6.."|
00002330: 11 1C 46 4F 52 20 53 41 3D 31 30 31 54 4F 31 31 |..FOR SA=101TO11|
00002340: 30 3A 50 52 49 4E 54 20 53 41 2C 3A 4E 45 58 54 |0:PRINT SA,:NEXT|
00002350: 20 53 41 00 66 2B 39 08 99 22 11 11 11 11 11 11 | SA.f+9.."......|
00002360: 11 11 1C 22 4C 24 00 95 2B 3E 08 99 22 11 11 1C |..."L$..+>.."...|
00002370: D1 1F 44 49 45 20 47 4C 45 49 43 48 45 20 53 41 |..DIE GLEICHE SA|
00002380: 43 48 45 2C 20 41 42 45 52 20 44 49 45 53 4D 41 |CHE, ABER DIESMA|
00002390: 4C 20 42 45 2D 00 C6 2B 43 08 99 22 11 20 46 49 |L BE-..+C..". FI|
000023A0: 4E 44 45 54 20 53 49 43 48 20 45 49 4E 20 4B 4F |NDET SICH EIN KO|
000023B0: 4D 4D 41 20 48 49 4E 54 45 52 20 1C 50 52 49 4E |MMA HINTER .PRIN|
000023C0: 54 20 53 41 1F 2C 00 E7 2B 48 08 99 22 11 11 1C |T SA.,..+H.."...|
000023D0: D1 1F 45 52 49 4E 4E 45 52 4E 20 53 49 45 20 53 |..ERINNERN SIE S|
000023E0: 49 43 48 3F 2E 2E 2E 00 F9 2B 89 08 8D 37 3A 99 |ICH?.....+...7:.|
000023F0: 22 13 11 11 1F 1D 1D 22 3B 00 10 2C 8E 08 53 4E |"......";..,..SN|
00002400: 24 B2 22 30 32 32 30 30 22 3A 89 36 33 33 30 30 |$."02200":.63300|
00002410: 00 4A 2C 98 08 8D 36 30 30 30 30 3A 99 22 93 12 |.J,...60000:."..|
00002420: 1C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00002430: 53 43 48 4C 45 49 46 45 4E 20 20 20 20 20 20 20 |SCHLEIFEN |
00002440: 20 20 20 20 20 20 20 20 20 22 00 71 2C 9A 08 99 | ".q,...|
00002450: 22 11 1C 46 4F 52 20 53 41 3D 31 30 31 54 4F 31 |"..FOR SA=101TO1|
00002460: 31 30 3A 50 52 49 4E 54 20 53 41 3B 3A 4E 45 58 |10:PRINT SA;:NEX|
00002470: 54 00 82 2C 9D 08 99 22 11 11 11 11 11 11 1C 22 |T..,..."......."|
00002480: 4C 24 00 AE 2C A2 08 99 22 11 1C D1 1F 55 4E 44 |L$..,..."....UND|
00002490: 20 4E 55 4E 20 5A 55 52 20 41 42 57 45 43 48 53 | NUN ZUR ABWECHS|
000024A0: 4C 55 4E 47 20 45 49 4E 20 53 45 4D 49 2D 00 CC |LUNG EIN SEMI-..|
000024B0: 2C A7 08 99 22 20 4B 4F 4C 4F 4E 20 4E 41 43 48 |,..." KOLON NACH|
000024C0: 20 1C 50 52 49 4E 54 20 53 41 1F 3B 00 F7 2C AC | .PRINT SA.;..,.|
000024D0: 08 99 22 11 1C D1 1F 53 50 41 53 53 45 53 48 41 |.."....SPASSESHA|
000024E0: 4C 42 45 52 20 41 45 4E 44 45 52 4E 20 57 49 52 |LBER AENDERN WIR|
000024F0: 20 31 31 30 20 41 42 00 26 2D B6 08 99 22 20 49 | 110 AB.&-..." I|
00002500: 4E 20 5A 2E 42 2E 20 31 31 30 30 30 2E 20 44 49 |N Z.B. 11000. DI|
00002510: 45 53 20 47 45 48 54 20 4D 49 54 20 1C 49 4E 53 |ES GEHT MIT .INS|
00002520: 54 1F 20 57 49 45 00 50 2D BB 08 99 22 20 42 45 |T. WIE.P-..." BE|
00002530: 49 20 1C 4C 4F 44 4F 4E 1F 20 49 4E 20 44 45 52 |I .LODON. IN DER|
00002540: 20 45 52 53 54 45 4E 20 4C 45 4B 54 49 4F 4E 21 | ERSTEN LEKTION!|
00002550: 00 99 2D C0 08 99 22 11 1C D1 1F 44 49 45 20 53 |..-..."....DIE S|
00002560: 54 4F 50 2D 54 41 53 54 45 20 28 4C 49 4E 4B 53 |TOP-TASTE (LINKS|
00002570: 20 41 55 46 20 44 45 52 20 54 41 53 54 41 54 55 | AUF DER TASTATU|
00002580: 52 29 20 42 45 45 4E 44 45 54 20 44 49 45 20 53 |R) BEENDET DIE S|
00002590: 43 48 4C 45 49 46 45 2E 22 00 AB 2D ED 08 8D 37 |CHLEIFE."..-...7|
000025A0: 3A 99 22 13 11 11 1F 1D 1D 22 3B 00 C2 2D F2 08 |:."......";..-..|
000025B0: 53 4E 24 B2 22 30 32 33 30 30 22 3A 89 36 33 33 |SN$."02300":.633|
000025C0: 30 30 00 CD 2D FC 08 8D 36 30 30 30 30 00 F5 2D |00..-...60000..-|
000025D0: FD 08 97 42 44 2C 36 3A 97 42 4B 2C 36 3A 99 22 |...BD,6:.BK,6:."|
000025E0: 05 22 3A 99 22 93 22 A3 31 35 29 22 53 43 48 52 |.":.".".15)"SCHR|
000025F0: 49 54 54 45 3A 00 2E 2E 06 09 99 22 11 11 11 9E |ITTE:......"....|
00002600: 22 4C 24 22 20 49 4E 20 44 45 4E 20 42 49 53 48 |"L$" IN DEN BISH|
00002610: 45 52 49 47 45 4E 20 42 45 49 53 50 49 45 4C 45 |ERIGEN BEISPIELE|
00002620: 4E 20 57 41 43 48 53 45 4E 20 20 20 22 3B 00 62 |N WACHSEN ";.b|
00002630: 2E 10 09 99 4C 24 22 20 44 49 45 20 5A 41 48 4C |....L$" DIE ZAHL|
00002640: 45 4E 20 4E 55 52 20 49 4E 20 45 49 4E 45 52 2D |EN NUR IN EINER-|
00002650: 53 43 48 52 49 54 54 45 4E 2E 20 20 20 20 20 22 |SCHRITTEN. "|
00002660: 4C 24 00 99 2E 1A 09 99 22 11 05 22 4C 24 22 20 |L$......".."L$" |
00002670: 55 4D 20 49 4E 20 41 4E 44 45 52 45 4E 20 53 43 |UM IN ANDEREN SC|
00002680: 48 52 49 54 54 45 4E 20 5A 55 20 57 41 43 48 53 |HRITTEN ZU WACHS|
00002690: 45 4E 20 4F 44 45 52 22 3B 00 CC 2E 24 09 99 4C |EN ODER";...$..L|
000026A0: 24 22 20 5A 55 20 46 41 4C 4C 45 4E 2C 20 49 53 |$" ZU FALLEN, IS|
000026B0: 54 20 44 49 45 20 53 43 48 52 49 54 54 57 45 49 |T DIE SCHRITTWEI|
000026C0: 54 45 20 57 49 45 20 20 20 20 22 3B 00 07 2F 2E |TE WIE ";../.|
000026D0: 09 99 4C 24 22 20 46 4F 4C 47 54 20 48 49 4E 5A |..L$" FOLGT HINZ|
000026E0: 55 5A 55 46 55 45 47 45 4E 3A 20 20 20 20 20 20 |UZUFUEGEN: |
000026F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4C 24 | "L$|
00002700: 3A 8D 36 33 30 30 30 00 47 2F 60 09 99 22 93 12 |:.63000.G/`.."..|
00002710: 1C 20 20 20 20 20 20 20 20 20 20 20 20 20 53 43 |. SC|
00002720: 48 52 49 54 54 57 45 49 54 45 4E 20 20 20 20 20 |HRITTWEITEN |
00002730: 20 20 20 20 20 20 20 20 20 22 3A 97 42 4B 2C 31 | ":.BK,1|
00002740: 35 3A 97 42 44 2C 36 00 76 2F 62 09 99 22 11 1C |5:.BD,6.v/b.."..|
00002750: 46 4F 52 53 41 3D 31 30 30 54 4F 32 30 30 20 53 |FORSA=100TO200 S|
00002760: 54 45 50 35 3A 50 52 49 4E 54 20 53 41 3B 3A 4E |TEP5:PRINT SA;:N|
00002770: 45 58 54 20 53 41 00 89 2F 65 09 99 22 11 11 11 |EXT SA../e.."...|
00002780: 11 11 11 11 11 1C 22 4C 24 00 BA 2F 6A 09 99 22 |......"L$../j.."|
00002790: 1C D1 1F 44 52 55 45 43 4B 45 4E 20 53 49 45 20 |...DRUECKEN SIE |
000027A0: 52 45 54 55 52 4E 20 55 4E 44 20 42 45 4F 42 41 |RETURN UND BEOBA|
000027B0: 43 48 54 45 4E 20 53 49 45 2E 00 E7 2F 74 09 99 |CHTEN SIE.../t..|
000027C0: 22 11 1C D1 1F 44 49 45 20 53 43 48 52 49 54 54 |"....DIE SCHRITT|
000027D0: 57 45 49 54 45 20 4B 41 4E 4E 20 41 55 43 48 20 |WEITE KANN AUCH |
000027E0: 4B 4C 45 49 4E 45 52 00 11 30 7E 09 99 22 20 41 |KLEINER..0~.." A|
000027F0: 4C 53 20 45 49 4E 53 20 53 45 49 4E 2C 20 5A 2E |LS EINS SEIN, Z.|
00002800: 42 2E 20 31 2F 32 2E 20 44 41 4E 4E 20 4D 55 53 |B. 1/2. DANN MUS|
00002810: 53 00 41 30 83 09 99 22 20 4D 41 4E 20 44 49 45 |S.A0..." MAN DIE|
00002820: 53 20 57 49 45 20 46 4F 4C 47 54 20 53 43 48 52 |S WIE FOLGT SCHR|
00002830: 45 49 42 45 4E 3A 20 1C 53 54 45 50 2E 35 1F 20 |EIBEN: .STEP.5. |
00002840: 2E 00 8D 30 88 09 99 22 11 1C D1 1F 48 4F 43 48 |...0..."....HOCH|
00002850: 47 45 48 45 4E 2C 20 45 49 4E 45 20 4C 45 45 52 |GEHEN, EINE LEER|
00002860: 53 54 45 4C 4C 45 20 45 49 4E 46 55 45 47 45 4E |STELLE EINFUEGEN|
00002870: 2C 20 20 20 45 49 4E 54 49 50 50 45 4E 20 55 4E |, EINTIPPEN UN|
00002880: 44 20 4C 4F 53 20 47 45 48 54 27 53 2E 00 9F 30 |D LOS GEHT'S...0|
00002890: B5 09 8D 37 3A 99 22 13 11 11 1F 1D 1D 22 3B 00 |...7:."......";.|
000028A0: B6 30 BA 09 53 4E 24 B2 22 30 32 35 30 30 22 3A |.0..SN$."02500":|
000028B0: 89 36 33 33 30 30 00 F0 30 C4 09 8D 36 30 30 30 |.63300..0...6000|
000028C0: 30 3A 99 22 93 12 1C 20 20 20 20 20 20 20 20 20 |0:."... |
000028D0: 20 20 20 20 53 43 48 52 49 54 54 57 45 49 54 45 | SCHRITTWEITE|
000028E0: 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |N "|
000028F0: 00 1E 31 C6 09 99 22 11 1C 46 4F 52 53 41 3D 32 |..1..."..FORSA=2|
00002900: 30 30 54 4F 31 20 53 54 45 50 2D 35 3A 50 52 49 |00TO1 STEP-5:PRI|
00002910: 4E 54 20 53 41 3B 3A 4E 45 58 54 20 53 41 00 31 |NT SA;:NEXT SA.1|
00002920: 31 C9 09 99 22 11 11 11 11 11 11 11 11 1C 22 4C |1..."........."L|
00002930: 24 00 5D 31 CE 09 99 22 11 1C D1 1F 49 4E 20 44 |$.]1..."....IN D|
00002940: 49 45 53 45 4D 20 42 45 49 53 50 49 45 4C 20 53 |IESEM BEISPIEL S|
00002950: 54 41 52 54 45 54 20 53 41 20 4D 49 54 00 86 31 |TARTET SA MIT..1|
00002960: D8 09 99 22 20 45 49 4E 45 4D 20 48 4F 48 45 4E |..." EINEM HOHEN|
00002970: 20 41 4E 46 41 4E 47 53 57 45 52 54 20 55 4E 44 | ANFANGSWERT UND|
00002980: 20 4E 49 4D 4D 54 00 AF 31 E2 09 99 22 20 4D 49 | NIMMT..1..." MI|
00002990: 54 20 45 49 4E 45 52 20 53 43 48 52 49 54 54 57 |T EINER SCHRITTW|
000029A0: 45 49 54 45 20 56 4F 4E 20 2D 35 20 41 42 2E 00 |EITE VON -5 AB..|
000029B0: C8 31 EC 09 99 22 11 1C D1 1F 49 43 48 20 42 49 |.1..."....ICH BI|
000029C0: 4E 20 53 54 41 52 4B 21 00 DA 31 19 0A 8D 37 3A |N STARK!..1...7:|
000029D0: 99 22 13 11 11 1F 1D 1D 22 3B 00 F1 31 1E 0A 53 |."......";..1..S|
000029E0: 4E 24 B2 22 30 33 30 30 30 22 3A 89 36 33 33 30 |N$."03000":.6330|
000029F0: 30 00 2B 32 B8 0B 8D 36 30 30 30 30 3A 99 22 93 |0.+2...60000:.".|
00002A00: 12 1C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00002A10: 20 53 43 48 4C 45 49 46 45 4E 20 20 20 20 20 20 | SCHLEIFEN |
00002A20: 20 20 20 20 20 20 20 20 20 20 22 00 4D 32 C2 0B | ".M2..|
00002A30: 99 22 1C 11 46 4F 52 20 53 41 3D 31 54 4F 32 30 |."..FOR SA=1TO20|
00002A40: 3A 50 52 49 4E 54 33 3B 3A 4E 45 58 54 00 79 32 |:PRINT3;:NEXT.y2|
00002A50: CC 0B 99 22 11 11 11 1C 46 4F 52 20 53 41 3D 31 |..."....FOR SA=1|
00002A60: 54 4F 32 30 3A 50 52 49 4E 54 22 43 24 22 33 22 |TO20:PRINT"C$"3"|
00002A70: 43 24 22 3B 3A 4E 45 58 54 00 88 32 D6 0B 99 22 |C$";:NEXT..2..."|
00002A80: 11 11 11 11 1C 22 4C 24 00 B3 32 E0 0B 99 22 1C |....."L$..2...".|
00002A90: D1 1F 57 49 52 20 57 4F 4C 4C 45 4E 20 44 45 4E |..WIR WOLLEN DEN|
00002AA0: 20 55 4E 54 45 52 53 43 48 49 45 44 20 53 45 48 | UNTERSCHIED SEH|
00002AB0: 45 4E 3A 00 E3 32 EA 0B 99 22 11 1C D1 1F 49 4E |EN:..2..."....IN|
00002AC0: 20 44 45 52 20 31 2E 20 5A 45 49 4C 45 20 53 43 | DER 1. ZEILE SC|
00002AD0: 48 52 45 49 42 45 20 49 43 48 20 44 49 45 20 5A |HREIBE ICH DIE Z|
00002AE0: 41 48 4C 00 11 33 F4 0B 99 22 20 33 20 4D 49 54 |AHL..3..." 3 MIT|
00002AF0: 20 31 20 4C 45 45 52 53 54 45 4C 4C 45 20 46 55 | 1 LEERSTELLE FU|
00002B00: 45 52 20 49 48 52 20 56 4F 52 5A 45 49 43 48 45 |ER IHR VORZEICHE|
00002B10: 4E 00 3C 33 FE 0B 99 22 20 28 4C 49 4E 4B 53 29 |N.<3..." (LINKS)|
00002B20: 2E 20 45 49 4E 20 2B 20 57 49 52 44 20 4E 49 43 |. EIN + WIRD NIC|
00002B30: 48 54 20 47 45 44 52 55 43 4B 54 2E 00 6B 33 08 |HT GEDRUCKT..k3.|
00002B40: 0C 99 22 11 1C D1 1F 49 4D 20 5A 57 45 49 54 45 |.."....IM ZWEITE|
00002B50: 4E 20 42 45 49 53 50 49 45 4C 20 53 43 48 52 45 |N BEISPIEL SCHRE|
00002B60: 49 42 45 20 49 43 48 20 44 41 53 00 9D 33 12 0C |IBE ICH DAS..3..|
00002B70: 99 22 20 5A 45 49 43 48 45 4E 20 33 20 41 4C 53 |." ZEICHEN 3 ALS|
00002B80: 20 53 54 52 49 4E 47 20 28 5A 57 49 53 43 48 45 | STRING (ZWISCHE|
00002B90: 4E 20 22 43 24 22 20 22 43 24 22 29 2E 00 AF 33 |N "C$" "C$")...3|
00002BA0: 26 0C 8D 37 3A 99 22 13 11 11 90 1D 1D 22 3B 00 |&..7:."......";.|
00002BB0: C6 33 30 0C 53 4E 24 B2 22 30 33 31 33 30 22 3A |.30.SN$."03130":|
00002BC0: 89 36 33 33 30 30 00 02 34 3A 0C 8D 36 30 30 30 |.63300..4:..6000|
00002BD0: 30 3A 99 22 13 13 93 12 1C 20 20 20 20 20 20 20 |0:."..... |
00002BE0: 20 20 20 20 20 20 20 20 20 53 43 48 4C 45 49 46 | SCHLEIF|
00002BF0: 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |EN |
00002C00: 20 22 00 2E 34 44 0C 99 22 11 11 1C 46 4F 52 20 | "..4D.."...FOR |
00002C10: 53 41 3D 31 54 4F 31 32 30 3A 50 52 49 4E 54 22 |SA=1TO120:PRINT"|
00002C20: 43 24 22 D3 22 43 24 22 3B 3A 4E 45 58 54 00 3B |C$"."C$";:NEXT.;|
00002C30: 34 4E 0C 99 22 11 11 1C 22 4C 24 00 67 34 58 0C |4N.."..."L$.g4X.|
00002C40: 99 22 11 1C D1 1F 44 41 53 20 4F 42 45 52 45 20 |."....DAS OBERE |
00002C50: 46 45 4E 53 54 45 52 20 53 4F 4C 4C 20 4D 49 54 |FENSTER SOLL MIT|
00002C60: 20 48 45 52 5A 45 4E 00 7F 34 5D 0C 99 22 20 47 | HERZEN..4].." G|
00002C70: 45 46 55 45 4C 4C 54 20 57 45 52 44 45 4E 2E 00 |EFUELLT WERDEN..|
00002C80: A4 34 62 0C 99 22 11 1C D1 1F 46 37 20 42 52 49 |.4b.."....F7 BRI|
00002C90: 4E 47 54 20 53 49 45 20 49 4D 4D 45 52 20 49 4E |NGT SIE IMMER IN|
00002CA0: 20 44 45 52 00 BB 34 67 0C 99 22 20 4C 45 4B 54 | DER..4g.." LEKT|
00002CB0: 49 4F 4E 20 57 45 49 54 45 52 2E 00 CE 34 71 0C |ION WEITER...4q.|
00002CC0: 8D 37 3A 99 22 13 11 11 11 1F 1D 1D 22 3B 00 E5 |.7:.".......";..|
00002CD0: 34 76 0C 53 4E 24 B2 22 30 33 32 30 30 22 3A 89 |4v.SN$."03200":.|
00002CE0: 36 33 33 30 30 00 F0 34 80 0C 8D 36 30 30 30 30 |63300..4...60000|
00002CF0: 00 1E 35 81 0C 97 42 44 2C 36 3A 97 42 4B 2C 36 |..5...BD,6:.BK,6|
00002D00: 3A 99 22 05 22 3A 99 22 93 20 20 20 20 20 20 20 |:.".":.". |
00002D10: 20 20 20 20 20 20 20 20 20 20 50 4F 4B 45 00 4F | POKE.O|
00002D20: 35 82 0C 99 22 11 9E D1 05 44 49 45 53 20 49 53 |5..."....DIES IS|
00002D30: 54 20 45 49 4E 20 41 4E 44 45 52 45 52 20 42 41 |T EIN ANDERER BA|
00002D40: 53 49 43 2D 44 45 46 45 48 4C 2C 20 44 45 4E 00 |SIC-DEFEHL, DEN.|
00002D50: 7A 35 84 0C 99 22 20 49 43 48 20 56 45 52 53 54 |z5..." ICH VERST|
00002D60: 45 48 45 2C 20 45 52 20 42 45 44 45 55 54 45 54 |EHE, ER BEDEUTET|
00002D70: 20 53 43 48 52 45 49 42 45 2E 00 B1 35 86 0C 99 | SCHREIBE...5...|
00002D80: 22 11 9E 22 4C 24 22 20 20 20 44 45 52 20 42 45 |".."L$" DER BE|
00002D90: 46 45 48 4C 20 48 45 49 53 53 54 20 50 4F 4B 45 |FEHL HEISST POKE|
00002DA0: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |. "|
00002DB0: 3B 00 E1 35 88 0C 99 22 20 20 20 20 20 20 20 20 |;..5..." |
00002DC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002DD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002DE0: 22 00 12 36 8A 0C 99 22 9E D1 05 43 20 36 34 20 |"..6..."...C 64 |
00002DF0: 42 45 44 45 55 54 45 54 2C 20 49 43 48 20 48 41 |BEDEUTET, ICH HA|
00002E00: 42 45 20 36 34 4B 20 28 4B 49 4C 4F 29 20 42 59 |BE 64K (KILO) BY|
00002E10: 54 45 00 3E 36 8C 0C 99 22 91 20 53 50 45 49 43 |TE.>6...". SPEIC|
00002E20: 48 45 52 20 28 47 41 4E 5A 20 47 45 4E 41 55 20 |HER (GANZ GENAU |
00002E30: 20 32 5E 31 36 3D 36 35 35 33 36 29 2E 22 00 75 | 2^16=65536).".u|
00002E40: 36 8E 0C 99 22 11 9F 22 4C 24 22 A0 53 49 45 20 |6...".."L$".SIE |
00002E50: 4B 4F 45 4E 4E 45 4E 20 49 4E 20 4A 45 44 45 20 |KOENNEN IN JEDE |
00002E60: 44 49 45 53 45 52 20 36 35 35 33 36 20 5A 45 4C |DIESER 65536 ZEL|
00002E70: 4C 45 4E 22 3B 00 A8 36 90 0C 99 4C 24 22 20 53 |LEN";..6...L$" S|
00002E80: 43 48 52 45 49 42 45 4E 20 4F 44 45 52 20 27 50 |CHREIBEN ODER 'P|
00002E90: 4F 4B 45 4E 27 2E 20 20 20 20 20 20 20 20 20 20 |OKEN'. |
00002EA0: 20 20 20 20 20 20 9E 22 00 DB 36 92 0C 99 4C 24 | ."..6...L$|
00002EB0: 22 20 41 42 45 52 20 49 43 48 20 53 54 45 4C 4C |" ABER ICH STELL|
00002EC0: 45 20 42 45 44 49 4E 47 55 4E 47 45 4E 3A 20 20 |E BEDINGUNGEN: |
00002ED0: 20 20 20 20 20 20 20 20 20 22 3B 00 0E 37 94 0C | ";..7..|
00002EE0: 99 4C 24 22 20 44 49 45 20 5A 41 48 4C 2C 20 44 |.L$" DIE ZAHL, D|
00002EF0: 49 45 20 47 45 50 4F 4B 45 54 20 57 45 52 44 45 |IE GEPOKET WERDE|
00002F00: 4E 20 4B 41 4E 4E 2C 20 4D 55 53 53 22 3B 00 40 |N KANN, MUSS";.@|
00002F10: 37 96 0C 99 4C 24 22 20 5A 57 49 53 43 48 45 4E |7...L$" ZWISCHEN|
00002F20: 20 30 20 55 4E 44 20 32 35 35 20 28 32 5E 38 2D | 0 UND 255 (2^8-|
00002F30: 31 29 20 4C 49 45 47 45 4E 2E 20 20 20 20 20 22 |1) LIEGEN. "|
00002F40: 00 57 37 98 0C 8D 36 33 30 30 30 3A 97 42 44 2C |.W7...63000:.BD,|
00002F50: 36 3A 97 42 4B 2C 36 00 73 37 9B 0C 99 22 93 9E |6:.BK,6.s7..."..|
00002F60: 20 05 57 45 4E 4E 20 4D 20 3D 20 53 50 45 49 43 | .WENN M = SPEIC|
00002F70: 48 45 52 00 8D 37 9C 0C 99 22 11 20 55 4E 44 1D |HER..7...". UND.|
00002F80: 20 4E 20 3D 20 5A 41 48 4C 20 20 9E 22 00 AA 37 | N = ZAHL ."..7|
00002F90: A1 0C 99 22 13 22 A3 31 39 29 22 12 20 20 20 20 |...".".19)". |
00002FA0: 20 20 20 20 20 20 20 20 20 22 00 C4 37 A4 0C 99 | "..7...|
00002FB0: A3 31 39 29 22 12 20 20 20 50 4F 4B 45 20 4D 2C |.19)". POKE M,|
00002FC0: 4E 20 20 22 00 DE 37 A7 0C 99 A3 31 39 29 22 12 |N "..7....19)".|
00002FD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 0E | "..|
00002FE0: 38 A8 0C 99 22 11 20 20 28 53 43 48 52 45 49 42 |8...". (SCHREIB|
00002FF0: 45 20 45 49 4E 45 20 5A 41 48 4C 20 49 4E 20 44 |E EINE ZAHL IN D|
00003000: 45 4E 20 53 50 45 49 43 48 45 52 29 11 22 00 42 |EN SPEICHER).".B|
00003010: 38 AA 0C 99 4C 24 22 20 20 20 57 4F 42 45 49 20 |8...L$" WOBEI |
00003020: 30 3D 3C 4D 3C 3D 36 35 35 33 35 20 20 20 20 20 |0=<M<=65535 |
00003030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00003040: 4C 24 00 7D 38 AB 0C 99 22 91 05 A5 22 3A 99 47 |L$.}8..."...":.G|
00003050: 24 22 45 53 20 42 45 44 45 55 54 45 54 20 4D 20 |$"ES BEDEUTET M |
00003060: 49 53 54 20 47 52 4F 45 53 53 45 52 20 4F 44 45 |IST GROESSER ODE|
00003070: 52 20 47 4C 45 49 43 48 22 3A 99 47 24 00 A8 38 |R GLEICH":.G$..8|
00003080: AC 0C 99 47 24 22 30 20 55 4E 44 20 4B 4C 45 49 |...G$"0 UND KLEI|
00003090: 4E 45 52 20 4F 44 45 52 20 47 4C 45 49 43 48 20 |NER ODER GLEICH |
000030A0: 36 35 35 33 35 20 9E 22 00 B8 38 AD 0C 99 47 24 |65535 ."..8...G$|
000030B0: 22 9E 12 9D 22 4C 24 3B 00 EA 38 AE 0C 99 22 20 |"..."L$;..8..." |
000030C0: 20 20 55 4E 44 20 20 20 30 3D 3C 4E 3C 3D 32 35 | UND 0=<N<=25|
000030D0: 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |5 |
000030E0: 20 20 20 20 20 20 20 22 4C 24 00 1F 39 AF 0C 99 | "L$..9...|
000030F0: 22 91 05 A5 22 3A 99 47 24 22 44 49 45 20 42 45 |"...":.G$"DIE BE|
00003100: 44 45 55 54 55 4E 47 20 49 53 54 20 57 49 45 20 |DEUTUNG IST WIE |
00003110: 4F 42 45 4E 20 20 20 20 20 20 22 3A 99 47 24 00 |OBEN ":.G$.|
00003120: 2F 39 B0 0C 99 47 24 22 9F 12 9D 22 4C 24 3B 00 |/9...G$"..."L$;.|
00003130: 60 39 B1 0C 99 22 20 20 48 41 4C 54 45 4E 20 53 |`9..." HALTEN S|
00003140: 49 45 20 53 49 43 48 20 4E 49 43 48 54 20 44 41 |IE SICH NICHT DA|
00003150: 52 41 4E 2C 20 47 49 42 54 20 45 53 20 20 22 3B |RAN, GIBT ES ";|
00003160: 00 99 39 B3 0C 99 4C 24 22 20 20 20 20 20 3F 49 |..9...L$" ?I|
00003170: 4C 4C 45 47 41 4C 20 51 55 41 4E 54 49 54 59 20 |LLEGAL QUANTITY |
00003180: 45 52 52 4F 52 20 20 20 20 20 20 20 20 20 20 20 |ERROR |
00003190: 20 22 3A 8D 36 33 30 30 30 00 D3 39 21 0D 97 42 | ":.63000..9!..B|
000031A0: 4B 2C 31 35 3A 99 22 93 12 1F 20 20 20 20 20 20 |K,15:."... |
000031B0: 20 20 20 20 20 20 20 20 20 20 50 4F 4B 45 20 20 | POKE |
000031C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000031D0: 20 20 22 00 E7 39 2A 0D 99 22 1C 11 50 4F 4B 45 | "..9*.."..POKE|
000031E0: 35 33 32 38 30 2C 35 00 FC 39 34 0D 99 22 1C 11 |53280,5..94.."..|
000031F0: 11 50 4F 4B 45 35 33 32 38 31 2C 35 00 09 3A 3E |.POKE53281,5..:>|
00003200: 0D 99 22 11 11 1C 22 4C 24 00 39 3A 48 0D 99 22 |.."..."L$.9:H.."|
00003210: 11 1C D1 1F 49 43 48 20 42 45 48 41 4C 54 45 20 |....ICH BEHALTE |
00003220: 44 49 45 20 52 41 48 4D 45 4E 46 41 52 42 45 20 |DIE RAHMENFARBE |
00003230: 49 4E 20 4D 45 49 4E 45 52 00 56 3A 52 0D 99 22 |IN MEINER.V:R.."|
00003240: 20 41 44 52 45 53 53 45 20 4E 55 4D 4D 45 52 20 | ADRESSE NUMMER |
00003250: 35 33 32 38 30 2E 00 83 3A 5C 0D 99 22 11 1C D1 |53280...:\.."...|
00003260: 1F 57 45 4E 4E 20 53 49 45 20 48 49 45 52 20 45 |.WENN SIE HIER E|
00003270: 49 4E 45 20 5A 41 48 4C 20 5A 57 49 53 43 48 45 |INE ZAHL ZWISCHE|
00003280: 4E 20 30 00 AF 3A 66 0D 99 22 20 55 4E 44 20 31 |N 0..:f.." UND 1|
00003290: 35 20 50 4F 4B 45 4E 2C 20 57 45 43 48 53 4C 45 |5 POKEN, WECHSLE|
000032A0: 20 49 43 48 20 44 49 45 20 46 41 52 42 45 2E 00 | ICH DIE FARBE..|
000032B0: DA 3A 70 0D 99 22 11 1C D1 1F 49 4E 20 44 45 52 |.:p.."....IN DER|
000032C0: 20 41 44 52 45 53 53 45 20 35 33 32 38 31 20 42 | ADRESSE 53281 B|
000032D0: 45 48 41 4C 54 45 20 49 43 48 00 06 3B 75 0D 99 |EHALTE ICH..;u..|
000032E0: 22 20 44 49 45 20 48 49 4E 54 45 52 47 52 55 4E |" DIE HINTERGRUN|
000032F0: 44 46 41 52 42 45 2E 20 54 45 53 54 45 4E 20 53 |DFARBE. TESTEN S|
00003300: 49 45 20 45 53 2E 00 25 3B 7A 0D 99 22 11 11 9B |IE ES..%;z.."...|
00003310: 20 20 20 20 20 20 20 20 57 45 49 54 45 52 20 4D | WEITER M|
00003320: 49 54 20 46 37 00 37 3B 8E 0D 8D 37 3A 99 22 13 |IT F7.7;...7:.".|
00003330: 11 11 1F 1D 1D 22 3B 00 4E 3B 98 0D 53 4E 24 B2 |.....";.N;..SN$.|
00003340: 22 30 33 35 30 30 22 3A 89 36 33 33 30 30 00 65 |"03500":.63300.e|
00003350: 3B AC 0D 8D 36 30 30 30 30 3A 97 42 4B 2C 32 3A |;...60000:.BK,2:|
00003360: 97 42 44 2C 32 00 9A 3B B6 0D 99 22 93 11 11 11 |.BD,2..;..."....|
00003370: 11 05 56 45 52 42 49 4E 44 45 4E 20 57 49 52 20 |..VERBINDEN WIR |
00003380: 53 43 48 4C 45 49 46 45 4E 20 4D 49 54 20 50 4F |SCHLEIFEN MIT PO|
00003390: 4B 45 22 3A 8D 36 33 30 30 30 00 DA 3B D4 0D 97 |KE":.63000..;...|
000033A0: 42 44 2C 36 3A 97 42 4B 2C 31 35 3A 99 22 93 12 |BD,6:.BK,15:."..|
000033B0: 1F 20 20 20 20 20 20 20 20 20 46 41 52 42 45 20 |. FARBE |
000033C0: 55 4E 44 20 53 43 48 4C 45 49 46 45 20 20 20 20 |UND SCHLEIFE |
000033D0: 20 20 20 20 20 20 20 20 20 22 00 02 3C DE 0D 99 | "..<...|
000033E0: 22 1C 11 11 46 4F 52 20 53 41 3D 30 54 4F 31 35 |"...FOR SA=0TO15|
000033F0: 3A 50 4F 4B 45 35 33 32 38 30 2C 53 41 3A 4E 45 |:POKE53280,SA:NE|
00003400: 58 54 00 11 3C E8 0D 99 22 11 11 11 11 1C 22 4C |XT..<..."....."L|
00003410: 24 00 3E 3C F2 0D 99 22 11 11 11 11 1C D1 1F 44 |$.><...".......D|
00003420: 49 45 53 20 5A 45 49 47 54 20 41 4C 4C 45 20 52 |IES ZEIGT ALLE R|
00003430: 41 48 4D 45 4E 46 41 52 42 45 4E 2E 2E 2E 00 5D |AHMENFARBEN....]|
00003440: 3C FC 0D 99 22 11 20 46 41 52 42 45 4E 20 55 45 |<...". FARBEN UE|
00003450: 42 45 52 20 46 41 52 42 45 4E 2E 2E 2E 00 70 3C |BER FARBEN....p<|
00003460: 10 0E 8D 37 3A 99 22 13 11 11 11 1F 1D 1D 22 3B |...7:.".......";|
00003470: 00 87 3C 1A 0E 53 4E 24 B2 22 30 33 36 33 30 22 |..<..SN$."03630"|
00003480: 3A 89 36 33 33 30 30 00 9E 3C 2E 0E 8D 36 30 30 |:.63300..<...600|
00003490: 30 30 3A 97 42 4B 2C 36 3A 97 42 44 2C 36 00 CB |00:.BK,6:.BD,6..|
000034A0: 3C 38 0E 99 22 13 13 93 11 11 11 11 05 44 41 53 |<8.."........DAS|
000034B0: 20 57 41 52 20 57 4F 48 4C 20 5A 55 20 53 43 48 | WAR WOHL ZU SCH|
000034C0: 4E 45 4C 4C 2C 20 4F 44 45 52 3F 00 DC 3C 42 0E |NELL, ODER?..<B.|
000034D0: 81 20 49 B2 31 A4 31 30 30 30 3A 82 00 F1 3C 4C |. I.1.1000:...<L|
000034E0: 0E 99 43 24 28 38 29 22 1D 1D 1D 1D 1D 1D 57 49 |..C$(8)"......WI|
000034F0: 52 00 02 3D 56 0E 81 20 49 B2 31 A4 31 30 30 30 |R..=V.. I.1.1000|
00003500: 3A 82 00 20 3D 60 0E 99 43 24 28 38 29 22 1D 1D |:.. =`..C$(8)"..|
00003510: 1D 1D 1D 1D 57 49 52 20 42 52 41 55 43 48 45 4E |....WIR BRAUCHEN|
00003520: 00 31 3D 6A 0E 81 20 49 B2 31 A4 31 30 30 30 3A |.1=j.. I.1.1000:|
00003530: 82 00 57 3D 74 0E 99 43 24 28 38 29 42 45 24 22 |..W=t..C$(8)BE$"|
00003540: 1D 1D 1D 1D 1D 1D 57 49 52 20 42 52 41 55 43 48 |......WIR BRAUCH|
00003550: 45 4E 20 45 49 4E 45 00 68 3D 7E 0E 81 20 49 B2 |EN EINE.h=~.. I.|
00003560: 31 A4 31 30 30 30 3A 82 00 93 3D 88 0E 99 43 24 |1.1000:...=...C$|
00003570: 28 38 29 42 45 24 22 1D 1D 1D 1D 1D 1D 57 49 52 |(8)BE$"......WIR|
00003580: 20 42 52 41 55 43 48 45 4E 20 45 49 4E 45 20 42 | BRAUCHEN EINE B|
00003590: 52 45 4D 00 A4 3D 92 0E 81 20 49 B2 31 A4 31 30 |REM..=... I.1.10|
000035A0: 30 30 3A 82 00 D2 3D 9C 0E 99 43 24 28 38 29 42 |00:...=...C$(8)B|
000035B0: 45 24 22 1D 1D 1D 1D 1D 1D 57 49 52 20 42 52 41 |E$"......WIR BRA|
000035C0: 55 43 48 45 4E 20 45 49 4E 45 20 42 52 45 4D 53 |UCHEN EINE BREMS|
000035D0: 45 21 00 E3 3D A6 0E 81 20 49 B2 31 A4 31 30 30 |E!..=... I.1.100|
000035E0: 30 3A 82 00 1D 3E B0 0E 99 42 45 24 22 11 11 11 |0:...>...BE$"...|
000035F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 41 5A 55 20 5A 41 |.........DAZU ZA|
00003600: 45 48 4C 45 20 49 43 48 20 4D 41 4C 20 45 49 4E |EHLE ICH MAL EIN|
00003610: 46 41 43 48 2E 22 3A 8D 36 33 30 30 30 00 57 3E |FACH.":.63000.W>|
00003620: CE 0E 99 22 93 12 1C 20 20 20 20 20 20 20 20 20 |..."... |
00003630: 20 20 20 20 57 41 52 54 45 53 43 48 4C 45 49 46 | WARTESCHLEIF|
00003640: 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |EN "|
00003650: 3A 97 42 4B 2C 31 35 00 94 3E D8 0E 99 22 11 46 |:.BK,15..>...".F|
00003660: 4F 52 20 53 41 3D 30 54 4F 31 35 3A 50 4F 4B 45 |OR SA=0TO15:POKE|
00003670: 35 33 32 38 30 2C 53 41 3A 90 46 4F 52 4A 3D 31 |53280,SA:.FORJ=1|
00003680: 54 4F 31 35 30 3A 4E 45 58 54 4A 3A 1C 4E 45 58 |TO150:NEXTJ:.NEX|
00003690: 54 20 53 41 00 A2 3E E2 0E 99 22 11 11 11 1C 22 |T SA..>..."...."|
000036A0: 4C 24 00 D2 3E E4 0E 99 22 1C D1 1F 45 49 4E 45 |L$..>..."...EINE|
000036B0: 20 57 45 49 54 45 52 45 20 53 43 48 4C 45 49 46 | WEITERE SCHLEIF|
000036C0: 45 3A 20 44 49 45 20 4A 2D 53 43 48 4C 45 49 46 |E: DIE J-SCHLEIF|
000036D0: 45 2E 00 03 3F E5 0E 99 22 11 1C D1 1F 44 49 45 |E...?..."....DIE|
000036E0: 20 4A 2D 53 43 48 4C 45 49 46 45 20 4C 49 45 47 | J-SCHLEIFE LIEG|
000036F0: 54 20 49 4E 4E 45 52 48 41 4C 42 20 44 45 52 20 |T INNERHALB DER |
00003700: 53 41 2D 00 2F 3F E6 0E 99 22 20 53 43 48 4C 45 |SA-./?..." SCHLE|
00003710: 49 46 45 2E 20 49 43 48 20 5A 41 45 48 4C 45 20 |IFE. ICH ZAEHLE |
00003720: 4A 45 57 45 49 4C 53 20 53 43 48 4E 45 4C 4C 00 |JEWEILS SCHNELL.|
00003730: 3F 3F E7 0E 99 22 20 42 49 53 20 31 35 30 2E 00 |??..." BIS 150..|
00003740: 6F 3F E8 0E 99 22 11 1C D1 1F 1C 53 49 45 1F 20 |o?...".....SIE. |
00003750: 4B 4F 45 4E 4E 45 4E 20 4E 55 4E 20 44 49 45 20 |KOENNEN NUN DIE |
00003760: 57 41 52 54 45 5A 45 49 54 20 44 55 52 43 48 00 |WARTEZEIT DURCH.|
00003770: A7 3F E9 0E 99 22 20 41 45 4E 44 45 52 4E 20 44 |.?..." AENDERN D|
00003780: 45 52 20 57 45 52 54 45 20 44 45 52 20 4A 2D 53 |ER WERTE DER J-S|
00003790: 43 48 4C 45 49 46 45 20 42 45 2D 20 20 20 20 53 |CHLEIFE BE- S|
000037A0: 54 49 4D 4D 45 4E 2E 00 D7 3F EA 0E 99 22 11 1C |TIMMEN...?..."..|
000037B0: D1 1F 44 49 45 20 55 45 42 55 4E 47 53 5A 45 49 |..DIE UEBUNGSZEI|
000037C0: 4C 45 20 4B 41 4E 4E 20 41 55 53 20 5A 57 45 49 |LE KANN AUS ZWEI|
000037D0: 20 5A 45 49 4C 45 4E 00 0E 40 EB 0E 99 22 20 42 | ZEILEN..@..." B|
000037E0: 45 53 54 45 48 45 4E 2E 20 4D 41 4E 20 4E 45 4E |ESTEHEN. MAN NEN|
000037F0: 4E 54 20 53 49 45 20 27 4C 4F 47 49 53 43 48 45 |NT SIE 'LOGISCHE|
00003800: 20 20 20 20 20 20 20 5A 45 49 4C 45 27 2E 00 21 | ZEILE'..!|
00003810: 40 32 0F 8D 37 3A 99 22 13 11 11 1C 1D 1D 1D 22 |@2..7:."......."|
00003820: 3B 00 38 40 37 0F 53 4E 24 B2 22 30 33 39 30 30 |;.8@7.SN$."03900|
00003830: 22 3A 89 36 33 33 30 30 00 4F 40 3C 0F 8D 36 30 |":.63300.O@<..60|
00003840: 30 30 30 3A 97 42 44 2C 36 3A 97 42 4B 2C 36 00 |000:.BD,6:.BK,6.|
00003850: 89 40 5A 0F 99 22 93 11 11 11 9E 22 4C 24 22 20 |.@Z.."....."L$" |
00003860: 20 4D 49 54 20 44 45 4E 20 5A 45 4C 4C 45 4E 20 | MIT DEN ZELLEN |
00003870: 35 33 32 38 30 20 55 4E 44 20 35 33 32 38 31 20 |53280 UND 53281 |
00003880: 20 20 20 20 20 20 20 22 3B 00 BC 40 5C 0F 99 4C | ";..@\..L|
00003890: 24 22 20 20 42 45 53 54 49 4D 4D 45 20 49 43 48 |$" BESTIMME ICH|
000038A0: 20 44 49 45 20 46 41 52 42 45 4E 20 44 45 53 20 | DIE FARBEN DES |
000038B0: 52 41 4E 44 45 53 20 20 20 20 22 3B 00 F0 40 5E |RANDES ";..@^|
000038C0: 0F 99 4C 24 22 20 20 55 4E 44 20 44 45 53 20 48 |..L$" UND DES H|
000038D0: 49 4E 54 45 52 47 52 55 4E 44 45 53 2E 20 20 20 |INTERGRUNDES. |
000038E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4C 24 | "L$|
000038F0: 00 29 41 60 0F 99 22 11 11 11 9F 22 4C 24 22 20 |.)A`.."...."L$" |
00003900: 20 4D 49 54 20 44 45 52 20 5A 45 4C 4C 45 20 36 | MIT DER ZELLE 6|
00003910: 34 36 20 42 45 53 54 49 4D 4D 45 20 49 43 48 20 |46 BESTIMME ICH |
00003920: 20 20 20 20 20 20 20 22 3B 00 6B 41 62 0F 99 4C | ";.kAb..L|
00003930: 24 22 20 20 44 49 45 20 46 41 52 42 45 20 44 45 |$" DIE FARBE DE|
00003940: 52 20 47 45 53 43 48 52 49 45 42 45 4E 45 4E 20 |R GESCHRIEBENEN |
00003950: 5A 45 49 43 48 45 4E 2E 20 20 22 4C 24 3A 8D 36 |ZEICHEN. "L$:.6|
00003960: 33 30 30 30 3A 97 42 4B 2C 31 35 00 A4 41 69 0F |3000:.BK,15..Ai.|
00003970: 97 42 44 2C 36 3A 99 22 93 12 1C 20 20 20 20 20 |.BD,6:."... |
00003980: 20 4D 41 43 48 45 4E 20 57 49 52 20 45 54 57 41 | MACHEN WIR ETWA|
00003990: 53 20 4C 55 53 54 49 47 45 53 2E 2E 20 20 20 20 |S LUSTIGES.. |
000039A0: 20 20 20 22 00 EC 41 6E 0F 99 22 11 46 4F 52 4A | "..An..".FORJ|
000039B0: 3D 31 54 4F 32 30 3A 46 4F 52 53 3D 30 54 4F 31 |=1TO20:FORS=0TO1|
000039C0: 36 3A 50 4F 4B 45 36 34 36 2C 53 3A 50 52 49 4E |6:POKE646,S:PRIN|
000039D0: 54 22 43 24 22 12 20 20 20 20 20 22 43 24 22 3B |T"C$". "C$";|
000039E0: 3A 4E 45 58 54 53 3A 4E 45 58 54 4A 00 FB 41 78 |:NEXTS:NEXTJ..Ax|
000039F0: 0F 99 22 11 11 11 11 1C 22 4C 24 00 27 42 7A 0F |.."....."L$.'Bz.|
00003A00: 99 22 11 1C D1 1F 4B 4F 50 49 45 52 45 4E 20 53 |."....KOPIEREN S|
00003A10: 49 45 20 44 49 45 53 45 20 4C 4F 47 49 53 43 48 |IE DIESE LOGISCH|
00003A20: 45 20 5A 45 49 4C 45 00 46 42 7C 0F 99 22 20 55 |E ZEILE.FB|.." U|
00003A30: 4E 54 45 52 20 44 49 45 20 55 45 42 55 4E 47 53 |NTER DIE UEBUNGS|
00003A40: 5A 45 49 4C 45 2E 00 70 42 7E 0F 99 22 11 1C D1 |ZEILE..pB~.."...|
00003A50: 1F 53 49 45 20 4B 4F 45 4E 4E 45 4E 20 41 55 43 |.SIE KOENNEN AUC|
00003A60: 48 20 44 49 45 20 4C 41 45 4E 47 45 20 44 45 53 |H DIE LAENGE DES|
00003A70: 00 A8 42 80 0F 99 22 20 53 54 52 45 49 46 45 4E |..B..." STREIFEN|
00003A80: 53 20 46 55 45 52 20 41 4E 44 45 52 45 20 47 52 |S FUER ANDERE GR|
00003A90: 41 46 49 4B 45 4E 20 20 20 20 20 20 20 20 20 20 |AFIKEN |
00003AA0: 41 45 4E 44 45 52 4E 2E 00 BB 42 E6 0F 8D 37 3A |AENDERN...B...7:|
00003AB0: 99 22 13 11 11 1C 1D 1D 1D 22 3B 00 D2 42 F0 0F |.".......";..B..|
00003AC0: 53 4E 24 B2 22 30 34 31 30 30 22 3A 89 36 33 33 |SN$."04100":.633|
00003AD0: 30 30 00 DD 42 04 10 8D 36 30 30 30 30 00 21 43 |00..B...60000.!C|
00003AE0: 0E 10 97 42 44 2C 36 3A 97 42 4B 2C 36 3A 99 22 |...BD,6:.BK,6:."|
00003AF0: 93 05 22 4C 24 22 20 20 20 20 20 20 20 50 52 4F |.."L$" PRO|
00003B00: 47 52 41 4D 4D 45 20 20 20 20 20 20 20 20 20 20 |GRAMME |
00003B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 4C | "L|
00003B20: 24 00 53 43 23 10 99 22 91 05 A5 22 3A 99 47 24 |$.SC#.."...":.G$|
00003B30: 22 20 41 4C 4C 45 20 55 45 42 55 4E 47 45 4E 20 |" ALLE UEBUNGEN |
00003B40: 42 45 53 54 41 4E 44 45 4E 20 42 49 53 20 4A 45 |BESTANDEN BIS JE|
00003B50: 54 5A 54 00 83 43 24 10 99 47 24 3A 99 47 24 22 |TZT..C$..G$:.G$"|
00003B60: 20 41 55 53 20 45 49 4E 45 52 20 4C 4F 47 49 53 | AUS EINER LOGIS|
00003B70: 43 48 45 4E 20 5A 45 49 4C 45 2C 20 44 49 45 20 |CHEN ZEILE, DIE |
00003B80: 42 49 53 00 AD 43 26 10 99 47 24 3A 99 47 24 22 |BIS..C&..G$:.G$"|
00003B90: 20 12 38 30 20 5A 45 49 43 48 45 4E 20 4C 41 4E | .80 ZEICHEN LAN|
00003BA0: 47 92 20 53 45 49 4E 20 4B 41 4E 4E 2E 00 C1 43 |G. SEIN KANN...C|
00003BB0: 27 10 99 47 24 3A 99 47 24 22 9D 9E 12 22 4C 24 |'..G$:.G$"..."L$|
00003BC0: 3B 00 F2 43 28 10 99 22 20 20 4F 42 57 4F 48 4C |;..C(.." OBWOHL|
00003BD0: 20 4D 41 4E 20 53 43 48 4F 4E 20 4D 49 54 20 45 | MAN SCHON MIT E|
00003BE0: 49 4E 45 52 20 5A 45 49 4C 45 20 56 49 45 4C 20 |INER ZEILE VIEL |
00003BF0: 22 3B 00 25 44 2A 10 99 4C 24 22 20 20 45 52 52 |";.%D*..L$" ERR|
00003C00: 45 49 43 48 45 4E 20 4B 41 4E 4E 2C 20 4B 41 4E |EICHEN KANN, KAN|
00003C10: 4E 20 49 43 48 20 41 55 43 48 20 4D 49 54 20 20 |N ICH AUCH MIT |
00003C20: 20 20 20 22 3B 00 57 44 2B 10 99 4C 24 22 20 20 | ";.WD+..L$" |
00003C30: 4D 45 48 52 45 52 45 4E 20 5A 45 49 4C 45 4E 20 |MEHREREN ZEILEN |
00003C40: 41 52 42 45 49 54 45 4E 2E 20 20 20 20 20 20 20 |ARBEITEN. |
00003C50: 20 20 20 20 20 20 22 00 8D 44 2E 10 99 22 05 22 | "..D..."."|
00003C60: 4C 24 22 20 20 44 41 20 49 43 48 20 4E 55 52 20 |L$" DA ICH NUR |
00003C70: 45 49 4E 45 20 5A 45 49 4C 45 20 41 55 46 20 45 |EINE ZEILE AUF E|
00003C80: 49 4E 4D 41 4C 20 56 45 52 2D 20 22 3B 00 C0 44 |INMAL VER- ";..D|
00003C90: 30 10 99 4C 24 22 20 20 41 52 42 45 49 54 45 4E |0..L$" ARBEITEN|
00003CA0: 20 4B 41 4E 4E 2C 20 42 45 4E 4F 45 54 49 47 45 | KANN, BENOETIGE|
00003CB0: 20 49 43 48 20 45 49 4E 45 20 20 20 20 20 22 3B | ICH EINE ";|
00003CC0: 00 FB 44 31 10 99 4C 24 22 20 20 52 45 49 48 45 |..D1..L$" REIHE|
00003CD0: 4E 46 4F 4C 47 45 20 28 4B 55 52 5A 3A 20 46 4F |NFOLGE (KURZ: FO|
00003CE0: 4C 47 45 29 2E 20 20 20 20 20 20 20 20 20 20 20 |LGE). |
00003CF0: 20 92 22 3B 3A 8D 36 33 30 30 30 00 1D 45 CC 10 | .";:.63000..E..|
00003D00: 99 22 93 22 3A 41 24 B2 22 46 4F 4C 47 45 22 3A |.".":A$."FOLGE":|
00003D10: 97 42 4B 2C 31 35 3A 97 42 44 2C 31 35 00 45 45 |.BK,15:.BD,15.EE|
00003D20: D6 10 42 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..B$."..........|
00003D30: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00003D40: 1D 1D 1D 1D 22 00 52 45 DB 10 81 49 B2 31 A4 34 |....".RE...I.1.4|
00003D50: 30 3A 00 65 45 E0 10 58 B2 B5 28 32 33 AC BB 28 |0:.eE..X..(23..(|
00003D60: 30 29 29 AA 31 00 78 45 E5 10 59 B2 B5 28 33 32 |0)).1.xE..Y..(32|
00003D70: AC BB 28 30 29 29 AA 31 00 8F 45 EA 10 99 C8 28 |..(0)).1..E....(|
00003D80: 42 54 24 2C 58 29 C8 28 42 24 2C 59 29 41 24 00 |BT$,X).(B$,Y)A$.|
00003D90: A8 45 EF 10 97 36 34 36 2C 49 AC 32 3A 81 4A B2 |.E...646,I.2:.J.|
00003DA0: 31 A4 35 30 3A 82 3A 82 00 BD 45 F4 10 81 49 B2 |1.50:.:...E...I.|
00003DB0: 31 A4 32 30 30 30 3A 82 3A 99 22 93 1F 00 F6 45 |1.2000:.:."....E|
00003DC0: FE 10 81 49 B2 31 30 30 A4 33 30 30 A9 31 30 3A |...I.100.300.10:|
00003DD0: 99 49 3B 22 20 47 45 42 45 4E 20 53 49 45 20 4A |.I;" GEBEN SIE J|
00003DE0: 45 44 45 52 20 5A 45 49 4C 45 20 45 49 4E 45 20 |EDER ZEILE EINE |
00003DF0: 4E 55 4D 4D 45 52 00 0D 46 03 11 81 4A B2 31 A4 |NUMMER..F...J.1.|
00003E00: 34 30 3A 82 3A 82 3A 8D 36 33 30 30 30 00 50 46 |40:.:.:.63000.PF|
00003E10: 30 11 97 42 4B 2C 36 3A 97 42 44 2C 36 3A 99 22 |0..BK,6:.BD,6:."|
00003E20: 93 05 22 4C 24 22 20 45 49 4E 45 20 4C 4F 47 49 |.."L$" EINE LOGI|
00003E30: 53 43 48 45 20 5A 45 49 4C 45 20 4D 49 54 20 45 |SCHE ZEILE MIT E|
00003E40: 49 4E 45 52 20 5A 41 48 4C 20 41 4D 20 20 22 3B |INER ZAHL AM ";|
00003E50: 00 84 46 46 11 99 4C 24 22 20 41 4E 46 41 4E 47 |..FF..L$" ANFANG|
00003E60: 20 49 53 54 20 45 49 4E 45 20 50 52 4F 47 52 41 | IST EINE PROGRA|
00003E70: 4D 4D 5A 45 49 4C 45 2E 20 20 20 20 20 20 20 20 |MMZEILE. |
00003E80: 20 22 4C 24 00 BA 46 4A 11 99 22 99 22 4C 24 22 | "L$..FJ.."."L$"|
00003E90: 20 20 45 49 4E 20 50 52 4F 47 52 41 4D 4D 20 42 | EIN PROGRAMM B|
00003EA0: 45 53 54 45 48 54 20 41 55 53 20 56 49 45 4C 45 |ESTEHT AUS VIELE|
00003EB0: 4E 20 4C 4F 2D 20 20 20 22 3B 00 ED 46 4B 11 99 |N LO- ";..FK..|
00003EC0: 4C 24 22 20 20 47 49 53 43 48 45 4E 20 5A 45 49 |L$" GISCHEN ZEI|
00003ED0: 4C 45 4E 2E 20 44 49 45 20 5A 41 48 4C 45 4E 20 |LEN. DIE ZAHLEN |
00003EE0: 47 45 42 45 4E 20 44 49 45 20 20 22 3B 00 21 47 |GEBEN DIE ";.!G|
00003EF0: 4C 11 99 4C 24 22 20 20 42 45 41 52 42 45 49 54 |L..L$" BEARBEIT|
00003F00: 55 4E 47 53 52 45 49 48 45 4E 46 4F 4C 47 45 20 |UNGSREIHENFOLGE |
00003F10: 41 4E 2E 20 20 20 20 20 20 20 20 20 20 20 22 4C |AN. "L|
00003F20: 24 00 5E 47 4D 11 99 22 05 20 22 3A 99 22 20 55 |$.^GM..". ":." U|
00003F30: 4D 1D 45 49 4E 20 50 52 4F 47 52 41 4D 4D 20 20 |M.EIN PROGRAMM |
00003F40: 5A 55 22 3A 99 22 11 20 53 54 41 52 54 45 4E 2C |ZU":.". STARTEN,|
00003F50: 20 47 49 42 54 20 4D 41 4E 20 45 49 4E 3A 00 82 | GIBT MAN EIN:..|
00003F60: 47 4E 11 99 43 24 28 31 30 29 43 31 24 28 33 29 |GN..C$(10)C1$(3)|
00003F70: 3B 3A 99 A3 32 35 29 22 9E 12 20 20 20 20 20 20 |;:..25)".. |
00003F80: 20 22 00 96 47 4F 11 99 A3 32 35 29 22 12 20 20 | "..GO...25)". |
00003F90: 52 55 4E 20 20 22 00 AA 47 50 11 99 A3 32 35 29 |RUN "..GP...25)|
00003FA0: 22 12 20 20 20 20 20 20 20 22 00 E1 47 51 11 99 |". "..GQ..|
00003FB0: 22 11 22 4C 24 22 20 20 20 20 20 20 20 20 20 20 |"."L$" |
00003FC0: 20 55 4E 44 20 44 41 4E 41 43 48 20 20 52 45 54 | UND DANACH RET|
00003FD0: 55 52 4E 20 20 20 20 20 20 20 20 20 20 20 22 4C |URN "L|
00003FE0: 24 00 F9 47 8F 11 8D 36 33 30 30 30 3A 97 42 4B |$..G...63000:.BK|
00003FF0: 2C 31 35 3A 97 42 44 2C 36 00 2C 48 94 11 99 22 |,15:.BD,6.,H..."|
00004000: 93 12 1C 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00004010: 20 45 49 4E 20 50 52 4F 47 52 41 4D 4D 20 20 20 | EIN PROGRAMM |
00004020: 20 20 20 20 20 20 20 20 20 20 20 22 00 4E 48 96 | ".NH.|
00004030: 11 99 22 11 1F 31 30 20 50 52 49 4E 54 22 43 24 |.."..10 PRINT"C$|
00004040: 22 4D 45 49 4E 20 4E 41 4D 45 20 49 53 54 00 6C |"MEIN NAME IST.l|
00004050: 48 98 11 99 22 32 30 20 50 52 49 4E 54 22 43 24 |H..."20 PRINT"C$|
00004060: 22 49 43 48 20 4C 45 42 45 20 49 4E 00 7D 48 99 |"ICH LEBE IN.}H.|
00004070: 11 99 22 11 11 11 11 11 11 1C 22 4C 24 00 A8 48 |.."......."L$..H|
00004080: 9E 11 99 22 11 D1 1F 53 41 45 54 5A 45 20 56 45 |..."...SAETZE VE|
00004090: 52 56 4F 4C 4C 53 54 41 45 4E 44 49 47 45 4E 20 |RVOLLSTAENDIGEN |
000040A0: 55 4E 44 20 44 41 4E 4E 00 CF 48 A8 11 99 22 20 |UND DANN..H..." |
000040B0: 49 4E 20 4A 45 44 45 52 20 5A 45 49 4C 45 20 52 |IN JEDER ZEILE R|
000040C0: 45 54 55 52 4E 20 44 52 55 45 43 4B 45 4E 2E 00 |ETURN DRUECKEN..|
000040D0: 05 49 B2 11 99 22 11 1C D1 1F 54 49 50 50 45 4E |.I..."....TIPPEN|
000040E0: 20 53 49 45 20 1C 52 55 4E 1F 20 45 49 4E 20 55 | SIE .RUN. EIN U|
000040F0: 4E 44 20 44 52 55 45 43 4B 45 4E 20 52 45 54 55 |ND DRUECKEN RETU|
00004100: 52 4E 2E 22 3B 00 17 49 E9 11 8D 37 3A 99 22 13 |RN.";..I...7:.".|
00004110: 11 11 1F 1D 1D 22 3B 00 2E 49 EE 11 53 4E 24 B2 |.....";..I..SN$.|
00004120: 22 30 34 36 30 30 22 3A 89 36 33 33 30 30 00 68 |"04600":.63300.h|
00004130: 49 F8 11 8D 36 30 30 30 30 3A 99 22 93 12 1C 20 |I...60000:."... |
00004140: 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 49 4E | MEIN|
00004150: 20 47 45 44 41 45 43 48 54 4E 49 53 20 20 20 20 | GEDAECHTNIS |
00004160: 20 20 20 20 20 20 20 22 00 86 49 FA 11 99 22 11 | "..I...".|
00004170: 1F 31 30 20 3F 22 43 24 22 4D 45 49 4E 20 4E 41 |.10 ?"C$"MEIN NA|
00004180: 4D 45 20 49 53 54 00 A0 49 FC 11 99 22 32 30 20 |ME IST..I..."20 |
00004190: 3F 22 43 24 22 49 43 48 20 4C 45 42 45 20 49 4E |?"C$"ICH LEBE IN|
000041A0: 00 B1 49 FD 11 99 22 11 11 11 11 11 11 1C 22 4C |..I..."......."L|
000041B0: 24 00 DB 49 02 12 99 22 D1 1F 53 41 45 54 5A 45 |$..I..."..SAETZE|
000041C0: 20 56 45 52 56 4F 4C 4C 53 54 41 45 4E 44 49 47 | VERVOLLSTAENDIG|
000041D0: 45 4E 20 55 4E 44 20 44 41 4E 4E 00 02 4A 0C 12 |EN UND DANN..J..|
000041E0: 99 22 20 49 4E 20 4A 45 44 45 52 20 5A 45 49 4C |." IN JEDER ZEIL|
000041F0: 45 20 52 45 54 55 52 4E 20 44 52 55 45 43 4B 45 |E RETURN DRUECKE|
00004200: 4E 2E 00 29 4A 16 12 99 22 11 1C D1 1F 49 43 48 |N..)J..."....ICH|
00004210: 20 4D 4F 45 43 48 54 45 20 4D 45 49 4E 20 47 45 | MOECHTE MEIN GE|
00004220: 44 41 45 43 48 54 4E 49 53 00 38 4A 20 12 99 22 |DAECHTNIS.8J .."|
00004230: 20 5A 45 49 47 45 4E 2E 00 67 4A 2A 12 99 22 11 | ZEIGEN..gJ*..".|
00004240: 1C D1 1F 4A 45 54 5A 54 20 1C 4C 49 53 54 1F 20 |...JETZT .LIST. |
00004250: 53 54 41 54 54 20 52 55 4E 20 45 49 4E 54 49 50 |STATT RUN EINTIP|
00004260: 50 45 4E 20 55 4E 44 00 94 4A 34 12 99 22 20 53 |PEN UND..J4.." S|
00004270: 45 48 45 4E 20 53 49 45 2C 20 57 41 53 20 4E 41 |EHEN SIE, WAS NA|
00004280: 43 48 20 52 45 54 55 52 4E 20 47 45 53 43 48 49 |CH RETURN GESCHI|
00004290: 45 48 54 2E 00 A6 4A 4D 12 8D 37 3A 99 22 13 11 |EHT...JM..7:."..|
000042A0: 11 1F 1D 1D 22 3B 00 BD 4A 52 12 53 4E 24 B2 22 |....";..JR.SN$."|
000042B0: 30 34 37 30 30 22 3A 89 36 33 33 30 30 00 D4 4A |04700":.63300..J|
000042C0: 5C 12 8D 36 30 30 30 30 3A 97 42 44 2C 36 3A 97 |\..60000:.BD,6:.|
000042D0: 42 4B 2C 36 00 0C 4B 7A 12 99 22 93 11 9E 22 4C |BK,6..Kz.."..."L|
000042E0: 24 22 20 5A 45 49 4C 45 4E 4E 55 4D 4D 45 52 4E |$" ZEILENNUMMERN|
000042F0: 20 4B 4F 45 4E 4E 45 4E 20 47 41 4E 5A 45 20 5A | KOENNEN GANZE Z|
00004300: 41 48 4C 45 4E 20 20 20 20 20 22 3B 00 3F 4B 7C |AHLEN ";.?K||
00004310: 12 99 4C 24 22 20 56 4F 4E 20 30 20 42 49 53 20 |..L$" VON 0 BIS |
00004320: 36 33 39 39 39 20 53 45 49 4E 2E 20 49 43 48 20 |63999 SEIN. ICH |
00004330: 4B 41 4E 4E 20 4D 49 43 48 20 41 4E 20 22 3B 00 |KANN MICH AN ";.|
00004340: 71 4B 7D 12 99 4C 24 22 20 53 45 48 52 20 4C 41 |qK}..L$" SEHR LA|
00004350: 4E 47 45 20 50 52 4F 47 52 41 4D 4D 45 20 45 52 |NGE PROGRAMME ER|
00004360: 49 4E 4E 45 52 4E 2E 20 20 20 20 20 20 20 20 20 |INNERN. |
00004370: 22 00 A7 4B 7F 12 99 22 9F 22 4C 24 22 20 45 53 |"..K..."."L$" ES|
00004380: 20 49 53 54 20 53 45 48 52 20 50 52 41 4B 54 49 | IST SEHR PRAKTI|
00004390: 53 43 48 2C 20 56 49 45 4C 46 41 43 48 45 20 56 |SCH, VIELFACHE V|
000043A0: 4F 4E 20 20 20 22 3B 00 DA 4B 80 12 99 4C 24 22 |ON ";..K...L$"|
000043B0: 20 31 30 20 41 4C 53 20 5A 45 49 4C 45 4E 4E 55 | 10 ALS ZEILENNU|
000043C0: 4D 4D 45 52 4E 20 5A 55 20 56 45 52 57 45 4E 44 |MMERN ZU VERWEND|
000043D0: 45 4E 2E 20 20 20 20 20 22 3B 00 0D 4C 82 12 99 |EN. ";..L...|
000043E0: 4C 24 22 20 44 41 4E 4E 20 4B 41 4E 4E 20 4D 41 |L$" DANN KANN MA|
000043F0: 4E 20 5A 57 49 53 43 48 45 4E 20 45 58 49 53 54 |N ZWISCHEN EXIST|
00004400: 49 45 52 45 4E 44 45 20 20 20 20 22 3B 00 41 4C |IERENDE ";.AL|
00004410: 84 12 99 4C 24 22 20 5A 45 49 4C 45 4E 20 4E 4F |...L$" ZEILEN NO|
00004420: 43 48 20 57 45 4C 43 48 45 20 45 49 4E 46 55 45 |CH WELCHE EINFUE|
00004430: 47 45 4E 2E 20 20 20 20 20 20 20 20 20 20 22 4C |GEN. "L|
00004440: 24 00 7F 4C 8E 12 99 22 05 22 4C 24 22 20 4E 55 |$..L..."."L$" NU|
00004450: 4E 20 57 4F 4C 4C 45 4E 20 57 49 52 20 45 54 57 |N WOLLEN WIR ETW|
00004460: 41 53 20 4E 45 55 45 53 20 42 45 54 52 41 43 48 |AS NEUES BETRACH|
00004470: 54 45 4E 2E 20 22 4C 24 3A 8D 36 33 30 30 30 00 |TEN. "L$:.63000.|
00004480: 9E 4C C0 12 99 22 93 1F 22 3A 41 24 B2 22 4E 45 |.L..."..":A$."NE|
00004490: 57 22 3A 97 42 4B 2C 33 3A 97 42 44 2C 33 00 C6 |W":.BK,3:.BD,3..|
000044A0: 4C CA 12 42 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |L..B$.".........|
000044B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000044C0: 1D 1D 1D 1D 1D 22 00 05 4D CC 12 97 56 AA 32 37 |....."..M...V.27|
000044D0: 2C 30 3A 97 35 34 32 39 36 2C 31 35 3A 97 35 34 |,0:.54296,15:.54|
000044E0: 32 37 39 2C 32 30 30 3A 97 35 34 32 38 30 2C 30 |279,200:.54280,0|
000044F0: 3A 97 35 34 32 38 35 2C 32 34 30 3A 97 35 34 32 |:.54285,240:.542|
00004500: 38 33 2C 33 33 00 11 4D CF 12 81 49 B2 31 A4 31 |83,33..M...I.1.1|
00004510: 38 00 2C 4D DE 12 99 C8 28 42 54 24 2C 49 29 C8 |8.,M....(BT$,I).|
00004520: 28 42 24 2C 28 49 AA 49 29 29 41 24 00 3D 4D E3 |(B$,(I.I))A$.=M.|
00004530: 12 81 4A B2 31 A4 31 30 30 3A 82 3A 82 00 49 4D |..J.1.100:.:..IM|
00004540: E4 12 81 49 B2 31 A4 32 33 00 66 4D E5 12 99 C8 |...I.1.23.fM....|
00004550: 28 42 54 24 2C 49 29 C8 28 42 24 2C 28 49 AA 49 |(BT$,I).(B$,(I.I|
00004560: AB 49 29 29 41 24 00 77 4D E6 12 81 4A B2 31 A4 |.I))A$.wM...J.1.|
00004570: 31 30 30 3A 82 3A 82 00 86 4D E8 12 81 49 B2 31 |100:.:...M...I.1|
00004580: A4 35 30 30 3A 82 00 A7 4D EA 12 81 49 B2 31 A4 |.500:...M...I.1.|
00004590: 33 30 30 3A 82 3A 97 35 34 32 39 36 2C 30 3A 97 |300:.:.54296,0:.|
000045A0: 35 34 32 38 33 2C 30 00 BF 4D 1F 13 8D 36 33 30 |54283,0..M...630|
000045B0: 30 30 3A 97 42 4B 2C 31 35 3A 97 42 44 2C 36 00 |00:.BK,15:.BD,6.|
000045C0: F2 4D 24 13 99 22 93 12 1C 20 20 20 20 20 20 4E |.M$.."... N|
000045D0: 45 55 20 4E 45 57 20 4E 45 55 20 4E 45 57 20 4E |EU NEW NEU NEW N|
000045E0: 45 55 20 4E 45 57 20 4E 45 55 20 20 20 20 20 20 |EU NEW NEU |
000045F0: 20 22 00 11 4E 26 13 99 22 11 1C 31 30 20 3F 22 | "..N&.."..10 ?"|
00004600: 43 24 22 93 4D 45 49 4E 20 4E 41 4D 45 20 49 53 |C$".MEIN NAME IS|
00004610: 54 00 2B 4E 28 13 99 22 32 30 20 3F 22 43 24 22 |T.+N(.."20 ?"C$"|
00004620: 49 43 48 20 4C 45 42 45 20 49 4E 00 3F 4E 29 13 |ICH LEBE IN.?N).|
00004630: 99 22 11 11 11 11 11 11 11 11 11 1C 22 4C 24 00 |.".........."L$.|
00004640: 6C 4E 2E 13 99 22 D1 1F 52 45 54 55 52 4E 20 5A |lN..."..RETURN Z|
00004650: 55 52 20 45 49 4E 47 41 42 45 20 44 45 52 20 5A |UR EINGABE DER Z|
00004660: 45 49 4C 45 4E 20 49 4E 20 44 45 4E 00 86 4E 38 |EILEN IN DEN..N8|
00004670: 13 99 22 20 53 50 45 49 43 48 45 52 20 44 52 55 |.." SPEICHER DRU|
00004680: 45 43 4B 45 4E 2E 00 B3 4E 42 13 99 22 11 1C D1 |ECKEN...NB.."...|
00004690: 1F 4D 45 49 4E 45 4E 20 53 50 45 49 43 48 45 52 |.MEINEN SPEICHER|
000046A0: 20 28 3D 47 45 44 41 45 43 48 54 4E 49 53 29 20 | (=GEDAECHTNIS) |
000046B0: 4D 49 54 00 D1 4E 43 13 99 22 20 4C 49 53 54 20 |MIT..NC.." LIST |
000046C0: 3C 52 45 54 55 52 4E 3E 20 50 52 55 45 46 45 4E |<RETURN> PRUEFEN|
000046D0: 2E 00 02 4F 4C 13 99 22 11 1C D1 1F 44 41 4E 4E |...OL.."....DANN|
000046E0: 20 4E 45 57 20 3C 52 45 54 55 52 4E 3E 20 45 49 | NEW <RETURN> EI|
000046F0: 4E 54 49 50 50 45 4E 20 55 4E 44 20 4D 45 49 4E |NTIPPEN UND MEIN|
00004700: 45 4E 00 2D 4F 56 13 99 22 20 53 50 45 49 43 48 |EN.-OV.." SPEICH|
00004710: 45 52 20 4D 49 54 20 4C 49 53 54 20 3C 52 45 54 |ER MIT LIST <RET|
00004720: 55 52 4E 3E 20 50 52 55 45 46 45 4E 2E 00 3F 4F |URN> PRUEFEN..?O|
00004730: 79 13 8D 37 3A 99 22 13 11 11 1F 1D 1D 22 3B 00 |y..7:."......";.|
00004740: 56 4F 7E 13 53 4E 24 B2 22 30 35 30 30 30 22 3A |VO~.SN$."05000":|
00004750: 89 36 33 33 30 30 00 6D 4F 88 13 8D 36 30 30 30 |.63300.mO...6000|
00004760: 30 3A 97 42 44 2C 36 3A 97 42 4B 2C 36 00 A4 4F |0:.BD,6:.BK,6..O|
00004770: 8D 13 99 22 93 9E 22 4C 24 22 20 5A 55 4D 20 45 |...".."L$" ZUM E|
00004780: 4E 44 45 20 44 45 52 20 4C 45 4B 54 49 4F 4E 20 |NDE DER LEKTION |
00004790: 4E 4F 43 48 20 45 49 4E 45 20 20 20 20 20 20 20 |NOCH EINE |
000047A0: 20 20 22 3B 00 D8 4F 92 13 99 4C 24 22 20 42 45 | ";..O...L$" BE|
000047B0: 4D 45 52 4B 55 4E 47 2E 20 20 20 20 20 20 20 20 |MERKUNG. |
000047C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000047D0: 20 20 20 20 20 22 4C 24 00 0E 50 97 13 99 22 05 | "L$..P...".|
000047E0: 22 4C 24 22 20 45 53 20 47 49 42 54 20 45 49 4E |"L$" ES GIBT EIN|
000047F0: 45 4E 20 42 45 46 45 48 4C 2C 20 44 45 52 20 4D |EN BEFEHL, DER M|
00004800: 49 52 20 42 45 46 49 45 48 4C 54 2C 22 3B 00 42 |IR BEFIEHLT,";.B|
00004810: 50 9C 13 99 4C 24 22 20 4E 49 43 48 54 53 20 5A |P...L$" NICHTS Z|
00004820: 55 20 54 55 4E 2E 20 20 20 20 20 20 20 20 20 20 |U TUN. |
00004830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00004840: 4C 24 00 55 50 A1 13 99 22 05 20 45 52 20 4C 41 |L$.UP...". ER LA|
00004850: 55 54 45 54 3A 00 79 50 A6 13 99 43 24 28 31 30 |UTET:.yP...C$(10|
00004860: 29 43 31 24 28 31 29 3B 3A 99 A3 32 35 29 22 9E |)C1$(1);:..25)".|
00004870: 12 20 20 20 20 20 20 20 22 00 8D 50 AB 13 99 A3 |. "..P....|
00004880: 32 35 29 22 12 20 20 52 45 4D 20 20 22 00 A1 50 |25)". REM "..P|
00004890: B0 13 99 A3 32 35 29 22 12 20 20 20 20 20 20 20 |....25)". |
000048A0: 22 00 D8 50 B5 13 99 22 11 99 22 4C 24 22 41 4C |"..P...".."L$"AL|
000048B0: 4C 45 53 2C 20 57 41 53 20 52 45 43 48 54 53 20 |LES, WAS RECHTS |
000048C0: 56 4F 4E 20 52 45 4D 20 53 54 45 48 54 2C 20 57 |VON REM STEHT, W|
000048D0: 49 52 44 20 20 20 22 3B 00 10 51 BA 13 99 4C 24 |IRD ";..Q...L$|
000048E0: 22 41 4C 53 20 4E 4F 54 49 5A 20 47 45 57 45 52 |"ALS NOTIZ GEWER|
000048F0: 54 45 54 20 55 4E 44 20 4E 49 43 48 54 20 42 45 |TET UND NICHT BE|
00004900: 41 52 42 45 49 54 45 54 2E 22 4C 24 3B 22 05 22 |ARBEITET."L$;"."|
00004910: 00 22 51 C4 13 8D 36 33 30 30 30 3A 97 42 4B 2C |."Q...63000:.BK,|
00004920: 31 35 00 55 51 EC 13 99 22 93 12 1C 20 20 20 20 |15.UQ..."... |
00004930: 20 20 52 45 4D 20 52 45 4D 20 52 45 4D 20 52 45 | REM REM REM RE|
00004940: 4D 20 52 45 4D 20 52 45 4D 20 52 45 4D 20 20 20 |M REM REM REM |
00004950: 20 20 20 20 22 00 84 51 F3 13 99 22 11 31 30 20 | "..Q...".10 |
00004960: 1F 52 45 4D 1C 20 4D 41 43 48 54 20 4B 52 41 43 |.REM. MACHT KRAC|
00004970: 48 2D 20 50 52 4F 42 49 45 52 45 4E 20 57 49 52 |H- PROBIEREN WIR|
00004980: 20 45 53 2E 00 A8 51 F8 13 99 22 32 30 20 50 4F | ES...Q..."20 PO|
00004990: 4B 45 35 34 32 39 36 2C 31 35 3A 50 4F 4B 45 35 |KE54296,15:POKE5|
000049A0: 34 32 37 38 2C 32 34 30 00 D1 51 F9 13 99 22 33 |4278,240..Q..."3|
000049B0: 30 20 46 4F 52 49 3D 31 54 4F 38 30 3A 1F 52 45 |0 FORI=1TO80:.RE|
000049C0: 4D 1C 20 2D 2D 2D 3E 20 54 4F 4E 2D 44 41 55 45 |M. ---> TON-DAUE|
000049D0: 52 00 FF 51 FA 13 99 22 34 30 20 50 4F 4B 45 35 |R..Q..."40 POKE5|
000049E0: 34 32 37 36 2C 31 37 3A 50 4F 4B 45 35 34 32 37 |4276,17:POKE5427|
000049F0: 33 2C 39 39 2B 31 30 30 2A 52 4E 44 28 30 29 00 |3,99+100*RND(0).|
00004A00: 19 52 FB 13 99 22 35 30 20 4E 45 58 54 3A 50 4F |.R..."50 NEXT:PO|
00004A10: 4B 45 35 34 32 37 36 2C 30 00 27 52 FC 13 99 22 |KE54276,0.'R..."|
00004A20: 11 11 11 1C 22 4C 24 00 55 52 00 14 99 22 D1 1F |...."L$.UR..."..|
00004A30: 44 52 55 45 43 4B 45 4E 20 53 49 45 20 52 45 54 |DRUECKEN SIE RET|
00004A40: 55 52 4E 2C 20 55 4D 20 4A 45 44 45 20 5A 45 49 |URN, UM JEDE ZEI|
00004A50: 4C 45 20 49 4E 00 78 52 05 14 99 22 20 4D 45 49 |LE IN.xR..." MEI|
00004A60: 4E 45 4E 20 53 50 45 49 43 48 45 52 20 45 49 4E |NEN SPEICHER EIN|
00004A70: 5A 55 47 45 42 45 4E 2E 00 A5 52 0A 14 99 22 11 |ZUGEBEN...R...".|
00004A80: 1C D1 1F 53 50 45 49 43 48 45 52 20 50 52 55 45 |...SPEICHER PRUE|
00004A90: 46 45 4E 20 4D 49 54 20 4C 49 53 54 20 3C 52 45 |FEN MIT LIST <RE|
00004AA0: 54 55 52 4E 3E 00 F0 52 0F 14 99 22 11 1C D1 52 |TURN>..R..."...R|
00004AB0: 45 4D 20 1F 4D 41 4E 20 4B 41 4E 4E 20 44 49 45 |EM .MAN KANN DIE|
00004AC0: 20 44 41 55 45 52 20 28 38 30 29 20 20 20 20 20 | DAUER (80) |
00004AD0: 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 20 5A | IN Z|
00004AE0: 45 49 4C 45 20 33 30 20 41 45 4E 44 45 52 4E 2E |EILE 30 AENDERN.|
00004AF0: 00 02 53 19 14 8D 37 3A 99 22 13 11 11 90 1D 1D |..S...7:."......|
00004B00: 22 3B 00 19 53 1E 14 53 4E 24 B2 22 34 30 30 30 |";..S..SN$."4000|
00004B10: 30 22 3A 89 36 33 33 30 30 00 2B 53 40 9C 8D 36 |0":.63300.+S@..6|
00004B20: 33 35 30 30 3A 8D 36 30 30 30 30 00 41 53 41 9C |3500:.60000.ASA.|
00004B30: 97 42 44 2C 36 3A 97 42 4B 2C 31 35 3A 99 22 93 |.BD,6:.BK,15:.".|
00004B40: 22 00 74 53 43 9C 99 22 93 12 1C 20 20 20 20 20 |".tSC.."... |
00004B50: 20 20 20 20 20 20 20 4D 45 4E 55 45 20 4C 45 4B | MENUE LEK|
00004B60: 54 49 4F 4E 20 33 20 20 20 20 20 20 20 20 20 20 |TION 3 |
00004B70: 20 20 20 22 00 A3 53 46 9C 99 22 11 20 20 20 20 | "..SF..". |
00004B80: 20 20 20 D1 1F 41 42 53 43 48 4E 49 54 54 20 20 | ..ABSCHNITT |
00004B90: 20 20 20 20 20 54 41 53 54 45 20 22 3A 99 22 11 | TASTE ":.".|
00004BA0: 22 4C 24 00 CB 53 49 9C 99 22 11 20 20 20 20 20 |"L$..SI..". |
00004BB0: 20 20 1C D1 1F 41 4E 46 41 4E 47 20 20 20 20 20 | ...ANFANG |
00004BC0: 20 20 20 20 20 20 20 20 20 46 31 00 F1 53 4C 9C | F1..SL.|
00004BD0: 99 22 20 20 20 20 20 20 20 1C D1 1F 56 41 52 49 |." ...VARI|
00004BE0: 41 42 4C 45 4E 2D 4E 41 4D 45 4E 20 20 20 20 20 |ABLEN-NAMEN |
00004BF0: 56 00 17 54 4F 9C 99 22 20 20 20 20 20 20 20 1C |V..TO.." .|
00004C00: D1 1F 53 54 52 49 4E 47 2D 56 41 52 49 41 42 4C |..STRING-VARIABL|
00004C10: 45 4E 20 20 20 20 53 00 3D 54 54 9C 99 22 20 20 |EN S.=TT.." |
00004C20: 20 20 20 20 20 1C D1 1F 53 43 48 4C 45 49 46 45 | ...SCHLEIFE|
00004C30: 4E 20 20 20 20 20 20 20 20 20 20 20 4C 00 63 54 |N L.cT|
00004C40: 59 9C 99 22 20 20 20 20 20 20 20 1C D1 1F 53 43 |Y.." ...SC|
00004C50: 48 52 49 54 54 57 45 49 54 45 4E 20 20 20 20 20 |HRITTWEITEN |
00004C60: 20 20 49 00 89 54 5E 9C 99 22 20 20 20 20 20 20 | I..T^.." |
00004C70: 20 1C D1 1F 50 4F 4B 45 20 20 20 20 20 20 20 20 | ...POKE |
00004C80: 20 20 20 20 20 20 20 20 4B 00 AF 54 60 9C 99 22 | K..T`.."|
00004C90: 20 20 20 20 20 20 20 1C D1 1F 42 49 4C 44 53 43 | ...BILDSC|
00004CA0: 48 49 52 4D 46 41 52 42 45 4E 20 20 20 20 43 00 |HIRMFARBEN C.|
00004CB0: D5 54 63 9C 99 22 20 20 20 20 20 20 20 1C D1 1F |.Tc.." ...|
00004CC0: 50 52 4F 47 52 41 4D 4D 45 20 20 20 20 20 20 20 |PROGRAMME |
00004CD0: 20 20 20 20 50 00 FB 54 68 9C 99 22 20 20 20 20 | P..Th.." |
00004CE0: 20 20 20 1C D1 1F 4E 45 57 20 2F 20 52 45 4D 20 | ...NEW / REM |
00004CF0: 20 20 20 20 20 20 20 20 20 20 4E 00 29 55 6F 9C | N.)Uo.|
00004D00: 99 22 20 20 20 20 20 20 20 1C D1 1F 50 52 4F 47 |." ...PROG|
00004D10: 52 41 4D 4D 45 4E 44 45 20 20 20 20 20 20 20 20 |RAMMENDE |
00004D20: 58 22 3A 99 22 11 22 4C 24 00 58 55 77 9C 99 22 |X":."."L$.XUw.."|
00004D30: 11 20 20 20 44 52 55 45 43 4B 45 4E 20 53 49 45 |. DRUECKEN SIE|
00004D40: 20 44 49 45 20 47 45 57 55 45 4E 53 43 48 54 45 | DIE GEWUENSCHTE|
00004D50: 20 54 41 53 54 45 2E 22 00 6A 55 A4 9C 8B C2 28 | TASTE.".jU....(|
00004D60: 45 53 29 B2 34 A7 31 30 30 30 00 7D 55 A9 9C 8B |ES).4.1000.}U...|
00004D70: C2 28 45 53 29 B2 33 31 A7 31 33 30 30 00 90 55 |.(ES).31.1300..U|
00004D80: AE 9C 8B C2 28 45 53 29 B2 31 33 A7 31 36 30 32 |....(ES).13.1602|
00004D90: 00 A3 55 B3 9C 8B C2 28 45 53 29 B2 34 32 A7 31 |..U....(ES).42.1|
00004DA0: 38 30 31 00 B6 55 B8 9C 8B C2 28 45 53 29 B2 33 |801..U....(ES).3|
00004DB0: 33 A7 32 33 30 31 00 C9 55 BD 9C 8B C2 28 45 53 |3.2301..U....(ES|
00004DC0: 29 B2 33 37 A7 33 32 30 31 00 DC 55 C2 9C 8B C2 |).37.3201..U....|
00004DD0: 28 45 53 29 B2 32 30 A7 33 33 36 31 00 EF 55 C7 |(ES).20.3361..U.|
00004DE0: 9C 8B C2 28 45 53 29 B2 34 31 A7 34 31 31 30 00 |...(ES).41.4110.|
00004DF0: 02 56 CC 9C 8B C2 28 45 53 29 B2 33 39 A7 34 38 |.V....(ES).39.48|
00004E00: 30 30 00 1A 56 D1 9C 8B C2 28 45 53 29 B2 32 33 |00..V....(ES).23|
00004E10: A7 93 22 48 4F 52 41 22 2C 38 00 25 56 D6 9C 89 |.."HORA",8.%V...|
00004E20: 34 30 31 30 30 00 3E 56 50 C3 97 35 34 32 39 36 |40100.>VP..54296|
00004E30: 2C 31 35 3A 97 35 34 32 37 38 2C 32 34 30 00 54 |,15:.54278,240.T|
00004E40: 56 5A C3 81 49 B2 31 A4 44 4C 3A 97 35 34 32 37 |VZ..I.1.DL:.5427|
00004E50: 36 2C 31 37 00 79 56 64 C3 97 35 34 32 37 33 2C |6,17.yVd..54273,|
00004E60: 31 30 30 AA 31 30 30 AC BB 28 30 29 3A 82 3A 97 |100.100..(0):.:.|
00004E70: 35 34 32 37 36 2C 30 3A 8E 00 A3 56 60 EA 97 36 |54276,0:...V`..6|
00004E80: 34 39 2C 31 3A 97 32 30 34 2C 31 3A 45 53 B2 31 |49,1:.204,1:ES.1|
00004E90: 39 37 3A 42 44 B2 35 33 32 38 30 3A 42 4B B2 42 |97:BD.53280:BK.B|
00004EA0: 44 AA 31 00 C5 56 61 EA 42 54 24 B2 22 13 22 3A |D.1..Va.BT$.".":|
00004EB0: 81 49 B2 31 A4 32 34 3A 42 54 24 B2 42 54 24 AA |.I.1.24:BT$.BT$.|
00004EC0: 22 11 22 3A 82 00 DB 56 67 EA 43 24 B2 C7 28 33 |".":...Vg.C$..(3|
00004ED0: 34 29 3A 43 52 54 B2 31 30 32 34 00 0C 57 68 EA |4):CRT.1024..Wh.|
00004EE0: 99 C7 28 31 34 32 29 3A 97 38 30 38 2C 32 33 32 |..(142):.808,232|
00004EF0: 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 14 |:.".............|
00004F00: 14 14 14 14 3A 56 3D 35 33 32 34 38 00 19 57 6E |....:V=53248..Wn|
00004F10: EA 47 24 B2 22 9D A7 A5 22 00 45 57 6F EA 43 41 |.G$."...".EWo.CA|
00004F20: 24 B2 22 13 22 3A 81 49 B2 30 A4 31 30 3A 43 41 |$.".":.I.0.10:CA|
00004F30: 24 B2 43 41 24 AA 22 11 22 3A 43 24 28 49 29 B2 |$.CA$.".":C$(I).|
00004F40: 43 41 24 3A 82 00 8C 57 70 EA 4C 24 B2 22 12 20 |CA$:...Wp.L$.". |
00004F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004F60: 20 20 20 20 20 20 20 20 A0 20 20 20 20 20 20 20 | . |
00004F70: 20 20 20 20 20 20 20 22 3A 53 32 24 B2 CA 28 4C | ":S2$..(L|
00004F80: 24 2C 32 29 AA CA 28 4C 24 2C 32 29 00 D2 57 71 |$,2)..(L$,2)..Wq|
00004F90: EA 43 31 24 B2 22 11 22 3A 81 49 B2 30 A4 31 30 |.C1$.".":.I.0.10|
00004FA0: 3A 43 31 24 B2 43 31 24 AA 22 11 22 3A 43 31 24 |:C1$.C1$.".":C1$|
00004FB0: 28 49 29 B2 43 31 24 3A 82 3A 43 33 24 B2 43 24 |(I).C1$:.:C3$.C$|
00004FC0: 28 31 30 29 AA 43 31 24 28 38 29 3A 43 31 24 B2 |(10).C1$(8):C1$.|
00004FD0: 22 22 00 F0 57 73 EA 4C 31 24 B2 C8 28 4C 24 2C |""..Ws.L1$..(L$,|
00004FE0: 32 30 29 3A 4C 33 24 B2 C8 28 4C 24 2C 33 31 29 |20):L3$..(L$,31)|
00004FF0: 00 FD 57 C4 EA 97 38 30 38 2C 32 33 37 00 2B 58 |..W...808,237.+X|
00005000: 46 EE 8B C2 28 37 38 39 29 B3 B1 37 AC 31 36 AA |F...(789)..7.16.|
00005010: 31 35 A7 9E 28 37 AC 34 30 39 36 AA 31 35 AC 32 |15..(7.4096.15.2|
00005020: 35 36 AA 31 32 AC 31 36 AA 33 29 00 31 58 47 EE |56.12.16.3).1XG.|
00005030: 8E 00 37 58 48 EE 3A 00 51 58 49 EE 4D B2 37 AC |..7XH.:.QXI.M.7.|
00005040: 34 30 39 36 AA 31 35 AC 32 35 36 AA 31 35 AC 31 |4096.15.256.15.1|
00005050: 36 00 57 58 4A EE 8C 00 6F 58 4B EE 81 49 B2 4D |6.WXJ...oXK..I.M|
00005060: A4 4D AA 31 35 3A 87 4B 3A 97 49 2C 4B 3A 82 00 |.M.15:.K:.I,K:..|
00005070: 89 58 4C EE 83 20 31 2C 39 36 2C 33 2C 39 36 2C |.XL.. 1,96,3,96,|
00005080: 33 2C 39 36 2C 33 2C 39 36 00 A7 58 4D EE 83 20 |3,96,3,96..XM.. |
00005090: 31 34 34 2C 31 32 37 2C 30 2C 30 2C 31 34 34 2C |144,127,0,0,144,|
000050A0: 31 32 37 2C 30 2C 30 00 C4 58 4E EE 4D B2 36 AC |127,0,0..XN.M.6.|
000050B0: 34 30 39 36 3A 81 49 B2 30 A4 32 3A 97 4D AA 49 |4096:.I.0.2:.M.I|
000050C0: 2C 30 3A 82 00 CA 58 4F EE 8E 00 DE 58 18 F6 8B |,0:...XO....X...|
000050D0: C2 28 45 53 29 B2 36 30 A7 36 33 30 30 30 00 18 |.(ES).60.63000..|
000050E0: 59 19 F6 99 42 54 24 22 20 20 20 20 57 45 49 54 |Y...BT$" WEIT|
000050F0: 45 52 20 4D 49 54 20 27 53 50 41 43 45 27 20 20 |ER MIT 'SPACE' |
00005100: 20 20 20 4D 3D 4D 45 4E 55 45 20 20 20 20 20 22 | M=MENUE "|
00005110: 3B 3A 89 36 33 30 30 35 00 1E 59 1D F6 3A 00 32 |;:.63005..Y..:.2|
00005120: 59 1E F6 8B C2 28 45 53 29 B2 33 36 A7 34 30 30 |Y....(ES).36.400|
00005130: 30 31 00 56 59 1F F6 8B C2 28 45 53 29 B2 36 30 |01.VY....(ES).60|
00005140: A7 97 31 39 38 2C 30 3A 99 42 54 24 CA 28 4C 24 |..198,0:.BT$.(L$|
00005150: 2C 34 29 3B 3A 8E 00 61 59 22 F6 89 36 33 30 30 |,4);:..aY"..6300|
00005160: 35 00 89 59 4A F6 99 42 54 24 22 1C 20 20 20 20 |5..YJ..BT$". |
00005170: 20 20 20 20 20 20 20 20 57 45 49 54 45 52 20 4D | WEITER M|
00005180: 49 54 20 46 37 22 3B 3A 8E 00 AE 59 E0 F6 97 35 |IT F7";:...Y...5|
00005190: 36 2C 39 36 3A 97 35 32 2C 39 36 3A 97 35 35 2C |6,96:.52,96:.55,|
000051A0: 30 3A 97 35 31 2C 30 3A 8D 36 31 30 30 30 00 C0 |0:.51,0:.61000..|
000051B0: 59 E1 F6 57 44 B2 34 30 3A 99 C7 28 31 34 32 29 |Y..WD.40:..(142)|
000051C0: 00 D9 59 E2 F6 4D B2 37 AC 34 30 39 36 AA 31 35 |..Y..M.7.4096.15|
000051D0: AC 32 35 36 AA 39 AC 31 36 00 F1 59 E3 F6 81 49 |.256.9.16..Y...I|
000051E0: B2 4D A4 4D AA 39 31 3A 87 4B 3A 97 49 2C 4B 3A |.M.M.91:.K:.I,K:|
000051F0: 82 00 37 5A E4 F6 83 31 36 35 2C 32 30 33 2C 32 |..7Z...165,203,2|
00005200: 30 31 2C 33 2C 32 30 38 2C 38 33 2C 33 32 2C 31 |01,3,208,83,32,1|
00005210: 39 35 2C 31 32 37 2C 31 36 35 2C 34 34 2C 32 30 |95,127,165,44,20|
00005220: 31 2C 38 2C 32 34 30 2C 33 2C 33 32 2C 31 37 37 |1,8,240,3,32,177|
00005230: 2C 31 32 37 2C 33 32 00 7C 5A E5 F6 83 31 34 32 |,127,32.|Z...142|
00005240: 2C 31 36 36 2C 31 36 35 2C 34 34 2C 32 30 31 2C |,166,165,44,201,|
00005250: 38 2C 32 34 30 2C 33 2C 37 36 2C 31 32 38 2C 31 |8,240,3,76,128,1|
00005260: 36 34 2C 37 36 2C 31 37 34 2C 31 36 37 2C 31 36 |64,76,174,167,16|
00005270: 32 2C 31 36 2C 31 38 39 2C 32 33 39 00 C5 5A E6 |2,16,189,239..Z.|
00005280: F6 83 31 32 37 2C 37 32 2C 31 38 31 2C 34 32 2C |..127,72,181,42,|
00005290: 31 35 37 2C 32 33 39 2C 31 32 37 2C 31 30 34 2C |157,239,127,104,|
000052A0: 31 34 39 2C 34 32 2C 32 30 32 2C 32 30 38 2C 32 |149,42,202,208,2|
000052B0: 34 31 2C 39 36 2C 31 32 30 2C 31 37 33 2C 32 33 |41,96,120,173,23|
000052C0: 38 2C 31 32 37 00 0A 5B E7 F6 83 37 37 2C 32 30 |8,127..[...77,20|
000052D0: 2C 33 2C 31 34 31 2C 32 30 2C 33 2C 31 37 33 2C |,3,141,20,3,173,|
000052E0: 32 33 39 2C 31 32 37 2C 37 37 2C 32 31 2C 33 2C |239,127,77,21,3,|
000052F0: 31 34 31 2C 32 31 2C 33 2C 38 38 2C 39 36 2C 31 |141,21,3,88,96,1|
00005300: 37 33 2C 32 30 2C 33 2C 37 33 00 49 5B E8 F6 83 |73,20,3,73.I[...|
00005310: 31 34 34 2C 31 34 31 2C 32 33 38 2C 31 32 37 2C |144,141,238,127,|
00005320: 31 37 33 2C 32 31 2C 33 2C 37 33 2C 31 32 37 2C |173,21,3,73,127,|
00005330: 31 34 31 2C 32 33 39 2C 31 32 37 2C 39 36 2C 37 |141,239,127,96,7|
00005340: 36 2C 32 35 35 2C 32 35 35 00 67 5B F0 F6 97 4D |6,255,255.g[...M|
00005350: AA 39 30 2C C2 28 37 38 38 29 3A 97 4D AA 39 31 |.90,.(788):.M.91|
00005360: 2C C2 28 37 38 39 29 00 85 5B F4 F6 4B 45 59 B2 |,.(789)..[..KEY.|
00005370: 37 AC 34 30 39 36 AA 31 35 AC 32 35 36 AA 31 33 |7.4096.15.256.13|
00005380: AC 31 36 AA 38 00 90 5B F5 F6 9E 28 4B 45 59 29 |.16.8..[...(KEY)|
00005390: 00 96 5B 43 F7 8E 00 A3 5B 44 F7 97 38 30 38 2C |..[C....[D..808,|
000053A0: 32 33 37 00 AE 5B 45 F7 8D 36 33 36 30 30 00 B9 |237..[E..63600..|
000053B0: 5B 46 F7 8D 36 31 30 30 30 00 C4 5B 47 F7 89 36 |[F..61000..[G..6|
000053C0: 33 34 30 33 00 CA 5B A8 F7 3A 00 D5 5B A9 F7 8D |3403..[..:..[...|
000053D0: 36 33 36 30 30 00 F5 5B AB F7 53 57 54 43 48 B2 |63600..[..SWTCH.|
000053E0: 37 AC 34 30 39 36 AA 31 35 AC 32 35 36 AA 39 AC |7.4096.15.256.9.|
000053F0: 31 36 AA 31 35 00 09 5C AC F7 97 32 30 37 2C 30 |16.15..\...207,0|
00005400: 3A 9E 28 53 57 54 43 48 29 00 16 5C AD F7 97 32 |:.(SWTCH)..\...2|
00005410: 30 34 2C 32 3A 80 00 1C 5C 0C F8 3A 00 31 5C 0D |04,2:...\..:.1\.|
00005420: F8 53 4E 24 B2 22 31 30 30 22 3A 8D 36 33 36 30 |.SN$."100":.6360|
00005430: 30 00 60 5C 0E F8 4D B2 37 AC 34 30 39 36 AA 31 |0.`\..M.7.4096.1|
00005440: 35 AC 32 35 36 AA 31 32 AC 31 36 AA 33 3A 8B C2 |5.256.12.16.3:..|
00005450: 28 37 38 39 29 B2 37 AC 31 36 AA 31 35 A7 9E 4D |(789).7.16.15..M|
00005460: 00 66 5C 0F F8 8E 00 6C 5C 70 F8 3A 00 87 5C 71 |.f\....l\p.:..\q|
00005470: F8 4D B2 32 30 35 39 3A 53 4E 24 B2 22 30 30 30 |.M.2059:SN$."000|
00005480: 30 30 22 AA 53 4E 24 00 A7 5C 72 F8 81 49 B2 31 |00".SN$..\r..I.1|
00005490: A4 35 3A 97 4D AB 49 2C C6 28 C9 28 53 4E 24 2C |.5:.M.I,.(.(SN$,|
000054A0: 49 29 29 3A 82 3A 8E 00 FF 00 FB |I)):.:..... |
.......00100......".......<...."......(C
) 1983 HORA SOFTWARE.I....".......R...VF
64.G.3 VERSI. 7 30.07.86, 17.09.86......
A$="0:ERSTE SCHRITTE 3":OPEN1,8,15,"S"+
A$:SAVEA$,8:VERIFYA$,8.V....J.1.1000:.:.
198,0:.63050:.......J.1.1000:.:....(..DL
.1.6000:....D..53281,15:.53280,14.B.G.."
........................................
.".U.H..". .. ERSTE SCHRITTE -3
- .. ."...I.."....................
.....................".L...."........".1
2)"(C) 1984 HORASOFT... .."..".14)"BY JU
AN HOLZ":DL.60:.50000.....SN$."1300":.63
200:.63600:.60000.L...."... WILLKOMMEN
ZUR DRITTEN LEKTION ".O....".Q.DI
ESE LEKTION HANDELT VON......"..
.Q.VARIABLEN......". .Q..BASI
C.-ANWEISUNGEN...$..". .Q.EINZE
ILIGEN PROGRAMMEN......". .Q.SC
HLEIFEN.4.0..". .Q.DEM .PROGRAM
MIER.KONZEPT.":.L$L$.W.8..".Q.FOLGEN SIE
DEN ANWEISUNGEN DER .UNTERSTEN
ZEILE"...B..63000...L..BK,6:.BD,6:."..
ARBEITSANLEITUNG...T..L$". DE
R OBERE TEIL DES BILDSCHIRMS IST DER ";
...~..L$"UEBUNGSBEREICH. DER UNTERE TEIL
ENT- ";.O....L$"HAELT ANWEISUNGEN UN
D DIE ERGEBNISSE. "L$......"...":.G$"W
IR WOLLEN NUN EXPERIMENTIEREN. ":.G
$......G$"SOLANGE SIE SELBST MIT DEM C 6
4 ":.G$......G$"ARBEITEN, KOENNEN MERKWU
ERDIGE ERGEB-......G$:.G$"NISSE ODER SOG
AR FEHLER AUFTRETEN.":.G$.P....G$"..."L$
" SIE KOENNEN JEDOCH IMMER MIT ";
......" "L$" F7 ZUR NAECHSTEN SEITE KO
MMEN. "L$:.63000......BK,6:."...
.. WAS IST EINE VARIABLE?......I.1.100
0:.:.".."L$" GEMAESS DEM WOERTERBUCH IS
T EINE ";.3....L$" VARIABLE ETWAS,
DAS GEAENDERT WERDEN "L$;.F.#..". KAN
N. "L$..
.(..I.1.1000:.:."."L$" FUER MICH SIND V
ARIABLEN PLATZHALTER ";...2..L$" FUER
ZAHLEN ODER WORTE... "L$...<
..I.1.1000:.:."..".21)"...ZUM BEISPIEL :
":.63000.J.F.."... VARIABLEN-NA
MEN ":.BK,15.].I..".JOE =
12+12.J.J.."..?JOE.{.L.."......."L$...O.
."..Q.SOLL ICH MICH AN EINEN WERT ERINNE
RN,.Q.R.." SO GIBT MAN IHM EINEN .NAMEN.
....U.."..Q.IN DER UEBUNGSZEILE IST 'RET
URN' ZU.8.X.." DRUECKEN UND AUF .?JOE. N
OCH EINMAL RETURN..J.^..7:."......
";.A.N.SN$."01400":.63300...X..60000:.".
.. VARIABLEN-NAMEN
"......".JOE=12+12:SAM=2*8:MIKE=3^3...
..."..CLASS=JOE+SAM+MIKE:?CLASS......"..
......"..."L$.&....".Q.WIR KOENNEN MEHRE
RE ANWEISUNGEN IN EINE.T....". ZEILE SCH
REIBEN, GETRENNT DURCH EINEN.....". .DO
PPELPUNKT ...................:.... .."..
Q.MAN KANN VARIABLEN KOMBINIEREN, UM....
.." EINE NEUE VARIABLE FUER DAS ERGEBNIS
ZU ERHALTEN....M..7:."......";...R.S
N$."01500":.63300.K....60000:."...
VARIABLEN-NAMEN ".\...
.".SAM=12+12.R...."..SALLY=20:?SAM.{....
"........"..."L$......"Q.ICH ERINNERE MI
CH NUR AN DIE BEIDEN......" ERSTEN BUCHS
TABEN DES VARIABLEN-NAMENS.......".Q.ICH
ERINNERE MICH NUR AN DEN LETZTEN.1...."
WERT DER VARIABLEN .SA...C...."..Q.UEBU
NG:.Q...." GEHEN SIE ZU .SAM=12+12. UND
'RETURN'......." JETZT AUF .SALLY. UND N
OCHMAL 'RETURN'.";...1..7:."......";.K.6
.SN$."01600":.63300.V.@..60000...B..:D5$
."J.K":D4$." ..":D1$."U.I":D2$."..":D3$.
" J.I.=.L.D6$.".........................
............".I.N.QM$.D1$.D6$.D2$.D6$.D3
$.D6$.D4$.D6$.D5$...P..53281,6:."..".15)
:.I.1.4:.QM$." ";:....Q.."....";:.I.1.
4:.QM$." ";:....R.."............";:.I.
1.2:.QM$." ";:....V..".".27):.I.1.2:.Q
M$." ";:.:.:.60000.O.Y..C$(10)C1$(7)"E
INE FRAGE: SIND DAS DOLLARS ODER PESOS?"
:.63000...`.."....... DIESMAL HAT ES NIC
HTS MIT GELD ZU TUN....B.."...."L$" DAS
DOLLAR-ZEICHEN WIRD BENUTZT, UM ";...
D..L$" STRING-VARIABLEN VON NUMERISCHEN
";.$.F..L$" VARIABLEN ZU UNTERSCHE
IDEN. "L$.6.H..63000:.BK,15.I
.U.."... STRING-VARIABLEN
"...X..".CITY$="C$"I S NEW YORK"
C$...{.."..?CI$...~.."....."L$.V...."Q.H
IER WURDE DEM NAMEN 'CITY' EIN DOLLAR-..
....". ZEICHEN ANGEFUEGT.. ...."..Q.ICH
KANN MICH AUCH AN NAMEN, SAETZE,.O...."
JEDE .ZEICHENKETTE. (=STRING) ERINNERN..
Z...."..Q.WURDEN DIESE VARIABLEN NICHT A
LS......" .A$, Y$ ODER SAM$. BEZEICHNET,
SO HALTE.S...." ICH SIE FUER NUMERISCHE
VARIABLEN.......7:."......";.....SN$."0
1700":.63300......60000:.BK,6:.BD,6:."..
".7....". MAN MUSS EXAKT SEIN:.O...."..
."L$" DAS ERSTE ZEICHEN EINES VARIABLEN
- ";......L$" NAMENS MUSS EIN BUCHST
ABE SEIN. "L$.Z....".."L$" DAS ZW
EITE ZEICHEN KANN EIN BUCHSTABE ";......
L$" ODER EINE ZAHL SEIN."L$J(L$,24)....
..63000:.BK,15.;.Y.."....A8=12+12: A8$="
C$"12+12"C$.P...."..PRINT A8,A8$.Y....".
..F...."..."L$......".Q..A8. UND .A8$. S
IND VERSCHIEDENE VARIABLEN UND ICH KENN
E BEIDE......."..Q.ICH BERECHNE DIE WERT
E ZWISCHEN DEN......" ANFUEHRUNGSZEICHEN
EINER STRING- VARIABLEN NICHT..M
...."..Q.UEBRIGENS .MUESSEN. STRING-VARI
ABLEN.X...." IN ANFUEHRUNGSZEICHEN STEHE
N, SONST......" ERHALTEN SIE EINE FEHLER
-MELDUNG:......". ?TYPE MISMATCH ERROR..
....I.1.500:.:.198,0:.63050......"... ";
:.198,0.....SN$."01800":.63300......6000
0.<....BD,15:.BK,15:.".. PROB
LEM:.X...."..GEBEN SIE AUF DEM BILDSCHIR
M ALLE ZAHLENZWISCHEN ";......"101 ..UND
.. 110 AUS, NUR DIE VARIABLE SA BE
NUTZEN.":."."L$......".DER ANFANGSWERT .
.FUER SA.. IST 101......"UND MAN KOENNTE
SCHREIBEN:.6...."..SA=101:PRINT SA .
_ ERSTER WERT.C....".SA=102:PRINT SA
. _ DER .NAECHSTE.......".SA=103:PRINT
SA . _ DER .NAECHSTE.......".SA=104:P
RINT SA . _ DER .NAECHSTE..K...."
..Y...." .......".SA=110:PRINT SA
. _ DER LETZTE WERT":.".."L$;.D...."
DIES WAR NUR FUER 10 ZAHLEN.
"L$;.}...." UND WAS ERST BEI 1000 ZAHLEN
! "L$:.63000... ..BK,6:.BD,6:BR
$.H(L$,26):."...."BR$.L.!..". IN MEINER
BASIC-SPRACHE ":.BR$..."..". GIBT ES EIN
E BESONDERE ":.BR$:.". ABKUERZUNG HIERF
UER, ".=.#..BR$:.". MAN NENNT SIE :
":.BR$.X.$..".... SCHLEIFE
.M.%...25)". _CCCC......'...25)".
....(...25)".SCHLEIFE....)...25)".
..I.*...25)"..CCCC....":.63000...+..B
D,15:.BK,15:."...
"...,.."..SCHLEIFEN HABEN 3 TEILE: ".G
.-..".. ..";:.8.
P....". FOR, ";:.8:.".TO, ";:.8:.".NEXT"
.../..".... FOR SA=101 .TO 110:.PRINT
SA:.NEXT SA..S.0.G1$.".......^..........
.............":.G1$.. 1.G2$."........
_ZURUECK .....":.G2$.8 2.G3$."....
....CC..CCCCCCCCCCCCCCCCCC.":.G3$:.63000
.J 3..CA$"..."L1$:.". IM ERSTEN TEIL
":.L1$;:.8.. 4.."......FOR SA = 101.F 5.
."...... . ":." . FOR SA=10
1 ":." . ".. 8..CA$"... GESC
HEHEN 2 DINGE ":.L1$.(!:..CA$"..... 1.-
. EINE VARIABLE WIRD DEFINIERT ...";:.8
.J!;..". ..... SA ..... ":.8.O!<..
" .2.- . DIESER WIRD EIN ...!=.."..
. ANFANGSWERT GEGEBEN ";:.8.T!>.."
.. .. ...... 101 ...... .":
.63000:.CA$;.."D..".. IM ZWEITEN TEIL
. ":.L1$:.S2$S2$S2$S2$S2
$.D"F..8:.CA$"........................TO
110.."G.."...... "L1$:." . FOR SA=101
":." ^ ":.8.."I..".....
. . ":.".............. T
O 110:".."J.."........... . ":.
8.##N..".........."L1$" ":." . WIRD DE
R ENDWERT ":.". "L1$" ".Q#O.." . F
UER DIE VARIABLE ":.". "L1$" "..#P.."
. SA ANGEGEBEN ":.". "L1$" ";
..#Q..8:."......... ...... 110 .....
. ":.63000..#S..CA$"... IM LETZTEN T
EIL . ":.L1$:.S2$S2$S2
$S2$S2$.=$T.."..... .
":.".............. TO 110:".^$U.."....
....... ":.8..$V..".....
. . ".F$W
.."..............................:.. NEX
T SA "..$X.."....................... .
. ".'%Y..8:.CA$"............
............NEXT SA":.8.I%Z.."... "L3$
:." . WIRD DER WERT VON SA UM 1 ER-":.
". "L3$..%[.." . HOEHT, UND DIE PROZ
EDUR WIRD ":.". "L3$.S%\.." . AB FOR
WIEDERHOLT, BIS SA ":.". "L3$..&].
." . DEN MAXIMALWERT 110 ERREICHT.":."
. "L3$.;&^..BT$" WEITER MIT 'SPAC
E' M=MENUE ";.C&_.."."C$(5).26)I(G
1$,5):..26)I(G2$,5).U&`...26)I(G3$,5)..&
A..C$(7).15)J(G3$,20,11):."."H(G3$,15).N
&B..".."H(G2$,25):.".."H(G1$,9):.B(ES).6
0.1900..&C.."."C$(5).26)I(G1$,5):..26)I(
G2$,5)..'D...26)I(G3$,5).1'E..C$(7).15)J
(G3$,20,11):."."H(G3$,15).B'F..".."H(G2$
,25):.".."H(G1$,9):.B(ES)..60.1887..'L..
"..... .
".H'N.."..........................
....:. NEXT SA "..'P..C5$S2$S2$S2$S2$S2$
S2$S2$S2$.#(Q..C$(9)". "L1$:.". . DI
ESER TEIL WURDE ":." "L1$.P(R..". .
NICHT VERGESSEN ":." "L1$:.8.Y(V..C$
(9):.I.22.26:..I)"C";:.40:.:.".";..(W..4
0:.J.1.5:."...";:.40:.:.8.L(X..".....".2
0)".. ":..20)".. PRINT SA "..(Y
...20)". .".')Z..C$(9)"......."
L$" SOLANGE MAN . INNERHALB . DER SCHLEI
FE ";.Z){..L$" IST, WIRD JEWEILS DER A
KTUELLE ";..)...L$" WERT VON SA
AUSGEGEBEN. "L$.B)...6300
0:.BK,6:.BD,6:."......... UND NUN...":
.8..)...".... ...EINIGE UEBUNGEN.":.8.
.*..."........... LIVE SHOW":.I.1.
1000:.:.BD,6.V*P..BK,15:."...
SCHLEIFEN ".~*R..".FO
R SA=101TO110:PRINT SA:NEXT SA..*U.."...
..........."L$.F*Z.."...Q.DRUECKEN SIE R
ETURN UND SEHEN SIE....X*%..7:."......";
..**.SN$."02100":.63300.)+4..60000:."...
SCHLEIFEN
".S+6.."..FOR SA=101TO110:PRINT SA,:NEXT
SA.F+9.."........."L$..+>.."...Q.DIE GL
EICHE SACHE, ABER DIESMAL BE-.F+C..". FI
NDET SICH EIN KOMMA HINTER .PRINT SA.,..
+H.."...Q.ERINNERN SIE SICH?.....+...7:.
"......";..,..SN$."02200":.63300.J,...60
000:."... SCHLEIFEN
".Q,..."..FOR SA=101TO110:PRINT
SA;:NEXT..,..."......."L$..,..."..Q.UND
NUN ZUR ABWECHSLUNG EIN SEMI-.L,..." KO
LON NACH .PRINT SA.;..,..."..Q.SPASSESHA
LBER AENDERN WIR 110 AB.&-..." IN Z.B. 1
1000. DIES GEHT MIT .INST. WIE.P-..." BE
I .LODON. IN DER ERSTEN LEKTION!..-...".
.Q.DIE STOP-TASTE (LINKS AUF DER TASTATU
R) BEENDET DIE SCHLEIFE."..-...7:.".....
.";.B-..SN$."02300":.63300.M-...60000..-
...BD,6:.BK,6:.".":.".".15)"SCHRITTE:...
..."...."L$" IN DEN BISHERIGEN BEISPIELE
N WACHSEN ";.B....L$" DIE ZAHLEN NUR I
N EINER-SCHRITTEN. "L$......".."L$"
UM IN ANDEREN SCHRITTEN ZU WACHSEN ODER"
;.L.$..L$" ZU FALLEN, IST DIE SCHRITTWEI
TE WIE ";../...L$" FOLGT HINZUZUFUEGE
N: "L$:.63000.G/`.."..
. SCHRITTWEITEN
":.BK,15:.BD,6.V/B.."..FORSA=100TO200 S
TEP5:PRINT SA;:NEXT SA../E.."........."L
$../J..".Q.DRUECKEN SIE RETURN UND BEOBA
CHTEN SIE.../T.."..Q.DIE SCHRITTWEITE KA
NN AUCH KLEINER..0~.." ALS EINS SEIN, Z.
B. 1/2. DANN MUSS.A0..." MAN DIES WIE FO
LGT SCHREIBEN: .STEP.5. ...0..."..Q.HOCH
GEHEN, EINE LEERSTELLE EINFUEGEN, EINT
IPPEN UND LOS GEHT'S...0...7:."......";.
.0..SN$."02500":.63300..0D..60000:."...
SCHRITTWEITEN "
..1F.."..FORSA=200TO1 STEP-5:PRINT SA;:N
EXT SA.11I.."........."L$.]1N.."..Q.IN D
IESEM BEISPIEL STARTET SA MIT..1X.." EIN
EM HOHEN ANFANGSWERT UND NIMMT..1..." MI
T EINER SCHRITTWEITE VON -5 AB..H1..."..
Q.ICH BIN STARK!.Z1...7:."......";..1..S
N$."03000":.63300.+2...60000:."...
SCHLEIFEN ".M2B.
."..FOR SA=1TO20:PRINT3;:NEXT.Y2L.."....
FOR SA=1TO20:PRINT"C$"3"C$";:NEXT..2V.."
....."L$..2...".Q.WIR WOLLEN DEN UNTERSC
HIED SEHEN:..2..."..Q.IN DER 1. ZEILE SC
HREIBE ICH DIE ZAHL..3..." 3 MIT 1 LEERS
TELLE FUER IHR VORZEICHEN.<3..." (LINKS)
. EIN + WIRD NICHT GEDRUCKT..K3..."..Q.I
M ZWEITEN BEISPIEL SCHREIBE ICH DAS..3..
." ZEICHEN 3 ALS STRING (ZWISCHEN "C$" "
C$")...3&..7:."......";.F30.SN$."03130":
.63300..4:..60000:.".....
SCHLEIFEN "..4D.."...FOR
SA=1TO120:PRINT"C$"S"C$";:NEXT.;4N.."...
"L$.G4X.."..Q.DAS OBERE FENSTER SOLL MIT
HERZEN.4].." GEFUELLT WERDEN...4B.."..
Q.F7 BRINGT SIE IMMER IN DER..4G.." LEKT
ION WEITER..N4Q..7:.".......";..4V.SN$."
03200":.63300..4...60000..5...BD,6:.BK,6
:.".":.". POKE.O5..."..Q
.DIES IST EIN ANDERER BASIC-DEFEHL, DEN.
Z5..." ICH VERSTEHE, ER BEDEUTET SCHREIB
E...5...".."L$" DER BEFEHL HEISST POKE
. ";..5..."
"..6...".Q.C 64
BEDEUTET, ICH HABE 64K (KILO) BYTE.>6...
". SPEICHER (GANZ GENAU 2^16=65536).".U
6...".."L$" SIE KOENNEN IN JEDE DIESER 6
5536 ZELLEN";..6...L$" SCHREIBEN ODER 'P
OKEN'. ."..6...L$" ABER I
CH STELLE BEDINGUNGEN: ";..7..
.L$" DIE ZAHL, DIE GEPOKET WERDEN KANN,
MUSS";.@7...L$" ZWISCHEN 0 UND 255 (2^8-
1) LIEGEN. ".W7...63000:.BD,6:.BK,6.
S7...".. .WENN M = SPEICHER..7...". UND.
N = ZAHL ."..7...".".19)".
".D7....19)". POKE M,N "..7....19)".
"..8...". (SCHREIBE EINE Z
AHL IN DEN SPEICHER).".B8...L$" WOBEI
0=<M<=65535 "L$.}8...
"...":.G$"ES BEDEUTET M IST GROESSER ODE
R GLEICH":.G$..8...G$"0 UND KLEINER ODER
GLEICH 65535 ."..8...G$"..."L$;..8..."
UND 0=<N<=255 "
L$..9..."...":.G$"DIE BEDEUTUNG IST WIE
OBEN ":.G$./9...G$"..."L$;.`9..."
HALTEN SIE SICH NICHT DARAN, GIBT ES ";
..9...L$" ?ILLEGAL QUANTITY ERROR
":.63000.S9!..BK,15:."...
POKE "..9*.
."..POKE53280,5..94.."...POKE53281,5..:>
.."..."L$.9:H.."..Q.ICH BEHALTE DIE RAHM
ENFARBE IN MEINER.V:R.." ADRESSE NUMMER
53280...:\.."..Q.WENN SIE HIER EINE ZAHL
ZWISCHEN 0..:F.." UND 15 POKEN, WECHSLE
ICH DIE FARBE..Z:P.."..Q.IN DER ADRESSE
53281 BEHALTE ICH..;U.." DIE HINTERGRUN
DFARBE. TESTEN SIE ES..%;Z.."...
WEITER MIT F7.7;...7:."......";.N;..SN$.
"03500":.63300.E;...60000:.BK,2:.BD,2..;
..."......VERBINDEN WIR SCHLEIFEN MIT PO
KE":.63000.Z;T..BD,6:.BK,15:."...
FARBE UND SCHLEIFE "..<...
"...FOR SA=0TO15:POKE53280,SA:NEXT..<...
"....."L$.><...".....Q.DIES ZEIGT ALLE R
AHMENFARBEN....]<...". FARBEN UEBER FARB
EN....P<...7:.".......";..<..SN$."03630"
:.63300..<...60000:.BK,6:.BD,6.K<8.."...
.....DAS WAR WOHL ZU SCHNELL, ODER?..<B.
. I.1.1000:...<L..C$(8)"......WIR..=V..
I.1.1000:.. =`..C$(8)"......WIR BRAUCHEN
.1=J.. I.1.1000:..W=T..C$(8)BE$"......WI
R BRAUCHEN EINE.H=~.. I.1.1000:...=...C$
(8)BE$"......WIR BRAUCHEN EINE BREM..=..
. I.1.1000:..R=...C$(8)BE$"......WIR BRA
UCHEN EINE BREMSE!..=... I.1.1000:...>..
.BE$"............DAZU ZAEHLE ICH MAL EIN
FACH.":.63000.W>N.."... WART
ESCHLEIFEN ":.BK,15..>X..".F
OR SA=0TO15:POKE53280,SA:.FORJ=1TO150:NE
XTJ:.NEXT SA..>..."...."L$.R>...".Q.EINE
WEITERE SCHLEIFE: DIE J-SCHLEIFE...?...
"..Q.DIE J-SCHLEIFE LIEGT INNERHALB DER
SA-./?..." SCHLEIFE. ICH ZAEHLE JEWEILS
SCHNELL.??..." BIS 150..O?..."..Q..SIE.
KOENNEN NUN DIE WARTEZEIT DURCH..?..." A
ENDERN DER WERTE DER J-SCHLEIFE BE- S
TIMMEN..W?..."..Q.DIE UEBUNGSZEILE KANN
AUS ZWEI ZEILEN..@..." BESTEHEN. MAN NEN
NT SIE 'LOGISCHE ZEILE'..!@2..7:."
.......";.8@7.SN$."03900":.63300.O@<..60
000:.BD,6:.BK,6..@Z.."....."L$" MIT DEN
ZELLEN 53280 UND 53281 ";..@\..L
$" BESTIMME ICH DIE FARBEN DES RANDES
";..@^..L$" UND DES HINTERGRUNDES.
"L$.)A`.."...."L$" MIT DER
ZELLE 646 BESTIMME ICH ";.KAB..L
$" DIE FARBE DER GESCHRIEBENEN ZEICHEN.
"L$:.63000:.BK,15..AI..BD,6:."...
MACHEN WIR ETWAS LUSTIGES.. "..AN
..".FORJ=1TO20:FORS=0TO16:POKE646,S:PRIN
T"C$". "C$";:NEXTS:NEXTJ..AX..".....
"L$.'BZ.."..Q.KOPIEREN SIE DIESE LOGISCH
E ZEILE.FB|.." UNTER DIE UEBUNGSZEILE..P
B~.."..Q.SIE KOENNEN AUCH DIE LAENGE DES
..B..." STREIFENS FUER ANDERE GRAFIKEN
AENDERN...B...7:.".......";.RB..
SN$."04100":.63300..B...60000.!C...BD,6:
.BK,6:.".."L$" PROGRAMME
"L$.SC#.."...":.G$" ALLE U
EBUNGEN BESTANDEN BIS JETZT..C$..G$:.G$"
AUS EINER LOGISCHEN ZEILE, DIE BIS..C&.
.G$:.G$" .80 ZEICHEN LANG. SEIN KANN..AC
'..G$:.G$"..."L$;..C(.." OBWOHL MAN SCH
ON MIT EINER ZEILE VIEL ";.%D*..L$" ERR
EICHEN KANN, KANN ICH AUCH MIT ";.WD
+..L$" MEHREREN ZEILEN ARBEITEN.
"..D..."."L$" DA ICH NUR EINE ZEI
LE AUF EINMAL VER- ";..D0..L$" ARBEITEN
KANN, BENOETIGE ICH EINE ";..D1..L$
" REIHENFOLGE (KURZ: FOLGE).
.";:.63000..EL..".":A$."FOLGE":.BK,15:.
BD,15.EEV.B$."..........................
....".RE...I.1.40:.EE..X..(23..(0)).1.XE
..Y..(32..(0)).1..E...H(BT$,X)H(B$,Y)A$.
.E...646,I.2:.J.1.50:.:...E...I.1.2000:.
:."....E...I.100.300.10:.I;" GEBEN SIE J
EDER ZEILE EINE NUMMER..F...J.1.40:.:.:.
63000.PF0..BK,6:.BD,6:.".."L$" EINE LOGI
SCHE ZEILE MIT EINER ZAHL AM ";..FF..L$
" ANFANG IST EINE PROGRAMMZEILE.
"L$..FJ.."."L$" EIN PROGRAMM BESTEHT A
US VIELEN LO- ";..FK..L$" GISCHEN ZEI
LEN. DIE ZAHLEN GEBEN DIE ";.!GL..L$"
BEARBEITUNGSREIHENFOLGE AN. "L
$.^GM..". ":." UM.EIN PROGRAMM ZU":.".
STARTEN, GIBT MAN EIN:..GN..C$(10)C1$(3)
;:..25)".. "..GO...25)". RUN "..
GP...25)". "..GQ.."."L$"
UND DANACH RETURN "L$..G...6
3000:.BK,15:.BD,6.,H..."...
EIN PROGRAMM ".NH..."..10
PRINT"C$"MEIN NAME IST.LH..."20 PRINT"C$
"ICH LEBE IN.}H..."......."L$..H...".Q.S
AETZE VERVOLLSTAENDIGEN UND DANN.OH..."
IN JEDER ZEILE RETURN DRUECKEN...I..."..
Q.TIPPEN SIE .RUN. EIN UND DRUECKEN RETU
RN.";..I...7:."......";..I..SN$."04600":
.63300.HI...60000:."... MEIN
GEDAECHTNIS "..I..."..10 ?"C$
"MEIN NAME IST. I..."20 ?"C$"ICH LEBE IN
..I..."......."L$..I..."Q.SAETZE VERVOLL
STAENDIGEN UND DANN..J..." IN JEDER ZEIL
E RETURN DRUECKEN..)J..."..Q.ICH MOECHTE
MEIN GEDAECHTNIS.8J .." ZEIGEN..GJ*..".
.Q.JETZT .LIST. STATT RUN EINTIPPEN UND.
.J4.." SEHEN SIE, WAS NACH RETURN GESCHI
EHT...JM..7:."......";..JR.SN$."04700":.
63300.TJ\..60000:.BD,6:.BK,6..KZ.."..."L
$" ZEILENNUMMERN KOENNEN GANZE ZAHLEN
";.?K|..L$" VON 0 BIS 63999 SEIN. ICH
KANN MICH AN ";.QK}..L$" SEHR LANGE PROG
RAMME ERINNERN. "..K.."."L$" ES
IST SEHR PRAKTISCH, VIELFACHE VON ";.
ZK...L$" 10 ALS ZEILENNUMMERN ZU VERWEND
EN. ";..L...L$" DANN KANN MAN ZWISCH
EN EXISTIERENDE ";.AL...L$" ZEILEN NO
CH WELCHE EINFUEGEN. "L$.L..."
."L$" NUN WOLLEN WIR ETWAS NEUES BETRACH
TEN. "L$:.63000..L..."..":A$."NEW":.BK,3
:.BD,3.FLJ.B$.".........................
....."..ML..V.27,0:.54296,15:.54279,200:
.54280,0:.54285,240:.54283,33..MO..I.1.1
8.,M...H(BT$,I)H(B$,(I.I))A$.=M...J.1.10
0:.:..IM...I.1.23.FM...H(BT$,I)H(B$,(I.I
.I))A$.WM...J.1.100:.:...M...I.1.500:...
M...I.1.300:.:.54296,0:.54283,0..M...630
00:.BK,15:.BD,6..M$.."... NEU NEW N
EU NEW NEU NEW NEU "..N&.."..10 ?"
C$".MEIN NAME IST.+N(.."20 ?"C$"ICH LEBE
IN.?N)..".........."L$.LN..."Q.RETURN Z
UR EINGABE DER ZEILEN IN DEN..N8.." SPEI
CHER DRUECKEN...NB.."..Q.MEINEN SPEICHER
(=GEDAECHTNIS) MIT.QNC.." LIST <RETURN>
PRUEFEN...OL.."..Q.DANN NEW <RETURN> EI
NTIPPEN UND MEINEN.-OV.." SPEICHER MIT L
IST <RETURN> PRUEFEN..?OY..7:."......";.
VO~.SN$."05000":.63300.MO...60000:.BD,6:
.BK,6..O...".."L$" ZUM ENDE DER LEKTION
NOCH EINE ";.XO...L$" BEMERKUNG.
"L$..P...".
"L$" ES GIBT EINEN BEFEHL, DER MIR BEFIE
HLT,";.BP...L$" NICHTS ZU TUN.
"L$.UP...". ER LAUTET:.YP
...C$(10)C1$(1);:..25)".. "..P....
25)". REM "..P....25)". ".XP..."
.."L$"ALLES, WAS RECHTS VON REM STEHT, W
IRD ";..Q...L$"ALS NOTIZ GEWERTET UND
NICHT BEARBEITET."L$;"."."QD..63000:.BK,
15.UQ..."... REM REM REM REM REM RE
M REM "..Q...".10 .REM. MACHT KRAC
H- PROBIEREN WIR ES...Q..."20 POKE54296,
15:POKE54278,240.QQ..."30 FORI=1TO80:.RE
M. ---> TON-DAUER..Q..."40 POKE54276,17:
POKE54273,99+100*RND(0)..R..."50 NEXT:PO
KE54276,0.'R..."...."L$.UR..."Q.DRUECKEN
SIE RETURN, UM JEDE ZEILE IN.XR..." MEI
NEN SPEICHER EINZUGEBEN...R..."..Q.SPEIC
HER PRUEFEN MIT LIST <RETURN>..R..."..QR
EM .MAN KANN DIE DAUER (80)
IN ZEILE 30 AENDERN...S...7:."......
";..S..SN$."40000":.63300.+S@..63500:.60
000.ASA..BD,6:.BK,15:.".".TSC.."...
MENUE LEKTION 3 "..SF
..". Q.ABSCHNITT TASTE ":.".
"L$.KSI..". .Q.ANFANG
F1..SL.." .Q.VARIABLEN-NAMEN
V..TO.." .Q.STRING-VARIABLEN S.
=TT.." .Q.SCHLEIFEN L.CT
Y.." .Q.SCHRITTWEITEN I..T^.
." .Q.POKE K..T`.."
.Q.BILDSCHIRMFARBEN C.UTC.."
.Q.PROGRAMME P..TH.."
.Q.NEW / REM N.)UO.."
.Q.PROGRAMMENDE X":."."L$.XUW.."
. DRUECKEN SIE DIE GEWUENSCHTE TASTE."
.JU...B(ES).4.1000.}U...B(ES).31.1300..U
...B(ES).13.1602..U...B(ES).42.1801..U..
.B(ES).33.2301.IU...B(ES).37.3201..UB..B
(ES).20.3361..UG..B(ES).41.4110..VL..B(E
S).39.4800..VQ..B(ES).23.."HORA",8.%VV..
40100.>VPC.54296,15:.54278,240.TVZC.I.1.
DL:.54276,17.YVDC.54273,100.100..(0):.:.
54276,0:...V`..649,1:.204,1:ES.197:BD.53
280:BK.BD.1.EVA.BT$.".":.I.1.24:BT$.BT$.
".":...VG.C$.G(34):CRT.1024..WH..G(142):
.808,232:.".................:V=53248..WN
.G$."...".EWO.CA$.".":.I.0.10:CA$.CA$.".
":C$(I).CA$:...WP.L$.".
":S2$.J(L$,2).J(L
$,2).RWQ.C1$.".":.I.0.10:C1$.C1$.".":C1$
(I).C1$:.:C3$.C$(10).C1$(8):C1$.""..WS.L
1$.H(L$,20):L3$.H(L$,31)..WD..808,237.+X
F..B(789)..7.16.15..(7.4096.15.256.12.16
.3).1XG...7XH.:.QXI.M.7.4096.15.256.15.1
6.WXJ...OXK..I.M.M.15:.K:.I,K:...XL.. 1,
96,3,96,3,96,3,96..XM.. 144,127,0,0,144,
127,0,0.DXN.M.6.4096:.I.0.2:.M.I,0:..JXO
....X...B(ES).60.63000..Y...BT$" WEIT
ER MIT 'SPACE' M=MENUE ";:.63005
..Y..:.2Y...B(ES).36.40001.VY...B(ES).60
..198,0:.BT$J(L$,4);:..AY"..63005..YJ..B
T$". WEITER MIT F7";:...Y...5
6,96:.52,96:.55,0:.51,0:.61000..Y..WD.40
:.G(142).YY..M.7.4096.15.256.9.16..Y...I
.M.M.91:.K:.I,K:..7Z...165,203,201,3,208
,83,32,195,127,165,44,201,8,240,3,32,177
,127,32.|Z...142,166,165,44,201,8,240,3,
76,128,164,76,174,167,162,16,189,239.EZ.
..127,72,181,42,157,239,127,104,149,42,2
02,208,241,96,120,173,238,127..[...77,20
,3,141,20,3,173,239,127,77,21,3,141,21,3
,88,96,173,20,3,73.I[...144,141,238,127,
173,21,3,73,127,141,239,127,96,76,255,25
5.G[...M.90,B(788):.M.91,B(789)..[..KEY.
7.4096.15.256.13.16.8..[...(KEY)..[C....
[D..808,237..[E..63600..[F..61000.D[G..6
3403.J[..:.U[...63600..[..SWTCH.7.4096.1
5.256.9.16.15..\...207,0:.(SWTCH)..\...2
04,2:...\..:.1\..SN$."100":.63600.`\..M.
7.4096.15.256.12.16.3:.B(789).7.16.15..M
.F\....L\P.:..\Q.M.2059:SN$."00000".SN$.
.\R..I.1.5:.M.I,F(I(SN$,I)):.:.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL