Multiple names: 64-TRICKKISTE, TRICKKISTE
FILE INFORMATION
FILENAME(S):
• 64-TRICKKISTE<br>• TRICKKISTE
FILE TYPE(S): PRG
FILE SIZE: 26.3K
FIRST SEEN: 2025-11-02 16:39:20
APPEARS ON: 5 disk(s)
FILE HASH
c6e87f0a88e09349457f3eaf102c30c1ebaff2391ccd3ebc48205fa3818026b3
FOUND ON DISKS (5 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MULTISOFT | 64-TRICKKISTE | PRG | Treasure Chest - Plattfuss | 19 | 5 | DOWNLOAD FILE |
| MULTISOFT | 64-TRICKKISTE | PRG | Treasure Chest - Plattfuss | 19 | 5 | DOWNLOAD FILE |
| MULTISOFT | 64-TRICKKISTE | PRG | Treasure Chest - Wolfgang Rauprich | 20 | 5 | DOWNLOAD FILE |
| PD DISK 07 | TRICKKISTE | PRG | Treasure Chest - Wolfgang Rauprich | 6 | 5 | DOWNLOAD FILE |
| FREESOFT NR | TRICKKISTE | PRG | Treasure Chest - Wolfgang Rauprich | 6 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 01 00 42 4C B2 31 3A 8F 22 14 14 14 |..#...BL.1:."...|
00000010: 14 14 14 14 14 14 52 45 4D 20 42 2E 4C 55 45 54 |......REM B.LUET|
00000020: 4F 4C 46 00 53 08 02 00 42 4C B2 42 4C AA 31 3A |OLF.S...BL.BL.1:|
00000030: 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 52 45 |."............RE|
00000040: 4D 20 4F 4C 54 4E 45 52 53 54 52 41 53 53 45 20 |M OLTNERSTRASSE |
00000050: 31 32 31 00 7E 08 03 00 42 4C B2 42 4C AA 31 3A |121.~...BL.BL.1:|
00000060: 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 52 45 |."............RE|
00000070: 4D 20 34 36 36 33 20 41 41 52 42 55 52 47 00 B0 |M 4663 AARBURG..|
00000080: 08 04 00 42 4C B2 42 4C AA 31 3A 8F 22 14 14 14 |...BL.BL.1:."...|
00000090: 14 14 14 14 14 14 14 14 14 52 45 4D 20 53 41 43 |.........REM SAC|
000000A0: 48 57 45 49 5A 20 20 20 20 20 20 20 31 39 38 35 |HWEIZ 1985|
000000B0: 00 CB 08 06 00 99 22 93 22 3A 97 35 33 32 38 30 |......".":.53280|
000000C0: 2C 30 3A 97 35 33 32 38 31 2C 30 00 F3 08 0B 00 |,0:.53281,0.....|
000000D0: 99 22 9E 20 20 43 20 36 20 34 20 20 20 54 20 52 |.". C 6 4 T R|
000000E0: 20 49 20 43 20 4B 20 2D 20 4B 20 49 20 53 20 54 | I C K - K I S T|
000000F0: 20 45 22 00 1B 09 10 00 99 22 81 20 20 B8 B8 B8 | E"......". ...|
00000100: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000110: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 00 4B 09 15 00 |..........".K...|
00000120: 99 22 11 11 11 9C 49 4E 20 44 49 53 45 4D 20 50 |."....IN DISEM P|
00000130: 52 4F 47 52 41 4D 4D 20 49 53 54 20 45 49 4E 45 |ROGRAMM IST EINE|
00000140: 20 55 45 42 45 52 53 49 43 48 54 00 7A 09 1A 00 | UEBERSICHT.z...|
00000150: 99 22 11 44 45 52 20 57 49 43 48 54 49 47 53 54 |.".DER WICHTIGST|
00000160: 45 4E 20 50 4F 4B 45 20 55 4E 44 20 50 45 45 4B |EN POKE UND PEEK|
00000170: 20 42 45 46 45 48 4C 45 4E 2E 00 A8 09 1F 00 99 | BEFEHLEN.......|
00000180: 22 05 11 11 44 41 53 20 47 41 4E 5A 45 20 49 53 |"...DAS GANZE IS|
00000190: 54 20 4D 49 54 20 56 49 45 4C 45 4E 20 41 4E 57 |T MIT VIELEN ANW|
000001A0: 45 4E 44 55 4E 47 53 2D 00 D5 09 24 00 99 22 11 |ENDUNGS-...$..".|
000001B0: 42 45 49 53 50 49 45 4C 45 4E 20 41 55 43 48 20 |BEISPIELEN AUCH |
000001C0: 46 55 45 52 20 44 45 4E 20 43 4F 4D 4D 4F 44 4F |FUER DEN COMMODO|
000001D0: 52 45 20 36 34 00 F3 09 29 00 99 22 11 41 4E 46 |RE 64...)..".ANF|
000001E0: 41 45 4E 47 45 52 20 49 4E 54 45 52 45 53 53 41 |AENGER INTERESSA|
000001F0: 4E 54 2E 00 28 0A 2E 00 99 22 11 11 11 11 1F 12 |NT..(...."......|
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 53 50 41 43 45 20 20 20 20 20 20 20 20 20 20 | SPACE |
00000220: 20 20 20 20 20 20 20 22 00 3A 0A 33 00 A1 41 24 | ".:.3..A$|
00000230: 3A 8B 41 24 B2 22 22 A7 35 31 00 50 0A 38 00 81 |:.A$."".51.P.8..|
00000240: 5A B2 32 33 A4 30 A9 AB 31 3A 97 36 37 37 2C 5A |Z.23.0..1:.677,Z|
00000250: 00 69 0A 3D 00 5A 31 B2 32 31 37 AA 5A 3A 48 B2 |.i.=.Z1.217.Z:H.|
00000260: C2 28 5A 31 29 B0 31 32 38 00 77 0A 42 00 81 49 |.(Z1).128.w.B..I|
00000270: B2 31 A4 32 35 AB 5A 00 8E 0A 47 00 9E 20 35 39 |.1.25.Z...G.. 59|
00000280: 37 37 37 3A 97 5A 31 2C 48 3A 82 49 2C 5A 00 B0 |777:.Z1,H:.I,Z..|
00000290: 0A 4C 00 99 22 9E 20 20 20 20 20 20 20 20 20 20 |.L..". |
000002A0: 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 20 2A 2A 2A | *** MENUE ***|
000002B0: 00 CF 0A 51 00 99 3A 99 3A 99 22 20 20 20 20 20 |...Q..:.:." |
000002C0: 20 20 20 20 20 20 20 20 B1 B1 B1 B1 B1 20 22 00 | ..... ".|
000002D0: D5 0A 56 00 99 00 FF 0A 57 00 8B 42 4C B3 B1 34 |..V.....W..BL..4|
000002E0: A7 A2 3A 8F 22 14 14 14 14 14 14 14 14 14 14 14 |..:."...........|
000002F0: 14 14 14 14 14 14 14 14 43 4C 3D 33 32 36 33 00 |........CL=3263.|
00000300: 21 0B 5B 00 99 22 05 11 3C 31 3E 20 20 20 20 20 |!.[.."..<1> |
00000310: 42 41 53 49 43 20 56 45 52 53 43 48 49 45 42 45 |BASIC VERSCHIEBE|
00000320: 4E 00 43 0B 60 00 99 22 11 3C 32 3E 20 20 20 20 |N.C.`..".<2> |
00000330: 20 42 49 4C 44 53 43 48 49 52 4D 20 45 49 4E 2D | BILDSCHIRM EIN-|
00000340: 41 55 53 00 68 0B 65 00 99 22 11 3C 33 3E 20 20 |AUS.h.e..".<3> |
00000350: 20 20 20 42 55 43 48 53 54 41 42 45 4E 20 4F 48 | BUCHSTABEN OH|
00000360: 4E 45 20 50 52 49 4E 54 00 81 0B 6A 00 99 22 11 |NE PRINT...j..".|
00000370: 3C 34 3E 20 20 20 20 20 43 4F 4C 44 53 54 41 52 |<4> COLDSTAR|
00000380: 54 00 A5 0B 6F 00 99 22 11 3C 35 3E 20 20 20 20 |T...o..".<5> |
00000390: 20 43 41 4E 27 54 20 43 4F 4E 54 49 4E 55 45 20 | CAN'T CONTINUE |
000003A0: 45 52 52 4F 52 00 BB 0B 74 00 99 22 11 3C 36 3E |ERROR...t..".<6>|
000003B0: 20 20 20 20 20 43 55 52 53 4F 52 00 CF 0B 79 00 | CURSOR...y.|
000003C0: 99 22 11 3C 37 3E 20 20 20 20 20 44 49 53 4B 00 |.".<7> DISK.|
000003D0: EC 0B 7E 00 99 22 11 3C 38 3E 20 20 20 20 20 46 |..~..".<8> F|
000003E0: 41 52 42 20 2B 20 47 52 41 46 49 4B 00 0E 0C 83 |ARB + GRAFIK....|
000003F0: 00 99 22 11 3C 39 3E 20 20 20 20 20 46 4F 52 4D |..".<9> FORM|
00000400: 55 4C 41 20 54 4F 20 43 4F 4D 50 4C 45 58 00 2C |ULA TO COMPLEX.,|
00000410: 0C 88 00 99 22 96 11 3C 30 3E 20 20 20 20 4E 41 |...."..<0> NA|
00000420: 45 43 48 53 54 45 20 53 45 49 54 45 00 5A 0C 89 |ECHSTE SEITE.Z..|
00000430: 00 85 22 96 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00000440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000450: 20 20 20 20 20 20 20 22 3B 41 00 88 0C 8A 00 91 | ";A......|
00000460: 41 20 20 89 20 33 30 30 2C 33 35 30 2C 33 37 30 |A . 300,350,370|
00000470: 2C 34 30 30 2C 34 32 30 2C 34 34 30 2C 35 30 30 |,400,420,440,500|
00000480: 2C 35 32 30 2C 35 34 30 00 95 0C 8B 00 8B 41 B2 |,520,540......A.|
00000490: 30 A7 31 34 31 00 9E 0C 8C 00 89 31 33 37 00 C0 |0.141......137..|
000004A0: 0C 8D 00 99 22 9E 20 20 20 20 20 20 20 20 20 20 |....". |
000004B0: 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 20 2A 2A 2A | *** MENUE ***|
000004C0: 00 DE 0C 92 00 99 22 20 20 20 20 20 20 20 20 20 |......" |
000004D0: 20 20 20 20 20 20 20 B1 B1 B1 B1 B1 20 22 00 E6 | ..... "..|
000004E0: 0C 93 00 99 3A 99 00 FC 0C 97 00 99 22 96 11 3C |....:......."..<|
000004F0: 31 3E 20 20 20 20 20 46 49 4C 45 53 00 18 0D 9C |1> FILES....|
00000500: 00 99 22 11 3C 32 3E 20 20 20 20 20 49 4E 50 55 |..".<2> INPU|
00000510: 54 20 4F 48 4E 45 20 3F 00 33 0D A1 00 99 22 11 |T OHNE ?.3....".|
00000520: 3C 33 3E 20 20 20 20 20 49 4E 54 45 52 4E 45 20 |<3> INTERNE |
00000530: 55 48 52 00 4D 0D A6 00 99 22 11 3C 34 3E 20 20 |UHR.M....".<4> |
00000540: 20 20 20 49 4E 54 45 52 55 50 54 27 53 00 66 0D | INTERUPT'S.f.|
00000550: AB 00 99 22 11 3C 35 3E 20 20 20 20 20 4A 4F 59 |...".<5> JOY|
00000560: 53 54 49 43 4B 53 00 8B 0D B0 00 99 22 11 3C 36 |STICKS......".<6|
00000570: 3E 20 20 20 20 20 4B 4F 4E 54 52 4F 4C 4C 45 20 |> KONTROLLE |
00000580: 55 4E 44 20 41 42 46 52 41 47 45 00 A8 0D B5 00 |UND ABFRAGE.....|
00000590: 99 22 11 3C 37 3E 20 20 20 20 20 4C 49 53 54 20 |.".<7> LIST |
000005A0: 2D 20 53 43 48 55 54 5A 00 D8 0D B6 00 8B 42 4C |- SCHUTZ......BL|
000005B0: B3 B1 34 A7 A2 3A 8F 22 14 14 14 14 14 14 14 14 |..4..:."........|
000005C0: 14 14 14 14 14 14 14 14 14 53 50 3D 31 32 54 48 |.........SP=12TH|
000005D0: 45 4E 20 43 4B 3D 31 34 00 F2 0D BA 00 99 22 11 |EN CK=14......".|
000005E0: 3C 38 3E 20 20 20 20 20 4C 4F 41 44 20 45 52 52 |<8> LOAD ERR|
000005F0: 4F 52 00 18 0E BF 00 99 22 11 3C 39 3E 20 20 20 |OR......".<9> |
00000600: 20 20 4D 41 44 45 20 49 4E 20 55 53 41 20 4F 52 | MADE IN USA OR|
00000610: 20 47 45 52 4D 41 4E 59 00 36 0E C4 00 99 22 9B | GERMANY.6....".|
00000620: 11 3C 30 3E 20 20 20 20 4E 41 45 43 48 53 54 45 |.<0> NAECHSTE|
00000630: 20 53 45 49 54 45 00 64 0E C9 00 85 22 96 20 20 | SEITE.d....". |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000660: 20 22 3B 41 00 92 0E CA 00 91 41 20 20 89 20 35 | ";A......A . 5|
00000670: 36 30 2C 35 37 30 2C 35 39 30 2C 36 31 30 2C 36 |60,570,590,610,6|
00000680: 34 30 2C 36 37 30 2C 37 36 30 2C 38 34 30 2C 38 |40,670,760,840,8|
00000690: 36 30 00 9F 0E CB 00 8B 41 B2 30 A7 32 30 36 00 |60......A.0.206.|
000006A0: A8 0E CC 00 89 32 30 31 00 CA 0E CE 00 99 22 9E |.....201......".|
000006B0: 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 20 | *** |
000006C0: 4D 45 4E 55 45 20 20 2A 2A 2A 00 E8 0E D3 00 99 |MENUE ***......|
000006D0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000006E0: 20 B1 B1 B1 B1 B1 20 22 00 F0 0E D4 00 99 3A 99 | ..... "......:.|
000006F0: 00 1C 0F D7 00 99 22 9E 11 3C 31 3E 20 20 20 20 |......"..<1> |
00000700: 20 50 52 4F 47 52 41 4D 4D 49 45 52 54 45 52 20 | PROGRAMMIERTER |
00000710: 44 49 52 45 4B 54 4D 4F 44 55 53 22 00 32 0F D8 |DIREKTMODUS".2..|
00000720: 00 99 22 11 3C 32 3E 20 20 20 20 20 52 45 53 45 |..".<2> RESE|
00000730: 54 53 00 46 0F DD 00 99 22 11 3C 33 3E 20 20 20 |TS.F....".<3> |
00000740: 20 20 53 41 56 45 00 5C 0F E2 00 99 22 11 3C 34 | SAVE.\....".<4|
00000750: 3E 20 20 20 20 20 53 43 52 4F 4C 4C 00 75 0F E7 |> SCROLL.u..|
00000760: 00 99 22 11 3C 35 3E 20 20 20 20 20 53 54 45 55 |..".<5> STEU|
00000770: 45 52 55 4E 47 00 90 0F EC 00 99 22 11 3C 36 3E |ERUNG......".<6>|
00000780: 20 20 20 20 20 53 54 45 43 4B 20 4D 4F 44 55 4C | STECK MODUL|
00000790: 00 A5 0F F1 00 99 22 11 3C 37 3E 20 20 20 20 20 |......".<7> |
000007A0: 52 45 4E 45 57 00 C4 0F F6 00 99 22 11 3C 38 3E |RENEW......".<8>|
000007B0: 20 20 20 20 20 53 41 56 45 20 42 49 4C 44 53 43 | SAVE BILDSC|
000007C0: 48 49 52 4D 00 E5 0F F7 00 8B 20 42 4C 20 B3 B1 |HIRM...... BL ..|
000007D0: 20 34 20 A7 20 A2 3A 8F 22 14 14 14 14 14 14 14 | 4 . .:.".......|
000007E0: 14 42 4C 3D 30 00 04 10 00 01 99 22 11 3C 39 3E |.BL=0......".<9>|
000007F0: 20 20 20 20 20 5A 45 49 4C 45 4E 20 4C 4F 45 53 | ZEILEN LOES|
00000800: 43 48 45 4E 00 23 10 05 01 99 22 9C 11 3C 30 3E |CHEN.#...."..<0>|
00000810: 20 20 20 20 20 4E 41 45 43 48 53 54 45 20 53 45 | NAECHSTE SE|
00000820: 49 54 45 00 4F 10 0A 01 85 22 96 20 20 20 20 20 |ITE.O....". |
00000830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000840: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 41 00 | ";A.|
00000850: 81 10 0B 01 91 41 20 20 89 20 38 38 30 2C 34 30 |.....A . 880,40|
00000860: 30 2C 39 34 30 2C 39 36 30 2C 39 38 30 2C 31 30 |0,940,960,980,10|
00000870: 31 30 2C 31 30 33 30 2C 31 30 36 30 2C 31 31 30 |10,1030,1060,110|
00000880: 30 00 8E 10 0C 01 8B 41 B2 30 A7 32 37 30 00 97 |0......A.0.270..|
00000890: 10 0D 01 89 32 36 36 00 B9 10 0E 01 99 22 9E 20 |....266......". |
000008A0: 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 20 4D | *** M|
000008B0: 45 4E 55 45 20 20 2A 2A 2A 00 D7 10 0F 01 99 22 |ENUE ***......"|
000008C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008D0: B1 B1 B1 B1 B1 20 22 00 DF 10 10 01 99 3A 99 00 |..... "......:..|
000008E0: 01 11 11 01 99 22 9C 11 3C 31 3E 20 20 20 20 20 |....."..<1> |
000008F0: 5A 45 49 43 48 45 4E 20 42 45 49 20 49 4E 50 55 |ZEICHEN BEI INPU|
00000900: 54 00 21 11 12 01 99 22 11 3C 32 3E 20 20 20 20 |T.!....".<2> |
00000910: 20 5A 45 52 53 54 4F 45 52 20 42 45 46 45 48 4C | ZERSTOER BEFEHL|
00000920: 45 00 40 11 13 01 99 22 11 3C 33 3E 20 20 20 20 |E.@....".<3> |
00000930: 20 5A 55 53 41 4D 4D 45 4E 20 4B 4C 45 42 45 4E | ZUSAMMEN KLEBEN|
00000940: 00 64 11 14 01 99 22 11 3C 34 3E 20 20 20 20 20 |.d....".<4> |
00000950: 5A 45 49 4C 45 4E 20 52 45 4E 55 4D 4D 45 52 49 |ZEILEN RENUMMERI|
00000960: 45 52 45 4E 00 90 11 15 01 99 22 11 3C 35 3E 20 |EREN......".<5> |
00000970: 20 20 20 20 5A 45 4E 54 52 49 45 52 55 4E 47 20 | ZENTRIERUNG |
00000980: 44 45 53 20 42 49 4C 44 53 43 48 49 52 4D 45 53 |DES BILDSCHIRMES|
00000990: 00 B0 11 16 01 99 22 11 3C 36 3E 20 20 20 20 20 |......".<6> |
000009A0: 5A 55 52 55 45 43 4B 20 5A 55 20 42 41 53 49 43 |ZURUECK ZU BASIC|
000009B0: 00 C9 11 17 01 99 22 11 3C 37 3E 20 20 20 20 20 |......".<7> |
000009C0: 42 49 54 20 57 45 52 54 45 00 EB 11 18 01 99 22 |BIT WERTE......"|
000009D0: 11 3C 38 3E 20 20 20 20 20 56 45 52 53 43 48 49 |.<8> VERSCHI|
000009E0: 45 44 45 4E 45 20 54 52 49 4B 53 00 0A 12 19 01 |EDENE TRIKS.....|
000009F0: 99 22 11 3C 39 3E 20 20 20 20 20 4B 4F 4E 54 52 |.".<9> KONTR|
00000A00: 4F 4C 4C 54 4F 4E 20 45 49 4E 00 1F 12 1A 01 99 |OLLTON EIN......|
00000A10: 22 05 11 3C 30 3E 20 20 20 20 20 45 4E 44 45 00 |"..<0> ENDE.|
00000A20: 4D 12 1B 01 85 22 96 20 20 20 20 20 20 20 20 20 |M....". |
00000A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A40: 20 20 20 20 20 20 20 20 20 20 22 3B 41 00 76 12 | ";A.v.|
00000A50: 1C 01 8B 42 4C B3 B1 34 A7 A2 3A 8F 22 14 14 14 |...BL..4..:."...|
00000A60: 14 14 14 14 14 14 14 14 14 14 14 33 54 48 45 4E |...........3THEN|
00000A70: 47 4F 54 4F 38 36 00 AD 12 1D 01 91 41 20 20 89 |GOTO86......A .|
00000A80: 20 31 31 31 30 2C 31 31 33 30 2C 31 31 35 30 2C | 1110,1130,1150,|
00000A90: 31 31 37 30 2C 31 31 39 30 2C 31 32 31 30 2C 31 |1170,1190,1210,1|
00000AA0: 32 33 30 2C 31 32 36 30 2C 31 32 38 30 00 BA 12 |230,1260,1280...|
00000AB0: 1E 01 8B 41 B2 30 A7 32 39 39 00 C3 12 1F 01 89 |...A.0.299......|
00000AC0: 32 38 33 00 EE 12 2B 01 99 22 93 96 11 11 11 11 |283...+.."......|
00000AD0: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |........ |
00000AE0: 20 20 42 59 22 3A 99 22 13 22 3A 80 3A 80 00 06 | BY":.".":.:...|
00000AF0: 13 2C 01 8F 22 02 01 13 09 03 2D 16 05 12 13 03 |.,..".....-.....|
00000B00: 08 09 05 02 05 0E 00 0F 13 2E 01 99 22 93 22 00 |............".".|
00000B10: 34 13 30 01 99 22 9E 20 20 20 20 20 20 20 20 D5 |4.0..". .|
00000B20: C9 42 41 53 49 43 20 56 45 52 53 43 48 49 45 42 |.BASIC VERSCHIEB|
00000B30: 45 4E D5 C9 00 59 13 31 01 99 22 9E 20 20 20 20 |EN...Y.1..". |
00000B40: 20 20 20 20 CA CB B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 | ............|
00000B50: B8 B8 B8 B8 B8 B8 B8 CA CB 00 76 13 36 01 99 22 |..........v.6.."|
00000B60: 11 35 35 32 39 36 20 20 3D 20 46 41 52 42 53 50 |.55296 = FARBSP|
00000B70: 45 49 43 48 45 52 00 99 13 38 01 99 22 11 50 52 |EICHER...8..".PR|
00000B80: 49 4E 54 20 50 45 45 4B 28 34 33 29 2B 32 35 36 |INT PEEK(43)+256|
00000B90: 2A 50 45 45 4B 28 34 34 29 00 B0 13 3B 01 99 22 |*PEEK(44)...;.."|
00000BA0: 11 11 9C 56 45 52 53 43 48 49 45 42 45 4E 3A 22 |...VERSCHIEBEN:"|
00000BB0: 00 DF 13 3D 01 99 22 11 11 50 4F 4B 45 34 33 2C |...=.."..POKE43,|
00000BC0: 05 58 9C 3A 50 4F 4B 45 34 34 2C 05 59 9C 3A 50 |.X.:POKE44,.Y.:P|
00000BD0: 4F 4B 45 05 41 44 9C 2D 31 2C 30 3A 4E 45 57 00 |OKE.AD.-1,0:NEW.|
00000BE0: 0F 14 40 01 99 22 05 11 11 11 58 20 55 4E 44 20 |..@.."....X UND |
00000BF0: 59 20 57 49 52 44 20 45 52 52 45 43 48 4E 45 54 |Y WIRD ERRECHNET|
00000C00: 20 41 55 53 20 44 45 52 20 46 4F 52 4D 45 4C 00 | AUS DER FORMEL.|
00000C10: 28 14 42 01 99 22 11 46 55 45 52 20 42 41 53 49 |(.B..".FUER BASI|
00000C20: 43 20 53 54 41 52 54 2E 00 43 14 44 01 99 22 11 |C START..C.D..".|
00000C30: 41 44 20 3D 20 41 4E 46 41 4E 47 53 41 44 52 45 |AD = ANFANGSADRE|
00000C40: 53 53 45 00 73 14 45 01 85 22 11 1F 20 20 20 20 |SSE.s.E..".. |
00000C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C60: 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 | RETURN"|
00000C70: 3B 41 24 00 7C 14 47 01 99 22 93 22 00 8E 14 48 |;A$.|.G.."."...H|
00000C80: 01 99 22 1C 42 45 49 53 50 49 45 4C 3A 22 00 AC |..".BEISPIEL:"..|
00000C90: 14 49 01 85 22 9E 11 4E 45 55 45 20 53 54 41 52 |.I.."..NEUE STAR|
00000CA0: 54 20 41 44 52 45 53 53 45 22 3B 53 00 B8 14 4A |T ADRESSE";S...J|
00000CB0: 01 58 B2 31 3A 59 B2 31 00 C7 14 4C 01 41 44 B2 |.X.1:Y.1...L.AD.|
00000CC0: 58 AA 32 35 36 AC 59 00 D5 14 4E 01 8B 41 44 B2 |X.256.Y...N..AD.|
00000CD0: 53 A7 33 34 30 00 DF 14 4F 01 59 B2 59 AA 31 00 |S.340...O.Y.Y.1.|
00000CE0: F3 14 50 01 8B 41 44 B1 53 A7 59 B2 31 3A 58 B2 |..P..AD.S.Y.1:X.|
00000CF0: 58 AA 31 00 25 15 51 01 99 22 13 1F 11 11 11 11 |X.1.%.Q.."......|
00000D00: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000D10: 11 11 11 49 43 48 20 52 45 43 48 4E 45 22 59 22 |...ICH RECHNE"Y"|
00000D20: 20 20 20 22 58 00 2E 15 53 01 89 33 33 32 00 42 | "X...S..332.B|
00000D30: 15 54 01 99 22 13 05 11 11 11 11 11 11 11 11 11 |.T.."...........|
00000D40: 11 22 00 5F 15 55 01 99 22 11 12 20 53 54 41 52 |."._.U..".. STAR|
00000D50: 54 41 44 52 45 53 53 45 20 92 20 3D 20 22 53 00 |TADRESSE . = "S.|
00000D60: 74 15 56 01 99 22 11 12 20 41 44 20 92 20 3D 20 |t.V..".. AD . = |
00000D70: 22 53 AB 31 00 85 15 57 01 99 22 12 20 58 20 92 |"S.1...W..". X .|
00000D80: 20 3D 20 22 58 00 96 15 58 01 99 22 12 20 59 20 | = "X...X..". Y |
00000D90: 92 20 3D 20 22 59 00 BC 15 5B 01 85 22 97 11 11 |. = "Y...[.."...|
00000DA0: 11 11 4E 45 55 45 20 42 45 52 45 43 48 4E 55 4E |..NEUE BERECHNUN|
00000DB0: 47 20 4A 2F 4E 20 3A 20 22 3B 41 24 00 CC 15 5C |G J/N : ";A$...\|
00000DC0: 01 8B 41 24 B2 22 4A 22 A7 33 30 30 00 EE 15 5D |..A$."J".300...]|
00000DD0: 01 99 22 93 9F 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00000DE0: 20 20 20 20 4D 45 4E 55 45 22 3A 89 38 36 00 07 | MENUE":.86..|
00000DF0: 16 5E 01 8F 22 02 09 0C 04 13 03 08 09 12 0E 20 |.^..".......... |
00000E00: 05 09 0E 20 01 15 13 00 34 16 5F 01 99 22 93 96 |... ....4._.."..|
00000E10: 20 20 20 20 20 20 20 20 A4 A4 A4 A4 A4 A4 A4 A4 | ........|
00000E20: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000E30: A4 A4 A4 22 00 64 16 60 01 99 22 1F 20 20 20 20 |...".d.`..". |
00000E40: 20 20 20 3C 12 42 49 4C 44 53 43 48 49 52 4D 20 | <.BILDSCHIRM |
00000E50: 45 49 4E 20 41 55 53 20 53 43 48 41 4C 54 45 4E |EIN AUS SCHALTEN|
00000E60: 92 3E 96 22 00 90 16 61 01 99 22 20 20 20 20 20 |.>."...a.." |
00000E70: 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | .............|
00000E80: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 22 |.............. "|
00000E90: 00 B7 16 62 01 99 22 11 11 11 42 49 4C 44 53 43 |...b.."...BILDSC|
00000EA0: 48 49 52 4D 20 45 49 4E 20 20 50 4F 4B 45 20 35 |HIRM EIN POKE 5|
00000EB0: 33 32 36 35 2C 32 37 00 DD 16 63 01 99 22 11 11 |3265,27...c.."..|
00000EC0: 42 49 4C 44 53 43 48 49 52 4D 20 41 55 53 20 20 |BILDSCHIRM AUS |
00000ED0: 50 4F 4B 45 20 35 33 32 36 35 2C 31 31 00 0D 17 |POKE 53265,11...|
00000EE0: 65 01 99 22 05 11 11 54 41 53 54 41 54 55 52 20 |e.."...TASTATUR |
00000EF0: 41 55 46 20 42 49 4C 44 53 43 48 49 52 4D 20 45 |AUF BILDSCHIRM E|
00000F00: 49 4E 20 50 4F 4B 45 36 34 39 2C 31 30 00 3B 17 |IN POKE649,10.;.|
00000F10: 66 01 99 22 11 11 54 41 53 54 41 54 55 52 20 41 |f.."..TASTATUR A|
00000F20: 55 46 20 42 49 4C 44 53 43 48 49 52 4D 20 41 55 |UF BILDSCHIRM AU|
00000F30: 53 20 50 4F 4B 45 36 34 39 2C 30 00 70 17 68 01 |S POKE649,0.p.h.|
00000F40: 85 22 11 11 11 11 11 11 1F 20 20 20 20 20 20 20 |."....... |
00000F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F60: 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 | RETURN";A$|
00000F70: 00 92 17 6A 01 99 22 93 9F 20 20 20 20 20 20 20 |...j..".. |
00000F80: 20 20 20 20 20 2A 2A 2A 20 4D 45 55 45 20 2A 2A | *** MEUE **|
00000F90: 2A 22 00 9A 17 6D 01 89 38 36 00 B3 17 72 01 8F |*"...m..86...r..|
00000FA0: 20 22 02 15 03 08 13 2E 2D 0F 08 0E 05 20 12 10 | "......-.... ..|
00000FB0: 09 0E 2E 00 DB 17 73 01 99 22 93 1E 20 20 20 20 |......s..".. |
00000FC0: 20 20 20 20 D3 20 42 49 4C 44 53 43 48 49 52 4D | . BILDSCHIRM|
00000FD0: 53 50 45 49 43 48 45 52 20 D3 22 00 FF 17 74 01 |SPEICHER ."...t.|
00000FE0: 99 22 20 20 20 20 20 20 20 20 20 20 B8 B8 B8 B8 |." ....|
00000FF0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 00 |..............".|
00001000: 24 18 75 01 99 22 9E 11 11 50 4F 4B 45 20 31 30 |$.u.."...POKE 10|
00001010: 32 34 20 2B 96 20 53 9E 20 2B 20 34 30 20 2A 20 |24 +. S. + 40 * |
00001020: 96 5A 2C 43 00 4A 18 76 01 99 22 9E 11 11 50 4F |.Z,C.J.v.."...PO|
00001030: 4B 45 20 35 35 32 39 36 2B 96 20 53 9E 20 2B 20 |KE 55296+. S. + |
00001040: 34 30 20 2A 20 96 5A 2C 43 4F 00 6F 18 77 01 99 |40 * .Z,CO.o.w..|
00001050: 22 05 11 11 31 30 32 34 20 20 20 3D 20 42 49 4C |"...1024 = BIL|
00001060: 44 53 43 48 49 52 4D 53 50 45 49 43 48 45 52 00 |DSCHIRMSPEICHER.|
00001070: 8C 18 78 01 99 22 11 35 35 32 39 36 20 20 3D 20 |..x..".55296 = |
00001080: 46 41 52 42 53 50 45 49 43 48 45 52 00 AE 18 79 |FARBSPEICHER...y|
00001090: 01 99 22 11 53 20 20 20 20 20 20 3D 20 53 50 41 |..".S = SPA|
000010A0: 4C 54 45 20 28 54 41 42 29 20 30 2D 33 39 00 D8 |LTE (TAB) 0-39..|
000010B0: 18 7A 01 99 22 11 5A 20 20 20 20 20 20 3D 20 5A |.z..".Z = Z|
000010C0: 45 49 4C 45 20 20 28 43 55 52 53 4F 52 20 44 4F |EILE (CURSOR DO|
000010D0: 57 4E 29 20 30 2D 32 34 00 F8 18 7B 01 99 22 11 |WN) 0-24...{..".|
000010E0: 43 20 20 20 20 20 20 3D 20 42 49 4C 44 53 43 48 |C = BILDSCH|
000010F0: 49 52 4D 20 43 4F 44 45 00 12 19 7C 01 99 22 11 |IRM CODE...|..".|
00001100: 43 4F 20 20 20 20 20 3D 20 46 41 52 42 20 43 4F |CO = FARB CO|
00001110: 44 45 00 42 19 7D 01 85 22 11 11 1C 20 20 20 20 |DE.B.}.."... |
00001120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001130: 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B | RETURN";|
00001140: 41 24 00 59 19 7F 01 99 22 93 9E 42 45 49 53 50 |A$.Y...."..BEISP|
00001150: 49 45 4C 3A 22 3A 99 3A 99 00 74 19 80 01 99 22 |IEL:":.:..t...."|
00001160: 50 4F 4B 45 31 30 32 34 2B 32 30 2B 34 30 2A 31 |POKE1024+20+40*1|
00001170: 32 2C 38 31 00 8F 19 81 01 99 22 50 4F 4B 45 35 |2,81......"POKE5|
00001180: 35 32 39 36 2B 32 30 2B 34 30 2A 31 32 2C 32 00 |5296+20+40*12,2.|
00001190: BB 19 82 01 99 22 11 11 47 49 42 54 20 49 4E 20 |....."..GIBT IN |
000011A0: 44 45 52 20 4D 49 54 54 45 20 44 45 53 20 42 49 |DER MITTE DES BI|
000011B0: 4C 44 53 43 48 49 52 4D 45 53 22 00 D4 19 83 01 |LDSCHIRMES".....|
000011C0: 99 22 11 45 49 4E 45 4E 20 52 4F 54 45 4E 20 50 |.".EINEN ROTEN P|
000011D0: 55 4E 4B 54 00 EA 19 84 01 97 31 30 32 34 AA 32 |UNKT......1024.2|
000011E0: 30 AA 34 30 AC 31 32 2C 38 31 00 00 1A 85 01 97 |0.40.12,81......|
000011F0: 35 35 32 39 36 AA 32 30 AA 34 30 AC 31 32 2C 32 |55296.20.40.12,2|
00001200: 00 35 1A 86 01 85 22 11 11 11 11 11 11 11 11 20 |.5...."........ |
00001210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001220: 20 20 20 20 20 20 20 20 20 20 9C 52 45 54 55 52 | .RETUR|
00001230: 4E 22 3B 41 24 00 5B 1A 88 01 99 22 93 1F 20 20 |N";A$.[....".. |
00001240: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A | ***|
00001250: 20 4D 45 4E 55 45 20 2A 2A 2A 22 00 63 1A 8C 01 | MENUE ***".c...|
00001260: 89 38 36 00 6E 1A 90 01 8F 22 03 0F 0C 04 00 96 |.86.n...."......|
00001270: 1A 91 01 99 22 93 20 20 20 20 20 20 20 20 20 20 |....". |
00001280: 20 20 2A 2A 2A 20 20 43 4F 4C 44 53 54 41 52 54 | *** COLDSTART|
00001290: 20 20 2A 2A 2A 22 00 B9 1A 92 01 99 22 20 20 20 | ***"......" |
000012A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 B2 B2 | ..|
000012B0: B2 B2 B2 B2 B2 B2 B2 20 22 00 E9 1A 93 01 99 22 |....... "......"|
000012C0: 11 11 11 9F 52 45 53 45 54 20 56 45 52 53 45 54 |....RESET VERSET|
000012D0: 5A 54 20 43 4F 4D 50 55 54 45 52 20 49 4E 20 45 |ZT COMPUTER IN E|
000012E0: 49 4E 53 43 48 41 4C 54 2D 00 01 1B 94 01 99 22 |INSCHALT-......"|
000012F0: 11 5A 55 53 54 41 4E 44 20 5A 55 52 55 45 43 4B |.ZUSTAND ZURUECK|
00001300: 2E 00 31 1B 95 01 99 22 11 11 53 59 53 20 34 32 |..1...."..SYS 42|
00001310: 31 31 35 20 20 20 20 20 20 20 20 20 20 20 20 20 |115 |
00001320: 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 44 45 | ODE|
00001330: 52 00 61 1B 96 01 99 22 11 11 53 59 53 20 36 34 |R.a...."..SYS 64|
00001340: 37 33 38 20 20 20 20 20 20 20 20 20 20 20 20 20 |738 |
00001350: 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 44 45 | ODE|
00001360: 52 00 91 1B 97 01 99 22 11 11 53 59 53 20 36 35 |R......"..SYS 65|
00001370: 34 30 39 20 20 20 20 20 20 20 20 20 20 20 20 20 |409 |
00001380: 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 44 45 | ODE|
00001390: 52 00 C3 1B 98 01 85 22 11 11 11 11 11 11 9E 20 |R......"....... |
000013A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000013B0: 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 | RETURN"|
000013C0: 3B 41 24 00 E8 1B 9A 01 99 22 93 05 20 20 20 20 |;A$......".. |
000013D0: 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 20 4D 45 | *** ME|
000013E0: 4E 55 45 20 20 2A 2A 2A 00 F0 1B 9B 01 89 38 36 |NUE ***......86|
000013F0: 00 05 1C A4 01 8F 22 03 0F 0E 20 0E 01 03 08 20 |......"... .... |
00001400: 05 12 12 0F 12 00 33 1C A5 01 99 22 93 9C 20 20 |......3....".. |
00001410: 20 20 20 20 20 20 20 20 20 43 4F 4E 54 20 4E 41 | CONT NA|
00001420: 43 48 20 43 4F 4E 54 49 4E 49 55 45 20 45 52 52 |CH CONTINIUE ERR|
00001430: 4F 52 22 00 5F 1C A6 01 99 22 20 20 20 20 20 20 |OR"._...." |
00001440: 20 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 | ...........|
00001450: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 |..............".|
00001460: 8E 1C A7 01 99 22 11 11 1E 41 55 53 47 41 42 45 |....."...AUSGABE|
00001470: 20 44 45 52 20 5A 45 49 4C 45 4E 20 4E 55 4D 4D | DER ZEILEN NUMM|
00001480: 45 52 20 56 4F 4D 20 4C 45 54 5A 54 45 4E 00 A6 |ER VOM LETZTEN..|
00001490: 1C A8 01 99 22 11 50 52 4F 47 52 41 4D 4D 41 42 |....".PROGRAMMAB|
000014A0: 42 52 55 43 48 2E 00 CE 1C A9 01 99 22 11 11 50 |BRUCH......."..P|
000014B0: 52 49 4E 54 20 50 45 45 4B 28 35 39 29 20 2B 20 |RINT PEEK(59) + |
000014C0: 32 35 36 20 2A 20 50 45 45 4B 28 36 30 29 00 FB |256 * PEEK(60)..|
000014D0: 1C AA 01 99 22 9E 11 11 11 57 45 4E 4E 20 43 4F |...."....WENN CO|
000014E0: 4E 54 20 4E 49 43 48 54 20 4D 45 48 52 20 4D 4F |NT NICHT MEHR MO|
000014F0: 45 47 4C 49 43 48 20 49 53 54 3A 00 28 1D AB 01 |EGLICH IST:.(...|
00001500: 99 22 11 11 11 50 4F 4B 45 20 35 39 2C 50 45 45 |."...POKE 59,PEE|
00001510: 4B 28 36 31 29 20 3A 20 50 4F 4B 45 20 36 30 2C |K(61) : POKE 60,|
00001520: 50 45 45 4B 28 36 32 29 00 5A 1D AC 01 85 22 11 |PEEK(62).Z....".|
00001530: 11 11 11 81 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
00001540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001550: 52 45 54 55 52 4E 22 3B 41 24 00 81 1D AE 01 99 |RETURN";A$......|
00001560: 22 93 05 20 20 20 20 20 20 20 20 2A 2A 2A 2A 20 |".. **** |
00001570: 20 20 20 4D 45 4E 55 45 20 20 20 20 2A 2A 2A 2A | MENUE ****|
00001580: 22 00 89 1D B3 01 89 38 36 00 96 1D B8 01 8F 22 |"......86......"|
00001590: 03 15 13 12 0F 12 00 B6 1D B9 01 99 22 93 9E 20 |............".. |
000015A0: 20 20 20 20 20 20 20 20 20 20 43 1F 55 1E 52 9C | C.U.R.|
000015B0: 53 1E 4F 9E 52 22 00 D3 1D BA 01 99 22 20 20 20 |S.O.R"......" |
000015C0: 20 20 20 20 20 20 20 20 A2 1E A2 9C A2 1E A2 9E | ........|
000015D0: A2 05 A2 00 FD 1D BB 01 99 22 11 11 96 46 41 52 |........."...FAR|
000015E0: 42 45 20 20 50 4F 4B 45 20 36 34 36 2C 58 20 20 |BE POKE 646,X |
000015F0: 20 58 20 3D 20 46 41 52 42 43 4F 44 45 00 26 1E | X = FARBCODE.&.|
00001600: BC 01 99 22 11 96 46 41 52 42 45 20 20 50 4F 4B |..."..FARBE POK|
00001610: 45 20 36 34 36 2C 58 20 20 20 58 20 3D 20 46 41 |E 646,X X = FA|
00001620: 52 42 43 4F 44 45 00 56 1E BD 01 99 22 11 9E 11 |RBCODE.V...."...|
00001630: 52 45 50 45 41 54 46 55 4E 54 49 4F 4E 20 20 50 |REPEATFUNTION P|
00001640: 4F 4B 45 20 36 35 30 2C 30 20 20 4E 4F 52 4D 41 |OKE 650,0 NORMA|
00001650: 4C 20 4D 4F 44 2E 00 85 1E BE 01 99 22 11 52 45 |L MOD.......".RE|
00001660: 50 45 41 54 46 55 4E 54 49 4F 4E 20 20 50 4F 4B |PEATFUNTION POK|
00001670: 45 20 36 35 30 2C 31 32 38 20 41 4C 4C 45 20 54 |E 650,128 ALLE T|
00001680: 41 53 54 45 4E 00 B4 1E BF 01 99 22 11 52 45 50 |ASTEN......".REP|
00001690: 45 41 54 46 55 4E 54 49 4F 4E 20 20 50 4F 4B 45 |EATFUNTION POKE|
000016A0: 20 36 35 30 2C 36 34 20 4B 45 49 4E 45 20 54 41 | 650,64 KEINE TA|
000016B0: 53 54 45 4E 00 E5 1E C0 01 99 22 11 11 9F 43 55 |STEN......"...CU|
000016C0: 52 53 4F 52 20 53 54 45 55 45 52 4E 20 28 50 52 |RSOR STEUERN (PR|
000016D0: 4F 47 52 41 4D 4D 49 45 52 54 45 20 41 55 53 47 |OGRAMMIERTE AUSG|
000016E0: 41 42 45 29 22 00 01 1F C1 01 99 22 11 50 4F 4B |ABE)"......".POK|
000016F0: 45 20 32 31 34 2C 5A 3A 50 4F 4B 45 32 31 31 2C |E 214,Z:POKE211,|
00001700: 53 00 27 1F C2 01 99 22 11 53 59 53 20 35 38 36 |S.'....".SYS 586|
00001710: 34 30 3A 20 50 52 49 4E 54 27 27 54 45 58 54 2E |40: PRINT''TEXT.|
00001720: 2E 2E 2E 2E 27 27 22 00 57 1F C3 01 85 22 11 1C |....''".W...."..|
00001730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001740: 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 | RET|
00001750: 55 52 4E 22 3B 41 24 00 7A 1F C5 01 99 22 93 9F |URN";A$.z...."..|
00001760: 5A 20 20 53 54 45 48 54 20 46 55 45 52 20 20 5A |Z STEHT FUER Z|
00001770: 45 49 4C 45 20 28 54 41 42 29 00 A5 1F C6 01 99 |EILE (TAB)......|
00001780: 22 11 53 20 20 53 54 45 48 54 20 46 55 45 52 20 |".S STEHT FUER |
00001790: 20 53 50 41 4C 54 45 20 28 43 55 52 53 4F 52 20 | SPALTE (CURSOR |
000017A0: 44 4F 57 4E 22 00 CE 1F C8 01 99 22 11 11 9C 42 |DOWN"......"...B|
000017B0: 45 49 53 50 49 45 4C 3A 20 50 4F 4B 45 20 32 31 |EISPIEL: POKE 21|
000017C0: 34 2C 32 30 3A 50 4F 4B 45 32 31 31 2C 38 00 EE |4,20:POKE211,8..|
000017D0: 1F C9 01 99 22 11 53 59 53 20 35 38 36 34 30 3A |....".SYS 58640:|
000017E0: 50 52 49 4E 54 27 27 48 41 4C 4C 4F 27 27 00 19 |PRINT''HALLO''..|
000017F0: 20 CA 01 85 22 11 11 96 20 20 20 20 20 20 20 20 | ..."... |
00001800: 20 20 20 20 20 53 54 41 52 54 20 4D 49 54 20 52 | START MIT R|
00001810: 45 54 55 52 4E 22 3B 41 24 00 3D 20 D4 01 97 20 |ETURN";A$.= ... |
00001820: 32 31 34 2C 32 30 3A 97 32 31 31 2C 38 3A 9E 35 |214,20:.211,8:.5|
00001830: 38 36 34 30 3A 99 22 48 41 4C 4C 4F 22 00 6D 20 |8640:."HALLO".m |
00001840: D5 01 85 22 11 11 05 20 20 20 20 20 20 20 20 20 |..."... |
00001850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001860: 20 20 20 52 45 54 55 52 4E 22 3B 41 24 00 8E 20 | RETURN";A$.. |
00001870: D8 01 99 22 93 9F 43 55 52 53 4F 52 20 45 49 4E |..."..CURSOR EIN|
00001880: 20 41 55 53 20 53 43 48 41 4C 54 45 4E 3A 00 B8 | AUS SCHALTEN:..|
00001890: 20 D9 01 99 22 11 49 53 54 20 4E 55 52 20 49 4E | ...".IST NUR IN|
000018A0: 20 45 49 4E 45 4D 20 50 52 4F 47 52 41 4D 4D 20 | EINEM PROGRAMM |
000018B0: 4D 4F 45 47 4C 49 43 48 00 E0 20 DA 01 99 22 11 |MOEGLICH.. ...".|
000018C0: 11 43 55 52 53 4F 52 20 41 55 53 20 50 4F 4B 45 |.CURSOR AUS POKE|
000018D0: 20 32 30 37 2C 30 3A 50 4F 4B 45 32 30 34 2C 31 | 207,0:POKE204,1|
000018E0: 00 01 21 DB 01 99 22 11 43 55 52 53 4F 52 20 45 |..!...".CURSOR E|
000018F0: 49 4E 20 50 4F 4B 45 20 50 4F 4B 45 32 30 34 2C |IN POKE POKE204,|
00001900: 30 00 21 21 DC 01 99 22 9E 11 11 43 55 52 53 4F |0.!!..."...CURSO|
00001910: 52 20 47 45 53 43 48 57 49 4E 44 49 47 4B 45 49 |R GESCHWINDIGKEI|
00001920: 54 00 41 21 DE 01 99 22 11 50 4F 4B 45 20 35 36 |T.A!...".POKE 56|
00001930: 33 32 35 2C 58 20 20 20 4E 4F 52 4D 41 4C 20 35 |325,X NORMAL 5|
00001940: 38 00 65 21 DF 01 99 22 11 58 3D 31 20 2D 20 36 |8.e!...".X=1 - 6|
00001950: 38 20 20 20 20 31 20 3D 20 53 43 48 4E 45 4C 4C |8 1 = SCHNELL|
00001960: 20 20 36 38 22 00 9B 21 E0 01 85 22 11 11 11 11 | 68"..!..."....|
00001970: 11 1F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00001980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001990: 20 52 45 54 55 52 4E 22 3B 41 24 00 C2 21 E2 01 | RETURN";A$..!..|
000019A0: 99 22 93 97 20 20 20 20 20 20 20 20 20 20 20 2A |.".. *|
000019B0: 2A 2A 20 20 20 4D 45 4E 55 45 20 20 20 20 2A 2A |** MENUE **|
000019C0: 2A 22 00 CA 21 E5 01 89 38 36 00 E0 21 F4 01 8F |*"..!...86..!...|
000019D0: 20 22 04 09 13 0B 31 35 34 31 06 0C 0F 10 10 19 | "....1541......|
000019E0: 00 09 22 F5 01 99 22 93 96 20 20 20 20 20 20 20 |.."...".. |
000019F0: 20 20 20 20 5E 5E 46 4C 4F 50 50 59 44 49 53 4B | ^^FLOPPYDISK|
00001A00: 20 31 35 34 31 20 5E 5E 22 00 2E 22 F6 01 99 22 | 1541 ^^".."..."|
00001A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 5F 5F 5F | ___|
00001A20: 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F 20 22 00 5E |____________ ".^|
00001A30: 22 F7 01 99 22 11 11 11 1E 41 4E 5A 41 48 4C 20 |"..."....ANZAHL |
00001A40: 4F 46 46 45 4E 45 52 20 46 49 4C 45 53 20 50 52 |OFFENER FILES PR|
00001A50: 49 4E 54 20 20 50 45 45 4B 28 31 35 32 29 00 88 |INT PEEK(152)..|
00001A60: 22 F8 01 99 22 9E 11 53 43 48 4C 49 45 53 53 45 |"..."..SCHLIESSE|
00001A70: 4E 20 41 4C 4C 45 52 20 46 49 4C 45 53 20 20 53 |N ALLER FILES S|
00001A80: 59 53 20 36 35 35 31 31 00 B4 22 F9 01 99 22 96 |YS 65511.."...".|
00001A90: 11 41 4E 5A 41 48 4C 20 4C 45 53 45 20 46 45 48 |.ANZAHL LESE FEH|
00001AA0: 4C 45 52 20 20 50 52 49 4E 54 20 50 45 45 4B 28 |LER PRINT PEEK(|
00001AB0: 31 38 32 29 00 D6 22 FA 01 99 22 11 99 11 11 44 |182).."..."....D|
00001AC0: 49 53 4B 20 4C 45 53 45 46 45 48 4C 45 52 20 4B |ISK LESEFEHLER K|
00001AD0: 41 4E 41 4C 3A 22 00 F4 22 FB 01 99 22 C5 C5 C5 |ANAL:".."..."...|
00001AE0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001AF0: C5 C5 C5 22 00 09 23 FC 01 99 22 11 31 20 4F 50 |..."..#...".1 OP|
00001B00: 45 4E 20 31 2C 38 2C 31 35 00 22 23 FD 01 99 22 |EN 1,8,15."#..."|
00001B10: 32 20 49 4E 50 55 54 23 31 2C 41 2C 42 24 2C 43 |2 INPUT#1,A,B$,C|
00001B20: 2C 44 00 38 23 FE 01 99 22 33 20 50 52 49 4E 54 |,D.8#..."3 PRINT|
00001B30: 41 2C 42 24 2C 43 2C 44 00 47 23 FF 01 99 22 34 |A,B$,C,D.G#..."4|
00001B40: 20 43 4C 4F 53 45 31 00 51 23 00 02 99 22 52 55 | CLOSE1.Q#..."RU|
00001B50: 4E 00 81 23 01 02 85 22 11 11 1C 20 20 20 20 20 |N..#..."... |
00001B60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001B70: 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 | RETURN";A|
00001B80: 24 00 A2 23 03 02 99 22 93 96 20 20 20 20 20 20 |$..#...".. |
00001B90: 20 20 20 20 2A 2A 20 20 4D 45 4E 55 45 20 20 2A | ** MENUE *|
00001BA0: 2A 22 00 AB 23 05 02 89 20 38 36 00 D1 23 08 02 |*"..#... 86..#..|
00001BB0: 99 22 93 05 20 20 20 20 20 20 20 20 20 20 20 20 |.".. |
00001BC0: 20 20 20 20 20 46 41 52 42 2B 47 52 41 46 49 4B | FARB+GRAFIK|
00001BD0: 22 00 F5 23 09 02 99 22 20 20 20 20 20 20 20 20 |"..#..." |
00001BE0: 20 20 20 20 20 20 20 20 20 B1 B1 B1 B1 B1 B1 B1 | .......|
00001BF0: B1 B1 B1 B1 22 00 19 24 0A 02 99 22 11 48 49 52 |...."..$...".HIR|
00001C00: 45 53 4D 4F 44 55 53 20 45 49 4E 20 50 4F 4B 45 |ESMODUS EIN POKE|
00001C10: 20 35 33 32 36 35 2C 35 39 00 32 24 0B 02 99 22 | 53265,59.2$..."|
00001C20: 11 11 53 49 48 45 20 41 55 43 48 20 43 55 52 53 |..SIHE AUCH CURS|
00001C30: 4F 52 00 4F 24 0C 02 99 22 9E 11 52 45 56 45 52 |OR.O$..."..REVER|
00001C40: 53 20 41 4E 20 50 4F 4B 45 20 31 39 39 2C 31 00 |S AN POKE 199,1.|
00001C50: 6D 24 0D 02 99 22 9E 11 52 45 56 45 52 53 20 41 |m$..."..REVERS A|
00001C60: 55 53 20 50 4F 4B 45 20 31 39 39 2C 30 00 90 24 |US POKE 199,0..$|
00001C70: 0E 02 99 22 9F 11 11 4B 4F 4E 54 52 4F 4C 4C 52 |..."...KONTROLLR|
00001C80: 45 47 49 53 54 45 52 20 4E 4F 52 4D 20 2C 32 37 |EGISTER NORM ,27|
00001C90: 00 B1 24 0F 02 99 22 11 28 32 34 29 20 5A 45 49 |..$...".(24) ZEI|
00001CA0: 4C 45 4E 20 20 50 4F 4B 45 35 33 32 36 35 2C 31 |LEN POKE53265,1|
00001CB0: 39 00 D5 24 10 02 99 22 11 42 49 4C 44 53 43 48 |9..$...".BILDSCH|
00001CC0: 49 52 4D 20 41 55 53 20 50 4F 4B 45 20 35 33 32 |IRM AUS POKE 532|
00001CD0: 36 35 2C 31 31 00 F9 24 11 02 99 22 11 42 49 4C |65,11..$...".BIL|
00001CE0: 44 53 43 48 49 52 4D 20 45 49 4E 20 50 4F 4B 45 |DSCHIRM EIN POKE|
00001CF0: 20 35 33 32 36 35 2C 32 37 00 24 25 12 02 99 22 | 53265,27.$%..."|
00001D00: 11 48 49 4E 54 45 52 47 52 55 4E 44 46 41 52 42 |.HINTERGRUNDFARB|
00001D10: 4D 4F 44 55 53 20 50 4F 4B 45 20 35 33 32 36 35 |MODUS POKE 53265|
00001D20: 2C 32 31 36 00 4A 25 13 02 99 22 11 4D 55 4C 54 |,216.J%...".MULT|
00001D30: 49 43 4F 4C 4F 52 4D 4F 44 55 53 20 20 50 4F 4B |ICOLORMODUS POK|
00001D40: 45 20 35 33 32 36 35 2C 31 36 00 5D 25 14 02 A1 |E 53265,16.]%...|
00001D50: 41 24 3A 8B 41 24 B2 22 22 A7 35 33 32 00 8F 25 |A$:.A$."".532..%|
00001D60: 16 02 99 22 93 96 41 4E 57 45 4E 44 55 4E 47 53 |..."..ANWENDUNGS|
00001D70: 42 45 49 53 50 49 45 4C 3A 22 3A 99 22 B7 B7 B7 |BEISPIEL:":."...|
00001D80: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 |..............".|
00001D90: C1 25 17 02 99 22 11 11 11 31 30 20 50 4F 4B 45 |.%..."...10 POKE|
00001DA0: 20 35 33 32 38 31 2C 39 3A 50 52 49 4E 54 20 43 | 53281,9:PRINT C|
00001DB0: 48 52 24 28 31 34 39 29 43 48 52 24 28 31 34 37 |HR$(149)CHR$(147|
00001DC0: 29 00 F2 25 18 02 99 22 11 11 32 30 20 50 4F 4B |)..%..."..20 POK|
00001DD0: 45 20 35 33 32 38 33 2C 30 3A 46 4F 52 58 3D 30 |E 53283,0:FORX=0|
00001DE0: 54 4F 32 35 35 3A 50 4F 4B 45 31 30 32 34 2B 58 |TO255:POKE1024+X|
00001DF0: 2C 58 00 11 26 19 02 99 22 11 11 33 30 20 4E 45 |,X..&..."..30 NE|
00001E00: 58 54 3A 50 4F 4B 45 20 35 33 32 37 30 2C 32 31 |XT:POKE 53270,21|
00001E10: 36 00 24 26 1A 02 A1 41 24 3A 8B 41 24 B2 22 22 |6.$&...A$:.A$.""|
00001E20: A7 35 33 38 00 4C 26 1B 02 99 22 93 96 20 20 20 |.538.L&...".. |
00001E30: 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 4D 45 | *** ME|
00001E40: 4E 55 45 20 2A 2A 2A 22 3A 89 38 36 00 5C 26 1C |NUE ***":.86.\&.|
00001E50: 02 8F 22 06 0F 12 03 0F 10 0C 05 18 00 84 26 1D |.."...........&.|
00001E60: 02 99 22 93 81 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00001E70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E80: 2A 2A 2A 2A 00 AA 26 1E 02 99 22 20 20 20 20 20 |****..&..." |
00001E90: 20 20 20 20 20 20 2A 46 4F 52 4D 55 4C 41 20 54 | *FORMULA T|
00001EA0: 4F 20 43 4F 4D 50 4C 45 58 2A 00 D0 26 1F 02 99 |O COMPLEX*..&...|
00001EB0: 22 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 2A |" ****|
00001EC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001ED0: 00 FB 26 20 02 99 22 11 11 11 11 99 57 45 4E 4E |..& ..".....WENN|
00001EE0: 20 44 49 45 53 45 20 4D 45 4C 44 55 4E 47 20 41 | DIESE MELDUNG A|
00001EF0: 55 46 54 52 49 54 54 20 55 4E 44 00 27 27 21 02 |UFTRITT UND.''!.|
00001F00: 99 22 11 11 4E 41 43 48 20 44 45 4D 20 5A 57 45 |."..NACH DEM ZWE|
00001F10: 49 54 45 4E 20 4C 49 53 54 20 4E 49 43 48 54 20 |ITEN LIST NICHT |
00001F20: 57 45 47 20 49 53 54 00 40 27 22 02 99 22 11 11 |WEG IST.@'".."..|
00001F30: 48 49 4C 46 54 20 5A 55 20 38 30 25 20 45 49 4E |HILFT ZU 80% EIN|
00001F40: 00 64 27 23 02 99 22 96 11 11 20 20 20 20 20 20 |.d'#.."... |
00001F50: 20 20 20 20 20 20 20 20 20 20 20 50 4F 4B 45 20 | POKE |
00001F60: 32 34 2C 30 00 96 27 24 02 85 22 11 11 11 81 20 |24,0..'$..".... |
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 20 20 20 20 20 52 45 54 55 | RETU|
00001F90: 52 4E 22 3B 41 24 00 B9 27 26 02 99 22 93 20 20 |RN";A$..'&..". |
00001FA0: 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 20 4D 45 | *** ME|
00001FB0: 4E 55 45 20 20 2A 2A 2A 22 00 C2 27 2B 02 89 20 |NUE ***"..'+.. |
00001FC0: 38 36 00 CE 27 30 02 8F 22 12 46 49 4C 45 00 EB |86..'0..".FILE..|
00001FD0: 27 31 02 99 22 93 1C 20 20 20 20 20 20 20 20 20 |'1..".. |
00001FE0: 20 20 2A 20 46 49 4C 45 53 2A 22 00 0A 28 32 02 | * FILES*"..(2.|
00001FF0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 A2 |." .|
00002000: A2 A2 A2 A2 22 3A 89 35 30 33 00 15 28 3A 02 8F |....":.503..(:..|
00002010: 22 09 0E 10 15 00 3D 28 3B 02 99 22 93 9F 20 20 |".....=(;..".. |
00002020: 20 20 20 20 20 49 4E 50 55 54 20 4F 48 4E 45 20 | INPUT OHNE |
00002030: 46 52 41 47 45 5A 45 49 43 48 45 4E 22 00 63 28 |FRAGEZEICHEN".c(|
00002040: 3C 02 99 22 20 20 20 20 20 20 20 B9 B9 B9 B9 B9 |<.." .....|
00002050: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00002060: B9 B9 22 00 8A 28 3D 02 99 22 9C 11 11 11 46 52 |.."..(=.."....FR|
00002070: 41 47 45 5A 45 49 43 48 45 4E 20 41 55 53 20 20 |AGEZEICHEN AUS |
00002080: 50 4F 4B 45 20 31 39 2C 36 34 00 AD 28 3E 02 99 |POKE 19,64..(>..|
00002090: 22 11 46 52 41 47 45 5A 45 49 43 48 45 4E 20 45 |".FRAGEZEICHEN E|
000020A0: 49 4E 20 20 50 4F 4B 45 20 31 39 2C 30 00 C8 28 |IN POKE 19,0..(|
000020B0: 3F 02 99 22 1E 11 11 11 46 52 41 47 45 5A 45 49 |?.."....FRAGEZEI|
000020C0: 43 48 45 4E 20 41 55 53 00 DB 28 40 02 99 22 11 |CHEN AUS..(@..".|
000020D0: 31 30 20 4F 50 45 4E 31 2C 30 22 00 F0 28 41 02 |10 OPEN1,0"..(A.|
000020E0: 99 22 11 32 30 20 49 4E 50 55 54 23 31 2C 41 24 |.".20 INPUT#1,A$|
000020F0: 00 01 29 42 02 99 22 11 33 30 20 43 4C 4F 53 45 |..)B..".30 CLOSE|
00002100: 31 00 32 29 43 02 85 22 11 11 11 81 20 20 20 20 |1.2)C..".... |
00002110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002120: 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B | RETURN";|
00002130: 41 24 00 54 29 45 02 99 22 93 05 20 20 20 20 20 |A$.T)E..".. |
00002140: 20 20 20 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 20 | *** MENUE |
00002150: 2A 2A 2A 22 00 5C 29 46 02 89 38 36 00 66 29 4E |***".\)F..86.f)N|
00002160: 02 8F 22 15 08 12 00 8C 29 4F 02 99 22 93 05 20 |..".....)O..".. |
00002170: 20 20 20 20 20 20 20 20 54 49 20 2D 49 4E 54 45 | TI -INTE|
00002180: 52 4E 45 20 55 48 52 2D 20 54 49 22 00 AB 29 50 |RNE UHR- TI"..)P|
00002190: 02 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
000021A0: 24 24 24 24 24 24 24 24 24 24 24 00 BC 29 51 02 |$$$$$$$$$$$..)Q.|
000021B0: 99 22 9E 11 41 42 46 52 41 47 45 3A 00 CA 29 52 |."..ABFRAGE:..)R|
000021C0: 02 99 22 A3 A3 A3 A3 A3 A3 A3 00 EA 29 53 02 99 |..".........)S..|
000021D0: 22 11 50 52 49 4E 54 20 54 49 20 20 20 20 20 5F |".PRINT TI _|
000021E0: 20 49 4E 20 36 30 53 54 45 4C 00 0F 2A 54 02 99 | IN 60STEL..*T..|
000021F0: 22 11 50 52 49 4E 54 20 54 49 24 20 20 20 20 5F |".PRINT TI$ _|
00002200: 20 49 4E 20 53 54 44 20 4D 49 4E 20 53 45 43 00 | IN STD MIN SEC.|
00002210: 3F 2A 55 02 99 22 96 11 11 50 45 45 4B 28 31 36 |?*U.."...PEEK(16|
00002220: 30 29 2A 32 5E 31 36 2B 50 45 45 4B 28 31 36 31 |0)*2^16+PEEK(161|
00002230: 29 2A 32 5E 38 2B 50 45 45 4B 28 31 36 32 29 00 |)*2^8+PEEK(162).|
00002240: 6B 2A 56 02 99 22 9F 11 11 53 54 45 4C 4C 45 4E |k*V.."...STELLEN|
00002250: 20 44 45 52 20 55 48 52 3A 20 20 20 20 54 49 24 | DER UHR: TI$|
00002260: 3D 27 27 48 48 4D 4D 53 53 27 27 00 92 2A 57 02 |=''HHMMSS''..*W.|
00002270: 99 22 1E 11 11 41 55 53 57 45 52 54 45 4E 20 46 |."...AUSWERTEN F|
00002280: 55 45 52 20 5A 55 46 41 4C 4C 53 5A 41 48 4C 45 |UER ZUFALLSZAHLE|
00002290: 4E 3A 00 C2 2A 58 02 99 22 1E 11 50 45 45 4B 28 |N:..*X.."..PEEK(|
000022A0: 31 36 32 29 2E 20 41 45 4E 44 45 52 54 20 41 4C |162). AENDERT AL|
000022B0: 4C 45 20 36 30 53 54 45 4C 20 53 45 4B 55 4E 44 |LE 60STEL SEKUND|
000022C0: 45 4E 00 EE 2A 59 02 99 22 9E 11 55 48 52 20 52 |EN..*Y.."..UHR R|
000022D0: 45 53 45 54 20 54 49 A0 41 55 46 20 30 30 30 30 |ESET TI.AUF 0000|
000022E0: 20 20 3D 20 20 53 59 53 20 36 35 34 39 39 00 1D | = SYS 65499..|
000022F0: 2B 5A 02 85 22 11 81 20 20 20 20 20 20 20 20 20 |+Z..".. |
00002300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002310: 20 20 20 52 45 54 55 52 4E 22 3B 41 24 00 43 2B | RETURN";A$.C+|
00002320: 5C 02 99 22 93 20 20 20 20 20 20 20 20 20 20 20 |\..". |
00002330: 20 20 20 20 20 2A 2A 2A 20 4D 45 4E 55 45 20 2A | *** MENUE *|
00002340: 2A 2A 22 00 4B 2B 5D 02 89 38 36 00 59 2B 62 02 |**".K+]..86.Y+b.|
00002350: 8F 22 09 0E 2E 12 15 10 2E 00 81 2B 63 02 99 22 |.".........+c.."|
00002360: 93 96 20 20 20 20 20 20 20 20 20 20 3A 3A 20 49 |.. :: I|
00002370: 4E 54 52 52 55 50 54 52 4F 55 54 49 4E 45 20 3A |NTRRUPTROUTINE :|
00002380: 3A 00 A7 2B 64 02 99 22 20 20 20 20 20 20 20 20 |:..+d.." |
00002390: 20 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E | ..............|
000023A0: 2E 2E 2E 2E 2E 2E 2E 00 D1 2B 65 02 99 22 11 11 |.........+e.."..|
000023B0: 9E 41 4E 5A 41 48 4C 20 49 4E 54 45 52 52 55 50 |.ANZAHL INTERRUP|
000023C0: 54 53 20 20 50 4F 4B 45 20 20 35 36 33 32 35 2C |TS POKE 56325,|
000023D0: 58 00 EC 2B 66 02 99 22 11 58 3D 30 2D 32 35 35 |X..+f..".X=0-255|
000023E0: 20 20 4E 4F 52 4D 41 4C 20 34 33 2E 00 1C 2C 67 | NORMAL 43...,g|
000023F0: 02 99 22 11 30 20 3D 20 4D 45 48 52 20 49 4E 54 |..".0 = MEHR INT|
00002400: 45 52 52 55 50 2E 28 52 45 43 48 4E 45 52 20 57 |ERRUP.(RECHNER W|
00002410: 49 52 44 20 4C 41 4E 47 53 41 4D 29 00 49 2C 68 |IRD LANGSAM).I,h|
00002420: 02 99 22 32 35 35 20 3D 20 57 45 4E 49 47 45 52 |.."255 = WENIGER|
00002430: 20 28 52 45 43 48 4E 45 52 20 57 49 52 44 20 53 | (RECHNER WIRD S|
00002440: 43 48 4E 45 4C 4C 45 52 29 00 6E 2C 69 02 99 22 |CHNELLER).n,i.."|
00002450: 11 11 96 49 4E 54 45 52 52 55 50 54 20 41 55 53 |...INTERRUPT AUS|
00002460: 20 20 50 4F 4B 45 20 35 36 33 33 34 2C 30 00 91 | POKE 56334,0..|
00002470: 2C 6A 02 99 22 11 49 4E 54 45 52 52 55 50 54 20 |,j..".INTERRUPT |
00002480: 45 49 4E 20 20 50 4F 4B 45 20 35 36 33 33 34 2C |EIN POKE 56334,|
00002490: 31 00 B7 2C 6B 02 99 22 11 4E 55 52 20 49 4E 20 |1..,k..".NUR IN |
000024A0: 45 49 4E 45 4D 20 50 52 4F 47 52 41 4D 4D 20 4D |EINEM PROGRAMM M|
000024B0: 4F 45 47 4C 49 43 48 00 E8 2C 6C 02 85 22 11 11 |OEGLICH..,l.."..|
000024C0: 11 95 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
000024D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 | RE|
000024E0: 54 55 52 4E 22 3B 41 24 00 FE 2C 6F 02 99 22 93 |TURN";A$..,o..".|
000024F0: 9E 49 4E 54 45 52 52 55 50 54 20 41 55 53 00 23 |.INTERRUPT AUS.#|
00002500: 2D 70 02 99 22 11 11 50 4F 4B 45 20 35 33 32 36 |-p.."..POKE 5326|
00002510: 35 2C 50 45 45 4B 28 35 33 32 36 35 29 41 4E 44 |5,PEEK(53265)AND|
00002520: 32 33 39 00 3A 2D 71 02 99 22 11 11 11 49 4E 54 |239.:-q.."...INT|
00002530: 45 52 52 55 50 54 20 45 49 4E 00 5D 2D 72 02 99 |ERRUPT EIN.]-r..|
00002540: 22 11 11 50 4F 4B 45 20 35 33 32 36 35 2C 50 45 |"..POKE 53265,PE|
00002550: 45 4B 28 35 33 32 36 35 29 4F 52 31 36 00 90 2D |EK(53265)OR16..-|
00002560: 73 02 85 22 11 11 11 11 11 11 11 1F 20 20 20 20 |s.."........ |
00002570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002580: 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 | RETURN";A$|
00002590: 00 B4 2D 75 02 99 22 93 99 20 20 20 20 20 20 20 |..-u..".. |
000025A0: 20 20 20 20 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 | *** MENUE |
000025B0: 20 2A 2A 22 00 BC 2D 7B 02 89 38 36 00 CB 2D 80 | **"..-{..86..-.|
000025C0: 02 8F 22 0A 0F 19 13 2E 09 03 0B 00 F2 2D 81 02 |.."..........-..|
000025D0: 99 22 93 9E 20 20 20 20 20 20 20 20 20 20 20 20 |.".. |
000025E0: 20 2A 2A 2A 20 4A 4F 59 53 54 49 43 4B 20 2A 2A | *** JOYSTICK **|
000025F0: 2A 22 00 13 2E 82 02 99 22 20 20 20 20 20 20 20 |*"......" |
00002600: 20 20 20 20 20 20 20 20 20 20 B8 B8 B8 B8 B8 B8 | ......|
00002610: B8 B8 22 00 2B 2E 83 02 99 22 11 1F 50 52 4F 47 |..".+...."..PROG|
00002620: 52 41 4D 4D 49 45 52 55 4E 47 22 00 57 2E 84 02 |RAMMIERUNG".W...|
00002630: 99 22 96 11 11 31 30 20 50 4F 4B 45 20 35 36 33 |."...10 POKE 563|
00002640: 32 32 2C 32 34 20 20 52 45 4D 20 54 41 53 54 41 |22,24 REM TASTA|
00002650: 54 55 52 20 41 55 53 00 82 2E 85 02 99 22 11 32 |TUR AUS......".2|
00002660: 30 20 4A 53 3D 50 45 45 4B 28 35 36 33 32 30 29 |0 JS=PEEK(56320)|
00002670: 20 20 52 45 4D 20 4A 4F 59 53 54 41 44 52 45 53 | REM JOYSTADRES|
00002680: 53 45 00 AA 2E 86 02 99 22 11 33 30 20 28 49 46 |SE......".30 (IF|
00002690: 20 4A 53 20 41 4E 44 20 31 29 20 3D 20 30 20 54 | JS AND 1) = 0 T|
000026A0: 48 45 4E 20 3F 27 27 55 50 22 00 D4 2E 87 02 99 |HEN ?''UP"......|
000026B0: 22 11 34 30 20 28 49 46 20 4A 53 20 41 4E 44 20 |".40 (IF JS AND |
000026C0: 32 29 20 3D 20 30 20 54 48 45 4E 20 3F 27 27 44 |2) = 0 THEN ?''D|
000026D0: 4F 57 4E 22 00 FE 2E 88 02 99 22 11 35 30 20 28 |OWN"......".50 (|
000026E0: 49 46 20 4A 53 20 41 4E 44 20 34 29 20 3D 20 30 |IF JS AND 4) = 0|
000026F0: 20 54 48 45 4E 20 3F 27 27 4C 45 46 54 22 00 29 | THEN ?''LEFT".)|
00002700: 2F 89 02 99 22 11 36 30 20 28 49 46 20 4A 53 20 |/...".60 (IF JS |
00002710: 41 4E 44 20 38 29 20 3D 20 30 20 54 48 45 4E 20 |AND 8) = 0 THEN |
00002720: 3F 27 27 52 49 47 48 54 22 00 53 2F 8A 02 99 22 |?''RIGHT".S/..."|
00002730: 11 37 30 20 28 49 46 20 4A 53 20 41 4E 44 20 31 |.70 (IF JS AND 1|
00002740: 36 29 20 3D 20 30 20 54 48 45 4E 20 3F 22 46 49 |6) = 0 THEN ?"FI|
00002750: 52 45 22 00 64 2F 8B 02 99 22 11 38 30 20 47 4F |RE".d/...".80 GO|
00002760: 54 4F 32 30 00 92 2F 8C 02 85 22 81 20 20 20 20 |TO20../...". |
00002770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002780: 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B | RETURN";|
00002790: 41 24 00 BF 2F 8E 02 99 22 93 05 4C 49 4E 49 45 |A$../..."..LINIE|
000027A0: 20 31 30 20 50 4F 4B 45 20 35 36 33 32 32 2C 32 | 10 POKE 56322,2|
000027B0: 32 34 20 49 53 54 20 4E 55 52 20 4E 4F 54 2D 00 |24 IST NUR NOT-.|
000027C0: EA 2F 8F 02 99 22 11 57 45 4E 44 49 47 2C 20 57 |./...".WENDIG, W|
000027D0: 45 4E 4E 20 4B 45 49 4E 45 20 45 49 4E 47 41 42 |ENN KEINE EINGAB|
000027E0: 45 4E 20 56 4F 4E 20 44 45 52 00 0C 30 90 02 99 |EN VON DER..0...|
000027F0: 22 11 54 41 53 54 41 54 55 52 20 41 55 53 20 45 |".TASTATUR AUS E|
00002800: 52 4C 41 55 42 54 20 53 49 4E 44 2E 00 37 30 91 |RLAUBT SIND..70.|
00002810: 02 99 22 11 11 11 4C 49 4E 49 45 20 32 30 20 50 |.."...LINIE 20 P|
00002820: 45 45 4B 20 28 35 36 33 32 30 29 20 49 53 54 20 |EEK (56320) IST |
00002830: 50 4F 52 54 20 31 2E 00 5C 30 92 02 99 22 11 50 |PORT 1..\0...".P|
00002840: 45 45 4B 20 28 35 36 33 32 31 29 20 49 53 54 20 |EEK (56321) IST |
00002850: 46 55 45 52 20 50 4F 52 54 20 32 2E 00 8F 30 93 |FUER PORT 2...0.|
00002860: 02 85 22 11 11 11 11 11 11 1C 20 20 20 20 20 20 |.."....... |
00002870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002880: 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 00 | RETURN";A$.|
00002890: B0 30 95 02 99 22 93 9C 20 20 20 20 20 20 2A 2A |.0...".. **|
000028A0: 2A 20 20 20 4D 45 4E 55 45 20 20 20 2A 2A 2A 22 |* MENUE ***"|
000028B0: 00 B8 30 96 02 89 38 36 00 CB 30 9E 02 8F 22 0B |..0...86..0...".|
000028C0: 0F 0E 2E 2B 01 02 06 12 01 07 12 00 F5 30 9F 02 |...+.........0..|
000028D0: 99 22 93 99 20 20 20 20 20 20 B0 C3 C3 C3 C3 C3 |.".. ......|
000028E0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000028F0: C3 C3 C3 AE 22 00 1D 31 A0 02 99 22 20 20 20 20 |...."..1..." |
00002900: 20 20 DA 20 4B 4F 4E 54 52 4F 4C 4C 45 20 55 4E | . KONTROLLE UN|
00002910: 44 20 41 42 46 52 41 47 45 4E 20 DA 22 00 45 31 |D ABFRAGEN .".E1|
00002920: A1 02 99 22 20 20 20 20 20 20 AD C3 C3 C3 C3 C3 |..." ......|
00002930: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00002940: C3 C3 C3 BD 22 00 76 31 A2 02 99 22 1E 11 42 41 |....".v1..."..BA|
00002950: 53 49 43 20 41 4E 46 41 4E 47 20 20 50 45 45 4B |SIC ANFANG PEEK|
00002960: 28 34 33 29 20 2B 20 32 35 36 20 2A 20 50 45 45 |(43) + 256 * PEE|
00002970: 4B 20 28 34 34 29 00 A3 31 A3 02 99 22 42 41 53 |K (44)..1..."BAS|
00002980: 49 43 20 45 4E 44 45 20 20 50 45 45 4B 28 34 35 |IC ENDE PEEK(45|
00002990: 29 20 2B 20 32 35 36 20 2A 20 50 45 45 4B 20 28 |) + 256 * PEEK (|
000029A0: 34 36 29 00 D3 31 A5 02 99 22 11 50 52 4F 47 52 |46)..1...".PROGR|
000029B0: 41 4D 4D 20 45 4E 44 45 20 50 45 45 4B 28 34 35 |AMM ENDE PEEK(45|
000029C0: 29 20 2B 20 32 35 36 20 2A 20 50 45 45 4B 20 28 |) + 256 * PEEK (|
000029D0: 34 36 29 00 03 32 A6 02 99 22 9C 11 11 5A 45 49 |46)..2..."...ZEI|
000029E0: 4C 45 4E 4E 55 4D 4D 45 52 20 46 55 45 52 20 47 |LENNUMMER FUER G|
000029F0: 45 4C 45 53 45 4E 45 4E 20 44 41 54 41 57 45 52 |ELESENEN DATAWER|
00002A00: 54 45 22 00 2C 32 A7 02 99 22 11 50 52 49 4E 54 |TE".,2...".PRINT|
00002A10: 20 50 45 45 4B 20 28 36 33 29 20 2B 20 32 35 36 | PEEK (63) + 256|
00002A20: 20 2A 20 50 45 45 4B 20 28 36 34 29 00 57 32 A8 | * PEEK (64).W2.|
00002A30: 02 99 22 9E 11 11 46 45 48 4C 45 52 53 54 41 54 |.."...FEHLERSTAT|
00002A40: 55 53 20 42 45 49 4D 20 44 41 54 45 4E 41 55 53 |US BEIM DATENAUS|
00002A50: 54 41 55 53 43 48 3A 00 6F 32 A9 02 99 22 11 50 |TAUSCH:.o2...".P|
00002A60: 52 49 4E 54 20 50 45 45 4B 20 28 31 34 34 29 00 |RINT PEEK (144).|
00002A70: 83 32 AA 02 99 22 11 4E 4F 52 4D 41 4C 57 45 52 |.2...".NORMALWER|
00002A80: 54 20 30 00 B2 32 AB 02 85 22 11 9B 46 55 45 52 |T 0..2..."..FUER|
00002A90: 20 44 41 54 45 4E 20 45 52 4B 4C 41 45 52 55 4E | DATEN ERKLAERUN|
00002AA0: 47 20 50 52 45 53 53 20 52 45 54 55 52 4E 22 3B |G PRESS RETURN";|
00002AB0: 41 24 00 DF 32 AD 02 99 22 93 9E 20 50 45 45 4B |A$..2...".. PEEK|
00002AC0: 20 28 31 34 34 29 20 57 45 52 54 20 45 52 4B 4C | (144) WERT ERKL|
00002AD0: 41 45 52 55 4E 47 20 43 41 53 45 54 54 45 22 00 |AERUNG CASETTE".|
00002AE0: 05 33 B1 02 99 22 9F 11 11 57 45 52 54 20 20 20 |.3..."...WERT |
00002AF0: 20 20 46 45 48 4C 45 52 20 4F 44 45 52 20 41 4E | FEHLER ODER AN|
00002B00: 5A 45 49 47 45 00 23 33 B2 02 99 22 96 11 20 20 |ZEIGE.#3...".. |
00002B10: 34 20 20 20 20 20 20 4B 55 52 5A 45 52 20 42 4C |4 KURZER BL|
00002B20: 4F 43 4B 00 40 33 B3 02 99 22 11 20 20 38 20 20 |OCK.@3...". 8 |
00002B30: 20 20 20 20 4C 41 4E 47 45 52 20 42 4C 4F 43 4B | LANGER BLOCK|
00002B40: 00 67 33 B4 02 99 22 11 20 31 36 20 20 20 20 20 |.g3...". 16 |
00002B50: 20 4C 45 53 45 20 2D 20 53 43 48 52 45 49 42 45 | LESE - SCHREIBE|
00002B60: 20 46 45 48 4C 45 52 00 8A 33 B5 02 99 22 11 20 | FEHLER..3...". |
00002B70: 33 32 20 20 20 20 20 20 50 52 55 45 46 53 55 4D |32 PRUEFSUM|
00002B80: 4D 45 4E 20 46 45 48 4C 45 52 00 A4 33 B6 02 99 |MEN FEHLER..3...|
00002B90: 22 11 20 36 34 20 20 20 20 20 20 46 49 4C 45 20 |". 64 FILE |
00002BA0: 45 4E 44 45 00 BE 33 B7 02 99 22 11 31 32 34 20 |ENDE..3...".124 |
00002BB0: 20 20 20 20 20 42 41 4E 44 20 45 4E 44 45 00 E9 | BAND ENDE..|
00002BC0: 33 B8 02 99 22 11 11 1E 45 53 20 4B 41 4E 4E 20 |3..."...ES KANN |
00002BD0: 53 49 43 48 20 44 49 45 20 46 45 48 4C 45 52 53 |SICH DIE FEHLERS|
00002BE0: 55 4D 4D 45 20 41 55 43 48 00 10 34 B9 02 99 22 |UMME AUCH..4..."|
00002BF0: 11 1E 41 55 53 20 4D 45 48 52 45 52 45 4E 20 46 |..AUS MEHREREN F|
00002C00: 45 48 4C 45 52 4E 20 41 44 44 49 45 52 45 4E 2E |EHLERN ADDIEREN.|
00002C10: 00 41 34 BA 02 85 22 11 11 95 20 20 20 20 20 20 |.A4..."... |
00002C20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002C30: 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 | RETURN";A|
00002C40: 24 00 69 34 BC 02 99 22 93 9E 5A 55 4C 45 54 5A |$.i4..."..ZULETZ|
00002C50: 54 20 47 45 42 52 41 55 43 48 54 45 20 46 49 4C |T GEBRAUCHTE FIL|
00002C60: 45 20 4E 55 4D 4D 45 52 3A 00 81 34 BD 02 99 22 |E NUMMER:..4..."|
00002C70: 11 50 52 49 4E 54 20 50 45 45 4B 20 28 31 38 34 |.PRINT PEEK (184|
00002C80: 29 00 B1 34 BE 02 99 22 1E 11 11 53 45 4B 55 4E |)..4..."...SEKUN|
00002C90: 44 41 45 52 41 44 52 45 53 53 45 20 44 45 53 20 |DAERADRESSE DES |
00002CA0: 5A 55 4C 45 54 5A 54 20 42 45 4E 55 54 5A 54 45 |ZULETZT BENUTZTE|
00002CB0: 4E 00 D1 34 BF 02 99 22 11 46 49 4C 45 53 3A 20 |N..4...".FILES: |
00002CC0: 20 50 52 49 4E 54 20 50 45 45 4B 20 28 31 38 35 | PRINT PEEK (185|
00002CD0: 29 00 FB 34 C0 02 99 22 11 11 9E 5A 55 4C 45 54 |)..4..."...ZULET|
00002CE0: 5A 54 20 47 45 42 52 41 55 43 48 54 45 20 47 45 |ZT GEBRAUCHTE GE|
00002CF0: 52 41 45 54 45 4E 55 4D 4D 45 52 00 29 35 C1 02 |RAETENUMMER.)5..|
00002D00: 99 22 11 50 52 49 4E 54 20 50 45 45 4B 20 28 31 |.".PRINT PEEK (1|
00002D10: 38 36 29 20 28 31 3D 43 41 53 45 54 54 45 20 2D |86) (1=CASETTE -|
00002D20: 20 38 3D 46 4C 4F 50 59 22 00 4C 35 C4 02 99 22 | 8=FLOPY".L5..."|
00002D30: 1E 11 11 5A 55 4C 45 54 5A 54 20 45 49 4E 47 45 |...ZULETZT EINGE|
00002D40: 47 45 42 45 4E 45 20 54 41 53 54 45 00 64 35 C5 |GEBENE TASTE.d5.|
00002D50: 02 99 22 11 50 52 49 4E 54 20 50 45 45 4B 20 28 |..".PRINT PEEK (|
00002D60: 31 39 37 29 00 93 35 C6 02 99 22 11 11 9E 41 4B |197)..5..."...AK|
00002D70: 54 55 45 4C 4C 45 20 5A 45 49 43 48 45 4E 46 41 |TUELLE ZEICHENFA|
00002D80: 52 42 45 20 50 52 49 4E 54 20 50 45 45 4B 28 36 |RBE PRINT PEEK(6|
00002D90: 34 36 29 00 C3 35 C7 02 85 22 11 11 81 20 20 20 |46)..5..."... |
00002DA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002DB0: 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 | RETURN"|
00002DC0: 3B 41 24 00 E8 35 C9 02 99 22 93 9E 47 52 4F 45 |;A$..5..."..GROE|
00002DD0: 53 53 45 20 44 45 53 20 54 41 53 54 41 54 55 52 |SSE DES TASTATUR|
00002DE0: 50 55 46 46 45 52 53 3A 00 FC 35 CA 02 99 22 11 |PUFFERS:..5...".|
00002DF0: 11 1E 50 45 45 4B 20 28 36 34 39 29 00 2B 36 CB |..PEEK (649).+6.|
00002E00: 02 99 22 11 4D 49 54 20 50 4F 4B 45 20 36 34 39 |..".MIT POKE 649|
00002E10: 2C 58 20 4B 41 4E 4E 20 44 49 45 20 53 50 45 49 |,X KANN DIE SPEI|
00002E20: 43 48 45 52 47 52 4F 45 53 53 45 00 45 36 CC 02 |CHERGROESSE.E6..|
00002E30: 99 22 11 56 45 52 41 45 4E 44 45 52 54 20 57 45 |.".VERAENDERT WE|
00002E40: 52 44 45 4E 45 00 6F 36 CD 02 99 22 11 1C 56 4F |RDENE.o6..."..VO|
00002E50: 52 53 49 43 48 54 20 58 20 4E 49 43 48 54 20 47 |RSICHT X NICHT G|
00002E60: 52 4F 45 53 53 45 52 20 41 4C 53 20 31 30 1E 00 |ROESSER ALS 10..|
00002E70: 94 36 CE 02 99 22 9E 11 5A 41 45 48 4C 45 52 20 |.6..."..ZAEHLER |
00002E80: 46 55 45 52 20 54 41 53 54 41 54 55 52 50 55 46 |FUER TASTATURPUF|
00002E90: 46 45 52 3A 00 AC 36 CF 02 99 22 11 50 52 49 4E |FER:..6...".PRIN|
00002EA0: 54 20 50 45 45 4B 20 28 31 39 38 29 00 DB 36 D0 |T PEEK (198)..6.|
00002EB0: 02 99 22 11 4D 49 54 20 50 4F 4B 45 20 31 39 38 |..".MIT POKE 198|
00002EC0: 2C 58 20 4B 41 4E 4E 20 44 49 45 20 53 50 45 49 |,X KANN DIE SPEI|
00002ED0: 43 48 45 52 47 52 4F 45 53 53 45 00 F5 36 D1 02 |CHERGROESSE..6..|
00002EE0: 99 22 11 56 45 52 41 45 4E 44 45 52 54 20 57 45 |.".VERAENDERT WE|
00002EF0: 52 44 45 4E 45 00 1F 37 D2 02 99 22 11 1C 56 4F |RDENE..7..."..VO|
00002F00: 52 53 49 43 48 54 20 58 20 4E 49 43 48 54 20 47 |RSICHT X NICHT G|
00002F10: 52 4F 45 53 53 45 52 20 41 4C 53 20 31 30 1E 00 |ROESSER ALS 10..|
00002F20: 4B 37 D3 02 85 22 11 1F 11 46 55 45 52 20 41 4E |K7..."...FUER AN|
00002F30: 57 45 4E 44 55 4E 47 53 42 45 49 53 50 49 45 4C |WENDUNGSBEISPIEL|
00002F40: 20 52 45 54 55 52 4E 22 3B 41 24 00 73 37 D5 02 | RETURN";A$.s7..|
00002F50: 99 22 93 96 41 4E 57 45 4E 44 55 4E 47 20 56 4F |."..ANWENDUNG VO|
00002F60: 4D 20 54 41 53 54 41 54 55 52 5A 41 45 48 4C 45 |M TASTATURZAEHLE|
00002F70: 52 20 3A 00 99 37 D6 02 99 22 A3 A3 A3 A3 A3 A3 |R :..7..."......|
00002F80: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00002F90: A3 A3 A3 A3 A3 A3 A3 A3 A3 00 BA 37 D8 02 99 22 |...........7..."|
00002FA0: 11 11 11 50 4F 4B 45 20 31 39 38 2C 30 20 3A 20 |...POKE 198,0 : |
00002FB0: 57 41 49 54 20 31 39 38 2C 31 00 EB 37 D9 02 99 |WAIT 198,1..7...|
00002FC0: 22 9E 11 11 50 4F 4B 45 20 31 39 38 2C 30 20 3D |"...POKE 198,0 =|
00002FD0: 20 4C 45 45 52 45 4E 20 44 45 53 20 54 41 53 54 | LEEREN DES TAST|
00002FE0: 41 54 55 52 20 50 55 46 46 45 52 00 15 38 DA 02 |ATUR PUFFER..8..|
00002FF0: 99 22 11 57 41 49 54 20 31 39 38 2C 31 20 3D 20 |.".WAIT 198,1 = |
00003000: 57 41 52 54 45 4E 20 41 55 46 20 45 49 4E 45 20 |WARTEN AUF EINE |
00003010: 54 41 53 54 45 00 40 38 DB 02 99 22 11 11 57 45 |TASTE.@8..."..WE|
00003020: 4E 4E 20 57 41 49 54 20 31 39 38 2C 58 20 56 45 |NN WAIT 198,X VE|
00003030: 52 47 52 4F 45 53 53 45 52 54 20 57 49 52 44 2C |RGROESSERT WIRD,|
00003040: 00 63 38 DC 02 99 22 11 5A 55 4D 20 42 45 49 53 |.c8...".ZUM BEIS|
00003050: 50 49 45 4C 20 41 55 46 20 57 41 49 54 20 31 39 |PIEL AUF WAIT 19|
00003060: 38 2C 35 00 8B 38 DE 02 99 22 11 44 41 4E 4E 20 |8,5..8...".DANN |
00003070: 57 41 52 54 45 54 20 44 45 52 20 52 45 43 48 4E |WARTET DER RECHN|
00003080: 45 52 20 42 49 53 20 41 4C 4C 45 00 B1 38 DF 02 |ER BIS ALLE..8..|
00003090: 99 22 11 46 55 45 4E 46 20 54 41 53 54 45 4E 20 |.".FUENF TASTEN |
000030A0: 47 45 44 52 55 45 43 4B 54 20 57 55 52 44 45 4E |GEDRUECKT WURDEN|
000030B0: 2E 00 E1 38 E0 02 85 22 81 11 11 20 20 20 20 20 |...8..."... |
000030C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000030D0: 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 | RETURN";A|
000030E0: 24 00 0F 39 E2 02 99 22 93 9F 55 4D 53 43 48 41 |$..9..."..UMSCHA|
000030F0: 4C 54 55 4E 47 20 47 52 4F 53 53 20 4B 4C 45 49 |LTUNG GROSS KLEI|
00003100: 4E 20 56 45 52 52 49 45 47 45 4C 55 4E 47 3A 00 |N VERRIEGELUNG:.|
00003110: 32 39 E3 02 99 22 11 50 4F 4B 45 20 36 35 37 2C |29...".POKE 657,|
00003120: 31 32 38 20 3A 20 4E 4F 52 4D 41 4C 20 36 35 37 |128 : NORMAL 657|
00003130: 2C 30 00 59 39 E4 02 99 22 11 1E 11 55 4D 53 43 |,0.Y9..."...UMSC|
00003140: 48 41 4C 54 45 4E 20 41 55 46 20 4B 4C 45 49 4E |HALTEN AUF KLEIN|
00003150: 2D 53 43 48 52 49 46 54 3A 00 6E 39 E5 02 99 22 |-SCHRIFT:.n9..."|
00003160: 11 50 4F 4B 45 20 35 33 32 37 32 2C 32 32 00 95 |.POKE 53272,22..|
00003170: 39 E6 02 99 22 11 1E 11 55 4D 53 43 48 41 4C 54 |9..."...UMSCHALT|
00003180: 45 4E 20 41 55 46 20 47 52 4F 53 53 2D 53 43 48 |EN AUF GROSS-SCH|
00003190: 52 49 46 54 3A 00 AA 39 E7 02 99 22 11 50 4F 4B |RIFT:..9...".POK|
000031A0: 45 20 35 33 32 37 32 2C 32 31 00 DB 39 E8 02 85 |E 53272,21..9...|
000031B0: 22 81 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |"....... |
000031C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000031D0: 20 52 45 54 55 52 4E 22 3B 41 24 00 FD 39 F3 02 | RETURN";A$..9..|
000031E0: 99 22 93 96 20 20 20 20 20 20 20 2A 2A 2A 20 20 |.".. *** |
000031F0: 20 4D 45 4E 55 45 20 20 20 2A 2A 2A 22 00 05 3A | MENUE ***"..:|
00003200: F4 02 89 38 36 00 15 3A F8 02 8F 22 0C 09 13 2E |...86..:..."....|
00003210: 13 03 08 15 2E 00 3D 3A F9 02 99 22 93 9C 20 20 |......=:...".. |
00003220: 20 20 20 20 20 20 20 20 20 4C 9E 49 1E 53 9C 54 | L.I.S.T|
00003230: 9E 53 1E 43 9C 48 9E 55 9C 54 9E 5A 22 00 62 3A |.S.C.H.U.T.Z".b:|
00003240: FA 02 99 22 20 20 20 20 20 20 20 20 20 20 20 A6 |..." .|
00003250: 1E A6 9C A6 9E A6 1E A6 9C A6 9E A6 1E A6 9E A6 |................|
00003260: 9C A6 00 91 3A FB 02 99 22 11 11 11 45 53 20 47 |....:..."...ES G|
00003270: 49 42 54 20 54 41 55 53 45 4E 44 20 41 52 54 45 |IBT TAUSEND ARTE|
00003280: 4E 20 56 4F 4E 20 4C 49 53 54 2D 53 43 48 55 54 |N VON LIST-SCHUT|
00003290: 5A 00 BB 3A FC 02 99 22 11 56 45 52 46 41 48 52 |Z..:...".VERFAHR|
000032A0: 45 4E 2E 20 45 53 20 53 49 4E 44 20 48 49 45 52 |EN. ES SIND HIER|
000032B0: 20 4E 55 52 20 45 49 4E 49 47 45 00 E5 3A FD 02 | NUR EINIGE..:..|
000032C0: 99 22 11 42 45 49 53 50 49 45 4C 45 20 41 55 46 |.".BEISPIELE AUF|
000032D0: 47 45 46 55 45 48 52 54 2C 20 57 45 4C 43 48 45 |GEFUEHRT, WELCHE|
000032E0: 20 53 49 43 48 00 15 3B FE 02 99 22 11 4F 48 4E | SICH..;...".OHN|
000032F0: 45 20 47 52 4F 53 53 45 4E 20 41 55 46 57 41 4E |E GROSSEN AUFWAN|
00003300: 44 20 52 45 41 4C 49 53 49 45 52 45 4E 20 4C 41 |D REALISIEREN LA|
00003310: 53 53 45 4E 2E 00 43 3B FF 02 99 22 11 41 4C 4C |SSEN..C;...".ALL|
00003320: 45 20 42 45 49 53 50 49 45 4C 45 20 4C 41 53 53 |E BEISPIELE LASS|
00003330: 45 4E 20 53 49 43 48 20 4D 49 54 45 49 4E 41 4E |EN SICH MITEINAN|
00003340: 44 45 52 00 57 3B 00 03 99 22 11 4B 4F 4D 42 49 |DER.W;...".KOMBI|
00003350: 4E 49 45 52 45 4E 2E 00 87 3B 01 03 85 22 11 11 |NIEREN...;..."..|
00003360: 1F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00003370: 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 | RET|
00003380: 55 52 4E 22 3B 41 24 00 B7 3B 03 03 99 22 93 9F |URN";A$..;..."..|
00003390: 54 41 53 54 41 54 55 52 20 42 4C 4F 4B 49 45 52 |TASTATUR BLOKIER|
000033A0: 45 4E 20 20 20 20 20 20 20 20 20 20 50 4F 4B 45 |EN POKE|
000033B0: 20 36 35 35 2C 37 31 00 E6 3B 04 03 99 22 11 54 | 655,71..;...".T|
000033C0: 41 53 54 41 54 55 52 20 4E 4F 52 4D 41 4C 20 20 |ASTATUR NORMAL |
000033D0: 20 20 20 20 20 20 20 20 20 20 20 50 4F 4B 45 20 | POKE |
000033E0: 36 35 35 2C 37 32 00 01 3C 05 03 99 22 9E 11 11 |655,72..<..."...|
000033F0: 4C 49 53 54 20 42 4C 4F 43 4B 49 45 52 55 4E 47 |LIST BLOCKIERUNG|
00003400: 3A 00 18 3C 06 03 99 22 A3 A3 A3 A3 A3 A3 A3 A3 |:..<..."........|
00003410: A3 A3 A3 A3 A3 A3 A3 A3 00 3B 3C 07 03 99 22 11 |.........;<...".|
00003420: 50 4F 4B 45 20 37 37 34 2C 58 58 58 20 3A 20 50 |POKE 774,XXX : P|
00003430: 4F 4B 45 20 37 37 35 2C 59 59 59 00 57 3C 08 03 |OKE 775,YYY.W<..|
00003440: 99 22 11 58 3D 20 32 36 20 20 59 3D 31 36 37 20 |.".X= 26 Y=167 |
00003450: 20 4E 4F 52 4D 41 4C 00 84 3C 09 03 99 22 11 58 | NORMAL..<...".X|
00003460: 3D 20 36 38 20 20 59 3D 31 36 36 20 20 45 52 47 |= 68 Y=166 ERG|
00003470: 49 42 54 20 45 49 4E 20 4E 45 57 20 42 45 49 20 |IBT EIN NEW BEI |
00003480: 4C 49 53 54 00 AF 3C 0A 03 99 22 11 58 3D 20 20 |LIST..<...".X= |
00003490: 37 20 20 59 3D 31 36 38 20 20 47 49 42 54 20 45 |7 Y=168 GIBT E|
000034A0: 49 4E 20 53 59 4E 54 41 58 20 45 52 52 4F 52 00 |IN SYNTAX ERROR.|
000034B0: D9 3C 0B 03 99 22 11 58 3D 32 32 36 20 20 59 3D |.<...".X=226 Y=|
000034C0: 32 35 32 20 20 47 49 42 54 20 45 49 4E 20 53 59 |252 GIBT EIN SY|
000034D0: 53 54 45 4D 52 45 53 45 54 00 0A 3D 0C 03 99 22 |STEMRESET..=..."|
000034E0: 96 11 11 52 55 4E 20 53 54 4F 50 20 41 55 53 53 |...RUN STOP AUSS|
000034F0: 43 48 41 4C 54 45 4E 20 20 20 20 20 20 20 20 50 |CHALTEN P|
00003500: 4F 4B 45 20 37 38 38 2C 35 32 00 39 3D 0D 03 99 |OKE 788,52.9=...|
00003510: 22 11 52 55 4E 20 53 54 4F 50 20 45 49 4E 53 43 |".RUN STOP EINSC|
00003520: 48 41 4C 54 45 4E 20 20 20 20 20 20 20 20 50 4F |HALTEN PO|
00003530: 4B 45 20 37 38 38 2C 34 39 00 67 3D 0E 03 99 22 |KE 788,49.g=..."|
00003540: 81 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00003550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003560: 20 53 50 41 43 45 22 00 7A 3D 0F 03 A1 41 24 3A | SPACE".z=...A$:|
00003570: 8B 41 24 B2 22 22 A7 37 38 33 00 98 3D 10 03 99 |.A$."".783..=...|
00003580: 22 93 1E 52 45 53 54 4F 52 45 54 41 53 54 45 20 |"..RESTORETASTE |
00003590: 42 45 4C 45 47 45 4E 3A 00 B3 3D 11 03 99 22 A3 |BELEGEN:..=...".|
000035A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000035B0: A3 A3 A3 00 D7 3D 12 03 99 22 11 50 4F 4B 45 20 |.....=...".POKE |
000035C0: 37 39 32 2C 58 58 58 20 20 3A 20 20 50 4F 4B 45 |792,XXX : POKE|
000035D0: 37 39 33 2C 59 59 59 00 FA 3D 13 03 99 22 11 58 |793,YYY..=...".X|
000035E0: 3D 20 37 31 20 59 3D 32 35 34 20 20 20 4E 4F 52 |= 71 Y=254 NOR|
000035F0: 4D 41 4C 5A 55 53 54 41 4E 44 00 25 3E 14 03 99 |MALZUSTAND.%>...|
00003600: 22 11 58 3D 20 20 37 20 59 3D 31 36 38 20 20 20 |".X= 7 Y=168 |
00003610: 47 49 42 54 20 45 49 4E 20 53 59 4E 54 41 58 20 |GIBT EIN SYNTAX |
00003620: 45 52 52 4F 52 00 54 3E 15 03 99 22 11 58 3D 31 |ERROR.T>...".X=1|
00003630: 33 39 20 59 3D 32 35 34 20 20 20 42 4C 4F 43 4B |39 Y=254 BLOCK|
00003640: 49 45 52 54 20 52 55 4E 2F 53 54 4F 2D 52 45 53 |IERT RUN/STO-RES|
00003650: 54 4F 52 45 00 7E 3E 16 03 99 22 11 58 3D 32 35 |TORE.~>...".X=25|
00003660: 36 20 59 3D 32 35 32 20 20 20 47 49 42 54 20 45 |6 Y=252 GIBT E|
00003670: 49 4E 20 53 59 53 54 45 4D 52 45 53 45 54 00 AB |IN SYSTEMRESET..|
00003680: 3E 17 03 99 22 11 11 96 4C 49 53 54 45 4E 49 4E |>..."...LISTENIN|
00003690: 47 20 4E 49 43 48 54 20 4C 45 53 42 41 52 20 20 |G NICHT LESBAR |
000036A0: 50 4F 4B 45 20 32 30 35 30 2C 30 00 D6 3E 18 03 |POKE 2050,0..>..|
000036B0: 99 22 11 4C 49 53 54 45 4E 49 4E 47 20 4E 4F 52 |.".LISTENING NOR|
000036C0: 4D 41 4C 20 20 20 20 20 20 20 20 50 4F 4B 45 20 |MAL POKE |
000036D0: 32 30 35 30 2C 38 00 07 3F 19 03 99 22 11 11 9E |2050,8..?..."...|
000036E0: 53 41 56 45 20 42 4C 4F 43 4B 49 45 52 54 20 50 |SAVE BLOCKIERT P|
000036F0: 4F 4B 45 20 38 31 38 2C 32 32 36 3A 50 4F 4B 45 |OKE 818,226:POKE|
00003700: 38 31 39 2C 32 32 35 00 36 3F 1A 03 99 22 11 53 |819,225.6?...".S|
00003710: 41 56 45 20 4D 4F 52 4D 41 4C 20 20 20 20 50 4F |AVE MORMAL PO|
00003720: 4B 45 20 38 31 38 2C 32 33 37 3A 50 4F 4B 45 38 |KE 818,237:POKE8|
00003730: 31 39 2C 32 34 35 00 49 3F 1C 03 A1 41 24 3A 8B |19,245.I?...A$:.|
00003740: 41 24 B2 22 22 A7 37 39 36 00 7A 3F 1D 03 99 22 |A$."".796.z?..."|
00003750: 93 1E 4C 49 53 54 20 53 54 4F 50 20 20 20 20 20 |..LIST STOP |
00003760: 50 4F 4B 45 20 37 37 35 2C 32 30 30 20 20 4E 4F |POKE 775,200 NO|
00003770: 52 4D 41 4C 20 28 31 36 37 29 00 A7 3F 1E 03 99 |RMAL (167)..?...|
00003780: 22 96 11 11 52 55 4E 2D 53 54 4F 50 3C 52 45 53 |"...RUN-STOP<RES|
00003790: 54 4F 52 45 3E 20 41 55 53 20 55 4E 44 20 4C 49 |TORE> AUS UND LI|
000037A0: 53 54 45 4E 49 4E 47 00 D6 3F 1F 03 99 22 11 55 |STENING..?...".U|
000037B0: 4E 4C 45 53 42 41 52 3A 20 20 20 20 50 4F 4B 45 |NLESBAR: POKE|
000037C0: 20 38 30 38 2C 32 32 35 20 20 28 4E 4F 52 4D 41 | 808,225 (NORMA|
000037D0: 4C 20 32 33 37 29 00 05 40 20 03 99 22 11 11 9E |L 237)..@ .."...|
000037E0: 52 55 4E 2D 53 54 4F 50 20 3C 52 45 53 54 4F 52 |RUN-STOP <RESTOR|
000037F0: 45 3E 20 41 55 53 3A 20 20 50 4F 4B 45 20 37 39 |E> AUS: POKE 79|
00003800: 32 2C 31 39 33 00 1B 40 21 03 99 22 11 11 96 53 |2,193..@!.."...S|
00003810: 41 56 45 20 53 43 48 55 54 5A 3A 00 2D 40 22 03 |AVE SCHUTZ:.-@".|
00003820: 99 22 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 00 54 40 |."............T@|
00003830: 23 03 99 22 11 50 4F 4B 45 38 30 31 2C 30 3A 50 |#..".POKE801,0:P|
00003840: 4F 4B 45 38 30 32 2C 30 3A 50 4F 4B 45 38 31 38 |OKE802,0:POKE818|
00003850: 2C 31 36 35 00 7C 40 24 03 99 22 11 43 41 53 45 |,165.|@$..".CASE|
00003860: 54 54 45 20 20 50 4F 4B 45 20 30 2C 30 20 20 28 |TTE POKE 0,0 (|
00003870: 4E 4F 52 4D 41 4C 20 30 2C 34 37 29 00 A4 40 28 |NORMAL 0,47)..@(|
00003880: 03 99 22 11 46 4C 4F 50 50 59 20 20 50 4F 4B 45 |..".FLOPPY POKE|
00003890: 20 38 31 38 2C 32 35 33 3A 50 4F 4B 45 38 30 38 | 818,253:POKE808|
000038A0: 2C 32 32 35 00 B7 40 29 03 A1 41 24 3A 8B 41 24 |,225..@)..A$:.A$|
000038B0: B2 22 22 A7 38 30 39 00 E5 40 2A 03 99 22 93 4E |."".809..@*..".N|
000038C0: 41 43 48 20 52 45 53 45 54 20 4B 45 49 4E 45 20 |ACH RESET KEINE |
000038D0: 52 55 45 43 4B 4B 45 48 52 20 44 45 53 20 43 55 |RUECKKEHR DES CU|
000038E0: 52 53 4F 52 53 00 0F 41 2B 03 99 22 11 50 4F 4B |RSORS..A+..".POK|
000038F0: 45 38 31 38 2C 33 34 3A 50 4F 4B 45 38 31 39 2C |E818,34:POKE819,|
00003900: 32 35 33 3A 50 4F 4B 45 38 30 38 2C 32 32 35 00 |253:POKE808,225.|
00003910: 2C 41 2C 03 99 22 11 11 41 4C 4C 45 53 20 5A 55 |,A,.."..ALLES ZU|
00003920: 52 55 45 43 4B 53 45 54 5A 45 4E 3A 00 57 41 2D |RUECKSETZEN:.WA-|
00003930: 03 99 22 11 50 4F 4B 45 38 31 38 2C 32 33 37 3A |..".POKE818,237:|
00003940: 50 4F 4B 45 38 31 39 2C 32 34 35 3A 50 4F 4B 45 |POKE819,245:POKE|
00003950: 38 30 38 2C 32 33 37 00 89 41 2E 03 99 22 11 11 |808,237..A..."..|
00003960: 05 4C 49 53 54 53 43 48 55 54 5A 20 49 4E 20 44 |.LISTSCHUTZ IN D|
00003970: 45 52 20 50 52 4F 47 52 41 4D 4D 20 4C 49 4E 49 |ER PROGRAMM LINI|
00003980: 45 20 53 45 4C 42 53 54 3A 00 BA 41 2F 03 99 22 |E SELBST:..A/.."|
00003990: 9A 11 31 30 20 46 4F 52 58 3D 31 54 4F 20 31 30 |..10 FORX=1TO 10|
000039A0: 30 9E 3A 52 45 4D 27 27 12 54 54 54 54 54 54 54 |0.:REM''.TTTTTTT|
000039B0: 54 54 54 54 54 54 54 54 54 22 00 E4 41 30 03 99 |TTTTTTTTT"..A0..|
000039C0: 22 11 9A 44 49 45 20 52 45 56 45 52 53 45 4E 20 |"..DIE REVERSEN |
000039D0: 54 20 4E 41 43 48 20 44 45 4D 20 52 45 4D 20 55 |T NACH DEM REM U|
000039E0: 42 45 52 2D 00 10 42 31 03 99 22 11 53 43 48 52 |BER-..B1..".SCHR|
000039F0: 45 49 42 45 4E 20 44 41 53 20 50 52 4F 47 52 41 |EIBEN DAS PROGRA|
00003A00: 4D 4D 20 49 4D 20 4C 49 53 54 45 4E 49 4E 47 2E |MM IM LISTENING.|
00003A10: 00 3C 42 32 03 99 22 11 45 49 4E 20 42 55 43 48 |.<B2..".EIN BUCH|
00003A20: 53 54 41 42 45 20 50 52 4F 20 12 54 92 20 57 49 |STABE PRO .T. WI|
00003A30: 52 44 20 56 45 52 44 45 43 4B 54 2E 00 4F 42 33 |RD VERDECKT..OB3|
00003A40: 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 38 31 39 00 |..A$:.A$."".819.|
00003A50: 74 42 34 03 99 22 93 9A 48 45 52 53 54 45 4C 4C |tB4.."..HERSTELL|
00003A60: 45 4E 20 44 45 52 20 12 54 54 54 92 20 49 4D 20 |EN DER .TTT. IM |
00003A70: 52 45 4D 3A 00 96 42 35 03 99 22 A3 A3 A3 A3 A3 |REM:..B5..".....|
00003A80: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00003A90: A3 A3 A3 A3 A3 A3 00 BD 42 36 03 99 22 9E 31 2E |........B6..".1.|
00003AA0: 9A 52 45 4D 27 27 A0 27 27 20 20 20 20 20 20 20 |.REM''.'' |
00003AB0: 20 9E 3C 53 43 48 52 45 49 42 45 4E 3E 00 EA 42 | .<SCHREIBEN>..B|
00003AC0: 37 03 99 22 11 9E 32 2E 9A 52 45 4D 27 27 A0 27 |7.."..2..REM''.'|
00003AD0: 27 20 20 20 20 20 20 20 20 9E 3C 31 20 4D 41 4C |' .<1 MAL|
00003AE0: 20 49 4E 53 54 20 44 45 4C 3E 00 12 43 38 03 99 | INST DEL>..C8..|
00003AF0: 22 11 9E 32 2E 9A 52 45 4D 27 27 A0 20 20 20 20 |"..2..REM''. |
00003B00: 20 20 20 20 20 20 9E 3C 45 49 4E 27 27 20 57 45 | .<EIN'' WE|
00003B10: 47 3E 00 40 43 39 03 99 22 11 9E 33 2E 9A 52 45 |G>.@C9.."..3..RE|
00003B20: 4D 27 27 A0 20 20 20 20 20 20 20 20 20 20 9E 3C |M''. .<|
00003B30: 31 20 4D 41 4C 20 52 45 56 45 52 53 20 4F 4E 3E |1 MAL REVERS ON>|
00003B40: 00 73 43 3A 03 99 22 11 9E 34 2E 4A 45 54 5A 54 |.sC:.."..4.JETZT|
00003B50: 20 4B 4F 45 4E 4E 45 4E 20 44 49 45 20 12 54 92 | KOENNEN DIE .T.|
00003B60: 20 47 45 53 43 48 52 49 45 42 45 4E 20 57 45 52 | GESCHRIEBEN WER|
00003B70: 44 45 4E 00 91 43 3B 03 99 22 11 11 9F 31 30 20 |DEN..C;.."...10 |
00003B80: 46 4F 52 58 3D 31 54 4F 32 30 3A 52 45 4D 27 27 |FORX=1TO20:REM''|
00003B90: CC 00 A7 43 3C 03 99 22 11 52 45 4D 20 3C 53 48 |...C<..".REM <SH|
00003BA0: 49 46 54 3E 20 20 4C 00 CF 43 3D 03 99 22 11 45 |IFT> L..C=..".E|
00003BB0: 52 5A 45 55 47 54 20 53 59 4E 54 41 58 20 45 52 |RZEUGT SYNTAX ER|
00003BC0: 52 4F 52 20 42 45 49 4D 20 4C 49 53 54 45 4E 00 |ROR BEIM LISTEN.|
00003BD0: E2 43 3E 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 38 |.C>..A$:.A$."".8|
00003BE0: 33 30 00 04 44 40 03 99 22 93 20 20 20 20 20 20 |30..D@..". |
00003BF0: 20 20 20 20 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 | *** MENUE |
00003C00: 2A 2A 2A 22 00 0C 44 41 03 89 38 36 00 1E 44 48 |***"..DA..86..DH|
00003C10: 03 8F 22 0C 0F 01 04 20 05 12 12 0F 12 13 00 40 |..".... .......@|
00003C20: 44 49 03 99 22 93 1C 20 20 20 20 20 20 20 20 20 |DI..".. |
00003C30: 20 20 20 20 20 4C 4F 41 44 20 45 52 52 4F 52 22 | LOAD ERROR"|
00003C40: 00 61 44 4A 03 99 22 9E 20 20 20 20 20 20 20 20 |.aDJ..". |
00003C50: 20 20 20 20 20 20 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 | ..........|
00003C60: 22 00 88 44 4B 03 99 22 11 11 4E 41 43 48 20 45 |"..DK.."..NACH E|
00003C70: 49 4E 45 4D 20 4C 4F 41 44 45 52 52 4F 52 20 53 |INEM LOADERROR S|
00003C80: 4F 4C 4C 54 45 20 49 4D 00 AF 44 4C 03 99 22 11 |OLLTE IM..DL..".|
00003C90: 44 49 52 45 43 4B 54 4D 4F 44 55 53 20 45 49 4E |DIRECKTMODUS EIN|
00003CA0: 47 45 47 45 42 45 4E 20 57 45 52 44 45 4E 3A 00 |GEGEBEN WERDEN:.|
00003CB0: DC 44 4D 03 99 22 11 50 4F 4B 45 34 35 2C 50 45 |.DM..".POKE45,PE|
00003CC0: 45 4B 28 38 33 31 29 3A 50 4F 4B 45 34 36 2C 50 |EK(831):POKE46,P|
00003CD0: 45 45 4B 28 38 33 32 29 3A 43 4C 52 00 F9 44 4E |EEK(832):CLR..DN|
00003CE0: 03 99 22 11 44 41 4E 4E 20 52 45 54 55 52 4E 20 |..".DANN RETURN |
00003CF0: 20 55 4E 44 20 4C 49 53 54 00 2B 45 4F 03 99 22 | UND LIST.+EO.."|
00003D00: 96 11 11 4F 44 45 52 20 20 50 4F 4B 45 34 36 2C |...ODER POKE46,|
00003D10: 50 45 45 4B 28 38 33 32 29 3A 50 4F 4B 45 34 38 |PEEK(832):POKE48|
00003D20: 2C 50 45 45 4B 28 38 33 32 29 3A 00 54 45 50 03 |,PEEK(832):.TEP.|
00003D30: 99 22 50 4F 4B 45 35 30 2C 50 45 45 4B 28 38 33 |."POKE50,PEEK(83|
00003D40: 32 29 3A 50 4F 4B 45 34 35 2C 50 45 45 4B 28 38 |2):POKE45,PEEK(8|
00003D50: 33 31 29 3A 00 84 45 51 03 99 22 11 50 4F 4B 45 |31):..EQ..".POKE|
00003D60: 34 37 2C 50 45 45 4B 28 38 33 32 29 3A 50 4F 4B |47,PEEK(832):POK|
00003D70: 45 34 39 2C 50 45 45 4B 28 38 33 31 29 3A 52 45 |E49,PEEK(831):RE|
00003D80: 54 55 52 4E 00 AD 45 52 03 99 22 11 11 9A 4D 49 |TURN..ER.."...MI|
00003D90: 54 20 45 54 57 41 53 20 47 4C 55 45 43 4B 20 4C |T ETWAS GLUECK L|
00003DA0: 41 55 46 54 20 44 41 4E 4E 20 44 41 53 00 CA 45 |AUFT DANN DAS..E|
00003DB0: 53 03 99 22 11 50 52 4F 47 52 41 4D 4D 20 54 52 |S..".PROGRAMM TR|
00003DC0: 4F 54 5A 20 41 4C 4C 45 4D 2E 00 DD 45 54 03 A1 |OTZ ALLEM...ET..|
00003DD0: 41 24 3A 8B 41 24 B2 22 22 A7 38 35 32 00 FE 45 |A$:.A$."".852..E|
00003DE0: 55 03 99 22 93 20 20 20 20 20 20 20 20 20 20 20 |U..". |
00003DF0: 20 2A 2A 2A 20 4D 45 4E 55 45 20 2A 2A 2A 00 06 | *** MENUE ***..|
00003E00: 46 57 03 89 38 36 00 22 46 5C 03 8F 22 01 04 05 |FW..86."F\.."...|
00003E10: 20 09 0E 20 07 05 12 20 01 0E 09 20 0F 12 20 15 | .. ... ... .. .|
00003E20: 13 01 00 4F 46 5D 03 99 22 93 1E 20 20 20 20 20 |...OF]..".. |
00003E30: 48 45 52 47 45 53 54 45 4C 4C 54 20 49 4E 20 55 |HERGESTELLT IN U|
00003E40: 53 41 20 4F 44 45 52 20 45 55 52 4F 50 41 22 00 |SA ODER EUROPA".|
00003E50: 7B 46 5E 03 99 22 1F 20 20 20 20 20 A8 A8 A8 A8 |{F^..". ....|
00003E60: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |................|
00003E70: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 00 AB 46 5F 03 |.............F_.|
00003E80: 99 22 11 11 11 9A 44 49 45 20 54 41 43 4B 54 20 |."....DIE TACKT |
00003E90: 46 52 45 51 55 45 4E 5A 20 49 53 54 20 56 4F 4D |FREQUENZ IST VOM|
00003EA0: 20 54 56 2D 41 50 50 45 52 41 54 00 D2 46 60 03 | TV-APPERAT..F`.|
00003EB0: 99 22 11 55 4E 44 20 44 45 52 20 4E 45 54 5A 46 |.".UND DER NETZF|
00003EC0: 52 45 51 55 45 4E 5A 20 41 42 48 41 45 4E 47 49 |REQUENZ ABHAENGI|
00003ED0: 47 2E 00 FE 46 61 03 99 22 11 44 41 20 42 45 49 |G...Fa..".DA BEI|
00003EE0: 44 45 53 20 49 4E 20 44 45 4E 20 55 53 41 20 55 |DES IN DEN USA U|
00003EF0: 4E 54 45 52 53 43 48 49 45 44 4C 49 43 48 00 24 |NTERSCHIEDLICH.$|
00003F00: 47 62 03 99 22 11 49 53 54 2C 4C 41 45 53 53 54 |Gb..".IST,LAESST|
00003F10: 20 45 53 20 53 49 43 48 20 46 45 53 54 53 54 45 | ES SICH FESTSTE|
00003F20: 4C 4C 45 4E 00 4C 47 63 03 99 22 11 57 4F 20 44 |LLEN.LGc..".WO D|
00003F30: 45 52 20 43 42 4D 20 36 34 20 48 45 52 47 45 53 |ER CBM 64 HERGES|
00003F40: 54 45 4C 4C 54 20 57 55 52 44 45 2E 00 67 47 64 |TELLT WURDE..gGd|
00003F50: 03 99 22 96 11 11 20 50 52 49 4E 54 20 50 45 45 |.."... PRINT PEE|
00003F60: 4B 20 28 36 37 38 29 00 7B 47 65 03 99 22 11 11 |K (678).{Ge.."..|
00003F70: 20 31 20 3D 20 45 55 52 4F 50 41 00 8B 47 66 03 | 1 = EUROPA..Gf.|
00003F80: 99 22 11 20 32 20 3D 20 55 53 41 00 B7 47 67 03 |.". 2 = USA..Gg.|
00003F90: 85 22 11 1C 20 20 20 20 20 20 20 20 20 20 20 20 |.".. |
00003FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 50 | SP|
00003FB0: 41 43 45 22 3B 41 24 00 D8 47 69 03 99 22 93 9F |ACE";A$..Gi.."..|
00003FC0: 20 20 20 20 20 20 20 20 2A 2A 2A 20 20 20 4D 45 | *** ME|
00003FD0: 4E 55 45 20 20 2A 2A 2A 00 E0 47 6B 03 89 38 36 |NUE ***..Gk..86|
00003FE0: 00 ED 47 70 03 8F 22 10 12 0F 07 12 01 00 19 48 |..Gp.."........H|
00003FF0: 71 03 99 22 93 9A 20 20 20 20 DC 20 50 52 4F 47 |q..".. . PROG|
00004000: 52 41 4D 4D 49 45 52 54 45 52 20 44 49 52 45 4B |RAMMIERTER DIREK|
00004010: 54 4D 4F 44 55 53 20 DC 22 00 42 48 72 03 99 22 |TMODUS .".BHr.."|
00004020: 20 20 20 20 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 | ............|
00004030: DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 DF A9 |................|
00004040: DF A9 00 59 48 73 03 99 22 11 95 11 11 41 4E 57 |...YHs.."....ANW|
00004050: 45 4E 44 55 4E 47 45 4E 3A 00 6B 48 74 03 99 22 |ENDUNGEN:.kHt.."|
00004060: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 00 98 48 75 03 |.............Hu.|
00004070: 99 22 11 41 4E 47 45 4E 4F 4D 4D 45 4E 20 49 4E |.".ANGENOMMEN IN|
00004080: 20 45 49 4E 45 4D 20 50 52 4F 47 52 41 4D 4D 20 | EINEM PROGRAMM |
00004090: 57 49 52 44 20 44 45 52 00 C2 48 76 03 99 22 11 |WIRD DER..Hv..".|
000040A0: 42 45 4E 55 45 54 5A 45 52 20 55 4D 20 53 45 49 |BENUETZER UM SEI|
000040B0: 4E 45 4E 20 4E 41 4D 45 4E 20 47 45 46 52 41 47 |NEN NAMEN GEFRAG|
000040C0: 54 2E 00 F1 48 77 03 99 22 11 44 41 4D 49 54 20 |T...Hw..".DAMIT |
000040D0: 44 45 52 20 4E 41 4D 45 20 49 4E 53 20 50 52 4F |DER NAME INS PRO|
000040E0: 47 52 41 4D 4D 20 41 55 46 47 45 4E 4F 4D 4D 45 |GRAMM AUFGENOMME|
000040F0: 4E 00 1E 49 78 03 99 22 11 57 49 52 44 20 2C 20 |N..Ix..".WIRD , |
00004100: 4B 41 4E 4E 20 44 45 52 20 50 52 4F 47 2E 44 49 |KANN DER PROG.DI|
00004110: 52 45 4B 54 4D 4F 44 2E 20 41 4E 47 45 2D 00 34 |REKTMOD. ANGE-.4|
00004120: 49 79 03 99 22 11 57 45 4E 44 45 54 20 57 45 52 |Iy..".WENDET WER|
00004130: 44 45 4E 2E 00 65 49 7A 03 85 22 11 11 11 1F 20 |DEN..eIz..".... |
00004140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004150: 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 | RETUR|
00004160: 4E 22 3B 41 24 00 77 49 7C 03 99 22 93 96 50 52 |N";A$.wI|.."..PR|
00004170: 4F 47 52 41 4D 4D 3A 00 86 49 7D 03 99 22 C5 C5 |OGRAMM:..I}.."..|
00004180: C5 C5 C5 C5 C5 C5 00 A4 49 7E 03 99 22 11 11 9A |........I~.."...|
00004190: 31 30 20 49 4E 50 55 54 27 27 4E 41 4D 45 27 27 |10 INPUT''NAME''|
000041A0: 3B 41 24 22 00 C7 49 7F 03 99 22 11 32 30 20 50 |;A$"..I...".20 P|
000041B0: 52 49 4E 54 27 27 12 D3 92 20 37 30 20 4E 24 20 |RINT''... 70 N$ |
000041C0: 3D 27 27 20 41 24 22 00 E9 49 80 03 99 22 11 33 |='' A$"..I...".3|
000041D0: 30 20 50 4F 4B 45 36 33 31 2C 31 39 3A 52 45 4D |0 POKE631,19:REM|
000041E0: 20 43 4C 52 20 48 4F 4D 45 00 09 4A 81 03 99 22 | CLR HOME..J..."|
000041F0: 11 34 30 20 50 4F 4B 45 36 33 32 2C 31 33 3A 52 |.40 POKE632,13:R|
00004200: 45 4D 20 52 45 54 55 52 4E 00 29 4A 82 03 99 22 |EM RETURN.)J..."|
00004210: 11 35 30 20 50 4F 4B 45 36 33 33 2C 31 33 3A 52 |.50 POKE633,13:R|
00004220: 45 4D 20 52 45 54 55 52 4E 00 4F 4A 83 03 99 22 |EM RETURN.OJ..."|
00004230: 11 36 30 20 50 4F 4B 45 31 39 38 2C 33 20 3A 52 |.60 POKE198,3 :R|
00004240: 45 4D 20 5A 41 45 48 4C 45 52 53 54 41 4E 44 00 |EM ZAEHLERSTAND.|
00004250: 5E 4A 84 03 99 22 11 37 30 20 45 4E 44 45 00 8B |^J...".70 ENDE..|
00004260: 4A 86 03 85 22 11 11 11 9E 46 55 45 52 20 45 52 |J..."....FUER ER|
00004270: 4B 4C 41 45 52 55 4E 47 45 4E 20 50 52 45 53 53 |KLAERUNGEN PRESS|
00004280: 20 52 45 54 55 52 4E 22 3B 41 24 00 A1 4A 88 03 | RETURN";A$..J..|
00004290: 99 22 93 96 45 52 4B 4C 41 45 52 55 4E 47 45 4E |."..ERKLAERUNGEN|
000042A0: 3A 00 C1 4A 89 03 99 22 11 11 31 30 20 46 52 41 |:..J..."..10 FRA|
000042B0: 47 45 20 4E 41 43 48 20 44 45 4D 20 4E 41 4D 45 |GE NACH DEM NAME|
000042C0: 4E 00 EF 4A 8A 03 99 22 11 32 30 20 53 43 48 52 |N..J...".20 SCHR|
000042D0: 45 49 42 54 20 41 55 46 20 42 49 4C 44 53 43 48 |EIBT AUF BILDSCH|
000042E0: 49 45 52 4D 20 4F 42 45 4E 20 4C 49 4E 4B 53 00 |IERM OBEN LINKS.|
000042F0: 0B 4B 8B 03 99 22 05 11 31 30 30 20 4E 24 3D 27 |.K..."..100 N$='|
00004300: 27 4E 41 4D 45 2E 2E 2E 27 27 96 00 3A 4B 8C 03 |'NAME...''..:K..|
00004310: 99 22 11 33 30 20 49 4D 20 54 41 53 54 41 54 55 |.".30 IM TASTATU|
00004320: 52 50 55 46 46 45 52 20 57 49 52 44 20 43 4C 52 |RPUFFER WIRD CLR|
00004330: 20 41 42 47 45 4C 45 47 54 2E 00 5E 4B 8E 03 99 | ABGELEGT..^K...|
00004340: 22 11 34 30 2D 35 30 20 44 41 4E 41 43 48 20 46 |".40-50 DANACH F|
00004350: 4F 4C 47 45 4E 20 32 20 52 45 54 55 52 4E 00 89 |OLGEN 2 RETURN..|
00004360: 4B 8F 03 99 22 11 36 30 20 53 41 47 54 20 44 45 |K...".60 SAGT DE|
00004370: 4D 20 52 45 43 48 4E 45 52 20 57 49 56 49 45 4C |M RECHNER WIVIEL|
00004380: 45 20 42 45 46 45 48 4C 45 00 A8 4B 90 03 99 22 |E BEFEHLE..K..."|
00004390: 11 49 4D 20 54 41 53 54 41 54 55 52 50 55 46 46 |.IM TASTATURPUFF|
000043A0: 45 52 20 53 49 4E 44 2E 00 D3 4B 91 03 99 22 11 |ER SIND...K...".|
000043B0: 37 30 20 4E 41 43 48 20 44 45 52 20 45 4E 44 20 |70 NACH DER END |
000043C0: 41 4E 57 45 49 53 55 4E 47 20 53 55 43 48 54 20 |ANWEISUNG SUCHT |
000043D0: 44 45 52 00 FF 4B 92 03 99 22 11 52 45 43 48 4E |DER..K...".RECHN|
000043E0: 45 52 20 49 4D 20 54 41 53 54 41 54 55 52 50 55 |ER IM TASTATURPU|
000043F0: 46 46 45 52 2C 20 55 4E 44 20 46 55 45 52 54 00 |FFER, UND FUERT.|
00004400: 21 4C 93 03 99 22 11 45 49 4E 20 48 4F 4D 45 20 |!L...".EIN HOME |
00004410: 4D 49 54 20 32 20 52 45 54 55 52 4E 20 41 55 53 |MIT 2 RETURN AUS|
00004420: 2E 00 50 4C 94 03 85 22 11 05 20 20 20 20 20 20 |..PL...".. |
00004430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004440: 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 | RETURN";A$|
00004450: 00 64 4C 96 03 99 22 93 9A 45 52 47 45 42 4E 49 |.dL..."..ERGEBNI|
00004460: 53 53 3A 22 00 76 4C 97 03 99 22 C5 C5 C5 C5 C5 |SS:".vL...".....|
00004470: C5 C5 C5 C5 20 22 00 84 4C 98 03 99 22 11 11 9E |.... "..L..."...|
00004480: 4C 49 53 54 00 A0 4C 99 03 99 22 9A 11 31 30 20 |LIST..L..."..10 |
00004490: 49 4E 50 55 54 27 27 4E 41 4D 45 27 27 3B 41 24 |INPUT''NAME'';A$|
000044A0: 00 C0 4C 9A 03 99 22 11 32 30 20 50 52 49 4E 54 |..L...".20 PRINT|
000044B0: 27 27 12 D3 92 20 37 30 20 4E 24 3D 27 27 41 24 |''... 70 N$=''A$|
000044C0: 00 D5 4C 9B 03 99 22 11 33 30 20 50 4F 4B 45 31 |..L...".30 POKE1|
000044D0: 33 31 2C 31 39 00 EA 4C 9C 03 99 22 11 34 30 20 |31,19..L...".40 |
000044E0: 50 4F 4B 45 31 33 32 2C 31 33 00 FF 4C 9D 03 99 |POKE132,13..L...|
000044F0: 22 11 35 30 20 50 4F 4B 45 31 33 33 2C 31 33 00 |".50 POKE133,13.|
00004500: 13 4D 9E 03 99 22 11 36 30 20 50 4F 4B 45 31 39 |.M...".60 POKE19|
00004510: 38 2C 33 00 2D 4D 9F 03 99 22 11 37 30 20 4E 24 |8,3.-M...".70 N$|
00004520: 3D 27 27 4E 41 4D 45 2E 2E 2E 2E 27 27 00 57 4D |=''NAME....''.WM|
00004530: A0 03 99 22 11 49 4E 20 5A 45 49 4C 45 20 37 30 |...".IN ZEILE 70|
00004540: 20 53 54 45 48 54 20 41 4E 53 54 45 4C 4C 45 20 | STEHT ANSTELLE |
00004550: 56 4F 4E 20 45 4E 44 00 7C 4D A1 03 99 22 44 45 |VON END.|M..."DE|
00004560: 52 20 4E 41 4D 45 20 44 45 52 20 45 49 4E 47 45 |R NAME DER EINGE|
00004570: 47 45 42 45 4E 20 57 55 52 44 45 22 00 AA 4D A2 |GEBEN WURDE"..M.|
00004580: 03 85 22 11 1F 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00004590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000045A0: 52 45 54 55 52 4E 22 3B 41 24 00 D1 4D A4 03 99 |RETURN";A$..M...|
000045B0: 22 9F 93 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
000045C0: 20 20 20 20 2A 2A 20 20 4D 45 4E 55 45 20 2A 2A | ** MENUE **|
000045D0: 22 00 DA 4D A5 03 89 20 38 36 00 E5 4D AC 03 8F |"..M... 86..M...|
000045E0: 22 13 01 16 05 00 03 4E AD 03 99 22 93 9C 20 20 |"......N...".. |
000045F0: 20 20 20 20 20 20 20 20 20 20 D3 20 53 41 56 45 | . SAVE|
00004600: 20 D3 22 00 1F 4E AE 03 99 22 20 20 20 20 20 20 | ."..N..." |
00004610: 20 20 20 20 20 20 CD CE CD CE CD CE CD CE 22 00 | ........".|
00004620: 4E 4E AF 03 99 22 11 11 96 53 50 45 49 43 48 45 |NN..."...SPEICHE|
00004630: 52 4E 20 56 4F 4E 20 45 49 4E 45 4D 20 4D 41 53 |RN VON EINEM MAS|
00004640: 43 48 49 4E 45 4E 53 50 52 41 43 48 45 2D 00 70 |CHINENSPRACHE-.p|
00004650: 4E B0 03 99 22 50 52 4F 47 52 41 4D 4D 2C 20 44 |N..."PROGRAMM, D|
00004660: 49 52 45 43 4B 54 20 41 55 46 20 44 49 53 4B 2E |IRECKT AUF DISK.|
00004670: 00 94 4E B1 03 99 22 11 9E 31 20 4F 50 45 4E 20 |..N..."..1 OPEN |
00004680: 31 2C 38 2C 31 35 2C 27 27 50 52 47 20 4E 41 4D |1,8,15,''PRG NAM|
00004690: 45 27 27 22 00 B4 4E B2 03 99 22 11 32 20 53 3D |E''"..N...".2 S=|
000046A0: 49 4E 54 28 41 2F 32 35 36 29 3A 4C 3D 41 2D 53 |INT(A/256):L=A-S|
000046B0: 2A 32 35 36 00 D6 4E B3 03 99 22 11 33 20 50 52 |*256..N...".3 PR|
000046C0: 49 4E 54 23 31 2C 43 48 52 24 28 4C 29 3B 43 48 |INT#1,CHR$(L);CH|
000046D0: 52 24 28 53 29 3B 00 EB 4E B4 03 99 22 11 34 20 |R$(S);..N...".4 |
000046E0: 46 4F 52 58 3D 41 20 54 4F 20 45 00 0A 4F B5 03 |FORX=A TO E..O..|
000046F0: 99 22 11 35 20 50 52 49 4E 54 23 31 2C 43 48 52 |.".5 PRINT#1,CHR|
00004700: 24 28 50 45 45 4B 28 58 29 29 00 20 4F B6 03 99 |$(PEEK(X)). O...|
00004710: 22 11 36 20 4E 45 58 54 49 3A 43 4C 4F 53 45 31 |".6 NEXTI:CLOSE1|
00004720: 00 3B 4F B7 03 99 22 11 11 96 41 3D 20 41 4E 46 |.;O..."...A= ANF|
00004730: 41 4E 47 53 41 44 52 45 53 53 45 00 50 4F B8 03 |ANGSADRESSE.PO..|
00004740: 99 22 45 3D 20 45 4E 44 20 41 44 52 45 53 53 45 |."E= END ADRESSE|
00004750: 00 7E 4F B9 03 85 22 1F 20 20 20 20 20 20 20 20 |.~O...". |
00004760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004770: 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 00 A3 | RETURN";A$..|
00004780: 4F BB 03 99 22 93 05 20 20 20 20 20 20 20 20 20 |O...".. |
00004790: 20 20 20 20 20 2A 2A 2A 20 4D 45 4E 55 45 20 2A | *** MENUE *|
000047A0: 2A 2A 22 00 AB 4F BC 03 89 38 36 00 B8 4F C0 03 |**"..O...86..O..|
000047B0: 8F 22 13 03 12 0F 0C 0C 00 E8 4F C1 03 99 22 93 |."........O...".|
000047C0: 1F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000047D0: 53 05 53 1F 43 05 43 1F 52 05 52 1F 4F 05 30 1F |S.S.C.C.R.R.O.0.|
000047E0: 4C 05 4C 1F 4C 05 4C 22 00 14 50 C2 03 99 22 20 |L.L.L.L"..P..." |
000047F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2B 1F | +.|
00004800: 2B 05 2B 1F 2B 05 2B 1F 2B 05 2B 1F 2B 05 2B 1F |+.+.+.+.+.+.+.+.|
00004810: 2B 05 2B 2B 00 2D 50 C3 03 99 22 11 11 96 53 43 |+.++.-P..."...SC|
00004820: 52 4F 4C 4C 49 4E 47 20 4E 41 43 48 3A 00 49 50 |ROLLING NACH:.IP|
00004830: C4 03 99 22 11 55 4E 54 45 4E 20 20 50 4F 4B 45 |...".UNTEN POKE|
00004840: 20 35 33 32 36 35 2C 33 30 00 65 50 C5 03 99 22 | 53265,30.eP..."|
00004850: 11 4F 42 45 4E 20 20 20 50 4F 4B 45 20 35 33 32 |.OBEN POKE 532|
00004860: 36 35 2C 32 34 00 87 50 C6 03 99 22 11 4C 49 4E |65,24..P...".LIN|
00004870: 4B 53 20 20 50 4F 4B 45 20 35 33 32 37 30 2C 32 |KS POKE 53270,2|
00004880: 30 30 20 2D 31 39 33 00 A4 50 C7 03 99 22 11 11 |00 -193..P..."..|
00004890: 9F 41 4E 57 45 4E 44 55 4E 47 41 42 45 49 53 50 |.ANWENDUNGABEISP|
000048A0: 49 45 4C 3A 00 C2 50 C8 03 99 22 11 31 30 20 58 |IEL:..P...".10 X|
000048B0: 3D 58 2B 31 3A 49 46 58 3D 37 20 54 48 45 4E 58 |=X+1:IFX=7 THENX|
000048C0: 3D 30 00 F2 50 C9 03 99 22 11 32 30 20 50 4F 4B |=0..P...".20 POK|
000048D0: 45 35 33 32 37 30 2C 50 45 45 4B 28 35 33 32 37 |E53270,PEEK(5327|
000048E0: 30 29 41 4E 44 32 34 30 20 4F 52 41 42 53 20 28 |0)AND240 ORABS (|
000048F0: 58 29 00 03 51 CA 03 99 22 33 30 20 47 4F 54 4F |X)..Q..."30 GOTO|
00004900: 20 31 30 00 17 51 CB 03 A1 20 41 24 3A 8B 41 24 | 10..Q... A$:.A$|
00004910: B2 22 22 A7 39 37 31 00 3C 51 CC 03 99 22 93 1C |."".971.<Q..."..|
00004920: 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 | *** |
00004930: 20 4D 45 4E 55 45 20 20 20 2A 2A 2A 00 45 51 CD | MENUE ***.EQ.|
00004940: 03 89 20 38 36 00 54 51 D4 03 8F 22 09 0E 10 15 |.. 86.TQ..."....|
00004950: 0F 15 10 15 00 75 51 D5 03 99 22 93 81 20 20 20 |.....uQ...".. |
00004960: 20 20 20 20 20 20 20 23 20 53 54 45 55 45 52 55 | # STEUERU|
00004970: 4E 47 20 23 22 00 94 51 D6 03 99 22 20 20 20 20 |NG #"..Q..." |
00004980: 20 20 20 20 20 20 23 23 23 23 23 23 23 23 23 23 | ##########|
00004990: 23 23 23 22 00 A8 51 D7 03 99 22 11 96 55 4D 53 |###"..Q..."..UMS|
000049A0: 43 48 41 4C 54 45 4E 3A 00 B9 51 D8 03 99 22 C5 |CHALTEN:..Q...".|
000049B0: C5 C5 C5 C5 C5 C5 C5 C5 C5 00 E7 51 D9 03 99 22 |...........Q..."|
000049C0: 11 42 41 53 49 43 20 49 4E 53 20 52 41 4D 20 20 |.BASIC INS RAM |
000049D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 | P|
000049E0: 4F 4B 45 31 2C 35 34 00 15 52 DA 03 99 22 11 42 |OKE1,54..R...".B|
000049F0: 41 53 49 43 20 55 4E 44 20 4B 45 52 4E 41 4C 20 |ASIC UND KERNAL |
00004A00: 49 4E 53 20 20 52 41 4D 20 20 20 20 20 50 4F 4B |INS RAM POK|
00004A10: 45 31 2C 35 33 00 43 52 DB 03 99 22 11 42 41 53 |E1,53.CR...".BAS|
00004A20: 49 43 2D 4B 45 52 4E 41 4C 20 55 4E 44 20 49 2F |IC-KERNAL UND I/|
00004A30: 4F 20 49 4E 53 20 52 41 4D 20 20 50 4F 4B 45 31 |O INS RAM POKE1|
00004A40: 2C 35 32 00 71 52 DC 03 99 22 11 42 4C 45 4E 44 |,52.qR...".BLEND|
00004A50: 45 54 20 5A 45 49 43 48 45 4E 20 53 41 54 5A 20 |ET ZEICHEN SATZ |
00004A60: 45 49 4E 20 20 20 20 20 20 50 4F 4B 45 31 2C 35 |EIN POKE1,5|
00004A70: 31 00 A0 52 DD 03 99 22 11 43 41 53 45 54 54 45 |1..R...".CASETTE|
00004A80: 4E 4D 4F 54 4F 52 20 41 55 53 20 20 50 4F 4B 45 |NMOTOR AUS POKE|
00004A90: 20 31 2C 50 45 45 4B 28 31 29 20 4F 52 20 33 32 | 1,PEEK(1) OR 32|
00004AA0: 00 C9 52 DE 03 99 22 11 11 9A 53 59 53 54 45 4D |..R..."...SYSTEM|
00004AB0: 4D 45 4C 44 55 4E 47 20 28 4C 4F 41 44 2C 56 45 |MELDUNG (LOAD,VE|
00004AC0: 52 49 46 59 20 45 54 43 29 00 EE 52 DF 03 99 22 |RIFY ETC)..R..."|
00004AD0: 11 53 59 53 54 45 4D 4D 45 4C 44 55 4E 47 20 41 |.SYSTEMMELDUNG A|
00004AE0: 55 53 20 20 50 4F 4B 45 20 31 35 37 2C 30 00 15 |US POKE 157,0..|
00004AF0: 53 E0 03 99 22 11 53 59 53 54 45 4D 4D 45 4C 44 |S...".SYSTEMMELD|
00004B00: 55 4E 47 20 45 49 4E 20 20 50 4F 4B 45 20 31 35 |UNG EIN POKE 15|
00004B10: 37 2C 31 32 38 00 43 53 E1 03 85 22 11 05 20 20 |7,128.CS...".. |
00004B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004B30: 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 | RETURN"|
00004B40: 3B 41 24 00 72 53 E3 03 99 22 93 9E 43 41 53 45 |;A$.rS..."..CASE|
00004B50: 54 54 45 4E 4D 4F 54 4F 52 20 56 45 52 52 49 45 |TTENMOTOR VERRIE|
00004B60: 47 45 4C 55 4E 47 20 20 50 4F 4B 45 20 31 39 32 |GELUNG POKE 192|
00004B70: 2C 31 00 A0 53 E4 03 99 22 11 43 41 53 45 54 54 |,1..S...".CASETT|
00004B80: 45 4E 4D 4F 54 4F 52 20 4E 4F 52 4D 41 4C 20 20 |ENMOTOR NORMAL |
00004B90: 20 20 20 20 20 20 50 4F 4B 45 20 31 39 32 2C 30 | POKE 192,0|
00004BA0: 00 CA 53 E5 03 99 22 11 11 9F 46 45 48 4C 45 52 |..S..."...FEHLER|
00004BB0: 20 4D 45 4C 44 55 4E 47 20 41 55 53 20 20 50 4F | MELDUNG AUS PO|
00004BC0: 4B 45 20 37 36 38 2C 31 38 35 00 F2 53 E6 03 99 |KE 768,185..S...|
00004BD0: 22 11 46 45 48 4C 45 52 20 4D 45 4C 44 55 4E 47 |".FEHLER MELDUNG|
00004BE0: 20 45 49 4E 20 20 50 4F 4B 45 20 37 36 38 2C 31 | EIN POKE 768,1|
00004BF0: 33 39 00 1B 54 E7 03 99 22 11 11 96 4B 4C 45 49 |39..T..."...KLEI|
00004C00: 4E 53 43 48 52 49 46 54 20 45 49 4E 20 20 50 4F |NSCHRIFT EIN PO|
00004C10: 4B 45 20 35 33 32 37 32 2C 32 32 00 42 54 E8 03 |KE 53272,22.BT..|
00004C20: 99 22 11 4B 4C 45 49 4E 53 43 48 52 49 46 54 20 |.".KLEINSCHRIFT |
00004C30: 41 55 53 20 20 50 4F 4B 45 20 35 33 32 37 32 2C |AUS POKE 53272,|
00004C40: 32 31 00 72 54 E9 03 85 22 1F 11 11 11 11 11 20 |21.rT..."...... |
00004C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004C60: 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B | RETURN";|
00004C70: 41 24 00 94 54 EB 03 99 22 93 20 20 20 20 20 20 |A$..T...". |
00004C80: 20 20 20 20 20 20 2A 2A 2A 20 4D 45 4E 55 45 20 | *** MENUE |
00004C90: 2A 2A 2A 22 00 9C 54 EC 03 89 38 36 00 AF 54 F2 |***"..T...86..T.|
00004CA0: 03 8F 22 05 09 0E 13 20 10 0C 01 20 09 0E 05 00 |..".... ... ....|
00004CB0: D2 54 F3 03 99 22 93 81 20 20 20 20 20 20 20 20 |.T...".. |
00004CC0: 20 20 20 20 20 20 53 54 45 43 4B 4D 4F 44 55 4C | STECKMODUL|
00004CD0: 45 22 00 F3 54 F4 03 99 22 20 20 20 20 20 20 20 |E"..T..." |
00004CE0: 20 20 20 20 20 20 20 3A 3A 3A 3A 3A 3A 3A 3A 3A | :::::::::|
00004CF0: 3A 3A 22 00 0A 55 F5 03 99 22 05 11 11 11 53 54 |::"..U..."....ST|
00004D00: 45 43 4B 4D 4F 44 55 4C 45 3A 00 1C 55 F6 03 99 |ECKMODULE:..U...|
00004D10: 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 00 45 55 F7 |"............EU.|
00004D20: 03 99 22 96 11 53 50 45 49 43 48 45 52 20 42 45 |.."..SPEICHER BE|
00004D30: 52 45 49 43 48 20 56 4F 4E 20 24 38 30 30 30 2D |REICH VON $8000-|
00004D40: 24 39 46 46 46 00 5C 55 F8 03 99 22 11 11 41 42 |$9FFF.\U..."..AB|
00004D50: 53 50 45 49 43 48 45 52 55 4E 47 3A 00 8C 55 F9 |SPEICHERUNG:..U.|
00004D60: 03 99 22 11 50 4F 4B 45 34 33 2C 30 3A 50 4F 4B |..".POKE43,0:POK|
00004D70: 45 34 34 2C 31 32 38 3A 50 4F 4B 45 34 35 2C 30 |E44,128:POKE45,0|
00004D80: 3A 50 4F 4B 45 34 36 2C 31 39 32 3A 00 A3 55 FA |:POKE46,192:..U.|
00004D90: 03 99 22 53 41 56 45 27 27 4E 41 4D 45 27 27 2C |.."SAVE''NAME'',|
00004DA0: 38 2C 31 00 CD 55 FB 03 99 22 11 1F 11 57 45 4E |8,1..U..."...WEN|
00004DB0: 4E 20 50 49 4E 20 38 20 4F 44 52 20 39 20 41 55 |N PIN 8 ODR 9 AU|
00004DC0: 46 20 4D 41 53 53 45 20 4C 49 45 47 54 00 F4 55 |F MASSE LIEGT..U|
00004DD0: FC 03 99 22 11 49 53 54 20 44 41 53 20 42 41 53 |...".IST DAS BAS|
00004DE0: 49 43 20 52 4F 4D 20 41 42 47 45 53 43 48 41 4C |IC ROM ABGESCHAL|
00004DF0: 54 45 54 2E 00 22 56 FD 03 85 22 11 1F 20 20 20 |TET.."V...".. |
00004E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00004E10: 20 20 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B | RETURN";|
00004E20: 41 24 00 43 56 FF 03 99 22 93 9F 20 20 20 20 20 |A$.CV...".. |
00004E30: 20 20 20 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 2A | *** MENUE *|
00004E40: 2A 2A 22 00 4B 56 00 04 89 38 36 00 58 56 06 04 |**".KV...86.XV..|
00004E50: 8F 20 22 12 05 0E 05 17 00 74 56 07 04 99 22 93 |. "......tV...".|
00004E60: 9E 20 20 20 20 20 20 20 20 20 20 20 20 D6 D6 D6 |. ...|
00004E70: D6 D6 D6 D6 00 93 56 08 04 99 22 20 20 20 20 20 |......V..." |
00004E80: 20 20 20 20 20 20 3C 3E 9E 12 52 45 4E 45 57 92 | <>..RENEW.|
00004E90: 3C 3E 22 00 AE 56 09 04 99 22 9E 20 20 20 20 20 |<>"..V...". |
00004EA0: 20 20 20 20 20 20 20 D6 D6 D6 D6 D6 D6 D6 00 DA | .........|
00004EB0: 56 0A 04 99 22 11 11 96 57 45 4E 4E 20 44 49 45 |V..."...WENN DIE|
00004EC0: 20 48 41 45 4E 44 45 20 53 43 48 4E 45 4C 4C 45 | HAENDE SCHNELLE|
00004ED0: 52 20 53 49 4E 44 20 41 4C 53 00 03 57 0B 04 99 |R SIND ALS..W...|
00004EE0: 22 11 44 41 53 20 47 45 48 49 52 4E 2E 20 44 41 |".DAS GEHIRN. DA|
00004EF0: 4E 4E 20 49 53 54 20 45 53 20 5A 45 49 54 20 46 |NN IST ES ZEIT F|
00004F00: 55 45 52 00 1E 57 0C 04 99 22 11 45 49 4E 20 52 |UER..W...".EIN R|
00004F10: 45 4E 45 57 20 50 52 4F 47 52 41 4D 4D 2E 00 42 |ENEW PROGRAMM..B|
00004F20: 57 0D 04 99 22 11 11 9F 4D 41 53 43 48 49 4E 45 |W..."...MASCHINE|
00004F30: 4E 53 50 52 41 43 48 45 20 50 52 4F 47 52 41 4D |NSPRACHE PROGRAM|
00004F40: 4D 45 00 63 57 0E 04 99 22 C4 C4 C4 C4 C4 C4 C4 |ME.cW...".......|
00004F50: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................|
00004F60: C4 C4 C4 00 82 57 0F 04 99 22 11 50 4F 4B 45 20 |.....W...".POKE |
00004F70: 32 30 35 30 2C 31 30 20 20 20 3C 52 45 54 55 52 |2050,10 <RETUR|
00004F80: 4E 3E 00 A1 57 10 04 99 22 11 36 33 34 35 36 20 |N>..W...".63456 |
00004F90: 20 20 20 20 20 20 20 20 20 3C 52 45 54 55 52 4E | <RETURN|
00004FA0: 3E 00 C0 57 11 04 99 22 11 4C 49 53 54 20 20 20 |>..W...".LIST |
00004FB0: 20 20 20 20 20 20 20 20 3C 52 45 54 55 52 4E 3E | <RETURN>|
00004FC0: 00 E6 57 12 04 99 22 11 4D 49 54 20 53 59 53 20 |..W...".MIT SYS |
00004FD0: 58 58 58 20 20 57 45 52 54 20 4E 45 55 20 53 54 |XXX WERT NEU ST|
00004FE0: 41 52 54 45 4E 2E 00 14 58 13 04 85 22 1F 11 20 |ARTEN...X...".. |
00004FF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00005000: 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4E | RETURN|
00005010: 22 3B 41 24 00 2D 58 15 04 99 22 96 93 42 41 53 |";A$.-X..."..BAS|
00005020: 49 43 50 52 4F 47 52 41 4D 4D 45 3A 22 00 44 58 |ICPROGRAMME:".DX|
00005030: 16 04 99 22 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |..."............|
00005040: C4 C4 20 22 00 62 58 17 04 99 22 11 11 50 4F 4B |.. ".bX..."..POK|
00005050: 45 20 32 30 35 30 2C 38 3A 53 59 53 34 32 32 39 |E 2050,8:SYS4229|
00005060: 31 3A 00 8C 58 18 04 99 22 11 11 50 4F 4B 45 20 |1:..X..."..POKE |
00005070: 34 36 2C 50 45 45 4B 28 33 35 29 2D 28 50 45 45 |46,PEEK(35)-(PEE|
00005080: 4B 28 37 38 31 29 3C 32 35 33 29 3A 00 B7 58 19 |K(781)<253):..X.|
00005090: 04 99 22 11 11 50 4F 4B 45 20 34 35 2C 50 45 45 |.."..POKE 45,PEE|
000050A0: 4B 28 37 38 31 29 20 2B 20 32 20 41 4E 44 20 32 |K(781) + 2 AND 2|
000050B0: 35 35 3A 20 43 4C 52 00 C8 58 1A 04 99 22 11 11 |55: CLR..X..."..|
000050C0: 3C 52 45 54 55 52 4E 3E 00 D4 58 1B 04 99 22 11 |<RETURN>..X...".|
000050D0: 4C 49 53 54 00 06 59 1F 04 85 22 1F 11 11 11 11 |LIST..Y...".....|
000050E0: 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000050F0: 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 | RETU|
00005100: 52 4E 22 3B 41 24 00 25 59 21 04 99 22 93 20 20 |RN";A$.%Y!..". |
00005110: 20 20 20 20 20 20 20 2A 2A 2A 20 4D 45 4E 55 45 | *** MENUE|
00005120: 20 2A 2A 2A 22 00 2D 59 22 04 89 38 36 00 3F 59 | ***".-Y"..86.?Y|
00005130: 24 04 8F 22 13 01 16 05 20 13 03 12 05 05 0E 00 |$..".... .......|
00005140: 64 59 25 04 99 22 93 9E 20 20 20 20 20 20 20 20 |dY%..".. |
00005150: 20 20 20 D5 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 | .............|
00005160: C3 C3 C3 C9 00 89 59 26 04 99 22 20 20 20 20 20 |......Y&.." |
00005170: 20 20 20 20 20 20 C2 96 53 41 56 45 20 42 49 4C | ..SAVE BIL|
00005180: 44 53 43 48 49 52 4D 9E C2 00 AC 59 27 04 99 22 |DSCHIRM....Y'.."|
00005190: 20 20 20 20 20 20 20 20 20 20 20 CA C3 C3 C3 C3 | .....|
000051A0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 CB 00 C6 59 28 |..............Y(|
000051B0: 04 99 22 05 11 11 12 20 20 20 20 20 20 20 20 20 |..".... |
000051C0: 20 20 20 20 92 22 00 DF 59 29 04 99 22 12 20 9F | ."..Y)..". .|
000051D0: 44 49 53 4B 56 45 52 53 49 4F 4E 05 20 92 22 00 |DISKVERSION. .".|
000051E0: F6 59 2A 04 99 22 12 20 20 20 20 20 20 20 20 20 |.Y*..". |
000051F0: 20 20 20 20 92 22 00 1E 5A 2B 04 99 22 11 11 96 | ."..Z+.."...|
00005200: 31 30 20 4F 50 45 4E 20 31 2C 38 2C 31 2C 27 27 |10 OPEN 1,8,1,''|
00005210: 30 3A 42 49 4C 44 53 43 48 49 52 4D 27 27 00 49 |0:BILDSCHIRM''.I|
00005220: 5A 2C 04 99 22 11 32 30 20 50 52 49 4E 54 23 31 |Z,..".20 PRINT#1|
00005230: 2C 20 43 48 52 24 28 30 29 3A 50 52 49 4E 54 23 |, CHR$(0):PRINT#|
00005240: 31 2C 43 48 52 24 28 34 29 00 68 5A 2D 04 99 22 |1,CHR$(4).hZ-.."|
00005250: 11 33 30 20 46 4F 52 20 49 20 3D 20 31 30 32 34 |.30 FOR I = 1024|
00005260: 20 54 4F 20 32 30 32 33 00 88 5A 2E 04 99 22 11 | TO 2023..Z...".|
00005270: 34 30 20 50 52 49 4E 54 23 31 2C 43 48 52 24 28 |40 PRINT#1,CHR$(|
00005280: 50 45 45 4B 28 49 29 29 00 A0 5A 2F 04 99 22 11 |PEEK(I))..Z/..".|
00005290: 35 30 20 4E 45 58 54 20 49 3A 43 4C 4F 53 45 31 |50 NEXT I:CLOSE1|
000052A0: 00 D0 5A 30 04 85 22 11 11 11 1F 20 20 20 20 20 |..Z0..".... |
000052B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000052C0: 20 20 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 | RETURN";A$|
000052D0: 00 ED 5A 32 04 99 22 93 05 12 20 20 20 20 20 20 |..Z2.."... |
000052E0: 20 20 20 20 20 20 20 20 20 20 20 92 22 00 0A 5B | ."..[|
000052F0: 33 04 99 22 12 20 9F 43 41 53 45 54 54 45 4E 56 |3..". .CASETTENV|
00005300: 45 52 53 49 4F 4E 05 20 92 22 00 25 5B 34 04 99 |ERSION. .".%[4..|
00005310: 22 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00005320: 20 20 20 92 22 00 39 5B 35 04 99 22 11 11 96 31 | .".9[5.."...1|
00005330: 20 52 45 4D 20 4E 41 4D 45 00 5A 5B 36 04 99 22 | REM NAME.Z[6.."|
00005340: 11 32 20 50 4F 4B 45 20 31 39 33 2C 53 4C 3A 50 |.2 POKE 193,SL:P|
00005350: 4F 4B 45 20 31 39 34 2C 53 48 00 7B 5B 37 04 99 |OKE 194,SH.{[7..|
00005360: 22 11 33 20 50 4F 4B 45 20 31 37 34 2C 45 4C 3A |".3 POKE 174,EL:|
00005370: 50 4F 4B 45 20 31 37 35 2C 45 48 00 98 5B 38 04 |POKE 175,EH..[8.|
00005380: 99 22 11 34 20 50 4F 4B 45 20 31 38 37 2C 50 45 |.".4 POKE 187,PE|
00005390: 45 4B 28 34 33 29 2B 36 00 B3 5B 39 04 99 22 11 |EK(43)+6..[9..".|
000053A0: 35 20 50 4F 4B 45 20 31 38 38 2C 50 45 45 4B 28 |5 POKE 188,PEEK(|
000053B0: 34 34 29 00 C7 5B 3A 04 99 22 11 36 20 50 4F 4B |44)..[:..".6 POK|
000053C0: 45 20 31 38 33 2C 4C 00 E5 5B 3B 04 99 22 11 37 |E 183,L..[;..".7|
000053D0: 20 50 4F 4B 45 20 31 38 36 2C 31 3A 50 4F 4B 45 | POKE 186,1:POKE|
000053E0: 31 38 35 2C 30 00 0A 5C 3C 04 99 22 11 38 20 53 |185,0..\<..".8 S|
000053F0: 59 53 20 36 32 39 35 34 20 3A 52 45 4D 20 53 41 |YS 62954 :REM SA|
00005400: 56 45 20 52 4F 55 54 49 4E 45 00 38 5C 3D 04 85 |VE ROUTINE.8\=..|
00005410: 22 11 11 11 05 52 45 54 55 52 4E 20 46 55 45 52 |"....RETURN FUER|
00005420: 20 50 52 4F 47 52 2E 20 42 45 53 43 48 52 45 49 | PROGR. BESCHREI|
00005430: 42 55 4E 47 22 3B 41 24 00 56 5C 3F 04 99 22 93 |BUNG";A$.V\?..".|
00005440: 53 4C 20 3D 20 53 54 41 52 54 20 41 44 52 45 53 |SL = START ADRES|
00005450: 53 45 20 4C 4F 57 00 75 5C 40 04 99 22 11 53 48 |SE LOW.u\@..".SH|
00005460: 20 3D 20 53 54 41 52 54 20 41 44 52 45 53 53 45 | = START ADRESSE|
00005470: 20 48 49 47 48 00 93 5C 41 04 99 22 11 45 4C 20 | HIGH..\A..".EL |
00005480: 3D 20 45 4E 44 20 20 20 41 44 52 45 53 53 45 20 |= END ADRESSE |
00005490: 4C 4F 57 00 B2 5C 42 04 99 22 11 45 48 20 3D 20 |LOW..\B..".EH = |
000054A0: 45 4E 44 20 20 20 41 44 52 45 53 53 45 20 48 49 |END ADRESSE HI|
000054B0: 47 48 00 D3 5C 43 04 99 22 11 20 4C 20 3D 20 4C |GH..\C..". L = L|
000054C0: 41 45 4E 47 45 20 44 45 53 20 46 49 4C 45 4E 41 |AENGE DES FILENA|
000054D0: 4D 45 4E 00 F7 5C 44 04 99 22 11 4C 49 4E 49 45 |MEN..\D..".LINIE|
000054E0: 20 36 30 20 47 45 52 41 45 54 45 20 41 44 52 2C | 60 GERAETE ADR,|
000054F0: 20 53 4B 55 4E 44 2E 00 15 5D 45 04 99 22 11 53 | SKUND...]E..".S|
00005500: 59 53 20 36 32 39 35 34 20 53 41 56 45 20 52 4F |YS 62954 SAVE RO|
00005510: 55 54 49 4E 45 00 44 5D 46 04 85 22 1C 11 11 20 |UTINE.D]F.."... |
00005520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00005530: 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4E | RETURN|
00005540: 22 3B 41 24 00 67 5D 49 04 99 22 9F 20 20 20 20 |";A$.g]I..". |
00005550: 20 20 20 20 20 20 20 20 2A 2A 2A 20 4D 45 4E 55 | *** MENU|
00005560: 45 20 20 2A 2A 2A 22 00 6F 5D 4A 04 89 38 36 00 |E ***".o]J..86.|
00005570: 83 5D 4C 04 8F 22 1A 05 09 0C 05 0C 0F 05 13 03 |.]L.."..........|
00005580: 08 05 0E 00 AE 5D 4D 04 99 22 93 9E 20 20 20 20 |.....]M..".. |
00005590: 20 20 20 20 2D 2D 2D 20 20 5A 45 49 4C 45 4E 20 | --- ZEILEN |
000055A0: 4C 4F 45 53 43 48 45 4E 20 20 2D 2D 2D 22 00 D1 |LOESCHEN ---"..|
000055B0: 5D 4E 04 99 22 20 20 20 20 20 20 20 20 20 20 20 |]N.." |
000055C0: 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | --------------|
000055D0: 2D 00 E7 5D 4F 04 99 22 11 11 11 9A 50 4F 4B 45 |-..]O.."....POKE|
000055E0: 20 37 38 31 2C 5A 4E 00 F9 5D 50 04 99 22 11 11 | 781,ZN..]P.."..|
000055F0: 53 59 53 20 35 39 39 30 33 00 14 5E 51 04 99 22 |SYS 59903..^Q.."|
00005600: 11 11 5A 4E 20 3D 20 5A 45 49 4C 45 4E 20 4E 55 |..ZN = ZEILEN NU|
00005610: 4D 4D 45 52 00 42 5E 52 04 99 22 11 11 11 11 11 |MMER.B^R..".....|
00005620: 81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00005630: 20 20 20 20 20 20 20 20 20 20 20 20 53 50 41 43 | SPAC|
00005640: 45 22 00 56 5E 53 04 A1 41 24 3A 8B 41 24 B2 22 |E".V^S..A$:.A$."|
00005650: 22 A7 31 31 30 37 00 79 5E 54 04 99 22 93 20 20 |".1107.y^T..". |
00005660: 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 20 4D 45 | *** ME|
00005670: 4E 55 45 20 20 2A 2A 2A 22 00 81 5E 55 04 89 38 |NUE ***"..^U..8|
00005680: 36 00 92 5E 56 04 8F 22 09 0E 10 2E 0F 08 0E 05 |6..^V.."........|
00005690: 20 3F 00 BD 5E 57 04 99 22 93 9E 20 20 20 20 20 | ?..^W..".. |
000056A0: 20 20 20 20 20 49 4E 50 55 54 20 4D 49 54 20 53 | INPUT MIT S|
000056B0: 4F 4E 44 45 52 5A 45 49 43 48 45 4E 22 00 E6 5E |ONDERZEICHEN"..^|
000056C0: 58 04 99 22 20 20 20 20 20 20 20 20 20 20 A3 B7 |X.." ..|
000056D0: B8 A2 B9 AF B9 A2 B8 B7 A3 B7 B8 A2 B9 AF A4 AF |................|
000056E0: B9 A2 B8 B7 A3 22 00 17 5F 59 04 99 22 11 11 11 |.....".._Y.."...|
000056F0: 9C 47 49 42 54 20 41 4E 53 54 45 4C 4C 45 20 44 |.GIBT ANSTELLE D|
00005700: 45 53 20 3F 20 45 49 4E 20 46 52 45 49 20 44 45 |ES ? EIN FREI DE|
00005710: 46 49 4E 49 45 52 2D 00 31 5F 5A 04 99 22 11 42 |FINIER-.1_Z..".B|
00005720: 41 52 45 53 20 5A 45 49 43 48 45 4E 20 41 55 53 |ARES ZEICHEN AUS|
00005730: 2E 00 62 5F 5B 04 99 22 11 11 96 49 4E 50 55 54 |..b_[.."...INPUT|
00005740: 27 27 54 45 58 54 20 12 C8 92 20 12 C8 92 20 5A |''TEXT ... ... Z|
00005750: 20 12 C7 92 20 12 C7 92 20 12 C7 92 20 27 27 3B | ... ... ... '';|
00005760: 41 24 00 83 5F 5C 04 99 22 11 11 9A 12 C8 92 20 |A$.._\.."...... |
00005770: 3D 20 3C 43 52 53 20 4C 45 46 54 3E 20 20 32 20 |= <CRS LEFT> 2 |
00005780: 4D 41 4C 00 9E 5F 5D 04 99 22 11 5A 20 3D 20 41 |MAL.._]..".Z = A|
00005790: 55 53 47 41 42 45 20 5A 45 49 43 48 45 4E 00 BE |USGABE ZEICHEN..|
000057A0: 5F 5E 04 99 22 11 12 C7 92 20 3D 20 3C 43 52 53 |_^..".... = <CRS|
000057B0: 20 52 49 47 48 54 3E 20 20 33 20 4D 41 4C 00 E2 | RIGHT> 3 MAL..|
000057C0: 5F 5F 04 85 22 11 11 11 20 20 20 20 20 20 20 20 |__.."... |
000057D0: 42 45 49 53 50 49 45 4C 1D 1D 23 9D 9D 9D 22 3B |BEISPIEL..#...";|
000057E0: 41 24 00 01 60 60 04 99 22 93 05 20 20 20 20 2A |A$..``..".. *|
000057F0: 2A 2A 20 20 20 4D 45 4E 55 45 20 20 20 2A 2A 2A |** MENUE ***|
00005800: 22 00 0A 60 61 04 89 20 38 36 00 1B 60 6A 04 8F |"..`a.. 86..`j..|
00005810: 22 04 05 13 20 12 0F 09 05 12 20 00 47 60 6C 04 |"... ..... .G`l.|
00005820: 99 22 93 1F 20 20 20 20 20 20 20 20 20 20 40 20 |.".. @ |
00005830: 5A 45 52 53 54 4F 45 52 55 4E 47 53 20 42 45 46 |ZERSTOERUNGS BEF|
00005840: 45 48 4C 45 20 40 22 00 71 60 6D 04 99 22 20 20 |EHLE @".q`m.." |
00005850: 20 20 20 20 20 20 20 20 20 20 B1 B2 B1 B2 B1 B2 | ......|
00005860: B1 B2 B1 B2 B1 B2 B1 B2 B1 B2 B1 B2 B1 B2 B1 20 |............... |
00005870: 22 00 A1 60 6E 04 99 22 11 11 96 11 20 50 4F 4B |"..`n..".... POK|
00005880: 45 20 20 37 37 36 2C 31 20 20 55 4E 44 45 46 49 |E 776,1 UNDEFI|
00005890: 4E 49 45 52 42 41 52 45 20 5A 45 49 43 48 45 4E |NIERBARE ZEICHEN|
000058A0: 22 00 D1 60 6F 04 99 22 96 11 20 50 4F 4B 45 20 |"..`o..".. POKE |
000058B0: 20 37 37 37 2C 31 20 20 43 55 52 53 4F 52 20 42 | 777,1 CURSOR B|
000058C0: 4C 45 49 42 54 20 4C 49 4E 4B 53 20 4F 42 45 4E |LEIBT LINKS OBEN|
000058D0: 22 00 00 61 70 04 99 22 96 11 20 50 4F 4B 45 20 |"..ap..".. POKE |
000058E0: 20 37 37 30 2C 30 20 20 47 49 42 54 20 4E 55 52 | 770,0 GIBT NUR|
000058F0: 20 4E 4F 43 48 20 52 45 41 44 59 20 41 55 53 22 | NOCH READY AUS"|
00005900: 00 2E 61 71 04 99 22 96 11 20 50 4F 4B 45 20 20 |..aq..".. POKE |
00005910: 31 32 30 2C 32 20 20 54 41 53 54 41 54 55 52 20 |120,2 TASTATUR |
00005920: 41 55 53 47 45 53 43 48 41 4C 54 45 54 22 00 58 |AUSGESCHALTET".X|
00005930: 61 72 04 99 22 96 11 20 50 4F 4B 45 20 20 35 36 |ar..".. POKE 56|
00005940: 33 33 34 2C 37 20 53 54 4F 45 52 54 20 50 52 47 |334,7 STOERT PRG|
00005950: 20 41 42 4C 41 55 46 22 00 88 61 73 04 85 22 1F | ABLAUF"..as..".|
00005960: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00005970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 | RE|
00005980: 54 55 52 4E 22 3B 41 24 00 A8 61 76 04 99 22 93 |TURN";A$..av..".|
00005990: 9F 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 4D 45 |. *** ME|
000059A0: 4E 55 45 20 2A 2A 2A 22 00 B0 61 77 04 89 38 36 |NUE ***"..aw..86|
000059B0: 00 B7 61 7E 04 8F 22 00 DA 61 7F 04 99 22 93 9F |..a~.."..a..."..|
000059C0: 20 20 20 20 20 20 20 20 20 20 2B 2D 2B 4D 2B 45 | +-+M+E|
000059D0: 2B 52 2B 47 2B 45 2B 2D 2B 22 00 FB 61 80 04 99 |+R+G+E+-+"..a...|
000059E0: 22 20 20 20 20 20 20 20 20 20 20 A0 20 2B 2B 2B |" . +++|
000059F0: 2B 2B 2B 2B 2B 2B 2B 2B 20 20 22 00 25 62 81 04 |++++++++ ".%b..|
00005A00: 99 22 11 11 9A 31 2E 20 50 52 49 4E 54 20 50 45 |."...1. PRINT PE|
00005A10: 45 4B 28 34 33 29 3A 50 52 49 4E 54 20 50 45 45 |EK(43):PRINT PEE|
00005A20: 4B 28 34 34 29 00 45 62 82 04 99 22 11 32 2E 20 |K(44).Eb...".2. |
00005A30: 42 45 49 44 45 20 5A 41 48 4C 45 4E 20 4D 45 52 |BEIDE ZAHLEN MER|
00005A40: 4B 45 4E 20 21 00 75 62 83 04 99 22 11 33 2E 50 |KEN !.ub...".3.P|
00005A50: 4F 4B 45 34 33 2C 28 50 45 45 4B 28 34 35 29 2B |OKE43,(PEEK(45)+|
00005A60: 32 35 36 2A 50 45 45 4B 28 34 36 29 2D 32 29 41 |256*PEEK(46)-2)A|
00005A70: 4E 44 32 35 35 00 A2 62 84 04 99 22 11 50 4F 4B |ND255..b...".POK|
00005A80: 45 34 34 2C 28 50 45 45 4B 28 34 35 29 2B 32 35 |E44,(PEEK(45)+25|
00005A90: 36 2A 50 45 45 4B 28 34 36 29 2D 32 29 2F 20 32 |6*PEEK(46)-2)/ 2|
00005AA0: 35 35 00 BF 62 85 04 99 22 11 33 2E 20 4E 45 57 |55..b...".3. NEW|
00005AB0: 20 20 20 20 20 20 20 3C 52 45 54 55 52 4E 3E 00 | <RETURN>.|
00005AC0: DB 62 86 04 99 22 11 34 2E 20 4C 4F 41 44 20 20 |.b...".4. LOAD |
00005AD0: 20 20 20 3C 52 45 54 55 52 4E 3E 00 05 63 87 04 | <RETURN>..c..|
00005AE0: 99 22 11 35 2E 20 50 4F 4B 45 20 34 33 2C 3C 47 |.".5. POKE 43,<G|
00005AF0: 45 4D 45 52 4B 54 45 20 5A 41 48 4C 20 50 45 45 |EMERKTE ZAHL PEE|
00005B00: 4B 20 34 33 3E 00 2F 63 88 04 99 22 11 36 2E 20 |K 43>./c...".6. |
00005B10: 50 4F 4B 45 20 34 34 2C 3C 47 45 4D 45 52 4B 54 |POKE 44,<GEMERKT|
00005B20: 45 20 5A 41 48 4C 20 50 45 45 4B 20 34 34 3E 00 |E ZAHL PEEK 44>.|
00005B30: 3E 63 8A 04 99 22 11 37 2E 20 4C 49 53 54 00 6C |>c...".7. LIST.l|
00005B40: 63 8B 04 85 22 1C 20 20 20 20 20 20 20 20 20 20 |c...". |
00005B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00005B60: 20 20 52 45 54 55 52 4E 22 3B 41 24 00 8D 63 8D | RETURN";A$..c.|
00005B70: 04 99 22 93 9C 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00005B80: 2A 2A 20 20 4D 45 4E 55 45 20 20 2A 2A 00 95 63 |** MENUE **..c|
00005B90: 8F 04 89 38 36 00 A4 63 92 04 8F 22 12 05 0E 15 |...86..c..."....|
00005BA0: 20 02 05 12 00 C3 63 93 04 99 22 93 9F 20 20 20 | .....c...".. |
00005BB0: 20 20 20 20 20 20 20 20 20 2A 52 45 4E 55 4D 42 | *RENUMB|
00005BC0: 45 52 2A 00 E0 63 94 04 99 22 20 20 20 20 20 20 |ER*..c..." |
00005BD0: 20 20 20 20 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | **********|
00005BE0: 00 04 64 95 04 99 22 9A 57 49 52 44 20 4D 49 54 |..d...".WIRD MIT|
00005BF0: 20 52 55 4E 20 36 33 39 30 30 20 47 45 53 54 41 | RUN 63900 GESTA|
00005C00: 52 54 45 54 00 30 64 96 04 99 22 11 36 33 39 30 |RTET.0d...".6390|
00005C10: 30 20 20 52 3D 50 45 45 4B 20 28 34 33 29 20 2B |0 R=PEEK (43) +|
00005C20: 20 32 35 36 20 2A 20 50 45 45 4B 20 28 34 34 29 | 256 * PEEK (44)|
00005C30: 00 51 64 97 04 99 22 11 36 33 39 30 31 20 49 4E |.Qd...".63901 IN|
00005C40: 50 55 54 27 27 53 54 41 52 54 20 4E 4F 27 27 3B |PUT''START NO'';|
00005C50: 53 00 78 64 98 04 99 22 11 36 33 39 31 35 20 49 |S.xd...".63915 I|
00005C60: 4E 50 55 54 27 27 53 43 48 52 49 54 54 20 57 45 |NPUT''SCHRITT WE|
00005C70: 49 54 45 27 27 3B 53 57 00 9C 64 99 04 99 22 11 |ITE'';SW..d...".|
00005C80: 36 33 39 30 33 20 48 49 3D 20 53 20 2F 32 35 36 |63903 HI= S /256|
00005C90: 3A 4C 4F 3D 53 20 41 4E 44 32 35 35 00 C3 64 9A |:LO=S AND255..d.|
00005CA0: 04 99 22 11 36 33 39 30 34 20 41 3D 50 45 45 4B |..".63904 A=PEEK|
00005CB0: 28 52 2B 32 29 2B 32 35 36 2A 50 45 45 4B 28 52 |(R+2)+256*PEEK(R|
00005CC0: 2B 33 29 00 EF 64 9B 04 99 22 11 36 33 39 30 35 |+3)..d...".63905|
00005CD0: 20 49 46 41 3E 36 33 39 30 30 20 54 48 45 4E 20 | IFA>63900 THEN |
00005CE0: 50 52 49 4E 54 27 27 4F 4B 27 27 3A 45 4E 44 00 |PRINT''OK'':END.|
00005CF0: 18 65 9C 04 99 22 11 36 33 39 30 36 20 50 4F 4B |.e...".63906 POK|
00005D00: 45 20 52 20 2B 20 32 2C 4C 4F 3A 50 4F 4B 45 20 |E R + 2,LO:POKE |
00005D10: 52 20 2B 20 33 2C 48 49 00 3D 65 9D 04 99 22 11 |R + 3,HI.=e...".|
00005D20: 36 33 39 30 37 20 52 3D 50 45 45 4B 28 52 29 2B |63907 R=PEEK(R)+|
00005D30: 32 35 36 2A 50 45 45 4B 28 52 2B 31 29 00 53 65 |256*PEEK(R+1).Se|
00005D40: 9E 04 99 22 11 36 33 39 30 38 20 53 20 3D 53 20 |...".63908 S =S |
00005D50: 2B 53 57 00 79 65 9F 04 99 22 11 36 33 39 30 39 |+SW.ye...".63909|
00005D60: 20 50 52 49 4E 54 20 53 20 27 27 3D 22 22 41 3A | PRINT S ''=""A:|
00005D70: 47 4F 54 4F 36 33 39 30 33 00 A7 65 A0 04 85 22 |GOTO63903..e..."|
00005D80: 1C 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00005D90: 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 | RET|
00005DA0: 55 52 4E 22 3B 41 24 00 CB 65 A2 04 99 22 93 20 |URN";A$..e...". |
00005DB0: 20 20 20 20 20 20 20 20 20 20 20 05 2A 2A 2A 20 | .*** |
00005DC0: 20 4D 45 4E 55 45 20 2A 2A 2A 22 00 D3 65 A3 04 | MENUE ***"..e..|
00005DD0: 89 38 36 00 E9 65 A6 04 8F 22 1A 05 0E 2E 04 05 |.86..e..."......|
00005DE0: 13 02 09 04 13 03 08 09 12 00 19 66 A7 04 99 22 |...........f..."|
00005DF0: 93 9E 20 20 20 20 20 20 23 20 5A 45 4E 54 52 49 |.. # ZENTRI|
00005E00: 45 52 55 4E 47 20 44 45 53 20 42 49 4C 44 53 43 |ERUNG DES BILDSC|
00005E10: 48 49 52 4D 45 53 20 23 22 00 46 66 A8 04 99 22 |HIRMES #".Ff..."|
00005E20: 20 20 20 20 20 20 20 20 D6 C3 C3 C3 C3 C3 C3 C3 | ........|
00005E30: C3 C3 C3 C3 C3 C3 C3 D6 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00005E40: C3 C3 C3 D6 20 22 00 75 66 A9 04 99 22 9B 11 11 |.... ".uf..."...|
00005E50: 46 55 45 52 20 44 49 45 20 5A 45 4E 54 52 49 45 |FUER DIE ZENTRIE|
00005E60: 52 55 4E 47 20 44 45 53 20 42 49 4C 44 45 53 2C |RUNG DES BILDES,|
00005E70: 20 53 49 4E 44 00 96 66 AA 04 99 22 11 5A 57 45 | SIND..f...".ZWE|
00005E80: 49 20 50 4F 4B 45 20 56 45 52 41 4E 54 57 4F 52 |I POKE VERANTWOR|
00005E90: 54 4C 49 43 48 2E 00 B8 66 AB 04 99 22 9F 11 11 |TLICH...f..."...|
00005EA0: 11 48 4F 52 49 5A 4F 4E 54 41 4C 2D 5A 45 4E 54 |.HORIZONTAL-ZENT|
00005EB0: 52 49 45 52 55 4E 47 3A 00 D5 66 AC 04 99 22 C5 |RIERUNG:..f...".|
00005EC0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00005ED0: C5 C5 C5 C5 C5 00 FD 66 AD 04 99 22 11 11 50 4F |.......f..."..PO|
00005EE0: 4B 45 20 33 36 38 36 34 2C 58 58 20 20 20 20 20 |KE 36864,XX |
00005EF0: 28 4E 4F 52 4D 41 4C 20 20 31 32 29 22 00 1B 67 |(NORMAL 12)"..g|
00005F00: AE 04 99 22 11 11 56 45 52 54 49 4B 41 4C 2D 5A |..."..VERTIKAL-Z|
00005F10: 45 4E 54 52 49 45 52 55 4E 47 3A 00 38 67 AF 04 |ENTRIERUNG:.8g..|
00005F20: 99 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |."..............|
00005F30: C5 C5 C5 C5 C5 C5 C5 C5 00 60 67 B0 04 99 22 11 |.........`g...".|
00005F40: 11 50 4F 4B 45 20 33 36 38 36 35 2C 58 58 20 20 |.POKE 36865,XX |
00005F50: 20 20 20 28 4E 4F 52 4D 41 4C 20 20 33 38 29 22 | (NORMAL 38)"|
00005F60: 00 8E 67 B1 04 85 22 11 1F 20 20 20 20 20 20 20 |..g...".. |
00005F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00005F80: 20 20 20 20 52 45 54 55 52 4E 22 3B 41 24 00 AE | RETURN";A$..|
00005F90: 67 B3 04 99 22 1C 20 20 20 20 20 20 20 20 20 2A |g...". *|
00005FA0: 2A 2A 20 20 4D 45 4E 55 45 20 2A 2A 2A 22 00 B6 |** MENUE ***"..|
00005FB0: 67 B4 04 89 38 36 00 D8 67 BA 04 8F 22 1A 15 05 |g...86..g..."...|
00005FC0: 12 15 03 0B 20 1A 15 20 02 01 13 09 03 20 01 15 |.... .. ..... ..|
00005FD0: 13 20 07 12 01 06 09 0B 00 09 68 BB 04 99 22 93 |. ........h...".|
00005FE0: 96 20 20 20 5A 55 45 52 55 45 4B 20 9C 5A 55 20 |. ZUERUEK .ZU |
00005FF0: 1E 42 41 53 49 43 20 9E 41 55 53 20 1C 44 45 52 |.BASIC .AUS .DER|
00006000: 20 05 47 52 41 46 49 4B 22 00 38 68 BC 04 99 22 | .GRAFIK".8h..."|
00006010: 20 20 20 A8 A8 A8 A8 A8 A8 A8 A8 9C A8 A8 A8 1E | .............|
00006020: A8 A8 A8 A8 A8 A8 9E A8 A8 A8 A8 1C A8 A8 A8 A8 |................|
00006030: 05 A8 A8 A8 A8 A8 A8 22 00 6A 68 BD 04 99 22 1E |.......".jh...".|
00006040: 11 11 11 57 45 4E 4E 20 49 4D 20 47 52 41 46 49 |...WENN IM GRAFI|
00006050: 4B 4D 4F 44 55 53 20 45 49 4E 20 4C 49 53 54 20 |KMODUS EIN LIST |
00006060: 45 49 4E 47 45 47 45 42 45 4E 00 95 68 BE 04 99 |EINGEGEBEN..h...|
00006070: 22 11 57 49 52 44 2C 20 45 52 53 43 48 45 49 4E |".WIRD, ERSCHEIN|
00006080: 54 20 4E 55 52 20 45 49 4E 20 46 41 52 42 4D 55 |T NUR EIN FARBMU|
00006090: 53 54 45 52 2E 00 BB 68 BF 04 99 22 11 57 45 4E |STER...h...".WEN|
000060A0: 4E 20 44 49 45 20 52 55 4E 2D 53 54 4F 50 20 52 |N DIE RUN-STOP R|
000060B0: 45 54 55 52 4E 20 54 41 53 54 45 00 CF 68 C0 04 |ETURN TASTE..h..|
000060C0: 99 22 11 4E 49 43 48 54 20 48 49 4C 46 54 3A 00 |.".NICHT HILFT:.|
000060D0: FA 68 C1 04 99 22 11 11 11 9E 50 4F 4B 45 20 20 |.h..."....POKE |
000060E0: 35 33 32 37 32 2C 32 31 20 20 3A 20 50 4F 4B 45 |53272,21 : POKE|
000060F0: 20 35 33 32 36 35 2C 31 35 35 00 29 69 C2 04 85 | 53265,155.)i...|
00006100: 22 11 11 11 1F 20 20 20 20 20 20 20 20 20 20 20 |".... |
00006110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 | R|
00006120: 45 54 55 52 4E 22 3B 41 24 00 4A 69 C4 04 99 22 |ETURN";A$.Ji..."|
00006130: 97 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 |. *** |
00006140: 20 4D 45 4E 55 45 20 2A 2A 2A 00 52 69 C5 04 89 | MENUE ***.Ri...|
00006150: 38 36 00 62 69 CE 04 8F 22 02 09 20 20 17 05 12 |86.bi...".. ...|
00006160: 20 05 00 8B 69 CF 04 99 22 93 05 20 20 20 20 20 | ...i...".. |
00006170: 20 20 20 20 20 20 20 20 20 20 42 49 54 20 57 45 | BIT WE|
00006180: 52 54 20 54 41 42 45 4C 4C 45 22 00 B2 69 D0 04 |RT TABELLE"..i..|
00006190: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
000061A0: 20 CD CE CD CE CD CE CD CE CD CE CD CE CD CE CD | ...............|
000061B0: CE 22 00 E5 69 D1 04 99 22 1E 11 11 11 11 20 20 |."..i..."..... |
000061C0: 20 20 20 20 B0 C3 C3 C3 B2 C3 C3 C3 B2 C3 C3 C3 | ............|
000061D0: B2 C3 C3 C3 B2 C3 C3 C3 B2 C3 C3 C3 B2 C3 C3 C3 |................|
000061E0: B2 C3 C3 C3 AE 00 13 6A D2 04 99 22 20 20 20 20 |.......j..." |
000061F0: 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 | . . . . |
00006200: 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 | . . . . |
00006210: 20 20 C2 00 43 6A D3 04 99 22 9E 42 49 54 4E 4F | ..Cj...".BITNO|
00006220: 1E 20 C2 20 30 20 C2 20 31 20 C2 20 32 20 C2 20 |. . 0 . 1 . 2 . |
00006230: 33 20 C2 20 34 20 C2 20 35 20 C2 20 36 20 C2 20 |3 . 4 . 5 . 6 . |
00006240: 37 20 C2 00 71 6A D4 04 99 22 20 20 20 20 20 20 |7 ..qj..." |
00006250: C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 |. . . . |
00006260: C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 |. . . . |
00006270: C2 00 9F 6A D5 04 99 22 20 20 20 20 20 20 AD C3 |...j..." ..|
00006280: C3 C3 B1 C3 C3 C3 B1 C3 C3 C3 B1 C3 C3 C3 B1 C3 |................|
00006290: C3 C3 B1 C3 C3 C3 B1 C3 C3 C3 B1 C3 C3 C3 BD 00 |................|
000062A0: CE 6A D6 04 99 22 9F 20 20 20 20 20 20 B0 C3 C3 |.j...". ...|
000062B0: C3 B2 C3 C3 C3 B2 C3 C3 C3 B2 C3 C3 C3 B2 C3 C3 |................|
000062C0: C3 B2 C3 C3 C3 B2 C3 C3 C3 B2 C3 C3 C3 AE 00 FC |................|
000062D0: 6A D7 04 99 22 20 20 20 20 20 20 C2 20 20 20 C2 |j..." . .|
000062E0: 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 | . . . .|
000062F0: 20 20 20 C2 20 20 20 C2 20 20 20 C2 00 2C 6B D8 | . . ..,k.|
00006300: 04 99 22 96 57 45 52 54 9F 20 20 C2 20 31 20 C2 |..".WERT. . 1 .|
00006310: 20 32 20 C2 20 34 20 C2 20 38 20 C2 20 31 36 C2 | 2 . 4 . 8 . 16.|
00006320: 20 33 32 C2 20 36 34 C2 31 32 38 C2 00 5A 6B D9 | 32. 64.128..Zk.|
00006330: 04 99 22 20 20 20 20 20 20 C2 20 20 20 C2 20 20 |.." . . |
00006340: 20 C2 20 20 20 C2 20 20 20 C2 20 20 20 C2 20 20 | . . . . |
00006350: 20 C2 20 20 20 C2 20 20 20 C2 00 88 6B DA 04 99 | . . ...k...|
00006360: 22 20 20 20 20 20 20 AD C3 C3 C3 B1 C3 C3 C3 B1 |" .........|
00006370: C3 C3 C3 B1 C3 C3 C3 B1 C3 C3 C3 B1 C3 C3 C3 B1 |................|
00006380: C3 C3 C3 B1 C3 C3 C3 BD 00 B9 6B DB 04 99 22 11 |..........k...".|
00006390: 11 9A 42 45 49 53 50 49 45 4C 3A 20 42 49 54 20 |..BEISPIEL: BIT |
000063A0: 33 20 2B 20 34 20 53 4F 4C 4C 20 47 45 53 45 54 |3 + 4 SOLL GESET|
000063B0: 5A 54 20 57 45 44 45 4E 2E 00 DF 6B DD 04 99 22 |ZT WEDEN...k..."|
000063C0: 11 42 49 54 20 33 20 3D 20 38 20 20 42 49 54 20 |.BIT 3 = 8 BIT |
000063D0: 34 20 3D 31 36 20 20 20 38 2B 31 36 3D 32 34 00 |4 =16 8+16=24.|
000063E0: FF 6B DE 04 99 22 11 12 52 45 53 55 4C 54 41 54 |.k..."..RESULTAT|
000063F0: 92 20 20 50 4F 4B 45 20 58 58 58 58 2C 32 34 00 |. POKE XXXX,24.|
00006400: 13 6C E2 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |.l...A$:.A$."".1|
00006410: 32 35 30 00 36 6C E7 04 99 22 93 20 20 20 20 20 |250.6l...". |
00006420: 20 20 20 20 2A 2A 2A 20 20 20 4D 45 4E 55 45 20 | *** MENUE |
00006430: 20 20 2A 2A 2A 22 00 3F 6C E8 04 89 20 38 36 00 | ***".?l... 86.|
00006440: 4F 6C EC 04 8F 22 10 0F 0B 05 13 20 0C 05 06 00 |Ol..."..... ....|
00006450: 78 6C ED 04 99 22 93 9C 20 20 20 20 20 20 20 20 |xl...".. |
00006460: 20 20 20 20 20 56 45 52 53 43 48 49 45 44 45 4E | VERSCHIEDEN|
00006470: 45 20 54 52 49 4B 53 22 00 9F 6C EE 04 99 22 20 |E TRIKS"..l..." |
00006480: 20 20 20 20 20 20 20 20 20 20 20 20 D1 C3 C3 C3 | ....|
00006490: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 D7 22 00 |..............".|
000064A0: C9 6C EF 04 99 22 11 11 11 9A 50 4F 4B 45 20 31 |.l..."....POKE 1|
000064B0: 32 30 2C 32 20 20 20 20 C3 3E 20 20 43 42 4D 20 |20,2 .> CBM |
000064C0: 42 4C 4F 43 4B 49 45 52 54 00 F4 6C F0 04 99 22 |BLOCKIERT..l..."|
000064D0: 11 50 4F 4B 45 20 36 35 31 2C 32 32 35 20 20 C3 |.POKE 651,225 .|
000064E0: 3E 20 20 52 45 50 45 41 54 20 56 45 52 5A 4F 45 |> REPEAT VERZOE|
000064F0: 47 45 52 54 00 13 6D F1 04 99 22 11 50 4F 4B 45 |GERT..m...".POKE|
00006500: 20 38 30 38 2C 32 35 35 20 20 C3 3E 20 20 42 52 | 808,255 .> BR|
00006510: 45 41 4B 00 2D 6D F2 04 99 22 11 9E 53 59 53 20 |EAK.-m..."..SYS |
00006520: 34 32 31 31 35 20 C3 3E 20 20 45 4E 44 00 57 6D |42115 .> END.Wm|
00006530: F3 04 99 22 11 53 59 53 20 34 34 38 30 38 20 C3 |...".SYS 44808 .|
00006540: 3E 20 20 45 52 5A 45 55 47 54 20 53 59 4E 54 41 |> ERZEUGT SYNTA|
00006550: 58 20 45 52 52 4F 52 00 7C 6D F4 04 99 22 11 53 |X ERROR.|m...".S|
00006560: 59 53 20 36 35 34 30 39 20 C3 3E 20 20 56 49 44 |YS 65409 .> VID|
00006570: 45 4F 2D 43 48 49 50 20 52 45 53 54 00 A2 6D F5 |EO-CHIP REST..m.|
00006580: 04 99 22 11 53 59 53 20 35 38 32 35 33 20 C3 3E |..".SYS 58253 .>|
00006590: 20 20 52 55 4E 2D 53 54 4F 50 2F 52 45 53 54 4F | RUN-STOP/RESTO|
000065A0: 52 45 00 C9 6D F6 04 99 22 96 11 50 45 45 4B 20 |RE..m..."..PEEK |
000065B0: 28 32 31 33 29 20 C3 3E 20 47 45 44 52 55 45 43 |(213) .> GEDRUEC|
000065C0: 4B 54 45 20 54 41 53 54 45 00 F7 6D F7 04 99 22 |KTE TASTE..m..."|
000065D0: 11 50 45 45 4B 20 28 32 31 35 29 20 C3 3E 20 5A |.PEEK (215) .> Z|
000065E0: 55 4C 45 54 5A 54 20 47 45 44 52 55 45 43 4B 54 |ULETZT GEDRUECKT|
000065F0: 45 20 54 41 53 54 45 00 29 6E F8 04 85 22 11 05 |E TASTE.)n..."..|
00006600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00006610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 | RE|
00006620: 54 55 52 4E 20 22 3B 41 24 00 51 6E FA 04 99 22 |TURN ";A$.Qn..."|
00006630: 05 93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00006640: 20 2A 2A 2A 20 20 4D 45 4E 55 45 20 20 2A 2A 2A | *** MENUE ***|
00006650: 22 00 59 6E FB 04 89 38 36 00 6E 6E 00 05 97 35 |".Yn...86.nn...5|
00006660: 33 32 38 30 2C 31 3A 8F 22 13 0F 15 0E 04 00 7A |3280,1:."......z|
00006670: 6E 01 05 81 58 B2 30 A4 36 31 00 81 6E 02 05 87 |n...X.0.61..n...|
00006680: 41 00 8B 6E 03 05 54 B2 54 AA 41 00 B0 6E 04 05 |A..n..T.T.A..n..|
00006690: 97 34 30 37 30 34 AA 58 2C 41 3A 8F 22 14 14 14 |.40704.X,A:."...|
000066A0: 14 14 14 14 14 14 14 14 14 14 14 33 36 32 30 30 |...........36200|
000066B0: 00 B8 6E 05 05 82 20 58 00 C3 6E 07 05 99 22 05 |..n... X..n...".|
000066C0: 4F 4B 22 00 E2 6E 08 05 9E 20 34 30 37 30 34 3A |OK"..n... 40704:|
000066D0: 8F 22 14 14 14 14 14 14 14 14 14 14 14 33 36 32 |."...........362|
000066E0: 30 30 00 EF 6E 09 05 97 35 33 32 38 30 2C 30 00 |00..n...53280,0.|
000066F0: 20 6F 0A 05 99 22 93 11 11 11 11 11 11 11 11 11 | o..."..........|
00006700: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 |......... |
00006710: 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 4B 22 | OK"|
00006720: 00 28 6F 0F 05 89 38 36 00 6E 6F D9 0C 83 20 31 |.(o...86.no... 1|
00006730: 36 39 2C 32 35 35 2C 31 34 31 2C 36 2C 32 31 32 |69,255,141,6,212|
00006740: 2C 31 34 31 2C 32 34 2C 32 31 32 2C 31 36 39 3A |,141,24,212,169:|
00006750: 8F 22 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |."..............|
00006760: 14 35 2C 36 2C 37 37 2C 34 2C 35 35 2C 32 00 92 |.5,6,77,4,55,2..|
00006770: 6F DA 0C 83 20 39 2C 31 34 31 2C 35 2C 32 31 32 |o... 9,141,5,212|
00006780: 2C 31 36 39 2C 31 30 33 2C 31 34 31 2C 31 2C 32 |,169,103,141,1,2|
00006790: 31 32 00 B8 6F DB 0C 83 20 31 36 39 2C 33 33 2C |12..o... 169,33,|
000067A0: 31 34 31 2C 30 2C 32 31 32 2C 31 32 30 2C 31 36 |141,0,212,120,16|
000067B0: 39 2C 33 38 2C 31 34 31 00 00 70 DC 0C 83 20 32 |9,38,141..p... 2|
000067C0: 30 2C 33 2C 31 36 39 2C 31 35 39 2C 31 34 31 2C |0,3,169,159,141,|
000067D0: 32 31 2C 33 2C 31 33 33 2C 35 36 2C 38 38 3A 8F |21,3,133,56,88:.|
000067E0: 22 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |"...............|
000067F0: 14 14 14 14 14 2C 31 32 32 2C 31 33 33 2C 31 31 |.....,122,133,11|
00006800: 00 25 70 DD 0C 83 20 39 36 2C 37 32 2C 31 36 35 |.%p... 96,72,165|
00006810: 2C 32 30 33 2C 32 30 31 2C 36 34 2C 32 30 38 2C |,203,201,64,208,|
00006820: 39 2C 31 36 39 00 68 70 DE 0C 83 20 30 2C 31 34 |9,169.hp... 0,14|
00006830: 31 2C 34 2C 32 31 32 2C 31 30 34 2C 37 36 2C 34 |1,4,212,104,76,4|
00006840: 39 2C 32 33 34 2C 31 36 39 3A 8F 22 14 14 14 14 |9,234,169:."....|
00006850: 14 14 14 14 14 14 14 14 14 14 14 33 33 2C 31 32 |...........33,12|
00006860: 31 2C 32 32 2C 32 31 31 00 85 70 DF 0C 83 20 31 |1,22,211..p... 1|
00006870: 37 2C 31 34 31 2C 34 2C 32 31 32 2C 37 36 2C 35 |7,141,4,212,76,5|
00006880: 30 2C 31 35 39 00 A5 70 A0 0F 8F 22 01 0C 0C 05 |0,159..p..."....|
00006890: 20 01 0E 07 01 02 05 0E 20 0F 08 0E 05 20 07 05 | ....... .... ..|
000068A0: 17 01 05 08 12 00 AB 70 A1 0F 8F 00 D0 70 A2 0F |.......p.....p..|
000068B0: 8F 20 4C 55 45 54 4F 4C 46 20 42 45 41 54 20 20 |. LUETOLF BEAT |
000068C0: 20 20 20 20 20 20 20 20 20 20 20 20 31 39 38 35 | 1985|
000068D0: 00 D6 70 A3 0F 8F 00 EE 70 A4 0F 8F 20 4F 4C 54 |..p.....p... OLT|
000068E0: 4E 45 52 53 54 52 41 53 53 45 20 31 32 31 00 F4 |NERSTRASSE 121..|
000068F0: 70 A5 0F 8F 00 07 71 A6 0F 8F 20 34 36 36 33 20 |p.....q... 4663 |
00006900: 41 41 52 42 55 52 47 00 0D 71 A7 0F 8F 00 29 71 |AARBURG..q....)q|
00006910: A8 0F 8F 20 53 20 57 20 49 20 54 20 5A 20 45 20 |... S W I T Z E |
00006920: 52 20 4C 20 41 20 4E 20 44 00 2F 71 A9 0F 8F 00 |R L A N D./q....|
00006930: 00 00 |.. |
..#...BL.1:.".........REM B.LUETOLF.S...
BL.BL.1:."............REM OLTNERSTRASSE
121.~...BL.BL.1:."............REM 4663 A
ARBURG.....BL.BL.1:."............REM SAC
HWEIZ 1985.K....".":.53280,0:.5328
1,0......". C 6 4 T R I C K - K I S T
E"......". ...........................
..".K...."....IN DISEM PROGRAMM IST EINE
UEBERSICHT.Z....".DER WICHTIGSTEN POKE
UND PEEK BEFEHLEN......."...DAS GANZE IS
T MIT VIELEN ANWENDUNGS-.U.$..".BEISPIEL
EN AUCH FUER DEN COMMODORE 64...)..".ANF
AENGER INTERESSANT..(...."......
SPACE ".:.3..A$
:.A$."".51.P.8..Z.23.0..1:.677,Z.I.=.Z1.
217.Z:H.B(Z1).128.W.B..I.1.25.Z...G.. 59
777:.Z1,H:.I,Z...L..". *** ME
NUE ***.O.Q..:.:." ..... ".
U.V.....W..BL..4..:."...................
CL=3263.!.[.."..<1> BASIC VERSCHIEBE
N.C.`..".<2> BILDSCHIRM EIN-AUS.H.E.
.".<3> BUCHSTABEN OHNE PRINT...J..".
<4> COLDSTART...O..".<5> CAN'T C
ONTINUE ERROR...T..".<6> CURSOR.O.Y.
.".<7> DISK...~..".<8> FARB + GR
AFIK......".<9> FORMULA TO COMPLEX.,
...."..<0> NAECHSTE SEITE.Z....".
";A......
A . 300,350,370,400,420,440,500,520,540
......A.0.141......137......".
*** MENUE ***......" .
.... "......:......."..<1> FILES....
..".<2> INPUT OHNE ?.3....".<3>
INTERNE UHR.M....".<4> INTERUPT'S.F.
...".<5> JOYSTICKS......".<6> KO
NTROLLE UND ABFRAGE......".<7> LIST
- SCHUTZ.X....BL..4..:."................
.SP=12THEN CK=14......".<8> LOAD ERR
OR......".<9> MADE IN USA OR GERMANY
.6.D.."..<0> NAECHSTE SEITE.D.I..".
";A...J
..A . 560,570,590,610,640,670,760,840,8
60...K..A.0.206...L..201.J.N..".
*** MENUE ***...S.."
..... "...T..:....W.."..<1> PROGRAM
MIERTER DIREKTMODUS".2.X..".<2> RESE
TS.F....".<3> SAVE.\....".<4> SC
ROLL.U....".<5> STEUERUNG......".<6>
STECK MODUL......".<7> RENEW.D.
...".<8> SAVE BILDSCHIRM...... BL ..
4 . .:."........BL=0......".<9> ZEI
LEN LOESCHEN.#...."..<0> NAECHSTE SE
ITE.O....".
";A......A . 880,400,940,960,980,10
10,1030,1060,1100......A.0.270......266.
.....". *** MENUE ***.W...."
..... "......:......."..
<1> ZEICHEN BEI INPUT.!....".<2>
ZERSTOER BEFEHLE.@....".<3> ZUSAMME
N KLEBEN.D....".<4> ZEILEN RENUMMERI
EREN......".<5> ZENTRIERUNG DES BILD
SCHIRMES......".<6> ZURUECK ZU BASIC
.I....".<7> BIT WERTE......".<8>
VERSCHIEDENE TRIKS......".<9> KONTR
OLLTON EIN......"..<0> ENDE.M....".
";A.V.
...BL..4..:."..............3THENGOTO86..
....A . 1110,1130,1150,1170,1190,1210,1
230,1260,1280......A.0.299.C....283...+.
.".............. BY":.".":.:...
.,..".....-.................".".4.0..".
UIBASIC VERSCHIEBENUI.Y.1..".
JK.................JK.V.6..".55296
= FARBSPEICHER...8..".PRINT PEEK(43)+256
*PEEK(44)...;.."...VERSCHIEBEN:"...=..".
.POKE43,.X.:POKE44,.Y.:POKE.AD.-1,0:NEW.
..@.."....X UND Y WIRD ERRECHNET AUS DER
FORMEL.(.B..".FUER BASIC START..C.D..".
AD = ANFANGSADRESSE.S.E.."..
RETURN";A$.|.G.."."...H
..".BEISPIEL:"...I.."..NEUE START ADRESS
E";S...J.X.1:Y.1.G.L.AD.X.256.Y.U.N..AD.
S.340...O.Y.Y.1...P..AD.S.Y.1:X.X.1.%.Q.
.".........................ICH RECHNE"Y"
"X...S..332.B.T.."............"._.U..
".. STARTADRESSE . = "S.T.V..".. AD . =
"S.1...W..". X . = "X...X..". Y . = "Y..
.[..".....NEUE BERECHNUNG J/N : ";A$.L.\
..A$."J".300...]..".. MENU
E":.86...^..".......... ... ....4._.."..
...........................".D.`
..". <.BILDSCHIRM EIN AUS SCHALTEN
.>."...A.." .....................
...... "...B.."...BILDSCHIRM EIN POKE 5
3265,27...C.."..BILDSCHIRM AUS POKE 532
65,11...E.."...TASTATUR AUF BILDSCHIRM E
IN POKE649,10.;.F.."..TASTATUR AUF BILDS
CHIRM AUS POKE649,0.P.H..".......
RETURN";A$...J..".
. *** MEUE ***"...M..86...R..
"......-.... ........S..".. S BI
LDSCHIRMSPEICHER S"...T.." ....
..............".$.U.."...POKE 1024 +. S.
+ 40 * .Z,C.J.V.."...POKE 55296+. S. +
40 * .Z,CO.O.W.."...1024 = BILDSCHIRMS
PEICHER...X..".55296 = FARBSPEICHER...Y
..".S = SPALTE (TAB) 0-39.X.Z..".Z
= ZEILE (CURSOR DOWN) 0-24...{..".
C = BILDSCHIRM CODE...|..".CO =
FARB CODE.B.}.."...
RETURN";A$.Y..."..BEISPIEL:":.:
..T...."POKE1024+20+40*12,81......"POKE5
5296+20+40*12,2......"..GIBT IN DER MITT
E DES BILDSCHIRMES".T....".EINEN ROTEN P
UNKT......1024.20.40.12,81......55296.20
.40.12,2.5...."........
.RETURN";A$.[...."..
*** MENUE ***".C....86.N...."......
....". *** COLDSTART ***"..
...." ......... "......"
....RESET VERSETZT COMPUTER IN EINSCHALT
-......".ZUSTAND ZURUECK..1...."..SYS 42
115 ODER.A...."
..SYS 64738 ODE
R......"..SYS 65409
ODER.C....".......
RETURN";A$......"..
*** MENUE ***......86......"... ....
......3....".. CONT NACH CONTI
NIUE ERROR"._...." ...........
.............."......"...AUSGABE DER ZEI
LEN NUMMER VOM LETZTEN......".PROGRAMMAB
BRUCH..N...."..PRINT PEEK(59) + 256 * PE
EK(60)......"....WENN CONT NICHT MEHR MO
EGLICH IST:.(...."...POKE 59,PEEK(61) :
POKE 60,PEEK(62).Z....".....
RETURN";A$......"..
**** MENUE ****"......86......"
............".. C.U.R.S.O.R".S
...." ................."...FAR
BE POKE 646,X X = FARBCODE.&...."..FA
RBE POKE 646,X X = FARBCODE.V...."...
REPEATFUNTION POKE 650,0 NORMAL MOD...
....".REPEATFUNTION POKE 650,128 ALLE T
ASTEN......".REPEATFUNTION POKE 650,64
KEINE TASTEN......"...CURSOR STEUERN (PR
OGRAMMIERTE AUSGABE)"...A..".POKE 214,Z:
POKE211,S.'.B..".SYS 58640: PRINT''TEXT.
....''".W.C.."..
RETURN";A$.Z.E.."..Z STEHT FUER Z
EILE (TAB)...F..".S STEHT FUER SPALTE
(CURSOR DOWN".N.H.."...BEISPIEL: POKE 21
4,20:POKE211,8...I..".SYS 58640:PRINT''H
ALLO''.. J.."... START MIT R
ETURN";A$.= T.. 214,20:.211,8:.58640:."H
ALLO".M U.."...
RETURN";A$.. X.."..CURSOR EIN AUS SCH
ALTEN:.. Y..".IST NUR IN EINEM PROGRAMM
MOEGLICH.. Z.."..CURSOR AUS POKE 207,0:P
OKE204,1..!...".CURSOR EIN POKE POKE204,
0.!!..."...CURSOR GESCHWINDIGKEIT.A!..."
.POKE 56325,X NORMAL 58.E!...".X=1 - 6
8 1 = SCHNELL 68"..!..."......
RETURN";A$.B!..
.".. *** MENUE ***".J!...
86..!... "....1541........"..."..
^^FLOPPYDISK 1541 ^^".."..."
_______________ ".^"..."....ANZAHL
OFFENER FILES PRINT PEEK(152).."..."..S
CHLIESSEN ALLER FILES SYS 65511.."...".
.ANZAHL LESE FEHLER PRINT PEEK(182).V".
.."....DISK LESEFEHLER KANAL:".."..."EEE
EEEEEEEEEEEEEEEEEEE"..#...".1 OPEN 1,8,1
5."#..."2 INPUT#1,A,B$,C,D.8#..."3 PRINT
A,B$,C,D.G#..."4 CLOSE1.Q#..."RUN..#..."
... RETURN";A
$..#...".. ** MENUE **"..#...
86.Q#...".. FARB+GRAFIK
"..#..." ..........."..$
...".HIRESMODUS EIN POKE 53265,59.2$..."
..SIHE AUCH CURSOR.O$..."..REVERS AN POK
E 199,1.M$..."..REVERS AUS POKE 199,0..$
..."...KONTROLLREGISTER NORM ,27..$...".
(24) ZEILEN POKE53265,19.U$...".BILDSCH
IRM AUS POKE 53265,11..$...".BILDSCHIRM
EIN POKE 53265,27.$%...".HINTERGRUNDFARB
MODUS POKE 53265,216.J%...".MULTICOLORMO
DUS POKE 53265,16.]%...A$:.A$."".532..%
..."..ANWENDUNGSBEISPIEL:":."...........
......".A%..."...10 POKE 53281,9:PRINT C
HR$(149)CHR$(147)..%..."..20 POKE 53283,
0:FORX=0TO255:POKE1024+X,X..&..."..30 NE
XT:POKE 53270,216.$&...A$:.A$."".538.L&.
..".. *** MENUE ***":.86.\&.
.."...........&...".. ********
************..&..." *FORMULA T
O COMPLEX*.P&..." ************
********..& ..".....WENN DIESE MELDUNG A
UFTRITT UND.''!.."..NACH DEM ZWEITEN LIS
T NICHT WEG IST.@'".."..HILFT ZU 80% EIN
.D'#.."... POKE 24,0..'$
..".... RETU
RN";A$..'&..". *** MENUE ***
".B'+.. 86.N'0..".FILE..'1.."..
* FILES*"..(2.." .....":.5
03..(:..".....=(;..".. INPUT OHNE
FRAGEZEICHEN".C(<.." .............
.........."..(=.."....FRAGEZEICHEN AUS
POKE 19,64..(>..".FRAGEZEICHEN EIN POKE
19,0.H(?.."....FRAGEZEICHEN AUS..(@..".
10 OPEN1,0"..(A..".20 INPUT#1,A$..)B..".
30 CLOSE1.2)C.."....
RETURN";A$.T)E..".. ***
MENUE ***".\)F..86.F)N..".....)O.."..
TI -INTERNE UHR- TI"..)P.."
$$$$$$$$$$$..)Q.."..ABFRAGE:.J)R
..".........)S..".PRINT TI _ IN 60ST
EL..*T..".PRINT TI$ _ IN STD MIN SEC.
?*U.."...PEEK(160)*2^16+PEEK(161)*2^8+PE
EK(162).K*V.."...STELLEN DER UHR: TI$
=''HHMMSS''..*W.."...AUSWERTEN FUER ZUFA
LLSZAHLEN:.B*X.."..PEEK(162). AENDERT AL
LE 60STEL SEKUNDEN..*Y.."..UHR RESET TI
AUF 0000 = SYS 65499..+Z.."..
RETURN";A$.C+\..".
*** MENUE ***".K+]..86.Y+B.
.".........+C..".. :: INTRRUPTR
OUTINE ::..+D.." ..............
........Q+E.."...ANZAHL INTERRUPTS POKE
56325,X..+F..".X=0-255 NORMAL 43...,G
..".0 = MEHR INTERRUP.(RECHNER WIRD LANG
SAM).I,H.."255 = WENIGER (RECHNER WIRD S
CHNELLER).N,I.."...INTERRUPT AUS POKE 5
6334,0..,J..".INTERRUPT EIN POKE 56334,
1..,K..".NUR IN EINEM PROGRAMM MOEGLICH.
.,L..".... RE
TURN";A$..,O.."..INTERRUPT AUS.#-P.."..P
OKE 53265,PEEK(53265)AND239.:-Q.."...INT
ERRUPT EIN.]-R.."..POKE 53265,PEEK(53265
)OR16..-S.."........
RETURN";A$..-U..".. ***
MENUE **"..-{..86.K-..."..........-..
.".. *** JOYSTICK ***"......
" ........".+...."..PROG
RAMMIERUNG".W...."...10 POKE 56322,24 R
EM TASTATUR AUS......".20 JS=PEEK(56320)
REM JOYSTADRESSE......".30 (IF JS AND
1) = 0 THEN ?''UP".T....".40 (IF JS AND
2) = 0 THEN ?''DOWN"......".50 (IF JS AN
D 4) = 0 THEN ?''LEFT".)/...".60 (IF JS
AND 8) = 0 THEN ?''RIGHT".S/...".70 (IF
JS AND 16) = 0 THEN ?"FIRE".D/...".80 GO
TO20../...".
RETURN";A$../..."..LINIE 10 POKE 56322,2
24 IST NUR NOT-../...".WENDIG, WENN KEIN
E EINGABEN VON DER..0...".TASTATUR AUS E
RLAUBT SIND..70..."...LINIE 20 PEEK (563
20) IST PORT 1..\0...".PEEK (56321) IST
FUER PORT 2...0...".......
RETURN";A$..0...".. **
* MENUE ***"..0...86.K0..."....+....
.....0...".. .CCCCCCCCCCCCCCCCCCCCC
CCC."..1 .." Z KONTROLLE UND ABFRAG
EN Z".E1..." .CCCCCCCCCCCCCCCCCCCCC
CCC.".V1..."..BASIC ANFANG PEEK(43) + 2
56 * PEEK (44)..1..."BASIC ENDE PEEK(45
) + 256 * PEEK (46).S1...".PROGRAMM ENDE
PEEK(45) + 256 * PEEK (46)..2..."...ZEI
LENNUMMER FUER GELESENEN DATAWERTE".,2..
.".PRINT PEEK (63) + 256 * PEEK (64).W2.
.."...FEHLERSTATUS BEIM DATENAUSTAUSCH:.
O2...".PRINT PEEK (144)..2...".NORMALWER
T 0..2..."..FUER DATEN ERKLAERUNG PRESS
RETURN";A$..2...".. PEEK (144) WERT ERKL
AERUNG CASETTE"..3..."...WERT FEHLER
ODER ANZEIGE.#3...".. 4 KURZER BL
OCK.@3...". 8 LANGER BLOCK.G3...".
16 LESE - SCHREIBE FEHLER..3...".
32 PRUEFSUMMEN FEHLER..3...". 64
FILE ENDE..3...".124 BAND ENDE..
3..."...ES KANN SICH DIE FEHLERSUMME AUC
H..4..."..AUS MEHREREN FEHLERN ADDIEREN.
.A4..."... R
ETURN";A$.I4..."..ZULETZT GEBRAUCHTE FIL
E NUMMER:..4...".PRINT PEEK (184)..4..."
...SEKUNDAERADRESSE DES ZULETZT BENUTZTE
N.Q4...".FILES: PRINT PEEK (185)..4..."
...ZULETZT GEBRAUCHTE GERAETENUMMER.)5A.
.".PRINT PEEK (186) (1=CASETTE - 8=FLOPY
".L5D.."...ZULETZT EINGEGEBENE TASTE.D5E
..".PRINT PEEK (197)..5F.."...AKTUELLE Z
EICHENFARBE PRINT PEEK(646).C5G.."...
RETURN";A$..5I.
."..GROESSE DES TASTATURPUFFERS:..5J..".
..PEEK (649).+6K..".MIT POKE 649,X KANN
DIE SPEICHERGROESSE.E6L..".VERAENDERT WE
RDENE.O6M.."..VORSICHT X NICHT GROESSER
ALS 10...6N.."..ZAEHLER FUER TASTATURPUF
FER:..6O..".PRINT PEEK (198)..6P..".MIT
POKE 198,X KANN DIE SPEICHERGROESSE..6Q.
.".VERAENDERT WERDENE..7R.."..VORSICHT X
NICHT GROESSER ALS 10..K7S.."...FUER AN
WENDUNGSBEISPIEL RETURN";A$.S7U.."..ANWE
NDUNG VOM TASTATURZAEHLER :..7V.."......
...........................7X.."...POKE
198,0 : WAIT 198,1..7Y.."...POKE 198,0 =
LEEREN DES TASTATUR PUFFER..8Z..".WAIT
198,1 = WARTEN AUF EINE TASTE.@8..."..WE
NN WAIT 198,X VERGROESSERT WIRD,.C8...".
ZUM BEISPIEL AUF WAIT 198,5..8...".DANN
WARTET DER RECHNER BIS ALLE..8...".FUENF
TASTEN GEDRUECKT WURDEN...8..."...
RETURN";A$..9..."
..UMSCHALTUNG GROSS KLEIN VERRIEGELUNG:.
29...".POKE 657,128 : NORMAL 657,0.Y9...
"...UMSCHALTEN AUF KLEIN-SCHRIFT:.N9..."
.POKE 53272,22..9..."...UMSCHALTEN AUF G
ROSS-SCHRIFT:..9...".POKE 53272,21..9...
"....... RETURN"
;A$..9...".. *** MENUE ***"..:
...86..:..."..........=:..."..
L.I.S.T.S.C.H.U.T.Z".B:..." .
....................:..."...ES GIBT TAUS
END ARTEN VON LIST-SCHUTZ..:...".VERFAHR
EN. ES SIND HIER NUR EINIGE..:...".BEISP
IELE AUFGEFUEHRT, WELCHE SICH..;...".OHN
E GROSSEN AUFWAND REALISIEREN LASSEN..C;
...".ALLE BEISPIELE LASSEN SICH MITEINAN
DER.W;...".KOMBINIEREN...;..."...
RETURN";A$..;..."..
TASTATUR BLOKIEREN POKE 655,71.
.;...".TASTATUR NORMAL POKE
655,72..<..."...LIST BLOCKIERUNG:..<..."
.................;<...".POKE 774,XXX : P
OKE 775,YYY.W<...".X= 26 Y=167 NORMAL.
.<...".X= 68 Y=166 ERGIBT EIN NEW BEI
LIST..<...".X= 7 Y=168 GIBT EIN SYNTA
X ERROR.Y<...".X=226 Y=252 GIBT EIN SY
STEMRESET..=..."...RUN STOP AUSSCHALTEN
POKE 788,52.9=...".RUN STOP EINSC
HALTEN POKE 788,49.G=..."..
SPACE".Z=...A$:
.A$."".783..=..."..RESTORETASTE BELEGEN:
..=...".....................W=...".POKE
792,XXX : POKE793,YYY..=...".X= 71 Y=2
54 NORMALZUSTAND.%>...".X= 7 Y=168
GIBT EIN SYNTAX ERROR.T>...".X=139 Y=254
BLOCKIERT RUN/STO-RESTORE.~>...".X=25
6 Y=252 GIBT EIN SYSTEMRESET..>..."...
LISTENING NICHT LESBAR POKE 2050,0.V>..
.".LISTENING NORMAL POKE 2050,8..
?..."...SAVE BLOCKIERT POKE 818,226:POKE
819,225.6?...".SAVE MORMAL POKE 818,2
37:POKE819,245.I?...A$:.A$."".796.Z?..."
..LIST STOP POKE 775,200 NORMAL (16
7)..?..."...RUN-STOP<RESTORE> AUS UND LI
STENING.V?...".UNLESBAR: POKE 808,225
(NORMAL 237)..@ .."...RUN-STOP <RESTOR
E> AUS: POKE 792,193..@!.."...SAVE SCHU
TZ:.-@".."............T@#..".POKE801,0:P
OKE802,0:POKE818,165.|@$..".CASETTE POK
E 0,0 (NORMAL 0,47)..@(..".FLOPPY POKE
818,253:POKE808,225..@)..A$:.A$."".809.
.@*..".NACH RESET KEINE RUECKKEHR DES CU
RSORS..A+..".POKE818,34:POKE819,253:POKE
808,225.,A,.."..ALLES ZURUECKSETZEN:.WA-
..".POKE818,237:POKE819,245:POKE808,237.
.A..."...LISTSCHUTZ IN DER PROGRAMM LINI
E SELBST:..A/.."..10 FORX=1TO 100.:REM''
.TTTTTTTTTTTTTTTT"..A0.."..DIE REVERSEN
T NACH DEM REM UBER-..B1..".SCHREIBEN DA
S PROGRAMM IM LISTENING..<B2..".EIN BUCH
STABE PRO .T. WIRD VERDECKT..OB3..A$:.A$
."".819.TB4.."..HERSTELLEN DER .TTT. IM
REM:..B5..".............................
B6..".1..REM'' '' .<SCHREIBEN>..B
7.."..2..REM'' '' .<1 MAL INST DE
L>..C8.."..2..REM'' .<EIN'' WE
G>.@C9.."..3..REM'' .<1 MAL RE
VERS ON>.SC:.."..4.JETZT KOENNEN DIE .T.
GESCHRIEBEN WERDEN..C;.."...10 FORX=1TO
20:REM''L..C<..".REM <SHIFT> L.OC=..".E
RZEUGT SYNTAX ERROR BEIM LISTEN..C>..A$:
.A$."".830..D@..". *** MENUE
***"..DA..86..DH..".... .......@DI.."..
LOAD ERROR".ADJ..".
.........."..DK.."..NACH EINEM LOA
DERROR SOLLTE IM..DL..".DIRECKTMODUS EIN
GEGEBEN WERDEN:..DM..".POKE45,PEEK(831):
POKE46,PEEK(832):CLR..DN..".DANN RETURN
UND LIST.+EO.."...ODER POKE46,PEEK(832
):POKE48,PEEK(832):.TEP.."POKE50,PEEK(83
2):POKE45,PEEK(831):..EQ..".POKE47,PEEK(
832):POKE49,PEEK(831):RETURN..ER.."...MI
T ETWAS GLUECK LAUFT DANN DAS.JES..".PRO
GRAMM TROTZ ALLEM...ET..A$:.A$."".852..E
U..". *** MENUE ***..FW..86."
F\.."... .. ... ... .. ....OF].."..
HERGESTELLT IN USA ODER EUROPA".{F^..".
.................................F_.
."....DIE TACKT FREQUENZ IST VOM TV-APPE
RAT.RF`..".UND DER NETZFREQUENZ ABHAENGI
G...FA..".DA BEIDES IN DEN USA UNTERSCHI
EDLICH.$GB..".IST,LAESST ES SICH FESTSTE
LLEN.LGC..".WO DER CBM 64 HERGESTELLT WU
RDE..GGD.."... PRINT PEEK (678).{GE.."..
1 = EUROPA..GF..". 2 = USA..GG.."..
SPACE";A$.XGI.."..
*** MENUE ***..GK..86..GP..".
.......HQ..".. . PROGRAMMIERTER DIREK
TMODUS .".BHR.." ....................
...........YHS.."....ANWENDUNGEN:.KHT.."
EEEEEEEEEEE..HU..".ANGENOMMEN IN EINEM P
ROGRAMM WIRD DER.BHV..".BENUETZER UM SEI
NEN NAMEN GEFRAGT...HW..".DAMIT DER NAME
INS PROGRAMM AUFGENOMMEN..IX..".WIRD ,
KANN DER PROG.DIREKTMOD. ANGE-.4IY..".WE
NDET WERDEN..EIZ.."....
RETURN";A$.WI|.."..PROGRAMM:.
.I}.."EEEEEEEE..I~.."...10 INPUT''NAME''
;A$".GI..".20 PRINT''.S. 70 N$ ='' A$".
.I...".30 POKE631,19:REM CLR HOME..J..."
.40 POKE632,13:REM RETURN.)J...".50 POKE
633,13:REM RETURN.OJ...".60 POKE198,3 :R
EM ZAEHLERSTAND.^J...".70 ENDE..J..."...
.FUER ERKLAERUNGEN PRESS RETURN";A$..J..
."..ERKLAERUNGEN:.AJ..."..10 FRAGE NACH
DEM NAMEN..J...".20 SCHREIBT AUF BILDSCH
IERM OBEN LINKS..K..."..100 N$=''NAME...
''..:K...".30 IM TASTATURPUFFER WIRD CLR
ABGELEGT..^K...".40-50 DANACH FOLGEN 2
RETURN..K...".60 SAGT DEM RECHNER WIVIEL
E BEFEHLE..K...".IM TASTATURPUFFER SIND.
.SK...".70 NACH DER END ANWEISUNG SUCHT
DER..K...".RECHNER IM TASTATURPUFFER, UN
D FUERT.!L...".EIN HOME MIT 2 RETURN AUS
..PL...".. RE
TURN";A$.DL..."..ERGEBNISS:".VL..."EEEEE
EEEE "..L..."...LIST. L..."..10 INPUT''N
AME'';A$..L...".20 PRINT''.S. 70 N$=''A$
.UL...".30 POKE131,19..L...".40 POKE132,
13..L...".50 POKE133,13..M...".60 POKE19
8,3.-M...".70 N$=''NAME....''.WM ..".IN
ZEILE 70 STEHT ANSTELLE VON END.|M..."DE
R NAME DER EINGEGEBEN WURDE"..M..."..
RETURN";A$.QM...
".. ** MENUE **".ZM...
86..M..."......N...".. S SAVE
S"..N..." MNMNMNMN".NN..."..
.SPEICHERN VON EINEM MASCHINENSPRACHE-.P
N..."PROGRAMM, DIRECKT AUF DISK...N...".
.1 OPEN 1,8,15,''PRG NAME''"..N...".2 S=
INT(A/256):L=A-S*256.VN...".3 PRINT#1,CH
R$(L);CHR$(S);..N...".4 FORX=A TO E..O..
.".5 PRINT#1,CHR$(PEEK(X)). O...".6 NEXT
I:CLOSE1.;O..."...A= ANFANGSADRESSE.PO..
."E= END ADRESSE.~O...".
RETURN";A$..O..."..
*** MENUE ***"..O...86..O..."......
..OA..".. S.S.C.C.R.R.O.0.
L.L.L.L"..PB.." +.+.+.+.+.
+.+.+.+.+.++.-PC.."...SCROLLING NACH:.IP
D..".UNTEN POKE 53265,30.EPE..".OBEN
POKE 53265,24..PF..".LINKS POKE 53270,2
00 -193..PG.."...ANWENDUNGABEISPIEL:.BPH
..".10 X=X+1:IFX=7 THENX=0..PI..".20 POK
E53270,PEEK(53270)AND240 ORABS (X)..QJ..
"30 GOTO 10..QK.. A$:.A$."".971.<QL.."..
*** MENUE ***.EQM.. 86.TQ
T..".........UQU..".. # STEUERU
NG #"..QV.." #############"..QW
.."..UMSCHALTEN:..QX.."EEEEEEEEEE..QY.."
.BASIC INS RAM POKE1,54.
.RZ..".BASIC UND KERNAL INS RAM POK
E1,53.CR...".BASIC-KERNAL UND I/O INS RA
M POKE1,52.QR...".BLENDET ZEICHEN SATZ
EIN POKE1,51. R...".CASETTENMOTOR A
US POKE 1,PEEK(1) OR 32.IR..."...SYSTEM
MELDUNG (LOAD,VERIFY ETC)..R...".SYSTEMM
ELDUNG AUS POKE 157,0..S...".SYSTEMMELD
UNG EIN POKE 157,128.CS..."..
RETURN";A$.RS..."..CASE
TTENMOTOR VERRIEGELUNG POKE 192,1. S...
".CASETTENMOTOR NORMAL POKE 192,0
.JS..."...FEHLER MELDUNG AUS POKE 768,1
85..S...".FEHLER MELDUNG EIN POKE 768,1
39..T..."...KLEINSCHRIFT EIN POKE 53272
,22.BT...".KLEINSCHRIFT AUS POKE 53272,
21.RT..."......
RETURN";A$..T...". *** MENUE
***"..T...86..T...".... ... ....RT..."..
STECKMODULE"..T..."
:::::::::::"..U..."....STECKMODUL
E:..U..."EEEEEEEEEEE.EU..."..SPEICHER BE
REICH VON $8000-$9FFF.\U..."..ABSPEICHER
UNG:..U...".POKE43,0:POKE44,128:POKE45,0
:POKE46,192:..U..."SAVE''NAME'',8,1.MU..
."...WENN PIN 8 ODR 9 AUF MASSE LIEGT..U
...".IST DAS BASIC ROM ABGESCHALTET.."V.
..".. RETURN";
A$.CV...".. *** MENUE ***".KV..
.86.XV... "......TV...".. VVV
VVVV..V..." <>..RENEW.<>"..V..
.". VVVVVVV.ZV..."...WENN DIE
HAENDE SCHNELLER SIND ALS..W...".DAS GE
HIRN. DANN IST ES ZEIT FUER..W...".EIN R
ENEW PROGRAMM..BW..."...MASCHINENSPRACHE
PROGRAMME.CW..."DDDDDDDDDDDDDDDDDDDDDDD
DDD..W...".POKE 2050,10 <RETURN>..W...
".63456 <RETURN>..W...".LIST
<RETURN>..W...".MIT SYS XXX WER
T NEU STARTEN...X..."..
RETURN";A$.-X..."..BASICPROGRA
MME:".DX..."DDDDDDDDDDDDDD ".BX..."..POK
E 2050,8:SYS42291:..X..."..POKE 46,PEEK(
35)-(PEEK(781)<253):..X..."..POKE 45,PEE
K(781) + 2 AND 255: CLR.HX..."..<RETURN>
.TX...".LIST..Y..."......
RETURN";A$.%Y!..". *
** MENUE ***".-Y"..86.?Y$..".... .......
DY%..".. UCCCCCCCCCCCCCCCI..Y&
.." B.SAVE BILDSCHIRM.B..Y'.."
JCCCCCCCCCCCCCCCK.FY(.."....
."..Y)..". .DISKVERSION. .".
.Y*..". ."..Z+.."...10 OPEN
1,8,1,''0:BILDSCHIRM''.IZ,..".20 PRINT#1
, CHR$(0):PRINT#1,CHR$(4).HZ-..".30 FOR
I = 1024 TO 2023..Z...".40 PRINT#1,CHR$(
PEEK(I)). Z/..".50 NEXT I:CLOSE1.PZ0..".
... RETURN";A$
..Z2.."... ."..[3..". .C
ASETTENVERSION. .".%[4..".
.".9[5.."...1 REM NAME.Z[6..".2 POKE
193,SL:POKE 194,SH.{[7..".3 POKE 174,EL:
POKE 175,EH..[8..".4 POKE 187,PEEK(43)+6
..[9..".5 POKE 188,PEEK(44).G[:..".6 POK
E 183,L..[;..".7 POKE 186,1:POKE185,0..\
<..".8 SYS 62954 :REM SAVE ROUTINE.8\=..
"....RETURN FUER PROGR. BESCHREIBUNG";A$
.V\?..".SL = START ADRESSE LOW.U\@..".SH
= START ADRESSE HIGH..\A..".EL = END
ADRESSE LOW..\B..".EH = END ADRESSE HI
GH.S\C..". L = LAENGE DES FILENAMEN..\D.
.".LINIE 60 GERAETE ADR, SKUND...]E..".S
YS 62954 SAVE ROUTINE.D]F.."...
RETURN";A$.G]I..".
*** MENUE ***".O]J..86..]L.."..
.............]M..".. --- ZEILEN
LOESCHEN ---".Q]N.." ------
---------..]O.."....POKE 781,ZN..]P.."..
SYS 59903..^Q.."..ZN = ZEILEN NUMMER.B^R
.."...... SPAC
E".V^S..A$:.A$."".1107.Y^T..".
*** MENUE ***"..^U..86..^V.."........
?..^W..".. INPUT MIT SONDERZEI
CHEN"..^X.." ..................
.....".._Y.."....GIBT ANSTELLE DES ? EIN
FREI DEFINIER-.1_Z..".BARES ZEICHEN AUS
..B_[.."...INPUT''TEXT .H. .H. Z .G. .G.
.G. '';A$.._\.."....H. = <CRS LEFT> 2
MAL.._]..".Z = AUSGABE ZEICHEN.._^.."..G
. = <CRS RIGHT> 3 MAL..__.."...
BEISPIEL..#...";A$..``..".. *** MEN
UE ***"..`A.. 86..`J.."... ..... .G`L.
.".. @ ZERSTOERUNGS BEFEHLE @".
Q`M.." .....................
"..`N..".... POKE 776,1 UNDEFINIERBARE
ZEICHEN".Q`O..".. POKE 777,1 CURSOR B
LEIBT LINKS OBEN"..AP..".. POKE 770,0
GIBT NUR NOCH READY AUS"..AQ..".. POKE
120,2 TASTATUR AUSGESCHALTET".XAR.."..
POKE 56334,7 STOERT PRG ABLAUF"..AS..".
... RETURN";A$
..AV..".. *** MENUE ***"..AW..86
..A~..".ZA..".. +-+M+E+R+G+E+-
+"..A..." +++++++++++ ".%B..
."...1. PRINT PEEK(43):PRINT PEEK(44).EB
...".2. BEIDE ZAHLEN MERKEN !.UB...".3.P
OKE43,(PEEK(45)+256*PEEK(46)-2)AND255..B
...".POKE44,(PEEK(45)+256*PEEK(46)-2)/ 2
55..B...".3. NEW <RETURN>..B...".4
. LOAD <RETURN>..C...".5. POKE 43,<G
EMERKTE ZAHL PEEK 43>./C...".6. POKE 44,
<GEMERKTE ZAHL PEEK 44>.>C...".7. LIST.L
C...". RETURN
";A$..C...".. ** MENUE **..C
...86..C...".... ....CC..."..
*RENUMBER*..C..." **********
..D...".WIRD MIT RUN 63900 GESTARTET.0D.
..".63900 R=PEEK (43) + 256 * PEEK (44)
.QD...".63901 INPUT''START NO'';S.XD..."
.63915 INPUT''SCHRITT WEITE'';SW..D...".
63903 HI= S /256:LO=S AND255.CD...".6390
4 A=PEEK(R+2)+256*PEEK(R+3)..D...".63905
IFA>63900 THEN PRINT''OK'':END..E...".6
3906 POKE R + 2,LO:POKE R + 3,HI.=E...".
63907 R=PEEK(R)+256*PEEK(R+1).SE...".639
08 S =S +SW.YE...".63909 PRINT S ''=""A:
GOTO63903..E ..".
RETURN";A$.KE...". .***
MENUE ***".SE...86..E..."..............
...F...".. # ZENTRIERUNG DES BILDSC
HIRMES #".FF..." VCCCCCCCCCCCCCCV
CCCCCCCCCCCV ".UF..."...FUER DIE ZENTRIE
RUNG DES BILDES, SIND..F...".ZWEI POKE V
ERANTWORTLICH...F..."....HORIZONTAL-ZENT
RIERUNG:.UF..."EEEEEEEEEEEEEEEEEEEEEE..F
..."..POKE 36864,XX (NORMAL 12)"..G
..."..VERTIKAL-ZENTRIERUNG:.8G..."EEEEEE
EEEEEEEEEEEEEEEE.`G..."..POKE 36865,XX
(NORMAL 38)"..G..."..
RETURN";A$..G...". *
** MENUE ***"..G...86.XG..."....... ..
..... ... ........H...".. ZUERUEK .ZU
.BASIC .AUS .DER .GRAFIK".8H..." .....
...............................".JH...".
...WENN IM GRAFIKMODUS EIN LIST EINGEGEB
EN..H...".WIRD, ERSCHEINT NUR EIN FARBMU
STER...H...".WENN DIE RUN-STOP RETURN TA
STE.OH...".NICHT HILFT:..HA.."....POKE
53272,21 : POKE 53265,155.)IB.."....
RETURN";A$.JID.."
. *** MENUE ***.RIE..86.BIN..
".. ... ...IO..".. BIT WE
RT TABELLE"..IP.." MNMNMNM
NMNMNMNMN"..IQ.."..... .CCC.CCC.CCC
.CCC.CCC.CCC.CCC.CCC...JR.." B B
B B B B B B B.CJS..".BITNO
. B 0 B 1 B 2 B 3 B 4 B 5 B 6 B 7 B.QJT.
." B B B B B B B B
B..JU.." .CCC.CCC.CCC.CCC.CCC.CCC.C
CC.CCC..NJV..". .CCC.CCC.CCC.CCC.CC
C.CCC.CCC.CCC...JW.." B B B B
B B B B B.,KX..".WERT. B 1 B
2 B 4 B 8 B 16B 32B 64B128B.ZKY.."
B B B B B B B B B..KZ..
" .CCC.CCC.CCC.CCC.CCC.CCC.CCC.CCC.
..K..."...BEISPIEL: BIT 3 + 4 SOLL GESET
ZT WEDEN...K...".BIT 3 = 8 BIT 4 =16
8+16=24..K..."..RESULTAT. POKE XXXX,24.
.L...A$:.A$."".1250.6L...". ***
MENUE ***".?L... 86.OL..."..... ....
XL...".. VERSCHIEDENE TRIKS"
..L..." QCCCCCCCCCCCCCCCCW".
IL..."....POKE 120,2 C> CBM BLOCKIER
T..L...".POKE 651,225 C> REPEAT VERZOE
GERT..M...".POKE 808,255 C> BREAK.-M..
."..SYS 42115 C> END.WM...".SYS 44808 C
> ERZEUGT SYNTAX ERROR.|M...".SYS 65409
C> VIDEO-CHIP REST..M...".SYS 58253 C>
RUN-STOP/RESTORE.IM..."..PEEK (213) C>
GEDRUECKTE TASTE..M...".PEEK (215) C> Z
ULETZT GEDRUECKTE TASTE.)N..."..
RETURN ";A$.QN..."
.. *** MENUE ***".YN...8
6.NN...53280,1:."......ZN...X.0.61..N...
A..N..T.T.A..N...40704.X,A:."...........
...36200..N... X.CN...".OK"..N... 40704:
."...........36200..N...53280,0. O..."..
................. OK"
.(O...86.NOY.. 169,255,141,6,212,141,24,
212,169:."...............5,6,77,4,55,2..
OZ.. 9,141,5,212,169,103,141,1,212..O...
169,33,141,0,212,120,169,38,141..P... 2
0,3,169,159,141,21,3,133,56,88:.".......
.............,122,133,11.%P... 96,72,165
,203,201,64,208,9,169.HP... 0,141,4,212,
104,76,49,234,169:."...............33,12
1,22,211..P... 17,141,4,212,76,50,159..P
..".... ....... .... .........P....PP..
. LUETOLF BEAT 1985.VP.....
P... OLTNERSTRASSE 121..P.....Q... 4663
AARBURG..Q....)Q... S W I T Z E R L A N
D./Q......
> CLICK IMAGE PREVIEW FOR FULL MODAL