LEHRGANG 11
FILE INFORMATION
FILENAME(S): LEHRGANG 11
FILE TYPE(S): PRG
FILE SIZE: 6.8K
FIRST SEEN: 2025-11-30 21:05:46
APPEARS ON: 1 disk(s)
FILE HASH
0d01ee94d4b474833ace72014069951ee4fde9c298d5c79bbe114d6e1056809f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CS TAPES PET 08 | LEHRGANG 11 | PRG | DuncanTwain | 11 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 1E 04 00 00 8F 20 23 23 23 20 53 59 4E 54 |....... ### SYNT|
00000010: 41 58 2D 4D 41 47 41 5A 49 4E 20 23 32 31 00 38 |AX-MAGAZIN #21.8|
00000020: 04 01 00 8F 20 23 23 23 20 20 20 44 45 5A 45 4D |.... ### DEZEM|
00000030: 42 45 52 20 31 39 38 31 00 42 04 02 00 8F 20 23 |BER 1981.B.... #|
00000040: 23 23 00 5F 04 03 00 8F 20 23 23 23 20 43 4F 50 |##._.... ### COP|
00000050: 59 52 49 47 48 54 20 28 43 29 20 31 39 38 31 00 |YRIGHT (C) 1981.|
00000060: 7A 04 04 00 8F 20 23 23 23 20 42 59 20 45 4C 4D |z.... ### BY ELM|
00000070: 41 52 20 43 4F 4D 50 41 4E 53 00 99 04 05 00 8F |AR COMPANS......|
00000080: 20 23 23 23 20 20 20 20 43 41 52 4C 2D 53 43 48 | ### CARL-SCH|
00000090: 55 52 5A 2D 53 54 52 2E 33 00 B5 04 06 00 8F 20 |URZ-STR.3...... |
000000A0: 23 23 23 20 20 20 20 37 35 35 30 20 52 41 53 54 |### 7550 RAST|
000000B0: 41 54 54 20 31 00 BF 04 07 00 8F 20 23 23 23 00 |ATT 1...... ###.|
000000C0: CF 04 08 00 97 35 39 34 36 38 2C 31 32 3A 9C 00 |.....59468,12:..|
000000D0: 16 05 0A 00 55 24 B2 22 C5 C5 C5 C5 C5 C5 C5 C5 |....U$."........|
000000E0: C5 C5 22 3A 4F 24 B2 22 A4 A4 A4 A4 A4 A4 A4 A4 |..":O$."........|
000000F0: A4 22 3A 49 24 B2 22 49 4E 50 55 54 2D 52 4F 55 |.":I$."INPUT-ROU|
00000100: 54 49 4E 45 22 3A 42 24 B2 22 20 42 49 4C 44 53 |TINE":B$." BILDS|
00000110: 43 48 49 52 4D 22 00 27 05 64 00 8F 20 42 45 49 |CHIRM".'.d.. BEI|
00000120: 53 50 49 45 4C 20 31 00 5E 05 65 00 83 20 31 36 |SPIEL 1.^.e.. 16|
00000130: 32 2C 30 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 |2,0,32,207,255,1|
00000140: 35 37 2C 30 2C 31 32 38 2C 32 33 32 2C 32 30 31 |57,0,128,232,201|
00000150: 2C 31 33 2C 32 30 38 2C 32 34 35 2C 39 36 00 6F |,13,208,245,96.o|
00000160: 05 6C 00 8F 20 42 45 49 53 50 49 45 4C 20 32 00 |.l.. BEISPIEL 2.|
00000170: B5 05 6D 00 83 20 33 32 2C 32 30 37 2C 32 35 35 |..m.. 32,207,255|
00000180: 2C 31 37 30 2C 31 36 39 2C 31 33 2C 33 32 2C 32 |,170,169,13,32,2|
00000190: 31 30 2C 32 35 35 2C 32 32 34 2C 37 34 2C 32 34 |10,255,224,74,24|
000001A0: 30 2C 34 2C 32 32 34 2C 37 38 2C 32 30 38 2C 32 |0,4,224,78,208,2|
000001B0: 33 39 2C 39 36 00 C5 05 72 00 8F 20 41 55 46 47 |39,96...r.. AUFG|
000001C0: 41 42 45 20 33 00 0B 06 73 00 83 20 31 36 32 2C |ABE 3...s.. 162,|
000001D0: 30 2C 33 32 2C 32 30 37 2C 32 35 35 2C 32 30 31 |0,32,207,255,201|
000001E0: 2C 33 32 2C 32 34 30 2C 32 34 39 2C 31 35 37 2C |,32,240,249,157,|
000001F0: 30 2C 31 32 38 2C 32 33 32 2C 32 30 31 2C 31 33 |0,128,232,201,13|
00000200: 2C 32 30 38 2C 32 34 31 2C 39 36 00 4E 06 C8 00 |,208,241,96.N...|
00000210: 99 22 93 A4 A4 A4 22 3B 4F 24 3B 4F 24 3B 4F 24 |."....";O$;O$;O$|
00000220: 3B 4F 24 3A 99 22 12 53 59 4E 54 41 58 2D 4C 45 |;O$:.".SYNTAX-LE|
00000230: 48 52 47 41 4E 47 20 27 4D 41 53 43 48 49 4E 45 |HRGANG 'MASCHINE|
00000240: 4E 53 50 52 41 43 48 45 27 20 28 31 31 29 00 86 |NSPRACHE' (11)..|
00000250: 06 D2 00 99 22 A4 A4 A4 A4 22 3B 4F 24 3B 4F 24 |...."....";O$;O$|
00000260: 3B 4F 24 3A 99 22 12 32 2E 32 2E 20 45 49 4E 47 |;O$:.".2.2. EING|
00000270: 41 42 45 20 55 45 42 45 52 20 44 49 45 20 54 41 |ABE UEBER DIE TA|
00000280: 53 54 41 54 55 52 00 B6 06 DC 00 99 22 11 11 4E |STATUR......"..N|
00000290: 41 43 48 44 45 4D 20 57 49 52 20 49 4E 20 44 45 |ACHDEM WIR IN DE|
000002A0: 4E 20 42 45 49 44 45 4E 20 4C 45 54 5A 54 45 4E |N BEIDEN LETZTEN|
000002B0: 20 4C 45 48 52 2D 00 E5 06 E6 00 99 22 11 47 41 | LEHR-......".GA|
000002C0: 45 4E 47 45 4E 20 20 45 54 57 41 53 20 20 55 45 |ENGEN ETWAS UE|
000002D0: 42 45 52 20 20 44 49 45 20 20 41 55 53 47 41 42 |BER DIE AUSGAB|
000002E0: 45 20 56 4F 4E 00 0D 07 F0 00 99 22 11 44 41 54 |E VON......".DAT|
000002F0: 45 4E 20 41 55 46 20 44 45 4D 22 42 24 22 20 47 |EN AUF DEM"B$" G|
00000300: 45 4C 45 52 4E 54 20 48 41 42 45 4E 2C 00 3C 07 |ELERNT HABEN,.<.|
00000310: FA 00 99 22 11 53 45 48 45 4E 20 57 49 52 20 55 |...".SEHEN WIR U|
00000320: 4E 53 20 4E 55 4E 20 44 49 45 20 45 49 4E 47 41 |NS NUN DIE EINGA|
00000330: 42 45 20 56 4F 4E 20 44 41 54 45 4E 00 5A 07 04 |BE VON DATEN.Z..|
00000340: 01 99 22 11 55 45 42 45 52 20 44 49 45 20 54 41 |..".UEBER DIE TA|
00000350: 53 54 41 54 55 52 20 41 4E 2E 00 8B 07 0E 01 99 |STATUR AN.......|
00000360: 22 11 11 45 49 4E 45 20 20 53 45 48 52 20 45 49 |"..EINE SEHR EI|
00000370: 4E 46 41 43 48 45 20 20 4C 4F 45 53 55 4E 47 20 |NFACHE LOESUNG |
00000380: 42 49 45 54 45 54 20 44 49 45 11 00 AE 07 18 01 |BIETET DIE......|
00000390: 99 49 24 22 20 44 45 53 20 42 45 54 52 49 45 42 |.I$" DES BETRIEB|
000003A0: 53 53 59 53 54 45 4D 53 2E 20 20 53 49 45 00 D5 |SSYSTEMS. SIE..|
000003B0: 07 22 01 99 22 11 48 41 54 20 44 49 45 20 45 49 |."..".HAT DIE EI|
000003C0: 4E 53 50 52 55 4E 47 41 44 52 45 53 53 45 20 24 |NSPRUNGADRESSE $|
000003D0: 46 46 43 46 2E 00 F1 07 2C 01 8C 3A 81 49 B2 30 |FFCF....,..:.I.0|
000003E0: A4 34 39 3A 87 58 3A 97 39 31 32 AA 49 2C 58 3A |.49:.X:.912.I,X:|
000003F0: 82 00 07 08 36 01 49 B2 31 3A 8D 35 30 30 30 3A |....6.I.1:.5000:|
00000400: 8B 46 4C A7 32 30 30 00 45 08 90 01 99 22 93 11 |.FL.200.E...."..|
00000410: 11 11 11 11 44 49 45 20 49 4E 50 55 54 52 4F 55 |....DIE INPUTROU|
00000420: 54 49 4E 45 20 57 49 52 44 20 4D 49 54 20 20 27 |TINE WIRD MIT '|
00000430: 4A 53 52 20 20 24 46 46 43 46 27 22 3A 99 A3 32 |JSR $FFCF'":..2|
00000440: 38 29 3B 55 24 00 68 08 9A 01 99 22 41 55 46 47 |8);U$.h...."AUFG|
00000450: 45 52 55 46 45 4E 20 28 44 45 5A 49 4D 41 4C 3A |ERUFEN (DEZIMAL:|
00000460: 20 36 35 34 38 37 29 2E 00 98 08 A4 01 99 22 11 | 65487).......".|
00000470: 11 41 42 20 44 45 4D 20 45 49 4E 53 50 52 55 4E |.AB DEM EINSPRUN|
00000480: 47 20 49 4E 20 44 49 45 53 45 20 52 4F 55 54 49 |G IN DIESE ROUTI|
00000490: 4E 45 20 20 57 45 52 2D 00 C7 08 AE 01 99 22 11 |NE WER-......".|
000004A0: 44 45 4E 20 56 4F 4E 20 44 45 52 20 54 41 53 54 |DEN VON DER TAST|
000004B0: 41 54 55 52 20 5A 45 49 43 48 45 4E 20 41 4E 47 |ATUR ZEICHEN ANG|
000004C0: 45 4E 4F 4D 4D 45 4E 00 EF 08 B8 01 99 22 11 55 |ENOMMEN......".U|
000004D0: 4E 44 20 20 41 55 46 20 44 45 4D 22 42 24 22 20 |ND AUF DEM"B$" |
000004E0: 20 48 49 4E 54 45 52 45 49 4E 41 4E 44 45 52 00 | HINTEREINANDER.|
000004F0: 1E 09 C2 01 99 22 11 41 55 53 47 45 47 45 42 45 |.....".AUSGEGEBE|
00000500: 4E 2E 20 20 20 44 41 53 20 4C 41 45 55 46 54 20 |N. DAS LAEUFT |
00000510: 47 45 4E 41 55 53 4F 20 41 42 20 57 49 45 00 40 |GENAUSO AB WIE.@|
00000520: 09 CC 01 99 22 11 42 45 49 4D 20 42 41 53 49 43 |....".BEIM BASIC|
00000530: 2D 42 45 46 45 48 4C 20 27 49 4E 50 55 54 27 2E |-BEFEHL 'INPUT'.|
00000540: 00 56 09 08 02 49 B2 32 3A 8D 35 30 30 30 3A 8B |.V...I.2:.5000:.|
00000550: 46 4C A7 32 30 30 00 7B 09 58 02 99 22 93 44 45 |FL.200.{.X..".DE|
00000560: 52 20 52 55 45 43 4B 53 50 52 55 4E 47 20 20 41 |R RUECKSPRUNG A|
00000570: 55 53 20 44 45 52 20 20 22 49 24 00 AA 09 5D 02 |US DER "I$...].|
00000580: 99 22 11 45 52 46 4F 4C 47 54 20 20 42 45 49 20 |.".ERFOLGT BEI |
00000590: 44 52 55 45 43 4B 45 4E 20 44 45 52 20 54 41 53 |DRUECKEN DER TAS|
000005A0: 54 45 20 52 45 54 55 52 4E 2E 00 D6 09 5E 02 99 |TE RETURN....^..|
000005B0: 22 11 49 4D 20 41 43 20 53 54 45 48 54 20 44 41 |".IM AC STEHT DA|
000005C0: 42 45 49 20 44 41 53 20 45 52 53 54 45 20 5A 45 |BEI DAS ERSTE ZE|
000005D0: 49 43 48 45 4E 2E 00 06 0A 62 02 99 22 11 11 53 |ICHEN....b.."..S|
000005E0: 50 52 49 4E 47 54 20 4D 41 4E 20 20 44 49 45 20 |PRINGT MAN DIE |
000005F0: 52 4F 55 54 49 4E 45 20 44 41 4E 4E 20 20 4E 4F |ROUTINE DANN NO|
00000600: 43 48 4D 41 4C 53 00 35 0A 67 02 99 22 11 41 4E |CHMALS.5.g..".AN|
00000610: 2C 20 53 4F 20 57 49 52 44 20 4B 45 49 4E 20 49 |, SO WIRD KEIN I|
00000620: 4E 50 55 54 20 41 55 53 47 45 4C 4F 45 53 54 2C |NPUT AUSGELOEST,|
00000630: 20 53 4F 4E 2D 00 64 0A 6C 02 99 22 11 44 45 52 | SON-.d.l..".DER|
00000640: 4E 20 45 53 20 45 52 46 4F 4C 47 54 20 20 45 49 |N ES ERFOLGT EI|
00000650: 4E 20 53 4F 46 4F 52 54 49 47 45 52 20 20 52 55 |N SOFORTIGER RU|
00000660: 45 43 4B 2D 00 93 0A 76 02 99 22 11 53 50 52 55 |ECK-...v..".SPRU|
00000670: 4E 47 20 20 4D 49 54 20 20 44 45 4D 20 20 5A 57 |NG MIT DEM ZW|
00000680: 45 49 54 45 4E 20 20 45 49 4E 47 45 47 45 42 45 |EITEN EINGEGEBE|
00000690: 4E 45 4E 00 B9 0A 80 02 99 22 11 5A 45 49 43 48 |NEN......".ZEICH|
000006A0: 45 4E 20 49 4D 20 41 43 2E 20 20 20 44 49 45 20 |EN IM AC. DIE |
000006B0: 22 49 24 22 20 57 49 52 44 00 E8 0A 8A 02 99 22 |"I$" WIRD......"|
000006C0: 11 4E 55 4E 20 49 4D 4D 45 52 20 57 49 45 44 45 |.NUN IMMER WIEDE|
000006D0: 52 20 41 4E 47 45 53 50 52 55 4E 47 45 4E 2E 20 |R ANGESPRUNGEN. |
000006E0: 4A 45 44 45 53 4D 41 4C 00 17 0B 94 02 99 22 11 |JEDESMAL......".|
000006F0: 45 52 46 4F 4C 47 54 20 53 4F 46 4F 52 54 20 20 |ERFOLGT SOFORT |
00000700: 44 45 52 20 52 55 45 43 4B 53 50 52 55 4E 47 20 |DER RUECKSPRUNG |
00000710: 4D 49 54 20 44 45 4D 00 37 0B 9E 02 99 22 11 4E |MIT DEM.7....".N|
00000720: 41 45 43 48 53 54 45 4E 20 5A 45 49 43 48 45 4E |AECHSTEN ZEICHEN|
00000730: 20 49 4D 20 41 43 2E 00 4D 0B D0 02 49 B2 33 3A | IM AC..M...I.3:|
00000740: 8D 35 30 30 30 3A 8B 46 4C A7 34 30 30 00 7C 0B |.5000:.FL.400.|.|
00000750: 20 03 99 22 93 57 45 4E 4E 20 41 55 46 20 44 49 | ..".WENN AUF DI|
00000760: 45 53 45 20 57 45 49 53 45 20 44 41 53 20 4C 45 |ESE WEISE DAS LE|
00000770: 54 5A 54 45 20 5A 45 49 43 48 45 4E 00 AB 0B 25 |TZTE ZEICHEN...%|
00000780: 03 99 22 11 28 41 4C 53 4F 20 44 41 53 20 27 52 |..".(ALSO DAS 'R|
00000790: 45 54 55 52 4E 27 29 20 41 42 47 45 52 55 46 45 |ETURN') ABGERUFE|
000007A0: 4E 20 57 55 52 44 45 2C 42 45 2D 00 DB 0B 2A 03 |N WURDE,BE-...*.|
000007B0: 99 22 11 57 49 52 4B 54 20 20 45 49 4E 20 4E 4F |.".WIRKT EIN NO|
000007C0: 43 48 4D 41 4C 49 47 45 53 20 20 20 41 4E 53 50 |CHMALIGES ANSP|
000007D0: 52 49 4E 47 45 4E 20 44 45 52 11 00 F8 0B 2F 03 |RINGEN DER..../.|
000007E0: 99 49 24 22 20 57 49 45 44 45 52 20 45 49 4E 45 |.I$" WIEDER EINE|
000007F0: 4E 20 49 4E 50 55 54 2E 00 28 0C 34 03 99 22 11 |N INPUT..(.4..".|
00000800: 11 45 42 45 4E 53 4F 20 20 4B 41 4E 4E 20 4D 41 |.EBENSO KANN MA|
00000810: 4E 20 44 41 53 20 41 42 52 55 46 45 4E 20 44 45 |N DAS ABRUFEN DE|
00000820: 52 20 45 49 4E 47 45 2D 00 57 0C 3E 03 99 22 11 |R EINGE-.W.>..".|
00000830: 47 45 42 45 4E 45 4E 20 5A 45 49 43 48 45 4E 20 |GEBENEN ZEICHEN |
00000840: 55 4E 54 45 52 42 52 45 43 48 45 4E 2C 20 49 4E |UNTERBRECHEN, IN|
00000850: 44 45 4D 20 4D 41 4E 00 86 0C 48 03 99 22 11 4D |DEM MAN...H..".M|
00000860: 49 54 20 44 45 52 20 50 52 49 4E 54 52 4F 55 54 |IT DER PRINTROUT|
00000870: 49 4E 45 20 45 49 4E 20 20 27 52 45 54 55 52 4E |INE EIN 'RETURN|
00000880: 27 20 41 55 53 2D 00 93 0C 52 03 99 22 11 47 49 |' AUS-...R..".GI|
00000890: 42 54 2E 00 C3 0C 5C 03 99 22 11 11 44 41 53 20 |BT....\.."..DAS |
000008A0: 45 52 53 43 48 45 49 4E 54 20 41 4E 46 41 4E 47 |ERSCHEINT ANFANG|
000008B0: 53 20 20 4B 4F 4D 50 4C 49 5A 49 45 52 54 2C 20 |S KOMPLIZIERT, |
000008C0: 49 53 54 00 F2 0C 66 03 99 22 11 45 53 20 41 42 |IST...f..".ES AB|
000008D0: 45 52 20 4E 49 43 48 54 2E 20 20 53 45 48 45 4E |ER NICHT. SEHEN|
000008E0: 20 57 49 52 20 55 4E 53 20 20 45 49 4E 20 42 45 | WIR UNS EIN BE|
000008F0: 49 2D 00 03 0D 70 03 99 22 11 53 50 49 45 4C 20 |I-...p..".SPIEL |
00000900: 41 4E 3A 00 19 0D A2 03 49 B2 34 3A 8D 35 30 30 |AN:.....I.4:.500|
00000910: 30 3A 8B 46 4C A7 36 30 30 00 2F 0D E8 03 99 22 |0:.FL.600./...."|
00000920: 93 42 45 49 53 50 49 45 4C 3A 22 3A 99 55 24 00 |.BEISPIEL:":.U$.|
00000930: 55 0D F2 03 99 22 11 4D 49 54 20 20 44 45 52 20 |U....".MIT DER |
00000940: 22 49 24 22 20 53 4F 4C 4C 20 20 45 49 4E 45 20 |"I$" SOLL EINE |
00000950: 46 4F 4C 47 45 00 84 0D FC 03 99 22 11 56 4F 4E |FOLGE......".VON|
00000960: 20 5A 45 49 43 48 45 4E 20 55 45 42 45 52 20 44 | ZEICHEN UEBER D|
00000970: 49 45 20 54 41 53 54 41 54 55 52 20 45 49 4E 47 |IE TASTATUR EING|
00000980: 45 47 45 2D 00 B3 0D 06 04 99 22 11 42 45 4E 20 |EGE-......".BEN |
00000990: 57 45 52 44 45 4E 2E A0 20 20 44 49 45 20 5A 45 |WERDEN.. DIE ZE|
000009A0: 49 43 48 45 4E 20 53 4F 4C 4C 45 4E 20 20 4E 49 |ICHEN SOLLEN NI|
000009B0: 43 48 54 00 E2 0D 10 04 99 22 11 53 4F 46 4F 52 |CHT......".SOFOR|
000009C0: 54 20 57 45 49 54 45 52 56 45 52 41 52 42 45 49 |T WEITERVERARBEI|
000009D0: 54 45 54 20 53 4F 4E 44 45 52 4E 20 5A 55 45 52 |TET SONDERN ZUER|
000009E0: 53 54 00 11 0E 1A 04 99 22 11 5A 57 49 53 43 48 |ST......".ZWISCH|
000009F0: 45 4E 47 45 53 50 45 49 43 48 45 52 54 20 57 45 |ENGESPEICHERT WE|
00000A00: 52 44 45 4E 2E 20 57 49 52 20 57 41 45 48 4C 45 |RDEN. WIR WAEHLE|
00000A10: 4E 00 40 0E 24 04 99 22 11 41 4C 53 20 5A 57 49 |N.@.$..".ALS ZWI|
00000A20: 53 43 48 45 4E 53 50 45 49 43 48 45 52 20 44 49 |SCHENSPEICHER DI|
00000A30: 45 20 53 50 45 49 43 48 45 52 20 24 38 30 30 30 |E SPEICHER $8000|
00000A40: 00 68 0E 2E 04 99 22 11 55 4E 44 20 46 4F 4C 47 |.h....".UND FOLG|
00000A50: 45 4E 44 45 2E 20 20 20 44 41 20 44 4F 52 54 20 |ENDE. DA DORT |
00000A60: 44 45 52 22 42 24 22 2D 00 97 0E 38 04 99 22 11 |DER"B$"-...8..".|
00000A70: 53 50 45 49 43 48 45 52 20 4C 49 45 47 54 2C 20 |SPEICHER LIEGT, |
00000A80: 20 20 53 45 48 45 4E 20 57 49 52 20 20 44 49 52 | SEHEN WIR DIR|
00000A90: 45 4B 54 20 44 45 4E 00 B1 0E 42 04 99 22 11 5A |EKT DEN...B..".Z|
00000AA0: 45 49 54 4C 49 43 48 45 4E 20 41 42 4C 41 55 46 |EITLICHEN ABLAUF|
00000AB0: 2E 00 C7 0E 6A 04 49 B2 35 3A 8D 35 30 30 30 3A |....j.I.5:.5000:|
00000AC0: 8B 46 4C A7 38 30 30 00 DC 0E B0 04 99 22 93 44 |.FL.800......".D|
00000AD0: 41 53 20 50 52 4F 47 52 41 4D 4D 3A 00 0B 0F BA |AS PROGRAMM:....|
00000AE0: 04 99 22 11 11 20 20 20 4C 44 58 20 23 24 30 30 |..".. LDX #$00|
00000AF0: 20 20 20 20 20 5A 41 45 48 4C 45 52 20 49 4E 49 | ZAEHLER INI|
00000B00: 54 49 41 4C 49 53 49 45 52 45 4E 00 3A 0F C4 04 |TIALISIEREN.:...|
00000B10: 99 22 11 20 B0 C0 4A 53 52 20 24 46 46 43 46 20 |.". ..JSR $FFCF |
00000B20: 20 20 20 41 55 46 52 55 46 20 44 45 52 20 49 4E | AUFRUF DER IN|
00000B30: 50 55 54 52 4F 55 54 49 4E 45 00 6A 0F D8 04 99 |PUTROUTINE.j....|
00000B40: 22 20 DD 11 9D DD 20 53 54 41 20 24 38 30 30 30 |" .... STA $8000|
00000B50: 2C 58 20 20 4E 41 43 48 20 24 38 30 30 30 2B 58 |,X NACH $8000+X|
00000B60: 20 53 50 45 49 43 48 45 52 4E 00 89 0F E2 04 99 | SPEICHERN......|
00000B70: 22 20 DD 11 9D DD 20 49 4E 58 20 20 20 20 20 20 |" .... INX |
00000B80: 20 20 20 20 58 3D 58 2B 31 00 B4 0F EC 04 99 22 | X=X+1......"|
00000B90: 20 DD 11 9D DD 20 43 4D 50 20 23 24 30 44 20 20 | .... CMP #$0D |
00000BA0: 20 20 20 28 41 43 29 20 3D 20 27 52 45 54 55 52 | (AC) = 'RETUR|
00000BB0: 4E 27 20 3F 00 E5 0F F6 04 99 22 20 DD 11 9D AD |N' ?......" ....|
00000BC0: 5F 42 4E 45 20 24 46 35 20 20 20 20 20 20 4E 45 |_BNE $F5 NE|
00000BD0: 49 4E 3A 20 4E 41 45 43 48 53 54 45 53 20 5A 45 |IN: NAECHSTES ZE|
00000BE0: 49 43 48 45 4E 00 0E 10 FB 04 4C 45 48 52 47 41 |ICHEN.....LEHRGA|
00000BF0: 4E 47 20 31 31 20 20 20 20 20 20 20 20 20 20 20 |NG 11 |
00000C00: 20 20 20 49 4E 20 41 43 20 48 4F 4C 45 4E 00 35 | IN AC HOLEN.5|
00000C10: 10 00 05 99 22 11 20 20 20 52 54 53 20 20 20 20 |....". RTS |
00000C20: 20 20 20 20 20 20 4A 41 3A 20 52 55 45 43 4B 53 | JA: RUECKS|
00000C30: 50 52 55 4E 47 00 56 10 0A 05 99 22 11 11 11 4E |PRUNG.V...."...N|
00000C40: 55 4E 20 45 49 4E 45 20 44 45 4D 4F 4E 53 54 52 |UN EINE DEMONSTR|
00000C50: 41 54 49 4F 4E 3A 00 6D 10 28 05 49 B2 36 3A 8D |ATION:.m.(.I.6:.|
00000C60: 35 30 30 30 3A 8B 46 4C A7 31 30 30 30 00 A0 10 |5000:.FL.1000...|
00000C70: 78 05 99 22 93 12 20 20 20 20 20 20 20 20 20 20 |x..".. |
00000C80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00000CA0: 00 D1 10 82 05 99 22 12 20 20 20 20 20 20 20 20 |......". |
00000CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000CD0: 22 00 02 11 87 05 99 22 11 11 11 C0 C0 C0 C0 C0 |"......"........|
00000CE0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000CF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000D00: C0 C0 00 30 11 8C 05 99 22 47 45 42 45 4E 20 53 |...0...."GEBEN S|
00000D10: 49 45 20 4E 55 4E 20 45 49 4E 49 47 45 20 5A 45 |IE NUN EINIGE ZE|
00000D20: 49 43 48 45 4E 20 45 49 4E 2E 20 44 41 42 45 49 |ICHEN EIN. DABEI|
00000D30: 00 5F 11 96 05 99 22 11 53 54 45 48 45 4E 20 49 |._....".STEHEN I|
00000D40: 48 4E 45 4E 20 41 55 43 48 20 44 49 45 20 43 55 |HNEN AUCH DIE CU|
00000D50: 52 53 4F 52 53 54 45 55 45 52 55 4E 47 45 4E 00 |RSORSTEUERUNGEN.|
00000D60: 87 11 A0 05 99 22 11 27 49 4E 53 54 27 20 55 4E |.....".'INST' UN|
00000D70: 44 20 27 44 45 4C 27 20 5A 55 52 20 56 45 52 46 |D 'DEL' ZUR VERF|
00000D80: 55 45 47 55 4E 47 2E 00 92 11 AA 05 99 22 13 11 |UEGUNG......."..|
00000D90: 11 22 00 A9 11 B4 05 9E 20 39 31 32 3A 8F 20 42 |."...... 912:. B|
00000DA0: 45 49 53 50 49 45 4C 20 31 00 B8 11 B9 05 81 57 |EISPIEL 1......W|
00000DB0: B2 30 A4 39 39 39 3A 82 00 D7 11 BE 05 99 22 13 |.0.999:.......".|
00000DC0: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3A 8B |.............":.|
00000DD0: 4E 37 A7 31 35 30 30 00 05 12 C3 05 99 22 44 41 |N7.1500......"DA|
00000DE0: 20 44 49 45 20 45 49 4E 47 41 42 45 20 49 4E 20 | DIE EINGABE IN |
00000DF0: 41 53 43 49 49 2C 44 49 45 20 41 55 53 47 41 42 |ASCII,DIE AUSGAB|
00000E00: 45 20 4A 45 2D 00 2D 12 C8 05 99 22 11 44 4F 43 |E JE-.-....".DOC|
00000E10: 48 20 49 4D 22 42 24 22 43 4F 44 45 20 45 52 46 |H IM"B$"CODE ERF|
00000E20: 4F 4C 47 54 2C 20 53 54 49 4D 4D 45 4E 00 5C 12 |OLGT, STIMMEN.\.|
00000E30: CD 05 99 22 11 44 49 45 20 45 49 4E 47 45 47 45 |...".DIE EINGEGE|
00000E40: 42 45 4E 45 4E 20 20 55 4E 44 20 20 44 49 45 20 |BENEN UND DIE |
00000E50: 41 55 53 47 45 47 45 42 45 4E 45 4E 00 8B 12 D2 |AUSGEGEBENEN....|
00000E60: 05 99 22 11 5A 45 49 43 48 45 4E 20 41 4C 4C 45 |..".ZEICHEN ALLE|
00000E70: 52 44 49 4E 47 53 20 4E 49 43 48 54 20 55 45 42 |RDINGS NICHT UEB|
00000E80: 45 52 45 49 4E 2E 20 20 44 41 53 00 C2 12 D7 05 |EREIN. DAS.....|
00000E90: 99 22 11 53 4F 4C 4C 20 55 4E 53 20 48 49 45 52 |.".SOLL UNS HIER|
00000EA0: 20 4E 49 43 48 54 20 57 45 49 54 45 52 20 53 54 | NICHT WEITER ST|
00000EB0: 4F 45 52 45 4E 2E 22 3A 4E 37 B2 31 3A 89 31 35 |OEREN.":N7.1:.15|
00000EC0: 33 30 00 CD 12 DC 05 8D 31 30 30 30 30 00 DE 12 |30......10000...|
00000ED0: EB 05 8B 58 24 B2 22 4A 22 A7 31 34 30 30 00 F5 |...X$."J".1400..|
00000EE0: 12 FA 05 49 B2 37 3A 8D 35 30 30 30 3A 8B 46 4C |...I.7:.5000:.FL|
00000EF0: A7 31 32 30 30 00 1E 13 40 06 99 22 93 42 45 41 |.1200...@..".BEA|
00000F00: 43 48 54 45 4E 20 53 49 45 20 42 45 53 4F 4E 44 |CHTEN SIE BESOND|
00000F10: 45 52 53 20 46 4F 4C 47 45 4E 44 45 53 3A 00 4D |ERS FOLGENDES:.M|
00000F20: 13 54 06 99 22 11 31 2E 20 44 49 45 20 41 55 53 |.T..".1. DIE AUS|
00000F30: 47 41 42 45 20 20 45 52 46 4F 4C 47 54 20 45 52 |GABE ERFOLGT ER|
00000F40: 53 54 2C 20 20 57 45 4E 4E 20 44 49 45 00 7B 13 |ST, WENN DIE.{.|
00000F50: 59 06 99 22 11 20 20 20 45 49 4E 47 41 42 45 20 |Y..". EINGABE |
00000F60: 44 55 52 43 48 20 27 52 45 54 55 52 4E 27 20 42 |DURCH 'RETURN' B|
00000F70: 45 45 4E 44 45 54 20 49 53 54 2E 00 AA 13 5E 06 |EENDET IST....^.|
00000F80: 99 22 11 32 2E 20 44 41 53 20 4C 45 54 5A 54 45 |.".2. DAS LETZTE|
00000F90: 20 20 55 45 42 45 52 47 45 42 45 4E 45 20 5A 45 | UEBERGEBENE ZE|
00000FA0: 49 43 48 45 4E 20 20 49 53 54 00 D1 13 63 06 99 |ICHEN IST...c..|
00000FB0: 22 11 20 20 20 49 4D 4D 45 52 20 45 49 4E 20 27 |". IMMER EIN '|
00000FC0: 52 45 54 55 52 4E 27 2E 20 20 20 49 4D 20 22 42 |RETURN'. IM "B|
00000FD0: 24 00 00 14 68 06 99 22 11 20 20 20 45 52 53 43 |$...h..". ERSC|
00000FE0: 48 45 49 4E 54 20 45 53 20 20 41 4C 53 20 27 4D |HEINT ES ALS 'M|
00000FF0: 27 20 53 54 45 54 53 20 20 41 4D 20 45 4E 44 45 |' STETS AM ENDE|
00001000: 00 2A 14 72 06 99 22 11 20 20 20 44 45 52 20 4B |.*.r..". DER K|
00001010: 45 54 54 45 20 41 55 53 47 45 47 45 42 45 4E 45 |ETTE AUSGEGEBENE|
00001020: 52 20 5A 45 49 43 48 45 4E 2E 00 59 14 7C 06 99 |R ZEICHEN..Y.|..|
00001030: 22 11 33 2E 20 44 49 45 20 41 4E 5A 41 48 4C 20 |".3. DIE ANZAHL |
00001040: 20 44 45 52 20 5A 45 49 43 48 45 4E 20 20 20 49 | DER ZEICHEN I|
00001050: 53 54 20 41 55 46 20 37 39 00 6D 14 86 06 99 22 |ST AUF 79.m...."|
00001060: 11 20 20 20 42 45 47 52 45 4E 5A 54 2E 00 9B 14 |. BEGRENZT....|
00001070: 90 06 99 22 11 11 42 4C 41 45 54 54 45 52 4E 20 |..."..BLAETTERN |
00001080: 53 49 45 20 5A 55 52 55 45 43 4B 20 55 4E 44 20 |SIE ZURUECK UND |
00001090: 55 45 42 45 52 5A 45 55 47 45 4E 00 AC 14 95 06 |UEBERZEUGEN.....|
000010A0: 99 22 11 53 49 45 20 53 49 43 48 21 00 C3 14 AE |.".SIE SICH!....|
000010B0: 06 49 B2 38 3A 8D 35 30 30 30 3A 8B 46 4C A7 31 |.I.8:.5000:.FL.1|
000010C0: 34 30 30 00 F2 14 08 07 99 22 93 4F 46 54 20 57 |400......".OFT W|
000010D0: 45 52 44 45 4E 20 44 49 45 20 45 49 4E 47 45 47 |ERDEN DIE EINGEG|
000010E0: 45 42 45 4E 45 4E 20 5A 45 49 43 48 45 4E 20 47 |EBENEN ZEICHEN G|
000010F0: 41 52 00 21 15 12 07 99 22 11 4E 49 43 48 54 20 |AR.!....".NICHT |
00001100: 5A 57 49 53 43 48 45 4E 47 45 53 50 45 49 43 48 |ZWISCHENGESPEICH|
00001110: 45 52 54 2C 20 20 53 4F 4E 44 45 52 4E 20 53 4F |ERT, SONDERN SO|
00001120: 2D 00 39 15 1C 07 99 22 11 46 4F 52 54 20 42 45 |-.9....".FORT BE|
00001130: 41 52 42 45 49 54 45 54 2E 00 50 15 26 07 99 22 |ARBEITET..P.&.."|
00001140: 11 11 42 45 49 53 50 49 45 4C 3A 22 3A 99 55 24 |..BEISPIEL:":.U$|
00001150: 00 7E 15 30 07 99 22 53 49 45 20 48 41 42 45 4E |.~.0.."SIE HABEN|
00001160: A0 20 49 4E A0 20 49 48 52 45 4D 20 A0 4D 41 53 |. IN. IHREM .MAS|
00001170: 43 48 49 4E 45 4E 50 52 4F 47 52 41 4D 4D 00 AD |CHINENPROGRAMM..|
00001180: 15 3A 07 99 22 11 45 49 4E 45 20 4A 41 2F 4E 45 |.:..".EINE JA/NE|
00001190: 49 4E 2D 41 42 46 52 41 47 45 20 55 4E 44 20 57 |IN-ABFRAGE UND W|
000011A0: 4F 4C 4C 45 4E 20 4E 55 52 20 45 49 2D 00 DC 15 |OLLEN NUR EI-...|
000011B0: 44 07 99 22 11 4E 45 4E 20 42 55 43 48 53 54 41 |D..".NEN BUCHSTA|
000011C0: 42 45 4E 20 20 28 4E 41 45 4D 4C 49 43 48 20 27 |BEN (NAEMLICH '|
000011D0: 4A 27 20 4F 44 45 52 20 27 4E 27 29 00 0B 16 4E |J' ODER 'N')...N|
000011E0: 07 99 22 11 55 45 42 45 52 20 44 49 45 20 54 41 |..".UEBER DIE TA|
000011F0: 53 54 41 54 55 52 20 45 49 4E 47 45 42 45 4E 20 |STATUR EINGEBEN |
00001200: 55 4E 44 20 4A 45 20 4E 41 43 48 00 3A 16 58 07 |UND JE NACH.:.X.|
00001210: 99 22 11 45 49 4E 47 41 42 45 20 5A 55 20 56 45 |.".EINGABE ZU VE|
00001220: 52 53 43 48 49 45 44 45 4E 45 4E 20 50 52 4F 47 |RSCHIEDENEN PROG|
00001230: 52 41 4D 4D 54 45 49 4C 45 4E 00 69 16 62 07 99 |RAMMTEILEN.i.b..|
00001240: 22 11 53 50 52 49 4E 47 45 4E 2E 41 4E 44 45 52 |".SPRINGEN.ANDER|
00001250: 45 20 42 55 43 48 53 54 41 42 45 4E 20 41 4C 53 |E BUCHSTABEN ALS|
00001260: 20 4A 20 4F 44 45 52 20 4E 00 8C 16 6C 07 99 22 | J ODER N...l.."|
00001270: 11 53 4F 4C 4C 45 4E 20 55 4E 54 45 52 44 52 55 |.SOLLEN UNTERDRU|
00001280: 45 43 4B 54 20 57 45 52 44 45 4E 2E 00 A3 16 76 |ECKT WERDEN....v|
00001290: 07 49 B2 39 3A 8D 35 30 30 30 3A 8B 46 4C A7 31 |.I.9:.5000:.FL.1|
000012A0: 36 30 30 00 BD 16 D0 07 99 22 93 48 49 45 52 20 |600......".HIER |
000012B0: 44 41 53 20 50 52 4F 47 52 41 4D 4D 3A 00 EC 16 |DAS PROGRAMM:...|
000012C0: D5 07 99 22 11 B0 C0 C0 4A 53 52 20 24 46 46 43 |..."....JSR $FFC|
000012D0: 46 20 20 20 20 45 52 53 54 45 53 20 5A 45 49 43 |F ERSTES ZEIC|
000012E0: 48 45 4E 20 45 49 4E 4C 45 53 45 4E 00 14 17 DA |HEN EINLESEN....|
000012F0: 07 99 22 DD 11 9D DD 20 20 54 41 58 20 20 20 20 |..".... TAX |
00001300: 20 20 20 20 20 20 49 4E 20 58 52 20 53 43 48 49 | IN XR SCHI|
00001310: 45 42 45 4E 00 3B 17 E4 07 99 22 DD 11 9D DD 20 |EBEN.;....".... |
00001320: 20 4C 44 41 20 23 24 30 44 20 20 20 20 20 28 41 | LDA #$0D (A|
00001330: 43 29 3D 27 52 45 54 55 52 4E 27 00 66 17 F8 07 |C)='RETURN'.f...|
00001340: 99 22 DD 11 9D DD 20 20 4A 53 52 20 24 46 46 44 |.".... JSR $FFD|
00001350: 32 20 20 20 20 41 42 42 52 55 43 48 20 44 45 53 |2 ABBRUCH DES|
00001360: 20 49 4E 50 55 54 00 8F 17 02 08 99 22 DD 11 9D | INPUT......"...|
00001370: DD 20 20 43 50 58 20 23 24 34 41 20 20 20 20 20 |. CPX #$4A |
00001380: 49 53 54 20 45 53 20 45 49 4E 20 27 4A 27 3F 00 |IST ES EIN 'J'?.|
00001390: B1 17 07 08 99 22 DD 11 9D DD B0 5F 42 45 51 20 |....."....._BEQ |
000013A0: 24 30 34 20 20 20 20 20 20 4A 41 3A 20 45 4E 44 |$04 JA: END|
000013B0: 45 00 DC 17 0C 08 99 22 DD DD 11 9D 9D DD DD 20 |E......"....... |
000013C0: 43 50 58 20 23 24 34 45 20 20 20 20 20 49 53 54 |CPX #$4E IST|
000013D0: 20 45 53 20 45 49 4E 20 27 4E 27 3F 00 07 18 16 | ES EIN 'N'?....|
000013E0: 08 99 22 DD DD 11 9D 9D AD C0 5F 42 4E 45 20 24 |.."......._BNE $|
000013F0: 45 46 20 20 20 20 20 20 4E 45 49 4E 3A 20 56 4F |EF NEIN: VO|
00001400: 4E 20 56 4F 52 4E 45 00 38 18 2A 08 99 22 20 DD |N VORNE.8.*.." .|
00001410: 11 9D AD C0 52 54 53 20 20 20 20 20 20 20 20 20 |....RTS |
00001420: 20 52 55 45 43 4B 53 50 52 55 4E 47 20 4D 49 54 | RUECKSPRUNG MIT|
00001430: 20 5A 45 49 43 48 45 4E 00 55 18 34 08 99 22 11 | ZEICHEN.U.4..".|
00001440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001450: 49 4D 20 58 52 00 6D 18 3E 08 49 B2 31 30 3A 8D |IM XR.m.>.I.10:.|
00001460: 35 30 30 30 3A 8B 46 4C A7 31 38 30 30 00 9C 18 |5000:.FL.1800...|
00001470: 98 08 99 22 93 44 41 53 20 50 52 4F 47 52 41 4D |...".DAS PROGRAM|
00001480: 4D 20 4C 49 45 53 54 20 20 45 49 4E 20 57 4F 52 |M LIEST EIN WOR|
00001490: 54 20 20 55 45 42 45 52 20 44 49 45 00 CB 18 AC |T UEBER DIE....|
000014A0: 08 99 22 11 54 41 53 54 41 54 55 52 20 45 49 4E |..".TASTATUR EIN|
000014B0: 2E 20 20 44 45 52 20 45 52 53 54 45 20 42 55 43 |. DER ERSTE BUC|
000014C0: 48 53 54 41 42 45 20 57 49 52 44 00 FA 18 B6 08 |HSTABE WIRD.....|
000014D0: 99 22 11 41 55 46 20 27 4A 27 20 55 4E 44 20 27 |.".AUF 'J' UND '|
000014E0: 4E 27 20 47 45 50 52 55 45 46 54 2E 20 20 20 4C |N' GEPRUEFT. L|
000014F0: 49 45 47 54 20 45 49 4E 45 52 00 29 19 C0 08 99 |IEGT EINER.)....|
00001500: 22 11 44 49 45 53 45 52 20 20 42 45 49 44 45 4E |".DIESER BEIDEN|
00001510: 20 20 42 55 43 48 53 54 41 42 45 4E 20 56 4F 52 | BUCHSTABEN VOR|
00001520: 2C 20 20 53 4F 20 45 52 2D 00 58 19 CA 08 99 22 |, SO ER-.X...."|
00001530: 11 46 4F 4C 47 54 20 44 45 52 20 52 55 45 43 4B |.FOLGT DER RUECK|
00001540: 53 50 52 55 4E 47 20 20 20 4D 49 54 20 44 45 4D |SPRUNG MIT DEM|
00001550: 20 5A 45 49 43 48 45 4E 00 87 19 D4 08 99 22 11 | ZEICHEN......".|
00001560: 27 4A 27 20 28 3D 24 34 41 29 20 4F 44 45 52 20 |'J' (=$4A) ODER |
00001570: 27 4E 27 20 28 3D 24 34 45 29 20 49 4D 20 58 52 |'N' (=$4E) IM XR|
00001580: 2E 20 20 20 41 4E 2D 00 B5 19 DE 08 99 22 11 44 |. AN-......".D|
00001590: 45 52 4E 46 41 4C 4C 53 20 57 49 52 44 20 44 49 |ERNFALLS WIRD DI|
000015A0: 45 20 45 49 4E 47 41 42 45 20 57 49 45 44 45 52 |E EINGABE WIEDER|
000015B0: 48 4F 4C 54 2E 00 E5 19 E8 08 99 22 11 11 44 45 |HOLT......."..DE|
000015C0: 4D 20 50 52 4F 47 52 41 4D 4D 20 20 57 55 45 52 |M PROGRAMM WUER|
000015D0: 44 45 20 4E 55 4E 20 4E 4F 43 48 20 20 44 49 45 |DE NUN NOCH DIE|
000015E0: 20 56 45 52 2D 00 14 1A F2 08 99 22 11 5A 57 45 | VER-......".ZWE|
000015F0: 49 47 55 4E 47 20 49 4E 20 41 42 48 41 45 4E 47 |IGUNG IN ABHAENG|
00001600: 49 47 4B 45 49 54 20 20 56 4F 4E 20 44 45 52 20 |IGKEIT VON DER |
00001610: 45 49 4E 2D 00 43 1A F7 08 99 22 11 47 41 42 45 |EIN-.C....".GABE|
00001620: 20 46 4F 4C 47 45 4E 2E 20 20 20 44 41 53 20 53 | FOLGEN. DAS S|
00001630: 4F 4C 4C 54 45 4E 20 53 49 45 20 53 49 43 48 20 |OLLTEN SIE SICH |
00001640: 41 4C 53 00 65 1A FC 08 99 22 11 55 45 42 55 4E |ALS.e....".UEBUN|
00001650: 47 53 41 55 46 47 41 42 45 20 55 45 42 45 52 4C |GSAUFGABE UEBERL|
00001660: 45 47 45 4E 2E 00 7D 1A 06 09 49 B2 31 31 3A 8D |EGEN..}...I.11:.|
00001670: 35 30 30 30 3A 8B 46 4C A7 32 30 30 30 00 AA 1A |5000:.FL.2000...|
00001680: 60 09 99 22 93 4E 55 4E 20 45 49 4E 45 20 44 45 |`..".NUN EINE DE|
00001690: 4D 4F 4E 53 54 52 41 54 49 4F 4E 3A 22 3A 99 55 |MONSTRATION:":.U|
000016A0: 24 3B 55 24 3B 22 C5 C5 C5 22 00 D9 1A 6A 09 99 |$;U$;"..."...j..|
000016B0: 22 11 50 52 4F 42 49 45 52 45 4E 20 53 49 45 20 |".PROBIEREN SIE |
000016C0: 49 4E 53 42 45 53 4F 4E 44 45 52 45 2C 57 41 53 |INSBESONDERE,WAS|
000016D0: 20 42 45 49 20 46 41 4C 2D 00 08 1B 74 09 99 22 | BEI FAL-...t.."|
000016E0: 11 53 43 48 45 4E 20 45 49 4E 47 41 42 45 4E 20 |.SCHEN EINGABEN |
000016F0: 50 41 53 53 49 45 52 54 20 21 20 28 5A 2E 42 2E |PASSIERT ! (Z.B.|
00001700: 27 52 45 54 55 52 4E 27 00 36 1B 7E 09 99 22 11 |'RETURN'.6.~..".|
00001710: 4F 44 45 52 20 41 4E 44 45 52 45 20 42 55 43 48 |ODER ANDERE BUCH|
00001720: 53 54 41 42 45 4E 20 41 4C 53 20 4A 20 55 4E 44 |STABEN ALS J UND|
00001730: 20 4E 29 2E 11 11 00 4D 1B 88 09 9E 20 39 32 36 | N)....M.... 926|
00001740: 3A 8F 20 42 45 49 53 50 49 45 4C 20 32 00 76 1B |:. BEISPIEL 2.v.|
00001750: 8D 09 99 22 11 11 11 4F 4B 20 2D 20 4A 45 54 5A |..."...OK - JETZ|
00001760: 54 20 4B 41 4D 20 44 45 52 20 52 55 45 43 4B 53 |T KAM DER RUECKS|
00001770: 50 52 55 4E 47 2E 00 81 1B 92 09 8D 31 30 30 30 |PRUNG.......1000|
00001780: 30 00 92 1B B0 09 8B 58 24 B2 22 4A 22 A7 32 34 |0......X$."J".24|
00001790: 30 30 00 AA 1B CE 09 49 B2 31 32 3A 8D 35 30 30 |00.....I.12:.500|
000017A0: 30 3A 8B 46 4C A7 32 32 30 30 00 C0 1B 28 0A 99 |0:.FL.2200...(..|
000017B0: 22 93 41 55 46 47 41 42 45 4E 3A 22 3A 99 55 24 |".AUFGABEN:":.U$|
000017C0: 00 EF 1B 32 0A 99 22 11 31 2E 20 53 43 48 52 45 |...2..".1. SCHRE|
000017D0: 49 42 45 4E 20 53 49 45 20 20 48 49 4E 54 45 52 |IBEN SIE HINTER|
000017E0: 20 44 41 53 20 4C 45 54 5A 54 45 20 50 47 4D 00 | DAS LETZTE PGM.|
000017F0: 1E 1C 3C 0A 99 22 11 20 20 20 45 49 4E 45 20 41 |..<..". EINE A|
00001800: 42 46 52 41 47 45 2C 20 20 57 45 4C 43 48 45 52 |BFRAGE, WELCHER|
00001810: 20 46 41 4C 4C 20 56 4F 52 4C 49 45 47 54 00 48 | FALL VORLIEGT.H|
00001820: 1C 46 0A 99 22 11 20 20 20 4D 49 54 20 45 4E 54 |.F..". MIT ENT|
00001830: 53 50 52 45 43 48 45 4E 44 45 52 20 56 45 52 5A |SPRECHENDER VERZ|
00001840: 57 45 49 47 55 4E 47 2E 00 78 1C 50 0A 99 22 11 |WEIGUNG..x.P..".|
00001850: 11 32 2E 20 57 41 53 20 50 41 53 53 49 45 52 54 |.2. WAS PASSIERT|
00001860: 2C 57 45 4E 4E 20 53 49 45 20 49 4D 20 4C 45 54 |,WENN SIE IM LET|
00001870: 5A 54 45 4E 20 50 47 4D 00 A7 1C 5A 0A 99 22 11 |ZTEN PGM...Z..".|
00001880: 20 20 20 44 49 45 20 20 44 52 49 54 54 45 20 55 | DIE DRITTE U|
00001890: 4E 44 20 20 56 49 45 52 54 45 20 20 5A 45 49 4C |ND VIERTE ZEIL|
000018A0: 45 20 20 57 45 47 2D 00 BA 1C 64 0A 99 22 11 20 |E WEG-...d..". |
000018B0: 20 20 4C 41 53 53 45 4E 20 3F 00 E9 1C 6E 0A 99 | LASSEN ?...n..|
000018C0: 22 11 33 2E 20 45 52 57 45 49 54 45 52 4E 20 53 |".3. ERWEITERN S|
000018D0: 49 45 20 44 41 53 20 50 47 4D 20 49 4D 20 45 52 |IE DAS PGM IM ER|
000018E0: 53 54 45 4E 20 42 45 49 2D 00 18 1D 78 0A 99 22 |STEN BEI-...x.."|
000018F0: 11 20 20 20 53 50 49 45 4C 20 44 45 52 41 52 54 |. SPIEL DERART|
00001900: 2C 20 20 44 41 53 53 20 41 4C 4C 45 20 4C 45 45 |, DASS ALLE LEE|
00001910: 52 5A 45 49 43 48 45 4E 00 37 1D 82 0A 99 22 11 |RZEICHEN.7....".|
00001920: 20 20 20 55 4E 54 45 52 44 52 55 45 43 4B 54 20 | UNTERDRUECKT |
00001930: 57 45 52 44 45 4E 2E 00 4F 1D 96 0A 49 B2 31 33 |WERDEN..O...I.13|
00001940: 3A 8D 35 30 30 30 3A 8B 46 4C A7 32 34 30 30 00 |:.5000:.FL.2400.|
00001950: 7E 1D FA 0A 99 22 93 44 49 45 20 4C 4F 45 53 55 |~....".DIE LOESU|
00001960: 4E 47 20 46 55 52 20 41 55 46 47 41 42 45 20 33 |NG FUR AUFGABE 3|
00001970: 20 46 49 4E 44 45 4E 20 53 49 45 20 49 4D 00 91 | FINDEN SIE IM..|
00001980: 1D 04 0B 99 22 11 52 41 4D 20 41 42 20 39 34 34 |....".RAM AB 944|
00001990: 2E 00 D7 1D 5E 0B 99 22 11 11 11 11 11 11 11 11 |....^.."........|
000019A0: 11 11 11 11 1D 1D 2D 20 53 45 49 54 45 20 31 34 |......- SEITE 14|
000019B0: 20 2D 20 20 3C 2B 3E 20 91 A4 A4 A4 A4 11 9D 9D | - <+> ........|
000019C0: 9D 9D 12 45 4E 44 45 92 20 3C 2D 3E 20 56 4F 4E |...ENDE. <-> VON|
000019D0: 20 56 4F 52 4E 45 22 00 E7 1D F4 0B 8D 35 30 32 | VORNE"......502|
000019E0: 30 3A 91 46 4C 89 30 00 ED 1D FE 0B 80 00 FF 1D |0:.FL.0.........|
000019F0: 88 13 8F 20 55 4D 42 4C 41 45 54 54 45 52 4E 00 |... UMBLAETTERN.|
00001A00: 49 1E 92 13 99 22 13 11 11 11 11 11 11 11 11 11 |I...."..........|
00001A10: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 20 |............... |
00001A20: 20 2D 20 53 45 49 54 45 22 3B 49 3B 22 2D 20 20 | - SEITE";I;"- |
00001A30: 3C 2B 3E 20 57 45 49 54 45 52 20 20 3C 2D 3E 20 |<+> WEITER <-> |
00001A40: 5A 55 52 55 45 43 4B 22 3B 00 5B 1E 9C 13 81 49 |ZURUECK";.[....I|
00001A50: B2 30 A4 31 31 3A A1 58 24 3A 82 00 6F 1E A6 13 |.0.11:.X$:..o...|
00001A60: A1 58 24 3A 8B 58 24 B2 22 22 A7 35 30 33 30 00 |.X$:.X$."".5030.|
00001A70: 82 1E B0 13 8B 58 24 B2 22 2B 22 A7 46 4C B2 30 |.....X$."+".FL.0|
00001A80: 3A 8E 00 95 1E BA 13 8B 58 24 B2 22 2D 22 A7 46 |:.......X$."-".F|
00001A90: 4C B2 31 3A 8E 00 9F 1E C4 13 89 35 30 33 30 00 |L.1:.......5030.|
00001AA0: C6 1E 10 27 99 22 11 4E 4F 43 48 4D 41 4C 20 28 |...'.".NOCHMAL (|
00001AB0: 4A 2F 4E 29 20 3F 22 3B 3A 81 49 B2 30 A4 31 31 |J/N) ?";:.I.0.11|
00001AC0: 3A A1 58 24 3A 82 00 D8 1E 1A 27 81 49 B2 30 A4 |:.X$:.....'.I.0.|
00001AD0: 31 31 3A A1 58 24 3A 82 00 ED 1E 24 27 A1 58 24 |11:.X$:....$'.X$|
00001AE0: 3A 8B 58 24 B2 22 22 A7 31 30 30 32 30 00 04 1F |:.X$."".10020...|
00001AF0: 2E 27 8B 58 24 B2 22 4E 22 A7 99 22 20 4E 45 49 |.'.X$."N".." NEI|
00001B00: 4E 22 3A 8E 00 17 1F 38 27 8B 58 24 B3 B1 22 4A |N":....8'.X$.."J|
00001B10: 22 A7 31 30 30 32 30 00 1D 1F 42 27 8E 00 00 00 |".10020...B'....|
....... ### SYNTAX-MAGAZIN #21.8.... ###
DEZEMBER 1981.B.... ###._.... ### COP
YRIGHT (C) 1981.Z.... ### BY ELMAR COMPA
NS...... ### CARL-SCHURZ-STR.3......
### 7550 RASTATT 1...... ###.O....594
68,12:......U$."EEEEEEEEEE":O$."........
.":I$."INPUT-ROUTINE":B$." BILDSCHIRM".'
.D.. BEISPIEL 1.^.E.. 162,0,32,207,255,1
57,0,128,232,201,13,208,245,96.O.L.. BEI
SPIEL 2...M.. 32,207,255,170,169,13,32,2
10,255,224,74,240,4,224,78,208,239,96.E.
R.. AUFGABE 3...S.. 162,0,32,207,255,201
,32,240,249,157,0,128,232,201,13,208,241
,96.N.H.."....";O$;O$;O$;O$:.".SYNTAX-LE
HRGANG 'MASCHINENSPRACHE' (11)...R.."...
.";O$;O$;O$:.".2.2. EINGABE UEBER DIE TA
STATUR......"..NACHDEM WIR IN DEN BEIDEN
LETZTEN LEHR-......".GAENGEN ETWAS UE
BER DIE AUSGABE VON......".DATEN AUF D
EM"B$" GELERNT HABEN,.<....".SEHEN WIR U
NS NUN DIE EINGABE VON DATEN.Z....".UEBE
R DIE TASTATUR AN......."..EINE SEHR EI
NFACHE LOESUNG BIETET DIE.......I$" DES
BETRIEBSSYSTEMS. SIE.U."..".HAT DIE EI
NSPRUNGADRESSE $FFCF....,..:.I.0.49:.X:.
912.I,X:....6.I.1:.5000:.FL.200.E...."..
....DIE INPUTROUTINE WIRD MIT 'JSR $FF
CF'":..28);U$.H...."AUFGERUFEN (DEZIMAL:
65487)......."..AB DEM EINSPRUNG IN DIE
SE ROUTINE WER-.G....".DEN VON DER TAST
ATUR ZEICHEN ANGENOMMEN......".UND AUF
DEM"B$" HINTEREINANDER...B..".AUSGEGEBE
N. DAS LAEUFT GENAUSO AB WIE.@.L..".BE
IM BASIC-BEFEHL 'INPUT'..V...I.2:.5000:.
FL.200.{.X..".DER RUECKSPRUNG AUS DER
"I$...]..".ERFOLGT BEI DRUECKEN DER TAS
TE RETURN..V.^..".IM AC STEHT DABEI DAS
ERSTE ZEICHEN....B.."..SPRINGT MAN DIE
ROUTINE DANN NOCHMALS.5.G..".AN, SO WIR
D KEIN INPUT AUSGELOEST, SON-.D.L..".DER
N ES ERFOLGT EIN SOFORTIGER RUECK-...V
..".SPRUNG MIT DEM ZWEITEN EINGEGEBE
NEN......".ZEICHEN IM AC. DIE "I$" WIR
D......".NUN IMMER WIEDER ANGESPRUNGEN.
JEDESMAL......".ERFOLGT SOFORT DER RUEC
KSPRUNG MIT DEM.7....".NAECHSTEN ZEICHEN
IM AC..M.P.I.3:.5000:.FL.400.|. ..".WEN
N AUF DIESE WEISE DAS LETZTE ZEICHEN...%
..".(ALSO DAS 'RETURN') ABGERUFEN WURDE,
BE-...*..".WIRKT EIN NOCHMALIGES ANSP
RINGEN DER..../..I$" WIEDER EINEN INPUT.
.(.4.."..EBENSO KANN MAN DAS ABRUFEN DE
R EINGE-.W.>..".GEBENEN ZEICHEN UNTERBRE
CHEN, INDEM MAN...H..".MIT DER PRINTROUT
INE EIN 'RETURN' AUS-...R..".GIBT..C.\.
."..DAS ERSCHEINT ANFANGS KOMPLIZIERT,
IST...F..".ES ABER NICHT. SEHEN WIR UNS
EIN BEI-...P..".SPIEL AN:.....I.4:.500
0:.FL.600./....".BEISPIEL:":.U$.U....".M
IT DER "I$" SOLL EINE FOLGE......".VON
ZEICHEN UEBER DIE TASTATUR EINGEGE-....
..".BEN WERDEN. DIE ZEICHEN SOLLEN NI
CHT......".SOFORT WEITERVERARBEITET SOND
ERN ZUERST......".ZWISCHENGESPEICHERT WE
RDEN. WIR WAEHLEN.@.$..".ALS ZWISCHENSPE
ICHER DIE SPEICHER $8000.H....".UND FOLG
ENDE. DA DORT DER"B$"-...8..".SPEICHER
LIEGT, SEHEN WIR DIREKT DEN...B..".Z
EITLICHEN ABLAUF..G.J.I.5:.5000:.FL.800.
.....".DAS PROGRAMM:......".. LDX #$00
ZAEHLER INITIALISIEREN.:.D..". ..JS
R $FFCF AUFRUF DER INPUTROUTINE.J.X..
" .... STA $8000,X NACH $8000+X SPEICHE
RN......" .... INX X=X+1......"
.... CMP #$0D (AC) = 'RETURN' ?....
.." ...._BNE $F5 NEIN: NAECHSTES ZE
ICHEN.....LEHRGANG 11 IN AC
HOLEN.5....". RTS JA: RUECKS
PRUNG.V...."...NUN EINE DEMONSTRATION:.M
.(.I.6:.5000:.FL.1000. .X.."..
";.Q....".
"......"................................
...........0...."GEBEN SIE NUN EINIGE ZE
ICHEN EIN. DABEI._....".STEHEN IHNEN AUC
H DIE CURSORSTEUERUNGEN... ..".'INST' UN
D 'DEL' ZUR VERFUEGUNG......."..."......
912:. BEISPIEL 1......W.0.999:..W....".
.............":.N7.1500...C.."DA DIE EIN
GABE IN ASCII,DIE AUSGABE JE-.-.H..".DOC
H IM"B$"CODE ERFOLGT, STIMMEN.\.M..".DIE
EINGEGEBENEN UND DIE AUSGEGEBENEN...R
..".ZEICHEN ALLERDINGS NICHT UEBEREIN.
DAS.B.W..".SOLL UNS HIER NICHT WEITER ST
OEREN.":N7.1:.1530.M....10000......X$."J
".1400.....I.7:.5000:.FL.1200...@..".BEA
CHTEN SIE BESONDERS FOLGENDES:.M.T..".1.
DIE AUSGABE ERFOLGT ERST, WENN DIE.{.
Y..". EINGABE DURCH 'RETURN' BEENDET I
ST....^..".2. DAS LETZTE UEBERGEBENE ZE
ICHEN IST.Q.C..". IMMER EIN 'RETURN'.
IM "B$...H..". ERSCHEINT ES ALS 'M
' STETS AM ENDE.*.R..". DER KETTE AUS
GEGEBENER ZEICHEN..Y.|..".3. DIE ANZAHL
DER ZEICHEN IST AUF 79.M....". BEGR
ENZT......."..BLAETTERN SIE ZURUECK UND
UEBERZEUGEN......".SIE SICH!.C...I.8:.50
00:.FL.1400......".OFT WERDEN DIE EINGEG
EBENEN ZEICHEN GAR.!....".NICHT ZWISCHEN
GESPEICHERT, SONDERN SO-.9....".FORT BE
ARBEITET..P.&.."..BEISPIEL:":.U$.~.0.."S
IE HABEN IN IHREM MASCHINENPROGRAMM..
.:..".EINE JA/NEIN-ABFRAGE UND WOLLEN NU
R EI-...D..".NEN BUCHSTABEN (NAEMLICH '
J' ODER 'N')...N..".UEBER DIE TASTATUR E
INGEBEN UND JE NACH.:.X..".EINGABE ZU VE
RSCHIEDENEN PROGRAMMTEILEN.I.B..".SPRING
EN.ANDERE BUCHSTABEN ALS J ODER N...L.."
.SOLLEN UNTERDRUECKT WERDEN....V.I.9:.50
00:.FL.1600...P..".HIER DAS PROGRAMM:...
U.."....JSR $FFCF ERSTES ZEICHEN EINL
ESEN...Z..".... TAX IN XR SCHI
EBEN.;....".... LDA #$0D (AC)='RETU
RN'.F....".... JSR $FFD2 ABBRUCH DES
INPUT......".... CPX #$4A IST ES E
IN 'J'?......"....._BEQ $04 JA: END
E......"....... CPX #$4E IST ES EIN
'N'?......"......._BNE $EF NEIN: VO
N VORNE.8.*.." .....RTS RUECKSP
RUNG MIT ZEICHEN.U.4..".
IM XR.M.>.I.10:.5000:.FL.1800......".DAS
PROGRAMM LIEST EIN WORT UEBER DIE.K..
..".TASTATUR EIN. DER ERSTE BUCHSTABE W
IRD......".AUF 'J' UND 'N' GEPRUEFT. L
IEGT EINER.)....".DIESER BEIDEN BUCHST
ABEN VOR, SO ER-.X.J..".FOLGT DER RUECK
SPRUNG MIT DEM ZEICHEN...T..".'J' (=$4
A) ODER 'N' (=$4E) IM XR. AN-......".D
ERNFALLS WIRD DIE EINGABE WIEDERHOLT....
..."..DEM PROGRAMM WUERDE NUN NOCH DIE
VER-......".ZWEIGUNG IN ABHAENGIGKEIT
VON DER EIN-.C....".GABE FOLGEN. DAS S
OLLTEN SIE SICH ALS.E....".UEBUNGSAUFGAB
E UEBERLEGEN..}...I.11:.5000:.FL.2000...
`..".NUN EINE DEMONSTRATION:":.U$;U$;"EE
E".Y.J..".PROBIEREN SIE INSBESONDERE,WAS
BEI FAL-...T..".SCHEN EINGABEN PASSIERT
! (Z.B.'RETURN'.6.~..".ODER ANDERE BUCH
STABEN ALS J UND N)....M.... 926:. BEISP
IEL 2.V...."...OK - JETZT KAM DER RUECKS
PRUNG.......10000......X$."J".2400...N.I
.12:.5000:.FL.2200...(..".AUFGABEN:":.U$
...2..".1. SCHREIBEN SIE HINTER DAS LET
ZTE PGM...<..". EINE ABFRAGE, WELCHER
FALL VORLIEGT.H.F..". MIT ENTSPRECHEN
DER VERZWEIGUNG..X.P.."..2. WAS PASSIERT
,WENN SIE IM LETZTEN PGM...Z..". DIE
DRITTE UND VIERTE ZEILE WEG-...D..".
LASSEN ?...N..".3. ERWEITERN SIE DAS P
GM IM ERSTEN BEI-...X..". SPIEL DERART
, DASS ALLE LEERZEICHEN.7....". UNTER
DRUECKT WERDEN..O...I.13:.5000:.FL.2400.
~....".DIE LOESUNG FUR AUFGABE 3 FINDEN
SIE IM......".RAM AB 944..W.^.."........
......- SEITE 14 - <+> ...........ENDE.
<-> VON VORNE"......5020:.FL.0.........
... UMBLAETTERN.I...."..................
....... - SEITE";I;"- <+> WEITER <->
ZURUECK";.[....I.0.11:.X$:..O....X$:.X$.
"".5030......X$."+".FL.0:.......X$."-".F
L.1:....D..5030.F..'.".NOCHMAL (J/N) ?";
:.I.0.11:.X$:..X..'.I.0.11:.X$:....$'.X$
:.X$."".10020....'.X$."N".." NEIN":....8
'.X$.."J".10020...B'....
> CLICK IMAGE PREVIEW FOR FULL MODAL