ASSEMBLER-10
FILE INFORMATION
FILENAME(S): ASSEMBLER-10
FILE TYPE(S): PRG
FILE SIZE: 6.1K
FIRST SEEN: 2025-12-01 01:07:45
APPEARS ON: 1 disk(s)
FILE HASH
a3e58326f3192be04bdf161a0fece616a9cf789225988cd01265b87ffbc5eeea
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| X ? | ASSEMBLER-10 | PRG | hedning, Kaevlinge | 5 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 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 30 00 38 |AX-MAGAZIN #20.8|
00000020: 08 01 00 8F 20 23 23 23 20 20 20 4E 4F 56 45 4D |.... ### NOVEM|
00000030: 42 45 52 20 31 39 38 31 00 42 08 02 00 8F 20 23 |BER 1981.B.... #|
00000040: 23 23 00 5F 08 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 08 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 08 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 08 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 08 07 00 8F 20 23 23 23 00 |ATT 1...... ###.|
000000C0: C5 08 08 00 9C 00 E8 08 0A 00 55 24 B2 22 C5 C5 |..........U$."..|
000000D0: C5 C5 C5 C5 C5 C5 C5 C5 22 3A 4F 24 B2 22 A4 A4 |........":O$."..|
000000E0: A4 A4 A4 A4 A4 A4 A4 22 00 F9 08 64 00 8F 20 42 |......."...d.. B|
000000F0: 45 49 53 50 49 45 4C 20 31 00 0E 09 65 00 83 20 |EISPIEL 1...e.. |
00000100: 31 36 32 2C 30 2C 31 38 39 2C 37 32 2C 33 00 27 |162,0,189,72,3.'|
00000110: 09 66 00 83 20 33 32 2C 32 31 30 2C 32 35 35 2C |.f.. 32,210,255,|
00000120: 32 33 32 2C 32 32 34 00 3F 09 67 00 83 20 31 39 |232,224.?.g.. 19|
00000130: 2C 32 30 38 2C 32 34 35 2C 39 36 2C 31 34 37 00 |,208,245,96,147.|
00000140: 54 09 68 00 83 20 38 33 2C 38 39 2C 37 38 2C 38 |T.h.. 83,89,78,8|
00000150: 34 2C 36 35 00 69 09 69 00 83 20 38 38 2C 33 32 |4,65.i.i.. 88,32|
00000160: 2C 37 33 2C 38 33 2C 38 34 00 7E 09 6A 00 83 20 |,73,83,84.~.j.. |
00000170: 33 32 2C 38 34 2C 37 39 2C 37 36 2C 37 36 00 8D |32,84,79,76,76..|
00000180: 09 6B 00 83 20 33 32 2C 33 33 2C 31 33 00 9E 09 |.k.. 32,33,13...|
00000190: 6C 00 8F 20 42 45 49 53 50 49 45 4C 20 32 00 B6 |l.. BEISPIEL 2..|
000001A0: 09 6D 00 83 20 31 36 32 2C 31 37 2C 31 36 39 2C |.m.. 162,17,169,|
000001B0: 31 39 37 2C 33 32 00 D0 09 6E 00 83 20 32 31 30 |197,32...n.. 210|
000001C0: 2C 32 35 35 2C 32 30 32 2C 32 30 38 2C 32 35 30 |,255,202,208,250|
000001D0: 00 D9 09 6F 00 83 20 39 36 00 EA 09 70 00 8F 20 |...o.. 96...p.. |
000001E0: 42 45 49 53 50 49 45 4C 20 33 00 03 0A 71 00 83 |BEISPIEL 3...q..|
000001F0: 20 31 36 39 2C 31 34 37 2C 33 32 2C 32 31 30 2C | 169,147,32,210,|
00000200: 32 35 35 00 1B 0A 72 00 83 20 31 36 32 2C 36 35 |255...r.. 162,65|
00000210: 2C 31 33 38 2C 33 32 2C 32 31 30 00 33 0A 73 00 |,138,32,210.3.s.|
00000220: 83 20 32 35 35 2C 31 36 39 2C 34 31 2C 33 32 2C |. 255,169,41,32,|
00000230: 32 31 30 00 4B 0A 74 00 83 20 32 35 35 2C 31 36 |210.K.t.. 255,16|
00000240: 39 2C 31 33 2C 33 32 2C 32 31 30 00 64 0A 75 00 |9,13,32,210.d.u.|
00000250: 83 20 32 35 35 2C 32 33 32 2C 32 32 34 2C 38 35 |. 255,232,224,85|
00000260: 2C 32 30 38 00 71 0A 76 00 83 20 32 33 37 2C 39 |,208.q.v.. 237,9|
00000270: 36 00 B4 0A C8 00 99 22 93 A4 A4 A4 22 3B 4F 24 |6......"....";O$|
00000280: 3B 4F 24 3B 4F 24 3B 4F 24 3A 99 22 12 53 59 4E |;O$;O$;O$:.".SYN|
00000290: 54 41 58 2D 4C 45 48 52 47 41 4E 47 20 27 4D 41 |TAX-LEHRGANG 'MA|
000002A0: 53 43 48 49 4E 45 4E 53 50 52 41 43 48 45 27 20 |SCHINENSPRACHE' |
000002B0: 28 31 30 29 00 E0 0A D2 00 99 22 A4 A4 A4 A4 22 |(10)......"...."|
000002C0: 3B 4F 24 3B 4F 24 3A 99 22 12 32 2E 31 2E 20 42 |;O$;O$:.".2.1. B|
000002D0: 49 4C 44 53 43 48 49 52 4D 41 55 53 47 41 42 45 |ILDSCHIRMAUSGABE|
000002E0: 00 0F 0B DC 00 99 22 11 32 2E 20 41 55 53 47 41 |......".2. AUSGA|
000002F0: 42 45 20 4D 49 54 20 44 45 52 20 50 52 49 4E 54 |BE MIT DER PRINT|
00000300: 52 4F 55 54 49 4E 45 20 44 45 53 20 42 45 2D 00 |ROUTINE DES BE-.|
00000310: 27 0B E6 00 99 22 11 20 20 20 54 52 49 45 42 53 |'....". TRIEBS|
00000320: 53 59 53 54 45 4D 53 00 57 0B F0 00 99 22 11 11 |SYSTEMS.W...."..|
00000330: 45 54 57 41 53 20 45 49 4E 46 41 43 48 45 52 20 |ETWAS EINFACHER |
00000340: 41 4C 53 20 44 49 45 20 44 49 52 45 4B 54 45 20 |ALS DIE DIREKTE |
00000350: 41 55 53 47 41 42 45 00 86 0B FA 00 99 22 11 41 |AUSGABE......".A|
00000360: 55 46 20 44 45 4D 20 42 49 4C 44 53 43 48 49 52 |UF DEM BILDSCHIR|
00000370: 4D 20 20 49 53 54 20 44 49 45 20 41 55 53 47 41 |M IST DIE AUSGA|
00000380: 42 45 20 4D 49 54 00 B3 0B 04 01 99 22 11 44 45 |BE MIT......".DE|
00000390: 52 20 50 52 49 4E 54 52 4F 55 54 49 4E 45 20 44 |R PRINTROUTINE D|
000003A0: 45 53 20 42 45 54 52 49 45 42 53 53 59 53 54 45 |ES BETRIEBSSYSTE|
000003B0: 4D 53 2E 00 E3 0B 0E 01 99 22 11 11 4D 41 4E 20 |MS......."..MAN |
000003C0: 45 52 4B 41 55 46 54 20 20 44 49 45 53 45 4E 20 |ERKAUFT DIESEN |
000003D0: 56 4F 52 54 45 49 4C 20 20 4A 45 44 4F 43 48 20 |VORTEIL JEDOCH |
000003E0: 4D 49 54 00 12 0C 18 01 99 22 11 45 49 4E 45 52 |MIT......".EINER|
000003F0: 20 20 47 45 52 49 4E 47 45 52 45 4E 20 47 45 53 | GERINGEREN GES|
00000400: 43 48 57 49 4E 44 49 47 4B 45 49 54 20 20 28 4E |CHWINDIGKEIT (N|
00000410: 55 52 00 34 0C 22 01 99 22 11 42 45 49 4D 20 38 |UR.4."..".BEIM 8|
00000420: 30 30 30 27 45 52 20 45 54 57 41 20 47 4C 45 49 |000'ER ETWA GLEI|
00000430: 43 48 29 2E 00 50 0C 2C 01 8C 3A 81 49 B2 30 A4 |CH)..P.,..:.I.0.|
00000440: 37 30 3A 87 58 3A 97 38 32 36 AA 49 2C 58 3A 82 |70:.X:.826.I,X:.|
00000450: 00 66 0C 36 01 49 B2 31 3A 8D 35 30 30 30 3A 8B |.f.6.I.1:.5000:.|
00000460: 46 4C A7 32 30 30 00 9F 0C 90 01 99 22 93 44 49 |FL.200......".DI|
00000470: 45 20 50 52 49 4E 54 52 4F 55 54 49 4E 45 20 57 |E PRINTROUTINE W|
00000480: 49 52 44 20 4D 49 54 20 20 27 4A 53 52 20 20 24 |IRD MIT 'JSR $|
00000490: 46 46 44 32 27 22 3A 99 A3 32 38 29 3B 55 24 00 |FFD2'":..28);U$.|
000004A0: CD 0C 9A 01 99 22 41 55 46 47 45 52 55 46 45 4E |....."AUFGERUFEN|
000004B0: 20 28 44 45 5A 49 4D 41 4C 3A 20 36 35 34 39 30 | (DEZIMAL: 65490|
000004C0: 29 2E 20 53 49 45 20 44 52 55 43 4B 54 00 FC 0C |). SIE DRUCKT...|
000004D0: A4 01 99 22 11 44 41 53 20 49 4D 20 41 43 20 53 |...".DAS IM AC S|
000004E0: 54 45 48 45 4E 44 45 20 5A 45 49 43 48 45 4E 20 |TEHENDE ZEICHEN |
000004F0: 20 44 4F 52 54 48 49 4E 2C 20 57 4F 00 2B 0D AE | DORTHIN, WO.+..|
00000500: 01 99 22 11 44 45 52 20 43 55 52 53 4F 52 20 53 |..".DER CURSOR S|
00000510: 49 43 48 20 42 45 46 49 4E 44 45 54 20 55 4E 44 |ICH BEFINDET UND|
00000520: 20 20 53 45 54 5A 54 20 44 49 45 00 5A 0D B8 01 | SETZT DIE.Z...|
00000530: 99 22 11 43 55 52 53 4F 52 41 44 52 45 53 53 45 |.".CURSORADRESSE|
00000540: 20 55 4D 20 31 20 57 45 49 54 45 52 2E 20 44 41 | UM 1 WEITER. DA|
00000550: 53 20 4E 41 45 43 48 53 54 45 00 89 0D C2 01 99 |S NAECHSTE......|
00000560: 22 11 5A 45 49 43 48 45 4E 20 57 49 52 44 20 44 |".ZEICHEN WIRD D|
00000570: 41 48 45 52 20 20 41 55 54 4F 4D 41 54 49 53 43 |AHER AUTOMATISC|
00000580: 48 20 20 48 49 4E 54 45 52 00 A5 0D CC 01 99 22 |H HINTER......"|
00000590: 11 44 41 53 20 20 45 52 53 54 45 20 47 45 44 52 |.DAS ERSTE GEDR|
000005A0: 55 43 4B 54 2E 00 D5 0D D6 01 99 22 11 11 44 49 |UCKT......."..DI|
000005B0: 45 20 43 55 52 53 4F 52 53 54 45 55 45 52 42 45 |E CURSORSTEUERBE|
000005C0: 46 45 48 4C 45 20 4B 4F 45 4E 4E 45 4E 20 57 49 |FEHLE KOENNEN WI|
000005D0: 45 20 47 45 2D 00 F8 0D E0 01 99 22 11 57 4F 45 |E GE-......".WOE|
000005E0: 48 4E 4C 49 43 48 20 56 45 52 57 45 4E 44 45 54 |HNLICH VERWENDET|
000005F0: 20 57 45 52 44 45 4E 2E 00 32 0E EA 01 99 22 11 | WERDEN..2....".|
00000600: 11 44 49 45 20 5A 45 49 43 48 45 4E 20 49 4D 20 |.DIE ZEICHEN IM |
00000610: 41 43 20 4D 55 45 53 53 45 4E 20 49 4D 20 41 53 |AC MUESSEN IM AS|
00000620: 43 49 49 2D 43 4F 44 45 22 3A 99 A3 32 39 29 3B |CII-CODE":..29);|
00000630: 55 24 00 3E 0E F4 01 99 22 53 45 49 4E 2E 00 54 |U$.>...."SEIN..T|
00000640: 0E 08 02 49 B2 32 3A 8D 35 30 30 30 3A 8B 46 4C |...I.2:.5000:.FL|
00000650: A7 32 30 30 00 6B 0E 58 02 99 22 93 42 45 49 53 |.200.k.X..".BEIS|
00000660: 50 49 45 4C 45 3A 22 3A 99 55 24 00 9E 0E 5D 02 |PIELE:":.U$...].|
00000670: 99 22 A4 11 9D 12 31 92 2E 20 42 45 53 4F 4E 44 |."....1.. BESOND|
00000680: 45 52 53 20 20 45 49 4E 46 41 43 48 20 49 53 54 |ERS EINFACH IST|
00000690: 20 20 44 41 53 20 4C 4F 45 53 43 48 45 4E 00 B7 | DAS LOESCHEN..|
000006A0: 0E 62 02 99 22 11 44 45 53 20 42 49 4C 44 53 43 |.b..".DES BILDSC|
000006B0: 48 49 52 4D 45 53 3A 00 DB 0E 67 02 99 22 11 20 |HIRMES:...g..". |
000006C0: 20 20 4C 44 41 20 23 24 39 33 20 20 20 20 20 20 | LDA #$93 |
000006D0: 27 43 4C 52 27 20 49 4E 20 41 43 00 F9 0E 6C 02 |'CLR' IN AC...l.|
000006E0: 99 22 11 20 20 20 4A 53 52 20 24 46 46 44 32 20 |.". JSR $FFD2 |
000006F0: 20 20 20 20 50 52 49 4E 54 00 23 0F 76 02 99 22 | PRINT.#.v.."|
00000700: 11 45 49 4E 46 41 43 48 45 52 20 47 45 48 54 27 |.EINFACHER GEHT'|
00000710: 53 20 44 4F 43 48 20 4B 41 55 4D 2C 20 4F 44 45 |S DOCH KAUM, ODE|
00000720: 52 20 3F 00 58 0F 80 02 99 22 11 11 A4 11 9D 12 |R ?.X...."......|
00000730: 32 92 2E 20 43 55 52 53 4F 52 20 20 49 4E 20 4C |2.. CURSOR IN L|
00000740: 49 4E 4B 45 20 4F 42 45 52 45 20 45 43 4B 45 20 |INKE OBERE ECKE |
00000750: 20 53 45 54 5A 45 4E 2C 00 7C 0F 8A 02 99 22 11 | SETZEN,.|....".|
00000760: 4F 48 4E 45 20 42 49 4C 44 53 43 48 49 52 4D 20 |OHNE BILDSCHIRM |
00000770: 5A 55 20 4C 4F 45 53 43 48 45 4E 3A 00 A1 0F 94 |ZU LOESCHEN:....|
00000780: 02 99 22 11 20 20 20 4C 44 41 20 23 24 31 33 20 |..". LDA #$13 |
00000790: 20 20 20 20 20 27 48 4F 4D 45 27 20 49 4E 20 41 | 'HOME' IN A|
000007A0: 43 00 BF 0F 9E 02 99 22 11 20 20 20 4A 53 52 20 |C......". JSR |
000007B0: 24 46 46 44 32 20 20 20 20 20 50 52 49 4E 54 00 |$FFD2 PRINT.|
000007C0: D5 0F D0 02 49 B2 33 3A 8D 35 30 30 30 3A 8B 46 |....I.3:.5000:.F|
000007D0: 4C A7 34 30 30 00 08 10 20 03 99 22 93 11 11 11 |L.400... .."....|
000007E0: A4 11 9D 12 33 92 2E 20 4D 49 54 20 27 52 45 54 |....3.. MIT 'RET|
000007F0: 55 52 4E 27 20 57 49 52 44 20 44 45 52 20 43 55 |URN' WIRD DER CU|
00000800: 52 53 4F 52 20 41 55 46 00 33 10 25 03 99 22 11 |RSOR AUF.3.%..".|
00000810: 44 45 4E 20 4E 41 45 43 48 53 54 45 4E 20 5A 45 |DEN NAECHSTEN ZE|
00000820: 49 4C 45 4E 41 4E 46 41 4E 47 20 47 45 53 45 54 |ILENANFANG GESET|
00000830: 5A 54 3A 00 5A 10 2A 03 99 22 11 20 20 20 4C 44 |ZT:.Z.*..". LD|
00000840: 41 20 23 24 30 44 20 20 20 20 20 20 27 52 45 54 |A #$0D 'RET|
00000850: 55 52 4E 27 20 49 4E 20 41 43 00 78 10 2F 03 99 |URN' IN AC.x./..|
00000860: 22 11 20 20 20 4A 53 52 20 24 46 46 44 32 20 20 |". JSR $FFD2 |
00000870: 20 20 20 50 52 49 4E 54 00 A7 10 34 03 99 22 11 | PRINT...4..".|
00000880: 53 54 41 54 54 20 27 52 45 54 55 52 4E 27 20 46 |STATT 'RETURN' F|
00000890: 49 4E 44 45 54 20 4D 41 4E 20 41 55 43 48 20 4F |INDET MAN AUCH O|
000008A0: 46 54 20 27 43 52 27 00 D6 10 3E 03 99 22 11 45 |FT 'CR'...>..".E|
000008B0: 53 20 42 45 44 45 55 54 45 54 20 20 27 43 41 52 |S BEDEUTET 'CAR|
000008C0: 20 52 45 54 55 52 4E 27 2C 20 20 41 4C 53 4F 20 | RETURN', ALSO |
000008D0: 53 4F 56 49 45 4C 00 F3 10 48 03 99 22 11 57 49 |SOVIEL...H..".WI|
000008E0: 45 20 27 57 41 47 45 4E 52 55 45 43 4B 4C 41 55 |E 'WAGENRUECKLAU|
000008F0: 46 27 2E 00 09 11 A2 03 49 B2 34 3A 8D 35 30 30 |F'......I.4:.500|
00000900: 30 3A 8B 46 4C A7 36 30 30 00 3D 11 E8 03 99 22 |0:.FL.600.=...."|
00000910: 93 11 11 11 11 11 53 4F 4C 4C 20 54 45 58 54 20 |......SOLL TEXT |
00000920: 20 41 55 53 47 45 44 52 55 43 4B 54 20 57 45 52 | AUSGEDRUCKT WER|
00000930: 44 45 4E 2C 20 20 53 4F 20 4C 45 47 54 00 6C 11 |DEN, SO LEGT.l.|
00000940: F2 03 99 22 11 4D 41 4E 20 57 49 45 44 45 52 20 |...".MAN WIEDER |
00000950: 57 49 45 20 42 45 49 20 44 45 52 20 44 49 52 45 |WIE BEI DER DIRE|
00000960: 4B 54 45 4E 20 41 55 53 47 41 42 45 00 98 11 FC |KTEN AUSGABE....|
00000970: 03 99 22 11 45 49 4E 45 20 4C 49 53 54 45 20 41 |..".EINE LISTE A|
00000980: 4E 2C 20 4E 55 52 20 44 49 45 53 4D 41 4C 20 49 |N, NUR DIESMAL I|
00000990: 4E 20 41 53 43 49 49 2E 00 C8 11 06 04 99 22 11 |N ASCII.......".|
000009A0: 11 44 49 45 20 43 55 52 53 4F 52 53 54 45 55 45 |.DIE CURSORSTEUE|
000009B0: 52 55 4E 47 45 4E 20 20 50 41 43 4B 54 20 4D 41 |RUNGEN PACKT MA|
000009C0: 4E 20 20 44 41 42 45 49 00 F3 11 10 04 99 22 11 |N DABEI......".|
000009D0: 4E 41 54 55 45 52 4C 49 43 48 20 47 4C 45 49 43 |NATUERLICH GLEIC|
000009E0: 48 20 4D 49 54 20 49 4E 20 44 49 45 20 4C 49 53 |H MIT IN DIE LIS|
000009F0: 54 45 2E 00 24 12 1A 04 99 22 11 11 11 45 49 4E |TE..$...."...EIN|
00000A00: 45 20 53 4F 4C 43 48 45 20 4C 49 53 54 45 20 4B |E SOLCHE LISTE K|
00000A10: 4F 45 4E 4E 54 45 20 42 45 49 53 50 49 45 4C 53 |OENNTE BEISPIELS|
00000A20: 57 45 49 2D 00 3B 12 24 04 99 22 11 53 45 20 53 |WEI-.;.$..".SE S|
00000A30: 4F 20 41 55 53 53 45 48 45 4E 3A 00 51 12 6A 04 |O AUSSEHEN:.Q.j.|
00000A40: 49 B2 35 3A 8D 35 30 30 30 3A 8B 46 4C A7 38 30 |I.5:.5000:.FL.80|
00000A50: 30 00 75 12 B0 04 99 22 93 20 20 20 20 20 41 44 |0.u....". AD|
00000A60: 52 45 53 53 45 20 49 4E 48 41 4C 54 20 5A 45 49 |RESSE INHALT ZEI|
00000A70: 43 48 45 4E 11 00 AE 12 BA 04 81 49 B2 30 A4 31 |CHEN.......I.0.1|
00000A80: 38 3A 99 22 20 20 20 20 20 20 4E 2B 22 CA 28 C4 |8:." N+".(.|
00000A90: 28 49 29 AA 22 20 22 2C 32 2C 32 29 22 20 20 20 |(I)." ",2,2)" |
00000AA0: 20 24 20 20 20 20 20 20 20 27 20 27 91 22 00 EC | $ ' '."..|
00000AB0: 12 CE 04 99 A3 31 35 29 CA 28 22 39 33 35 33 35 |.....15).("93535|
00000AC0: 39 34 45 35 34 34 31 35 38 32 30 34 39 35 33 35 |94E5441582049535|
00000AD0: 34 32 30 35 34 34 46 34 43 34 43 32 30 32 31 30 |420544F4C4C20210|
00000AE0: 44 22 2C 32 AC 49 AA 31 2C 32 29 3B 00 16 13 D8 |D",2.I.1,2);....|
00000AF0: 04 99 A3 32 33 29 CA 28 22 20 53 59 4E 54 41 58 |...23).(" SYNTAX|
00000B00: 20 49 53 54 20 54 4F 4C 4C 20 21 20 22 2C 49 AA | IST TOLL ! ",I.|
00000B10: 31 2C 31 29 3A 82 00 39 13 E2 04 99 A3 32 30 29 |1,1):..9.....20)|
00000B20: 22 91 27 52 45 54 55 52 4E 27 13 11 11 22 A3 32 |".'RETURN'...".2|
00000B30: 31 29 22 27 43 4C 52 27 22 00 50 13 28 05 49 B2 |1)"'CLR'".P.(.I.|
00000B40: 36 3A 8D 35 30 30 30 3A 8B 46 4C A7 31 30 30 30 |6:.5000:.FL.1000|
00000B50: 00 7F 13 78 05 99 22 93 56 4F 52 20 44 49 45 53 |...x..".VOR DIES|
00000B60: 45 20 54 45 58 54 54 41 42 45 4C 4C 45 20 53 43 |E TEXTTABELLE SC|
00000B70: 48 52 45 49 42 45 4E 20 57 49 52 20 45 49 4E 00 |HREIBEN WIR EIN.|
00000B80: AE 13 82 05 99 22 11 50 52 4F 47 52 41 4D 4D 2C |.....".PROGRAMM,|
00000B90: 20 20 44 41 53 20 49 4E 20 45 49 4E 45 52 20 53 | DAS IN EINER S|
00000BA0: 43 48 4C 45 49 46 45 20 20 4E 41 43 48 2D 00 DD |CHLEIFE NACH-..|
00000BB0: 13 8C 05 99 22 11 45 49 4E 41 4E 44 45 52 20 44 |....".EINANDER D|
00000BC0: 49 45 20 5A 45 49 43 48 45 4E 20 49 4E 20 44 45 |IE ZEICHEN IN DE|
00000BD0: 4E 20 41 43 20 4C 41 45 44 20 55 4E 44 00 0C 14 |N AC LAED UND...|
00000BE0: 96 05 99 22 11 44 49 45 53 45 20 4D 49 54 20 45 |...".DIESE MIT E|
00000BF0: 49 4E 45 4D 20 20 55 4E 54 45 52 50 52 4F 47 52 |INEM UNTERPROGR|
00000C00: 41 4D 4D 41 55 46 52 55 46 20 41 4E 00 2F 14 A0 |AMMAUFRUF AN./..|
00000C10: 05 99 22 11 44 49 45 20 50 52 49 4E 54 52 4F 55 |..".DIE PRINTROU|
00000C20: 54 49 4E 45 20 55 45 42 45 52 47 49 42 54 2E 00 |TINE UEBERGIBT..|
00000C30: 6C 14 AA 05 99 22 11 11 57 4F 48 4C 47 45 4D 45 |l...."..WOHLGEME|
00000C40: 52 4B 54 3A 20 57 4F 48 49 4E 20 44 45 52 20 54 |RKT: WOHIN DER T|
00000C50: 45 58 54 20 47 45 53 43 48 52 49 45 42 45 4E 22 |EXT GESCHRIEBEN"|
00000C60: 3A 99 A3 31 33 29 22 C5 C5 C5 C5 C5 00 A9 14 AF |:..13)".........|
00000C70: 05 99 22 57 49 52 44 2C 20 49 53 54 20 49 4E 20 |.."WIRD, IST IN |
00000C80: 44 45 52 20 54 41 42 45 4C 4C 45 20 44 55 52 43 |DER TABELLE DURC|
00000C90: 48 20 44 49 45 20 4D 49 54 2D 22 3A 99 A3 31 30 |H DIE MIT-":..10|
00000CA0: 29 55 24 22 C5 C5 C5 C5 22 00 D7 14 B4 05 99 22 |)U$"...."......"|
00000CB0: 45 49 4E 47 45 42 41 55 54 45 4E 20 43 55 52 53 |EINGEBAUTEN CURS|
00000CC0: 4F 52 53 54 45 55 45 52 55 4E 47 45 4E 20 53 43 |ORSTEUERUNGEN SC|
00000CD0: 48 4F 4E 20 47 45 2D 00 EE 14 BE 05 99 22 11 4E |HON GE-......".N|
00000CE0: 41 55 20 46 45 53 54 47 45 4C 45 47 54 21 00 09 |AU FESTGELEGT!..|
00000CF0: 15 C8 05 99 22 11 11 48 49 45 52 20 44 41 53 20 |...."..HIER DAS |
00000D00: 50 52 4F 47 52 41 4D 4D 3A 00 20 15 E6 05 49 B2 |PROGRAMM:. ...I.|
00000D10: 37 3A 8D 35 30 30 30 3A 8B 46 4C A7 31 32 30 30 |7:.5000:.FL.1200|
00000D20: 00 44 15 40 06 99 22 93 B0 C0 20 4C 44 58 20 23 |.D.@.."... LDX #|
00000D30: 24 30 30 20 20 20 20 5A 41 45 48 4C 45 52 20 41 |$00 ZAEHLER A|
00000D40: 55 46 20 30 00 6B 15 4A 06 99 22 DD 9D 11 DD 20 |UF 0.k.J..".... |
00000D50: 20 4C 44 41 20 4E 2C 58 20 20 20 20 20 5A 45 49 | LDA N,X ZEI|
00000D60: 43 48 45 4E 20 49 4E 20 20 41 43 00 89 15 54 06 |CHEN IN AC...T.|
00000D70: 99 22 DD 9D 11 DD 20 20 4A 53 52 20 24 46 46 44 |.".... JSR $FFD|
00000D80: 32 20 20 20 50 52 49 4E 54 00 A7 15 59 06 99 22 |2 PRINT...Y.."|
00000D90: DD 9D 11 DD 20 20 49 4E 58 20 20 20 20 20 20 20 |.... INX |
00000DA0: 20 20 58 3D 58 2B 31 00 C5 15 5E 06 99 22 DD 9D | X=X+1...^.."..|
00000DB0: 11 DD 20 20 43 50 58 20 23 24 31 33 20 20 20 20 |.. CPX #$13 |
00000DC0: 58 3D 31 39 3F 00 F5 15 63 06 99 22 DD 9D 11 AD |X=19?...c.."....|
00000DD0: 5F 20 42 4E 45 20 24 46 35 20 20 20 20 20 4E 45 |_ BNE $F5 NE|
00000DE0: 49 4E 3A 20 4E 41 45 43 48 53 54 45 53 20 5A 45 |IN: NAECHSTES ZE|
00000DF0: 49 43 48 45 4E 00 03 16 90 06 99 22 11 20 20 20 |ICHEN......". |
00000E00: 52 54 53 00 33 16 95 06 99 22 11 11 55 45 42 45 |RTS.3...."..UEBE|
00000E10: 52 5A 45 55 47 45 4E 20 53 49 45 20 53 49 43 48 |RZEUGEN SIE SICH|
00000E20: 2C 20 20 44 41 53 53 20 44 45 52 20 41 42 42 52 |, DASS DER ABBR|
00000E30: 55 43 48 00 61 16 9A 06 99 22 11 42 45 49 20 58 |UCH.a....".BEI X|
00000E40: 3D 24 31 33 20 28 44 45 5A 49 4D 41 4C 3D 31 39 |=$13 (DEZIMAL=19|
00000E50: 29 20 45 52 46 4F 4C 47 45 4E 20 4D 55 53 53 20 |) ERFOLGEN MUSS |
00000E60: 21 00 81 16 A4 06 99 22 11 11 4E 55 4E 20 45 49 |!......"..NUN EI|
00000E70: 4E 45 20 44 45 4D 4F 4E 53 54 52 41 54 49 4F 4E |NE DEMONSTRATION|
00000E80: 3A 00 98 16 AE 06 49 B2 38 3A 8D 35 30 30 30 3A |:.....I.8:.5000:|
00000E90: 8B 46 4C A7 31 34 30 30 00 AC 16 08 07 9E 38 32 |.FL.1400......82|
00000EA0: 36 3A 81 57 B2 30 A4 35 30 30 3A 82 00 DD 16 12 |6:.W.0.500:.....|
00000EB0: 07 99 22 11 11 11 53 43 48 4F 45 4E 20 2D 20 45 |.."...SCHOEN - E|
00000EC0: 53 20 46 55 4E 4B 54 49 4F 4E 49 45 52 54 2E 20 |S FUNKTIONIERT. |
00000ED0: 20 20 44 45 52 20 54 45 58 54 20 49 4E 00 0C 17 | DER TEXT IN...|
00000EE0: 1C 07 99 22 11 44 49 45 53 45 4D 20 42 45 49 53 |...".DIESEM BEIS|
00000EF0: 50 49 45 4C 20 49 53 54 20 4E 41 54 55 45 52 4C |PIEL IST NATUERL|
00000F00: 49 43 48 20 4E 55 52 20 4B 55 52 5A 00 3B 17 26 |ICH NUR KURZ.;.&|
00000F10: 07 99 22 11 41 42 45 52 20 20 45 52 20 4C 41 45 |..".ABER ER LAE|
00000F20: 53 53 54 20 53 49 43 48 20 50 52 49 4E 5A 49 50 |SST SICH PRINZIP|
00000F30: 49 45 4C 4C 20 42 45 4C 49 45 2D 00 6A 17 30 07 |IELL BELIE-.j.0.|
00000F40: 99 22 11 42 49 47 20 56 45 52 4C 41 45 4E 47 45 |.".BIG VERLAENGE|
00000F50: 52 4E 2E 20 20 20 44 49 45 20 5A 45 49 4C 45 20 |RN. DIE ZEILE |
00000F60: 27 43 50 58 20 23 24 31 33 27 00 94 17 3A 07 99 |'CPX #$13'...:..|
00000F70: 22 11 49 53 54 20 44 41 4E 4E 20 45 4E 54 53 50 |".IST DANN ENTSP|
00000F80: 52 45 43 48 45 4E 44 20 41 42 5A 55 41 45 4E 44 |RECHEND ABZUAEND|
00000F90: 45 52 4E 2E 00 C4 17 44 07 99 22 11 11 57 45 4E |ERN....D.."..WEN|
00000FA0: 4E 20 53 49 45 20 20 44 41 53 20 50 52 4F 47 52 |N SIE DAS PROGR|
00000FB0: 41 4D 4D 20 20 53 54 55 44 49 45 52 45 4E 20 20 |AMM STUDIEREN |
00000FC0: 4F 44 45 52 00 F3 17 4E 07 99 22 11 56 45 52 41 |ODER...N..".VERA|
00000FD0: 45 4E 44 45 52 4E 20 57 4F 4C 4C 45 4E 3A 20 20 |ENDERN WOLLEN: |
00000FE0: 20 45 53 20 53 54 45 48 54 20 41 42 20 38 32 36 | ES STEHT AB 826|
00000FF0: 20 49 4D 00 FF 17 58 07 99 22 11 52 41 4D 2E 00 | IM...X..".RAM..|
00001000: 16 18 76 07 49 B2 39 3A 8D 35 30 30 30 3A 8B 46 |..v.I.9:.5000:.F|
00001010: 4C A7 31 36 30 30 00 46 18 D0 07 99 22 93 11 45 |L.1600.F...."..E|
00001020: 49 4E 20 41 45 52 47 45 52 4E 49 53 20 20 42 45 |IN AERGERNIS BE|
00001030: 49 20 44 49 45 53 45 52 20 20 4D 45 54 48 4F 44 |I DIESER METHOD|
00001040: 45 20 53 49 4E 44 00 75 18 D5 07 99 22 11 4C 41 |E SIND.u....".LA|
00001050: 45 4E 47 45 52 45 20 46 4F 4C 47 45 4E 20 44 45 |ENGERE FOLGEN DE|
00001060: 53 53 45 4C 42 45 4E 20 5A 45 49 43 48 45 4E 53 |SSELBEN ZEICHENS|
00001070: 2C 20 57 49 45 00 A4 18 DA 07 99 22 11 5A 2E 42 |, WIE......".Z.B|
00001080: 2E 42 45 49 20 55 4E 54 45 52 53 54 52 45 49 43 |.BEI UNTERSTREIC|
00001090: 48 55 4E 47 45 4E 2C 20 45 49 4E 52 41 48 4D 45 |HUNGEN, EINRAHME|
000010A0: 4E 44 45 4E 00 D3 18 E4 07 99 22 11 4C 49 4E 49 |NDEN......".LINI|
000010B0: 45 4E 20 45 54 43 2E 20 20 48 49 45 52 20 4C 45 |EN ETC. HIER LE|
000010C0: 47 54 20 4D 41 4E 20 42 45 53 53 45 52 20 4B 45 |GT MAN BESSER KE|
000010D0: 49 4E 45 00 02 19 EE 07 99 22 11 54 41 42 45 4C |INE......".TABEL|
000010E0: 4C 45 20 41 4E 2C 20 20 53 4F 4E 44 45 52 4E 20 |LE AN, SONDERN |
000010F0: 4C 41 45 53 53 54 20 44 41 53 20 5A 45 49 43 48 |LAESST DAS ZEICH|
00001100: 45 4E 00 31 19 F8 07 99 22 11 56 4F 4E 20 45 49 |EN.1....".VON EI|
00001110: 4E 45 52 20 47 45 53 4F 4E 44 45 52 54 45 4E 20 |NER GESONDERTEN |
00001120: 53 43 48 4C 45 49 46 45 20 44 52 55 43 4B 45 4E |SCHLEIFE DRUCKEN|
00001130: 2E 00 62 19 02 08 99 22 11 11 11 57 4F 4C 4C 45 |..b...."...WOLLE|
00001140: 4E 20 57 49 52 20 20 42 45 49 53 50 49 45 4C 53 |N WIR BEISPIELS|
00001150: 57 45 49 53 45 20 44 45 4E 20 54 45 58 54 20 44 |WEISE DEN TEXT D|
00001160: 45 53 00 91 19 07 08 99 22 11 4C 45 54 5A 54 45 |ES......".LETZTE|
00001170: 4E 20 20 42 45 49 53 50 49 45 4C 53 20 20 55 4E |N BEISPIELS UN|
00001180: 54 45 52 53 54 52 45 49 43 48 45 4E 2C 20 20 53 |TERSTREICHEN, S|
00001190: 4F 00 C0 19 16 08 99 22 11 4D 55 45 53 53 45 4E |O......".MUESSEN|
000011A0: 20 57 49 52 20 31 37 20 4D 41 4C 20 44 41 53 20 | WIR 17 MAL DAS |
000011B0: 5A 45 49 43 48 45 4E 20 27 C5 27 20 41 55 53 2D |ZEICHEN '.' AUS-|
000011C0: 00 EE 19 20 08 99 22 11 44 52 55 43 4B 45 4E 2E |... ..".DRUCKEN.|
000011D0: 20 44 41 53 20 4D 41 43 48 54 20 46 4F 4C 47 45 | DAS MACHT FOLGE|
000011E0: 4E 44 45 53 20 50 52 4F 47 52 41 4D 4D 3A 00 06 |NDES PROGRAMM:..|
000011F0: 1A 3E 08 49 B2 31 30 3A 8D 35 30 30 30 3A 8B 46 |.>.I.10:.5000:.F|
00001200: 4C A7 31 38 30 30 00 2A 1A 98 08 99 22 93 20 20 |L.1800.*....". |
00001210: 20 4C 44 58 20 23 24 31 31 20 20 20 20 20 5A 41 | LDX #$11 ZA|
00001220: 45 48 4C 45 52 20 3D 20 31 37 00 4B 1A AC 08 99 |EHLER = 17.K....|
00001230: 22 11 20 20 20 4C 44 41 20 23 24 43 35 20 20 20 |". LDA #$C5 |
00001240: 20 20 27 C5 27 20 49 4E 20 41 43 00 68 1A B6 08 | '.' IN AC.h...|
00001250: 99 22 11 B0 C0 20 4A 53 52 20 24 46 46 44 32 20 |."... JSR $FFD2 |
00001260: 20 20 20 50 52 49 4E 54 00 87 1A C0 08 99 22 DD | PRINT......".|
00001270: 9D 11 DD 20 20 44 45 58 20 20 20 20 20 20 20 20 |... DEX |
00001280: 20 20 58 3D 58 2D 31 00 A5 1A CA 08 99 22 DD 9D | X=X-1......"..|
00001290: 11 AD 5F 20 42 4E 45 20 24 46 41 20 20 20 20 20 |.._ BNE $FA |
000012A0: 20 58 3D 30 3F 00 B3 1A D4 08 99 22 11 20 20 20 | X=0?......". |
000012B0: 52 54 53 00 E4 1A DE 08 99 22 11 11 11 44 49 45 |RTS......"...DIE|
000012C0: 53 45 53 20 50 52 4F 47 52 41 4D 4D 20 49 53 54 |SES PROGRAMM IST|
000012D0: 20 41 42 20 38 35 39 20 47 45 53 50 45 49 43 48 | AB 859 GESPEICH|
000012E0: 45 52 54 2E 00 13 1B E8 08 99 22 11 57 49 52 20 |ERT.......".WIR |
000012F0: 52 55 46 45 4E 20 20 4E 55 4E 20 5A 55 45 52 53 |RUFEN NUN ZUERS|
00001300: 54 20 20 44 45 4E 20 42 45 49 53 50 49 45 4C 54 |T DEN BEISPIELT|
00001310: 45 58 54 00 42 1B F2 08 99 22 11 4D 49 54 20 53 |EXT.B....".MIT S|
00001320: 59 53 20 28 38 32 36 29 20 55 4E 44 20 44 41 4E |YS (826) UND DAN|
00001330: 4E 20 44 49 45 20 4F 42 49 47 45 20 55 4E 54 45 |N DIE OBIGE UNTE|
00001340: 52 2D 00 6F 1B F7 08 99 22 11 53 54 52 45 49 43 |R-.o....".STREIC|
00001350: 48 55 4E 47 53 52 4F 55 54 49 4E 45 20 4D 49 54 |HUNGSROUTINE MIT|
00001360: 20 53 59 53 20 28 38 35 39 29 20 41 55 46 3A 00 | SYS (859) AUF:.|
00001370: 87 1B 06 09 49 B2 31 31 3A 8D 35 30 30 30 3A 8B |....I.11:.5000:.|
00001380: 46 4C A7 32 30 30 30 00 A0 1B 60 09 9E 38 32 36 |FL.2000...`..826|
00001390: 3A 9E 38 35 39 3A 81 57 B2 30 A4 39 39 39 3A 82 |:.859:.W.0.999:.|
000013A0: 00 AA 1B 6A 09 99 22 11 5E 22 00 D9 1B 74 09 99 |...j..".^"...t..|
000013B0: 22 11 5A 55 20 42 45 41 43 48 54 45 4E 20 49 53 |".ZU BEACHTEN IS|
000013C0: 54 2C 20 20 44 41 53 53 20 44 45 52 20 43 55 52 |T, DASS DER CUR|
000013D0: 53 4F 52 20 4A 45 54 5A 54 00 08 1C 7E 09 99 22 |SOR JETZT...~.."|
000013E0: 11 48 49 4E 54 45 52 20 44 45 4D 20 4C 45 54 5A |.HINTER DEM LETZ|
000013F0: 54 45 4E 20 27 C5 27 20 53 54 45 48 54 2C 20 41 |TEN '.' STEHT, A|
00001400: 4C 53 4F 20 44 4F 52 54 00 37 1C 88 09 99 22 11 |LSO DORT.7....".|
00001410: 57 4F 20 44 45 52 20 50 46 45 49 4C 20 20 48 49 |WO DER PFEIL HI|
00001420: 4E 5A 45 49 47 54 2E 20 20 20 20 44 45 52 20 4E |NZEIGT. DER N|
00001430: 41 45 43 48 53 54 45 00 66 1C 92 09 99 22 11 50 |AECHSTE.f....".P|
00001440: 52 49 4E 54 42 45 46 45 48 4C 20 4D 41 43 48 54 |RINTBEFEHL MACHT|
00001450: 20 44 41 48 45 52 20 41 4E 20 44 49 45 53 45 52 | DAHER AN DIESER|
00001460: 20 53 54 45 4C 2D 00 79 1C 9C 09 99 22 11 4C 45 | STEL-.y....".LE|
00001470: 20 57 45 49 54 45 52 20 21 00 A9 1C A6 09 99 22 | WEITER !......"|
00001480: 11 11 4E 4F 43 48 4D 41 4C 53 20 20 44 49 45 20 |..NOCHMALS DIE |
00001490: 56 4F 52 54 45 49 4C 45 20 20 44 49 45 53 45 52 |VORTEILE DIESER|
000014A0: 20 4D 45 54 48 4F 44 45 3A 00 EC 1C B0 09 99 22 | METHODE:......"|
000014B0: 11 41 53 43 49 49 2D 43 4F 44 45 2C 42 45 51 55 |.ASCII-CODE,BEQU|
000014C0: 45 4D 45 20 50 52 4F 47 52 41 4D 4D 49 45 52 55 |EME PROGRAMMIERU|
000014D0: 4E 47 2C 20 45 49 4E 2D 22 3A 99 55 24 55 24 55 |NG, EIN-":.U$U$U|
000014E0: 24 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 16 1D BA |$"........."....|
000014F0: 09 99 22 46 41 43 48 45 20 43 55 52 53 4F 52 53 |.."FACHE CURSORS|
00001500: 54 45 55 45 52 55 4E 47 2E 22 3A 99 55 24 55 24 |TEUERUNG.":.U$U$|
00001510: 22 C5 C5 C5 C5 22 00 2E 1D CE 09 49 B2 31 32 3A |"....".....I.12:|
00001520: 8D 35 30 30 30 3A 8B 46 4C A7 32 32 30 30 00 44 |.5000:.FL.2200.D|
00001530: 1D 28 0A 99 22 93 41 55 46 47 41 42 45 4E 3A 22 |.(..".AUFGABEN:"|
00001540: 3A 99 55 24 00 73 1D 3C 0A 99 22 11 31 2E 20 53 |:.U$.s.<..".1. S|
00001550: 43 48 52 45 49 42 45 4E 20 53 49 45 20 46 4F 4C |CHREIBEN SIE FOL|
00001560: 47 45 4E 44 45 4E 20 42 41 53 49 43 2D 42 45 46 |GENDEN BASIC-BEF|
00001570: 45 48 4C 00 91 1D 46 0A 99 22 11 41 4C 53 20 4D |EHL...F..".ALS M|
00001580: 41 53 43 48 49 4E 45 4E 50 52 4F 47 52 41 4D 4D |ASCHINENPROGRAMM|
00001590: 3A 00 CD 1D 50 0A 41 24 B2 C7 28 33 34 29 3A 99 |:...P.A$..(34):.|
000015A0: 22 11 27 50 52 49 4E 54 22 41 24 22 93 22 41 24 |".'PRINT"A$"."A$|
000015B0: 22 3B 54 41 42 28 31 30 29 3B 22 41 24 22 41 55 |";TAB(10);"A$"AU|
000015C0: 46 47 41 42 45 20 31 22 41 24 22 27 22 00 E7 1D |FGABE 1"A$"'"...|
000015D0: 64 0A 99 22 11 11 32 2E 20 45 42 45 4E 53 4F 20 |d.."..2. EBENSO |
000015E0: 44 49 45 53 45 4E 3A 00 1A 1E 6E 0A 99 22 11 27 |DIESEN:...n..".'|
000015F0: 50 52 49 4E 54 22 41 24 22 93 22 41 24 22 3B 53 |PRINT"A$"."A$";S|
00001600: 50 43 28 31 30 29 3B 22 41 24 22 41 55 46 47 41 |PC(10);"A$"AUFGA|
00001610: 42 45 20 31 22 41 24 22 27 22 00 4A 1E 82 0A 99 |BE 1"A$"'".J....|
00001620: 22 11 11 33 2E 20 53 43 48 52 45 49 42 45 4E 20 |"..3. SCHREIBEN |
00001630: 53 49 45 20 45 49 4E 20 50 47 4D 2C 44 41 53 20 |SIE EIN PGM,DAS |
00001640: 41 4E 20 44 45 4E 20 41 4E 2D 00 79 1E 8C 0A 99 |AN DEN AN-.y....|
00001650: 22 11 46 41 4E 47 20 44 45 52 20 45 52 53 54 45 |".FANG DER ERSTE|
00001660: 4E 20 5A 45 49 4C 45 20 27 41 29 27 20 53 43 48 |N ZEILE 'A)' SCH|
00001670: 52 45 49 42 54 2C 20 41 4E 00 A8 1E 91 0A 99 22 |REIBT, AN......"|
00001680: 11 44 45 4E 20 44 45 52 20 5A 57 45 49 54 45 4E |.DEN DER ZWEITEN|
00001690: 20 27 42 29 27 2C 20 45 54 43 20 42 49 53 20 5A | 'B)', ETC BIS Z|
000016A0: 45 49 4C 45 20 32 30 2E 00 C0 1E 96 0A 49 B2 31 |EILE 20......I.1|
000016B0: 33 3A 8D 35 30 30 30 3A 8B 46 4C A7 32 34 30 30 |3:.5000:.FL.2400|
000016C0: 00 D4 1E F0 0A 9E 38 37 30 3A 81 57 B2 30 A4 35 |......870:.W.0.5|
000016D0: 30 30 3A 82 00 0A 1F FA 0A 99 22 13 11 11 11 11 |00:.......".....|
000016E0: 11 11 11 1D 1D 1D 45 49 4E 45 20 45 54 57 41 53 |......EINE ETWAS|
000016F0: 20 41 55 53 47 45 46 41 4C 4C 45 4E 45 20 4C 4F | AUSGEFALLENE LO|
00001700: 45 53 55 4E 47 20 46 55 45 52 00 38 1F 04 0B 99 |ESUNG FUER.8....|
00001710: 22 11 1D 1D 1D 41 55 46 47 41 42 45 20 33 20 46 |"....AUFGABE 3 F|
00001720: 49 4E 44 45 4E 20 53 49 45 20 41 42 20 38 37 30 |INDEN SIE AB 870|
00001730: 20 49 4D 20 52 41 4D 2E 00 7E 1F 5E 0B 99 22 11 | IM RAM..~.^..".|
00001740: 11 11 11 11 11 11 11 11 11 11 11 1D 1D 2D 20 53 |.............- S|
00001750: 45 49 54 45 20 31 34 20 2D 20 20 3C 2B 3E 20 91 |EITE 14 - <+> .|
00001760: A4 A4 A4 A4 11 9D 9D 9D 9D 12 45 4E 44 45 92 20 |..........ENDE. |
00001770: 3C 2D 3E 20 56 4F 4E 20 56 4F 52 4E 45 22 00 8E |<-> VON VORNE"..|
00001780: 1F F4 0B 8D 35 30 32 30 3A 91 46 4C 89 30 00 9B |....5020:.FL.0..|
00001790: 1F 08 0C 9E 38 37 30 3A 80 3A 8A 00 AD 1F 88 13 |....870:.:......|
000017A0: 8F 20 55 4D 42 4C 41 45 54 54 45 52 4E 00 F7 1F |. UMBLAETTERN...|
000017B0: 92 13 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |..."............|
000017C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 2D |............. -|
000017D0: 20 53 45 49 54 45 22 3B 49 3B 22 2D 20 20 3C 2B | SEITE";I;"- <+|
000017E0: 3E 20 57 45 49 54 45 52 20 20 3C 2D 3E 20 5A 55 |> WEITER <-> ZU|
000017F0: 52 55 45 43 4B 22 3B 00 09 20 9C 13 81 49 B2 30 |RUECK";.. ...I.0|
00001800: A4 31 31 3A A1 58 24 3A 82 00 1D 20 A6 13 A1 58 |.11:.X$:... ...X|
00001810: 24 3A 8B 58 24 B2 22 22 A7 35 30 33 30 00 30 20 |$:.X$."".5030.0 |
00001820: B0 13 8B 58 24 B2 22 2B 22 A7 46 4C B2 30 3A 8E |...X$."+".FL.0:.|
00001830: 00 43 20 BA 13 8B 58 24 B2 22 2D 22 A7 46 4C B2 |.C ...X$."-".FL.|
00001840: 31 3A 8E 00 4D 20 C4 13 89 35 30 33 30 00 00 00 |1:..M ...5030...|
00001850: 4E 57 41 52 FF |NWAR. |
....... ### SYNTAX-MAGAZIN #20.8.... ###
NOVEMBER 1981.B.... ###._.... ### COP
YRIGHT (C) 1981.Z.... ### BY ELMAR COMPA
NS...... ### CARL-SCHURZ-STR.3......
### 7550 RASTATT 1...... ###.E.......
..U$."EEEEEEEEEE":O$."........."...D.. B
EISPIEL 1...E.. 162,0,189,72,3.'.F.. 32,
210,255,232,224.?.G.. 19,208,245,96,147.
T.H.. 83,89,78,84,65.I.I.. 88,32,73,83,8
4.~.J.. 32,84,79,76,76...K.. 32,33,13...
L.. BEISPIEL 2...M.. 162,17,169,197,32.P
.N.. 210,255,202,208,250.Y.O.. 96...P..
BEISPIEL 3...Q.. 169,147,32,210,255...R.
. 162,65,138,32,210.3.S.. 255,169,41,32,
210.K.T.. 255,169,13,32,210.D.U.. 255,23
2,224,85,208.Q.V.. 237,96...H.."....";O$
;O$;O$;O$:.".SYNTAX-LEHRGANG 'MASCHINENS
PRACHE' (10)...R.."....";O$;O$:.".2.1. B
ILDSCHIRMAUSGABE......".2. AUSGABE MIT D
ER PRINTROUTINE DES BE-.'....". TRIEBS
SYSTEMS.W...."..ETWAS EINFACHER ALS DIE
DIREKTE AUSGABE......".AUF DEM BILDSCHIR
M IST DIE AUSGABE MIT......".DER PRINTR
OUTINE DES BETRIEBSSYSTEMS......."..MAN
ERKAUFT DIESEN VORTEIL JEDOCH MIT.....
.".EINER GERINGEREN GESCHWINDIGKEIT (N
UR.4."..".BEIM 8000'ER ETWA GLEICH)..P.,
..:.I.0.70:.X:.826.I,X:..F.6.I.1:.5000:.
FL.200......".DIE PRINTROUTINE WIRD MIT
'JSR $FFD2'":..28);U$.M...."AUFGERUFEN
(DEZIMAL: 65490). SIE DRUCKT......".DAS
IM AC STEHENDE ZEICHEN DORTHIN, WO.+..
..".DER CURSOR SICH BEFINDET UND SETZT
DIE.Z....".CURSORADRESSE UM 1 WEITER. DA
S NAECHSTE...B..".ZEICHEN WIRD DAHER AU
TOMATISCH HINTER...L..".DAS ERSTE GEDR
UCKT..U.V.."..DIE CURSORSTEUERBEFEHLE KO
ENNEN WIE GE-......".WOEHNLICH VERWENDET
WERDEN..2...."..DIE ZEICHEN IM AC MUESS
EN IM ASCII-CODE":..29);U$.>...."SEIN..T
...I.2:.5000:.FL.200.K.X..".BEISPIELE:":
.U$...].."....1.. BESONDERS EINFACH IST
DAS LOESCHEN...B..".DES BILDSCHIRMES:.
..G..". LDA #$93 'CLR' IN AC...L.
.". JSR $FFD2 PRINT.#.V..".EINFACH
ER GEHT'S DOCH KAUM, ODER ?.X...."......
2.. CURSOR IN LINKE OBERE ECKE SETZEN,
.|....".OHNE BILDSCHIRM ZU LOESCHEN:....
..". LDA #$13 'HOME' IN AC......"
. JSR $FFD2 PRINT.U.P.I.3:.5000:.F
L.400... .."........3.. MIT 'RETURN' WIR
D DER CURSOR AUF.3.%..".DEN NAECHSTEN ZE
ILENANFANG GESETZT:.Z.*..". LDA #$0D
'RETURN' IN AC.X./..". JSR $FFD2
PRINT...4..".STATT 'RETURN' FINDET MA
N AUCH OFT 'CR'.V.>..".ES BEDEUTET 'CAR
RETURN', ALSO SOVIEL...H..".WIE 'WAGEN
RUECKLAUF'......I.4:.5000:.FL.600.=...."
......SOLL TEXT AUSGEDRUCKT WERDEN, SO
LEGT.L....".MAN WIEDER WIE BEI DER DIRE
KTEN AUSGABE......".EINE LISTE AN, NUR D
IESMAL IN ASCII..H...."..DIE CURSORSTEUE
RUNGEN PACKT MAN DABEI......".NATUERLI
CH GLEICH MIT IN DIE LISTE..$...."...EIN
E SOLCHE LISTE KOENNTE BEISPIELSWEI-.;.$
..".SE SO AUSSEHEN:.Q.J.I.5:.5000:.FL.80
0.U....". ADRESSE INHALT ZEICHEN....
...I.0.18:." N+"J(D(I)." ",2,2)"
$ ' '."...N...15)J("9353594E54415
82049535420544F4C4C20210D",2.I.1,2);...X
...23)J(" SYNTAX IST TOLL ! ",I.1,1):..9
.....20)".'RETURN'...".21)"'CLR'".P.(.I.
6:.5000:.FL.1000..X..".VOR DIESE TEXTTA
BELLE SCHREIBEN WIR EIN......".PROGRAMM,
DAS IN EINER SCHLEIFE NACH-......".EI
NANDER DIE ZEICHEN IN DEN AC LAED UND...
...".DIESE MIT EINEM UNTERPROGRAMMAUFRU
F AN./. ..".DIE PRINTROUTINE UEBERGIBT..
L...."..WOHLGEMERKT: WOHIN DER TEXT GESC
HRIEBEN":..13)"EEEEE......"WIRD, IST IN
DER TABELLE DURCH DIE MIT-":..10)U$"EEEE
".W...."EINGEBAUTEN CURSORSTEUERUNGEN SC
HON GE-......".NAU FESTGELEGT!...H.."..H
IER DAS PROGRAMM:. ...I.7:.5000:.FL.1200
.D.@.."... LDX #$00 ZAEHLER AUF 0.K.J
..".... LDA N,X ZEICHEN IN AC...T.
.".... JSR $FFD2 PRINT...Y..".... IN
X X=X+1.E.^..".... CPX #$13
X=19?...C.."...._ BNE $F5 NEIN: NAEC
HSTES ZEICHEN......". RTS.3...."..UEBE
RZEUGEN SIE SICH, DASS DER ABBRUCH.A...
.".BEI X=$13 (DEZIMAL=19) ERFOLGEN MUSS
!......"..NUN EINE DEMONSTRATION:.....I.
8:.5000:.FL.1400......826:.W.0.500:.....
.."...SCHOEN - ES FUNKTIONIERT. DER TE
XT IN......".DIESEM BEISPIEL IST NATUERL
ICH NUR KURZ.;.&..".ABER ER LAESST SICH
PRINZIPIELL BELIE-.J.0..".BIG VERLAENGE
RN. DIE ZEILE 'CPX #$13'...:..".IST DA
NN ENTSPRECHEND ABZUAENDERN..D.D.."..WEN
N SIE DAS PROGRAMM STUDIEREN ODER...N
..".VERAENDERN WOLLEN: ES STEHT AB 826
IM...X..".RAM....V.I.9:.5000:.FL.1600.F
.P.."..EIN AERGERNIS BEI DIESER METHOD
E SIND.U.U..".LAENGERE FOLGEN DESSELBEN
ZEICHENS, WIE...Z..".Z.B.BEI UNTERSTREIC
HUNGEN, EINRAHMENDEN.S....".LINIEN ETC.
HIER LEGT MAN BESSER KEINE......".TABEL
LE AN, SONDERN LAESST DAS ZEICHEN.1....
".VON EINER GESONDERTEN SCHLEIFE DRUCKEN
..B...."...WOLLEN WIR BEISPIELSWEISE DE
N TEXT DES......".LETZTEN BEISPIELS UN
TERSTREICHEN, SO......".MUESSEN WIR 17
MAL DAS ZEICHEN 'E' AUS-... ..".DRUCKEN.
DAS MACHT FOLGENDES PROGRAMM:...>.I.10:
.5000:.FL.1800.*....". LDX #$11 ZA
EHLER = 17.K....". LDA #$C5 'E' IN
AC.H...."... JSR $FFD2 PRINT......".
... DEX X=X-1...J.."...._ BNE
$FA X=0?...T..". RTS......"...DIE
SES PROGRAMM IST AB 859 GESPEICHERT.....
..".WIR RUFEN NUN ZUERST DEN BEISPIELT
EXT.B....".MIT SYS (826) UND DANN DIE OB
IGE UNTER-.O....".STREICHUNGSROUTINE MIT
SYS (859) AUF:.....I.11:.5000:.FL.2000.
.`..826:.859:.W.0.999:....J..".^".Y.T..
".ZU BEACHTEN IST, DASS DER CURSOR JETZ
T...~..".HINTER DEM LETZTEN 'E' STEHT, A
LSO DORT.7....".WO DER PFEIL HINZEIGT.
DER NAECHSTE.F....".PRINTBEFEHL MACHT
DAHER AN DIESER STEL-.Y....".LE WEITER
!......"..NOCHMALS DIE VORTEILE DIESER
METHODE:......".ASCII-CODE,BEQUEME PROG
RAMMIERUNG, EIN-":.U$U$U$"EEEEEEEEE"....
.."FACHE CURSORSTEUERUNG.":.U$U$"EEEE"..
.N.I.12:.5000:.FL.2200.D.(..".AUFGABEN:"
:.U$.S.<..".1. SCHREIBEN SIE FOLGENDEN B
ASIC-BEFEHL...F..".ALS MASCHINENPROGRAMM
:.M.P.A$.G(34):.".'PRINT"A$"."A$";TAB(10
);"A$"AUFGABE 1"A$"'"...D.."..2. EBENSO
DIESEN:...N..".'PRINT"A$"."A$";SPC(10);"
A$"AUFGABE 1"A$"'".J...."..3. SCHREIBEN
SIE EIN PGM,DAS AN DEN AN-.Y....".FANG D
ER ERSTEN ZEILE 'A)' SCHREIBT, AN......"
.DEN DER ZWEITEN 'B)', ETC BIS ZEILE 20.
.....I.13:.5000:.FL.2400.T....870:.W.0.5
00:......."...........EINE ETWAS AUSGEFA
LLENE LOESUNG FUER.8...."....AUFGABE 3 F
INDEN SIE AB 870 IM RAM..~.^..".........
.....- SEITE 14 - <+> ...........ENDE.
<-> VON VORNE"......5020:.FL.0......870:
.:....... UMBLAETTERN......"............
............. - SEITE";I;"- <+> WEITER
<-> ZURUECK";.. ...I.0.11:.X$:... ...X
$:.X$."".5030.0 ...X$."+".FL.0:..C ...X$
."-".FL.1:..M D..5030...NWAR.
> CLICK IMAGE PREVIEW FOR FULL MODAL