LEKTION 6
FILE INFORMATION
FILENAME(S): LEKTION 6
FILE TYPE(S): PRG
FILE SIZE: 8K
FIRST SEEN: 2025-11-30 01:08:15
APPEARS ON: 1 disk(s)
FILE HASH
16dce36e921b5a21d0da24abcfcd73a788102106138eec7237f3d019a3ce7af2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MULTISOFT | LEKTION 6 | PRG | Treasure Chest - Wolfgang Rauprich | 21 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 01 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..(....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 02 00 8F 2A 2D |********.O....*-|
00000030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 4C 45 4B 54 49 4F 4E |---------LEKTION|
00000040: 2D 36 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A 00 |-6------------*.|
00000050: 76 08 03 00 8F 2A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |v....*----------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000070: 2D 2D 2D 2D 2D 2A 00 9D 08 04 00 8F 2A 2D 2D 2D |-----*......*---|
00000080: 2D 28 57 29 2D 42 59 2D 41 52 4E 4F 2D 46 52 45 |-(W)-BY-ARNO-FRE|
00000090: 49 53 49 4E 47 45 52 2D 2D 2D 2D 2D 2A 00 C4 08 |ISINGER-----*...|
000000A0: 05 00 8F 2A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...*------------|
000000B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000C0: 2D 2D 2D 2A 00 EB 08 06 00 8F 2A 2D 2D 2D 2D 2D |---*......*-----|
000000D0: 2D 2D 2D 54 45 41 43 48 4D 41 53 54 45 52 2D 2D |---TEACHMASTER--|
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A 00 12 09 07 00 |----------*.....|
000000F0: 8F 2A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.*--------------|
00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000110: 2D 2A 00 39 09 08 00 8F 2A 2A 2A 2A 2A 2A 2A 2A |-*.9....********|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 6E 09 0A 00 97 20 |*********.n.... |
00000140: 35 33 32 38 30 20 2C 20 31 31 20 3A 20 97 20 35 |53280 , 11 : . 5|
00000150: 33 32 38 31 20 2C 20 31 31 20 3A 20 99 20 22 9B |3281 , 11 : . ".|
00000160: 22 20 3A 20 97 20 32 30 35 30 20 2C 20 31 00 A2 |" : . 2050 , 1..|
00000170: 09 0F 00 9E 20 34 32 32 39 31 20 3A 20 97 20 34 |.... 42291 : . 4|
00000180: 36 20 2C 20 C2 28 33 35 29 20 3A 20 97 20 34 35 |6 , .(35) : . 45|
00000190: 20 2C 20 C2 20 28 37 38 31 29 20 AA 20 32 20 3A | , . (781) . 2 :|
000001A0: 20 9C 00 C6 09 14 00 99 22 93 11 11 11 11 11 11 | .......".......|
000001B0: 11 11 11 11 22 A3 31 35 29 22 54 45 41 43 48 4D |....".15)"TEACHM|
000001C0: 41 53 54 45 52 22 00 EB 09 1E 00 99 22 11 22 A3 |ASTER"......".".|
000001D0: 30 39 29 22 28 57 29 20 42 59 20 41 52 4E 4F 20 |09)"(W) BY ARNO |
000001E0: 46 52 45 49 53 49 4E 47 45 52 22 00 0E 0A 28 00 |FREISINGER"...(.|
000001F0: 99 22 11 22 A3 31 30 29 22 46 4F 52 20 53 2B 53 |.".".10)"FOR S+S|
00000200: 20 53 4F 46 54 20 49 4E 20 31 39 38 37 22 00 25 | SOFT IN 1987".%|
00000210: 0A 32 00 81 20 49 20 B2 20 31 20 A4 20 32 30 30 |.2.. I . 1 . 200|
00000220: 30 20 3A 20 82 00 49 0A 3C 00 99 22 93 11 11 11 |0 : ..I.<.."....|
00000230: 11 11 11 11 11 11 11 11 11 22 A3 31 35 29 22 4C |.........".15)"L|
00000240: 45 4B 54 49 4F 4E 20 36 22 00 60 0A 46 00 81 20 |EKTION 6".`.F.. |
00000250: 49 20 B2 20 31 20 A4 20 31 30 30 30 20 3A 20 82 |I . 1 . 1000 : .|
00000260: 00 77 0A 50 00 A1 20 41 24 20 3A 20 A1 20 41 24 |.w.P.. A$ : . A$|
00000270: 20 3A 20 A1 20 41 24 00 9D 0A 64 00 8F 2A 2A 2A | : . A$...d..***|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C3 0A |*************...|
000002A0: 6E 00 8F 2A 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 53 45 |n..*--------- SE|
000002B0: 49 54 45 20 31 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |ITE 1 ----------|
000002C0: 2D 2D 2A 00 E9 0A 78 00 8F 2A 2A 2A 2A 2A 2A 2A |--*...x..*******|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 17 0B 82 00 99 22 |*********......"|
000002F0: 93 49 4E 20 44 49 45 53 45 52 20 4C 45 4B 54 49 |.IN DIESER LEKTI|
00000300: 4F 4E 20 57 4F 4C 4C 45 4E 20 57 49 52 20 45 49 |ON WOLLEN WIR EI|
00000310: 4E 20 50 41 41 52 22 00 3A 0B 8C 00 99 22 11 4E |N PAAR".:....".N|
00000320: 45 55 45 20 42 45 46 45 48 4C 45 20 4B 45 4E 4E |EUE BEFEHLE KENN|
00000330: 45 4E 4C 45 52 4E 45 4E 2E 22 00 66 0B 96 00 99 |ENLERNEN.".f....|
00000340: 22 11 44 45 52 20 45 52 53 54 45 20 42 45 46 45 |".DER ERSTE BEFE|
00000350: 48 4C 20 49 4E 20 44 49 45 53 45 52 20 4C 45 4B |HL IN DIESER LEK|
00000360: 54 49 4F 4E 20 22 00 95 0B A0 00 99 22 11 49 53 |TION "......".IS|
00000370: 54 20 12 4A 4D 50 92 2E 20 45 52 20 49 53 54 20 |T .JMP.. ER IST |
00000380: 56 45 52 47 4C 45 49 43 48 42 41 52 20 4D 49 54 |VERGLEICHBAR MIT|
00000390: 20 44 45 4D 22 00 C5 0B AA 00 99 22 11 42 45 46 | DEM"......".BEF|
000003A0: 45 48 4C 20 47 4F 54 4F 2E 20 44 45 52 20 4A 4D |EHL GOTO. DER JM|
000003B0: 50 2D 42 45 46 45 48 4C 20 49 53 54 20 33 20 42 |P-BEFEHL IST 3 B|
000003C0: 59 54 45 53 22 00 F4 0B B4 00 99 22 11 4C 41 4E |YTES"......".LAN|
000003D0: 47 2E 20 45 52 20 4C 41 55 54 45 54 20 4B 4F 52 |G. ER LAUTET KOR|
000003E0: 52 45 4B 54 20 4A 4D 50 20 28 41 44 52 45 53 53 |REKT JMP (ADRESS|
000003F0: 45 29 2E 22 00 22 0C BE 00 99 22 11 44 45 52 20 |E)."."....".DER |
00000400: 4E 41 45 43 48 53 54 45 20 42 45 46 45 48 4C 20 |NAECHSTE BEFEHL |
00000410: 49 53 54 20 12 4A 53 52 92 2E 20 45 52 20 49 53 |IST .JSR.. ER IS|
00000420: 54 22 00 50 0C C8 00 99 22 11 44 45 52 20 47 4F |T".P....".DER GO|
00000430: 53 55 42 2D 42 45 46 45 48 4C 20 49 4E 20 4D 41 |SUB-BEFEHL IN MA|
00000440: 53 43 48 49 4E 45 4E 53 50 52 41 43 48 45 2E 22 |SCHINENSPRACHE."|
00000450: 00 7D 0C D2 00 99 22 11 45 52 20 4C 41 55 54 45 |.}....".ER LAUTE|
00000460: 54 20 4B 4F 52 52 45 4B 54 20 53 4F 3A 20 4A 53 |T KORREKT SO: JS|
00000470: 52 20 28 41 44 52 45 53 53 45 29 2E 22 00 9A 0C |R (ADRESSE)."...|
00000480: DC 00 99 22 11 22 A3 31 34 29 22 54 41 53 54 45 |...".".14)"TASTE|
00000490: 20 44 52 55 45 43 4B 45 4E 22 00 AC 0C E6 00 99 | DRUECKEN"......|
000004A0: 22 11 22 A3 31 38 29 22 2D 31 2D 22 00 C7 0C E8 |".".18)"-1-"....|
000004B0: 00 8D 20 32 35 30 20 3A 20 91 20 41 20 89 20 33 |.. 250 : . A . 3|
000004C0: 30 30 20 2C 20 36 30 00 ED 0C F0 00 8F 2A 2A 2A |00 , 60......***|
000004D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 13 0D |*************...|
000004F0: F5 00 8F 2A 2D 2D 2D 2D 2D 2D 2D 54 41 53 54 45 |...*-------TASTE|
00000500: 4E 2D 41 42 46 52 41 47 45 2D 2D 2D 2D 2D 2D 2D |N-ABFRAGE-------|
00000510: 2D 2D 2A 00 39 0D F7 00 8F 2A 2A 2A 2A 2A 2A 2A |--*.9....*******|
00000520: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000530: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 54 0D FA 00 A1 20 |*********.T.... |
00000540: 41 24 20 3A 20 8B 20 41 24 20 B2 20 22 22 20 A7 |A$ : . A$ . "" .|
00000550: 20 32 35 30 00 6F 0D FF 00 8B 20 41 24 20 B2 20 | 250.o.... A$ . |
00000560: 22 5A 22 20 A7 20 41 20 B2 20 32 20 3A 20 8E 00 |"Z" . A . 2 : ..|
00000570: 7D 0D 04 01 41 20 B2 20 31 20 3A 20 8E 00 A3 0D |}...A . 1 : ....|
00000580: 0E 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005A0: 2A 2A 2A 00 C9 0D 18 01 8F 2A 2D 2D 2D 2D 2D 2D |***......*------|
000005B0: 2D 2D 2D 2D 20 53 45 49 54 45 20 32 20 2D 2D 2D |---- SEITE 2 ---|
000005C0: 2D 2D 2D 2D 2D 2D 2D 2D 2A 00 EF 0D 22 01 8F 2A |--------*..."..*|
000005D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000005F0: 1B 0E 2C 01 99 22 93 42 45 49 20 44 49 45 53 45 |..,..".BEI DIESE|
00000600: 4D 20 42 45 46 45 48 4C 20 57 49 52 44 20 44 49 |M BEFEHL WIRD DI|
00000610: 45 20 41 4B 54 55 45 4C 4C 45 22 00 48 0E 36 01 |E AKTUELLE".H.6.|
00000620: 99 22 11 41 44 52 45 53 53 45 20 49 4E 20 44 45 |.".ADRESSE IN DE|
00000630: 4E 20 53 54 41 43 4B 20 47 45 4C 45 47 54 2C 20 |N STACK GELEGT, |
00000640: 5A 55 52 20 45 52 2D 22 00 71 0E 40 01 99 22 11 |ZUR ER-".q.@..".|
00000650: 49 4E 4E 45 52 55 4E 47 20 44 45 52 20 53 54 41 |INNERUNG DER STA|
00000660: 43 4B 20 49 53 54 20 45 49 4E 45 20 41 52 54 20 |CK IST EINE ART |
00000670: 22 00 9F 0E 4A 01 99 22 11 5A 57 49 53 43 48 45 |"...J..".ZWISCHE|
00000680: 4E 53 50 45 49 43 48 45 52 2E 20 49 4D 20 42 45 |NSPEICHER. IM BE|
00000690: 4B 41 4E 4E 54 45 4E 20 46 4F 52 4D 41 54 22 00 |KANNTEN FORMAT".|
000006A0: CF 0E 54 01 99 22 11 4C 4F 57 2D 42 59 54 45 2C |..T..".LOW-BYTE,|
000006B0: 20 48 49 2D 42 59 54 45 2E 20 44 45 52 20 52 45 | HI-BYTE. DER RE|
000006C0: 54 55 52 4E 2D 42 45 46 45 48 4C 20 49 4E 22 00 |TURN-BEFEHL IN".|
000006D0: FE 0E 5E 01 99 22 11 4D 41 53 43 48 49 4E 45 4E |..^..".MASCHINEN|
000006E0: 53 50 52 41 43 48 45 20 4C 41 55 54 45 54 20 52 |SPRACHE LAUTET R|
000006F0: 54 53 2E 20 49 48 4E 20 48 41 42 45 4E 22 00 28 |TS. IHN HABEN".(|
00000700: 0F 68 01 99 22 11 57 49 52 20 41 42 45 52 20 53 |.h..".WIR ABER S|
00000710: 43 48 4F 4E 20 4B 45 4E 4E 45 4E 47 45 4C 45 52 |CHON KENNENGELER|
00000720: 4E 54 2E 20 20 20 20 22 00 59 0F 72 01 99 22 11 |NT. ".Y.r..".|
00000730: 44 45 52 20 4E 41 45 43 48 53 54 45 20 42 45 46 |DER NAECHSTE BEF|
00000740: 45 48 4C 20 4C 41 55 54 45 54 20 4E 4F 50 2E 20 |EHL LAUTET NOP. |
00000750: 44 49 45 53 20 49 53 54 22 00 84 0F 7C 01 99 22 |DIES IST"...|.."|
00000760: 45 49 4E 20 4B 4F 4D 49 53 43 48 45 52 20 4B 41 |EIN KOMISCHER KA|
00000770: 4D 45 52 41 44 2C 20 45 52 20 48 41 54 20 4E 41 |MERAD, ER HAT NA|
00000780: 45 4D 2D 22 00 B4 0F 86 01 99 22 11 4C 49 43 48 |EM-"......".LICH|
00000790: 20 4B 45 49 4E 45 20 46 55 4E 4B 54 49 4F 4E 2E | KEINE FUNKTION.|
000007A0: 20 45 52 20 48 45 49 53 53 54 20 41 55 43 48 20 | ER HEISST AUCH |
000007B0: 41 55 46 22 00 D1 0F 9A 01 99 22 11 22 A3 31 34 |AUF"......".".14|
000007C0: 29 22 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E |)"TASTE DRUECKEN|
000007D0: 22 00 FD 0F A4 01 99 22 11 22 A3 31 38 29 22 2D |"......".".18)"-|
000007E0: 32 2D 22 20 3A 20 8D 20 32 35 30 20 3A 20 91 20 |2-" : . 250 : . |
000007F0: 41 20 89 20 34 34 30 20 2C 20 31 30 30 00 23 10 |A . 440 , 100.#.|
00000800: AE 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000820: 2A 2A 2A 00 49 10 B8 01 8F 2A 2D 2D 2D 2D 2D 2D |***.I....*------|
00000830: 2D 2D 20 53 45 49 54 45 20 33 20 2D 2D 2D 2D 2D |-- SEITE 3 -----|
00000840: 2D 2D 2D 2D 2D 2D 2D 2D 2A 00 6F 10 C2 01 8F 2A |--------*.o....*|
00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000870: 9A 10 C7 01 99 22 93 44 45 55 54 53 43 48 20 55 |.....".DEUTSCH U|
00000880: 4E 47 45 46 41 45 48 52 20 4B 45 49 4E 45 20 4F |NGEFAEHR KEINE O|
00000890: 50 45 52 41 54 49 4F 4E 2E 22 00 C8 10 CC 01 99 |PERATION."......|
000008A0: 22 11 53 4F 2C 20 4A 45 54 5A 54 20 57 4F 4C 4C |".SO, JETZT WOLL|
000008B0: 45 4E 20 57 49 52 20 55 4E 53 45 52 45 4D 20 43 |EN WIR UNSEREM C|
000008C0: 4F 4D 50 55 54 45 52 22 00 F6 10 D6 01 99 22 11 |OMPUTER"......".|
000008D0: 44 41 53 20 52 45 43 48 4E 45 4E 20 42 45 49 42 |DAS RECHNEN BEIB|
000008E0: 52 49 4E 47 45 4E 2E 20 5A 55 45 52 53 54 20 45 |RINGEN. ZUERST E|
000008F0: 49 4E 4D 41 4C 22 00 20 11 E0 01 99 22 11 41 44 |INMAL". ....".AD|
00000900: 44 49 45 52 45 4E 2C 20 44 49 45 53 20 54 55 4E |DIEREN, DIES TUN|
00000910: 20 57 49 52 20 4D 49 54 20 12 41 44 43 92 2E 22 | WIR MIT .ADC.."|
00000920: 00 4B 11 EA 01 99 22 11 42 45 56 4F 52 20 57 49 |.K....".BEVOR WI|
00000930: 52 20 4E 55 4E 20 41 4E 46 41 4E 47 45 4E 20 5A |R NUN ANFANGEN Z|
00000940: 55 20 52 45 43 48 4E 45 4E 20 22 00 77 11 F4 01 |U RECHNEN ".w...|
00000950: 99 22 11 4D 55 45 53 53 45 4E 20 57 49 52 20 44 |.".MUESSEN WIR D|
00000960: 41 53 20 43 2D 46 4C 41 47 20 4C 4F 45 53 43 48 |AS C-FLAG LOESCH|
00000970: 45 4E 2C 20 55 4D 22 00 A6 11 FE 01 99 22 11 46 |EN, UM"......".F|
00000980: 45 53 54 5A 55 53 54 45 4C 4C 45 4E 2C 4F 42 20 |ESTZUSTELLEN,OB |
00000990: 44 41 53 20 45 52 47 45 42 4E 49 53 20 47 52 4F |DAS ERGEBNIS GRO|
000009A0: 45 53 53 45 52 22 00 D5 11 08 02 99 22 11 41 4C |ESSER"......".AL|
000009B0: 53 20 32 35 35 20 49 53 54 2E 5A 55 45 52 53 54 |S 255 IST.ZUERST|
000009C0: 20 44 49 45 20 44 49 52 45 4B 54 45 20 41 44 52 | DIE DIREKTE ADR|
000009D0: 45 53 53 2D 22 00 FF 11 12 02 99 22 11 49 45 52 |ESS-"......".IER|
000009E0: 55 4E 47 2E 44 4F 52 54 20 4C 41 55 54 45 54 20 |UNG.DORT LAUTET |
000009F0: 44 45 52 20 42 45 46 45 48 4C 20 53 4F 20 22 00 |DER BEFEHL SO ".|
00000A00: 2E 12 26 02 99 22 11 41 44 43 20 28 57 45 52 54 |..&..".ADC (WERT|
00000A10: 29 2E 20 44 45 52 20 57 45 52 54 20 57 49 52 44 |). DER WERT WIRD|
00000A20: 20 4D 49 54 20 44 45 4D 20 41 4B 4B 55 22 00 48 | MIT DEM AKKU".H|
00000A30: 12 3A 02 99 A3 31 34 29 22 54 41 53 54 45 20 44 |.:...14)"TASTE D|
00000A40: 52 55 45 43 4B 45 4E 22 00 74 12 44 02 99 22 11 |RUECKEN".t.D..".|
00000A50: 22 A3 31 38 29 22 2D 33 2D 22 20 3A 20 8D 20 32 |".18)"-3-" : . 2|
00000A60: 35 30 20 3A 20 91 20 41 20 89 20 36 30 30 20 2C |50 : . A . 600 ,|
00000A70: 20 33 30 30 00 9A 12 4E 02 8F 2A 2A 2A 2A 2A 2A | 300...N..******|
00000A80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C0 12 58 02 8F |**********...X..|
00000AA0: 2A 2D 2D 2D 2D 2D 2D 2D 2D 20 53 45 49 54 45 20 |*-------- SEITE |
00000AB0: 34 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A |4 -------------*|
00000AC0: 00 E6 12 62 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...b..**********|
00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AE0: 2A 2A 2A 2A 2A 2A 00 F7 12 6C 02 99 22 93 41 44 |******...l..".AD|
00000AF0: 44 49 45 52 54 2E 22 00 21 13 76 02 99 22 11 4E |DIERT.".!.v..".N|
00000B00: 55 4E 20 57 49 45 44 45 52 20 45 49 4E 20 4B 4C |UN WIEDER EIN KL|
00000B10: 45 49 4E 45 53 20 50 52 4F 47 52 41 4D 4D 20 3A |EINES PROGRAMM :|
00000B20: 22 00 3E 13 77 02 99 22 11 22 A3 31 34 29 22 54 |".>.w..".".14)"T|
00000B30: 41 53 54 45 20 44 52 55 45 43 4B 45 4E 22 00 50 |ASTE DRUECKEN".P|
00000B40: 13 78 02 99 22 11 22 A3 31 38 29 22 2D 34 2D 22 |.x..".".18)"-4-"|
00000B50: 00 6C 13 79 02 8D 20 32 35 30 20 3A 20 91 20 41 |.l.y.. 250 : . A|
00000B60: 20 89 20 36 33 36 20 2C 20 34 34 30 00 92 13 7A | . 636 , 440...z|
00000B70: 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B90: 2A 2A 00 B8 13 7B 02 8F 2A 2D 2D 2D 2D 2D 2D 2D |**...{..*-------|
00000BA0: 2D 20 53 45 49 54 45 20 35 20 2D 2D 2D 2D 2D 2D |- SEITE 5 ------|
00000BB0: 2D 2D 2D 2D 2D 2D 2D 2A 00 DE 13 7C 02 8F 2A 2A |-------*...|..**|
00000BC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0A |**************..|
00000BE0: 14 80 02 99 22 93 20 4C 44 41 20 24 31 30 30 30 |....". LDA $1000|
00000BF0: 3B 57 45 52 54 20 41 55 53 20 53 50 45 49 43 48 |;WERT AUS SPEICH|
00000C00: 45 52 53 54 45 4C 4C 45 20 22 00 37 14 8A 02 99 |ERSTELLE ".7....|
00000C10: 22 11 20 20 20 20 20 20 20 20 20 3B 24 31 30 30 |". ;$100|
00000C20: 30 20 28 34 30 39 36 29 20 49 4E 20 44 45 4E 20 |0 (4096) IN DEN |
00000C30: 41 4B 4B 55 20 2E 22 00 59 14 8F 02 99 22 11 20 |AKKU .".Y....". |
00000C40: 43 4C 43 20 20 20 20 20 3B 43 2D 46 4C 41 47 20 |CLC ;C-FLAG |
00000C50: 4C 4F 45 53 43 48 45 4E 22 00 86 14 94 02 99 22 |LOESCHEN"......"|
00000C60: 11 20 41 44 43 20 23 24 31 30 3B 41 4B 4B 55 20 |. ADC #$10;AKKU |
00000C70: 4D 49 54 20 24 31 30 20 28 31 36 29 20 41 44 44 |MIT $10 (16) ADD|
00000C80: 49 45 52 45 4E 22 00 B7 14 9E 02 99 22 11 20 42 |IEREN"......". B|
00000C90: 43 53 20 4C 4F 4F 50 3B 57 45 4E 4E 20 43 2D 46 |CS LOOP;WENN C-F|
00000CA0: 4C 41 47 20 3D 20 31 20 44 41 4E 4E 20 4E 41 43 |LAG = 1 DANN NAC|
00000CB0: 48 20 4C 4F 4F 50 22 00 E5 14 A8 02 99 22 20 52 |H LOOP"......" R|
00000CC0: 54 53 20 20 20 20 20 3B 57 45 4E 4E 20 43 2D 46 |TS ;WENN C-F|
00000CD0: 4C 41 47 20 3D 20 30 20 57 41 52 20 44 41 4E 4E |LAG = 0 WAR DANN|
00000CE0: 20 5A 55 2D 22 00 0D 15 B2 02 99 22 11 20 20 20 | ZU-"......". |
00000CF0: 20 20 20 20 20 20 3B 52 55 45 43 4B 20 28 48 49 | ;RUECK (HI|
00000D00: 45 52 20 49 4E 53 20 42 41 53 49 43 29 00 3A 15 |ER INS BASIC).:.|
00000D10: BC 02 99 22 11 4C 4F 4F 50 20 43 4C 43 20 3B 57 |...".LOOP CLC ;W|
00000D20: 45 4E 4E 20 43 2D 46 4C 41 47 20 3D 20 31 20 57 |ENN C-FLAG = 1 W|
00000D30: 41 52 2C 20 44 41 4E 4E 20 22 00 5C 15 C6 02 99 |AR, DANN ".\....|
00000D40: 22 11 20 20 20 20 20 20 20 20 20 3B 43 2D 46 4C |". ;C-FL|
00000D50: 41 47 20 4C 4F 45 53 43 48 45 4E 22 00 86 15 D0 |AG LOESCHEN"....|
00000D60: 02 99 22 11 20 20 20 20 20 52 54 53 20 3B 5A 55 |..". RTS ;ZU|
00000D70: 52 55 45 43 4B 20 28 48 49 45 52 20 49 4E 53 20 |RUECK (HIER INS |
00000D80: 42 41 53 49 43 29 00 A4 15 DA 02 99 22 11 22 A3 |BASIC)......".".|
00000D90: 31 34 29 22 54 41 53 54 45 20 44 52 55 45 43 4B |14)"TASTE DRUECK|
00000DA0: 45 4E 29 22 00 B6 15 E4 02 99 22 11 22 A3 31 38 |EN)"......".".18|
00000DB0: 29 22 2D 35 2D 22 00 D2 15 EE 02 8D 20 32 35 30 |)"-5-"...... 250|
00000DC0: 20 3A 20 91 20 41 20 89 20 37 37 30 20 2C 20 36 | : . A . 770 , 6|
00000DD0: 30 30 00 F8 15 F8 02 8F 2A 2A 2A 2A 2A 2A 2A 2A |00......********|
00000DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DF0: 2A 2A 2A 2A 2A 2A 2A 2A 00 1E 16 02 03 8F 2A 2D |********......*-|
00000E00: 2D 2D 2D 2D 2D 2D 2D 20 53 45 49 54 45 20 36 20 |------- SEITE 6 |
00000E10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A 00 44 |-------------*.D|
00000E20: 16 0C 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
00000E30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E40: 2A 2A 2A 2A 00 74 16 16 03 99 22 93 44 49 45 53 |****.t....".DIES|
00000E50: 20 57 41 52 20 45 49 4E 20 4B 4C 45 49 4E 45 53 | WAR EIN KLEINES|
00000E60: 20 50 52 4F 47 52 41 4D 4D 2C 44 41 53 20 49 48 | PROGRAMM,DAS IH|
00000E70: 4E 45 4E 22 00 A0 16 20 03 99 22 11 44 49 45 20 |NEN"... ..".DIE |
00000E80: 46 55 4E 4B 54 49 4F 4E 53 57 45 49 53 45 20 44 |FUNKTIONSWEISE D|
00000E90: 45 52 20 42 45 46 45 48 4C 45 20 56 45 52 2D 22 |ER BEFEHLE VER-"|
00000EA0: 00 CC 16 2A 03 99 22 11 44 45 55 54 4C 49 43 48 |...*..".DEUTLICH|
00000EB0: 45 4E 20 53 4F 4C 4C 2E 20 4E 55 4E 20 57 45 49 |EN SOLL. NUN WEI|
00000EC0: 54 45 52 20 4D 49 54 20 44 45 52 22 00 FF 16 34 |TER MIT DER"...4|
00000ED0: 03 99 22 11 53 55 42 54 52 41 4B 54 49 4F 4E 2E |..".SUBTRAKTION.|
00000EE0: 20 44 45 52 20 42 45 46 45 48 4C 20 44 41 5A 55 | DER BEFEHL DAZU|
00000EF0: 20 4C 41 55 54 45 54 20 12 53 42 43 92 2E 22 00 | LAUTET .SBC..".|
00000F00: 2D 17 3E 03 99 22 48 49 45 52 20 53 4F 4C 4C 54 |-.>.."HIER SOLLT|
00000F10: 45 4E 20 53 49 45 20 44 41 53 20 43 2D 46 4C 41 |EN SIE DAS C-FLA|
00000F20: 47 20 53 45 54 5A 45 4E 2C 20 44 41 22 00 5C 17 |G SETZEN, DA".\.|
00000F30: 48 03 99 22 11 53 49 45 20 46 45 53 54 53 54 45 |H..".SIE FESTSTE|
00000F40: 4C 4C 45 4E 20 4D 55 45 53 53 45 4E 2C 4F 42 20 |LLEN MUESSEN,OB |
00000F50: 44 49 45 20 52 45 43 48 45 4E 2D 22 00 8B 17 52 |DIE RECHEN-"...R|
00000F60: 03 99 22 11 4F 50 45 52 41 54 49 4F 4E 20 45 49 |..".OPERATION EI|
00000F70: 4E 45 20 4D 49 4E 55 53 20 5A 41 48 4C 20 45 52 |NE MINUS ZAHL ER|
00000F80: 47 45 42 45 4E 20 48 41 54 2E 22 00 BC 17 5C 03 |GEBEN HAT."...\.|
00000F90: 99 22 11 48 49 45 52 20 53 45 48 45 4E 20 57 49 |.".HIER SEHEN WI|
00000FA0: 52 20 45 49 4E 45 20 57 45 49 54 45 52 45 20 46 |R EINE WEITERE F|
00000FB0: 55 4E 4B 54 49 4F 4E 20 44 45 53 22 00 EC 17 66 |UNKTION DES"...f|
00000FC0: 03 99 22 43 2D 46 4C 41 47 53 2C 45 53 20 52 45 |.."C-FLAGS,ES RE|
00000FD0: 41 47 49 45 52 54 20 4E 49 43 48 54 20 4E 55 52 |AGIERT NICHT NUR|
00000FE0: 20 41 55 46 20 55 45 42 45 52 2D 22 00 1B 18 70 | AUF UEBER-"...p|
00000FF0: 03 99 22 4C 41 45 55 46 45 20 28 47 52 4F 45 53 |.."LAEUFE (GROES|
00001000: 53 45 52 20 41 4C 53 20 32 35 35 29 2C 20 53 4F |SER ALS 255), SO|
00001010: 4E 44 45 52 4E 20 41 55 43 48 22 00 38 18 84 03 |NDERN AUCH".8...|
00001020: 99 22 11 22 A3 31 34 29 22 54 41 53 54 45 20 44 |.".".14)"TASTE D|
00001030: 52 55 45 43 4B 45 4E 22 00 4A 18 8E 03 99 22 11 |RUECKEN".J....".|
00001040: 22 A3 31 38 29 22 2D 36 2D 22 00 66 18 98 03 8D |".18)"-6-".f....|
00001050: 20 32 35 30 20 3A 20 91 20 41 20 89 20 39 34 30 | 250 : . A . 940|
00001060: 20 2C 20 36 33 36 00 8C 18 A2 03 8F 2A 2A 2A 2A | , 636......****|
00001070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B2 18 AC |************....|
00001090: 03 8F 2A 2D 2D 2D 2D 2D 2D 2D 20 53 45 49 54 45 |..*------- SEITE|
000010A0: 20 37 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | 7 -------------|
000010B0: 2D 2A 00 D8 18 B6 03 8F 2A 2A 2A 2A 2A 2A 2A 2A |-*......********|
000010C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010D0: 2A 2A 2A 2A 2A 2A 2A 2A 00 04 19 C0 03 99 22 93 |********......".|
000010E0: 41 55 46 20 5A 41 48 4C 45 4E 2C 20 44 49 45 20 |AUF ZAHLEN, DIE |
000010F0: 4B 4C 45 49 4E 45 52 20 41 4C 53 20 30 20 53 49 |KLEINER ALS 0 SI|
00001100: 4E 44 2E 22 00 31 19 CA 03 99 22 11 44 41 53 20 |ND.".1....".DAS |
00001110: 43 2D 46 4C 41 47 20 49 53 54 20 49 53 54 20 41 |C-FLAG IST IST A|
00001120: 4C 53 4F 20 45 49 4E 20 42 49 54 2C 20 44 41 53 |LSO EIN BIT, DAS|
00001130: 22 00 59 19 D4 03 99 22 11 55 4E 53 20 4A 45 44 |".Y....".UNS JED|
00001140: 45 20 49 4C 4C 45 47 41 4C 45 20 5A 41 48 4C 20 |E ILLEGALE ZAHL |
00001150: 41 4E 5A 45 49 47 54 2E 22 00 8A 19 DE 03 99 22 |ANZEIGT."......"|
00001160: 11 53 4F 2C 4A 45 54 5A 54 20 4B 4F 45 4E 4E 45 |.SO,JETZT KOENNE|
00001170: 4E 20 53 49 45 20 45 49 4E 46 41 43 48 45 20 52 |N SIE EINFACHE R|
00001180: 45 43 48 4E 55 4E 47 45 4E 22 00 B7 19 E8 03 99 |ECHNUNGEN"......|
00001190: 22 44 55 52 43 48 46 55 45 48 52 45 4E 2E 20 46 |"DURCHFUEHREN. F|
000011A0: 55 45 52 20 44 49 45 20 4D 55 4C 54 49 50 4C 49 |UER DIE MULTIPLI|
000011B0: 4B 41 54 49 4F 4E 22 00 E4 19 F2 03 99 22 11 55 |KATION"......".U|
000011C0: 4E 44 20 44 49 56 49 53 49 4F 4E 20 45 58 49 53 |ND DIVISION EXIS|
000011D0: 54 49 45 52 45 4E 20 4C 45 49 44 45 52 20 4B 45 |TIEREN LEIDER KE|
000011E0: 49 4E 45 22 00 14 1A FC 03 99 22 11 42 45 46 45 |INE"......".BEFE|
000011F0: 48 4C 45 2E 20 48 49 45 52 5A 55 20 4D 55 45 53 |HLE. HIERZU MUES|
00001200: 53 45 4E 20 53 49 45 20 49 48 52 20 45 49 47 45 |SEN SIE IHR EIGE|
00001210: 4E 45 53 22 00 44 1A 06 04 99 22 11 50 52 4F 47 |NES".D....".PROG|
00001220: 52 41 4D 4D 20 53 43 48 52 45 49 42 45 4E 2E 20 |RAMM SCHREIBEN. |
00001230: 4C 41 53 53 45 4E 20 53 49 45 20 53 49 43 48 20 |LASSEN SIE SICH |
00001240: 44 41 2D 22 00 74 1A 10 04 99 22 11 44 55 52 43 |DA-".t....".DURC|
00001250: 48 20 4E 49 43 48 54 20 45 4E 54 4D 55 54 49 47 |H NICHT ENTMUTIG|
00001260: 45 4E 2C 49 43 48 20 5A 45 49 47 45 20 49 48 4E |EN,ICH ZEIGE IHN|
00001270: 45 4E 2C 22 00 A4 1A 1A 04 99 22 11 57 49 45 20 |EN,"......".WIE |
00001280: 53 49 45 20 44 49 45 53 45 20 54 41 54 53 41 43 |SIE DIESE TATSAC|
00001290: 48 45 20 55 4D 47 45 48 45 4E 20 4B 4F 45 4E 4E |HE UMGEHEN KOENN|
000012A0: 45 4E 2E 22 00 BF 1A 24 04 99 A3 31 34 29 22 11 |EN."...$...14)".|
000012B0: 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E 22 00 |TASTE DRUECKEN".|
000012C0: D1 1A 2E 04 99 22 11 22 A3 31 38 29 22 2D 37 2D |.....".".18)"-7-|
000012D0: 22 00 EE 1A 38 04 8D 20 32 35 30 20 3A 20 91 20 |"...8.. 250 : . |
000012E0: 41 20 89 20 31 31 30 30 20 2C 20 37 37 30 00 13 |A . 1100 , 770..|
000012F0: 1B 42 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.B..************|
00001300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001310: 2A 2A 2A 00 38 1B 4C 04 8F 2A 2D 2D 2D 2D 2D 2D |***.8.L..*------|
00001320: 2D 20 53 45 49 54 45 20 38 20 2D 2D 2D 2D 2D 2D |- SEITE 8 ------|
00001330: 2D 2D 2D 2D 2D 2D 2D 2A 00 5D 1B 56 04 8F 2A 2A |-------*.].V..**|
00001340: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001350: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8C 1B |*************...|
00001360: 60 04 99 22 93 44 41 5A 55 20 41 42 45 52 20 53 |`..".DAZU ABER S|
00001370: 50 41 45 54 45 52 2E 20 48 41 42 45 4E 20 53 49 |PAETER. HABEN SI|
00001380: 45 20 53 43 48 4F 4E 20 56 4F 4D 22 00 BC 1B 6A |E SCHON VOM"...j|
00001390: 04 99 22 11 4B 45 52 4E 41 4C 20 47 45 48 4F 45 |..".KERNAL GEHOE|
000013A0: 52 54 2E 20 44 49 45 53 20 49 53 54 20 42 45 49 |RT. DIES IST BEI|
000013B0: 20 46 41 53 54 20 41 4C 4C 45 4E 22 00 EA 1B 74 | FAST ALLEN"...t|
000013C0: 04 99 22 11 43 4F 4D 4D 4F 44 4F 52 45 20 43 4F |..".COMMODORE CO|
000013D0: 4D 50 55 54 45 52 4E 20 47 4C 45 49 43 48 2E 20 |MPUTERN GLEICH. |
000013E0: 44 4F 52 54 20 53 49 4E 44 22 00 18 1C 7E 04 99 |DORT SIND"...~..|
000013F0: 22 11 4E 55 45 54 5A 4C 49 43 48 45 20 52 4F 55 |".NUETZLICHE ROU|
00001400: 54 49 4E 45 4E 20 5A 55 53 41 4D 4D 45 4E 20 47 |TINEN ZUSAMMEN G|
00001410: 45 46 41 53 53 54 2E 22 00 47 1C 88 04 99 22 11 |EFASST.".G....".|
00001420: 44 49 45 20 45 52 53 54 45 2C 20 44 49 45 20 57 |DIE ERSTE, DIE W|
00001430: 49 52 20 44 41 56 4F 4E 20 4E 55 54 5A 45 4E 20 |IR DAVON NUTZEN |
00001440: 57 4F 4C 4C 45 4E 22 00 76 1C 92 04 99 22 11 48 |WOLLEN".v....".H|
00001450: 45 49 53 53 54 20 12 43 48 52 4F 55 54 92 20 55 |EISST .CHROUT. U|
00001460: 4E 44 20 44 45 52 45 4E 20 53 54 41 52 54 41 44 |ND DEREN STARTAD|
00001470: 52 45 53 53 45 22 00 A3 1C 9C 04 99 22 11 4C 49 |RESSE"......".LI|
00001480: 45 47 54 20 42 45 49 20 24 46 46 44 32 2E 20 53 |EGT BEI $FFD2. S|
00001490: 49 45 20 4D 55 45 53 53 45 4E 20 56 4F 52 20 44 |IE MUESSEN VOR D|
000014A0: 45 4D 22 00 D0 1C A6 04 99 22 11 41 4E 53 50 52 |EM"......".ANSPR|
000014B0: 55 4E 47 20 28 4A 4D 50 20 4F 44 45 52 20 4A 53 |UNG (JMP ODER JS|
000014C0: 52 29 20 44 45 4E 20 57 45 52 54 20 44 45 53 22 |R) DEN WERT DES"|
000014D0: 00 01 1D B0 04 99 22 11 5A 45 49 43 48 45 4E 53 |......".ZEICHENS|
000014E0: 20 49 4D 20 41 53 43 49 49 2D 43 4F 44 45 20 49 | IM ASCII-CODE I|
000014F0: 4E 20 44 45 4E 20 41 4B 4B 55 20 4C 41 44 45 4E |N DEN AKKU LADEN|
00001500: 22 00 1E 1D C4 04 99 22 11 22 A3 31 34 29 22 54 |"......".".14)"T|
00001510: 41 53 54 45 20 44 52 55 45 43 4B 45 4E 22 00 30 |ASTE DRUECKEN".0|
00001520: 1D CE 04 99 22 11 22 A3 31 38 29 22 2D 38 2D 22 |....".".18)"-8-"|
00001530: 00 4D 1D D8 04 8D 20 32 35 30 20 3A 20 91 20 41 |.M.... 250 : . A|
00001540: 20 89 20 31 32 35 30 20 2C 20 39 34 30 00 72 1D | . 1250 , 940.r.|
00001550: E2 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00001560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001570: 2A 2A 00 97 1D EC 04 8F 2A 2D 2D 2D 2D 2D 2D 2D |**......*-------|
00001580: 20 53 45 49 54 45 20 39 20 2D 2D 2D 2D 2D 2D 2D | SEITE 9 -------|
00001590: 2D 2D 2D 2D 2D 2D 2A 00 BC 1D F6 04 8F 2A 2A 2A |------*......***|
000015A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000015B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E7 1D 00 |************....|
000015C0: 05 99 22 93 55 4E 44 20 44 41 4E 41 43 48 20 44 |..".UND DANACH D|
000015D0: 49 45 20 52 4F 55 54 49 4E 45 20 41 4E 53 50 52 |IE ROUTINE ANSPR|
000015E0: 49 4E 47 45 4E 2E 22 00 16 1E 0A 05 99 22 11 44 |INGEN."......".D|
000015F0: 49 45 20 52 4F 55 54 49 4E 45 20 44 52 55 43 4B |IE ROUTINE DRUCK|
00001600: 54 20 44 41 53 20 5A 45 49 43 48 45 4E 20 42 45 |T DAS ZEICHEN BE|
00001610: 49 20 44 45 52 22 00 46 1E 14 05 99 22 11 41 4B |I DER".F....".AK|
00001620: 54 55 45 4C 4C 45 4E 20 43 55 52 53 4F 52 50 4F |TUELLEN CURSORPO|
00001630: 53 49 54 49 4F 4E 20 41 55 53 2C 20 44 49 45 20 |SITION AUS, DIE |
00001640: 5A 55 56 4F 52 22 00 6A 1E 1E 05 99 22 11 55 4D |ZUVOR".j....".UM|
00001650: 20 45 49 4E 53 20 45 52 48 4F 45 48 54 20 57 4F | EINS ERHOEHT WO|
00001660: 52 44 45 4E 20 49 53 54 2E 22 00 9A 1E 28 05 99 |RDEN IST."...(..|
00001670: 22 11 57 49 53 53 45 4E 20 53 49 45 20 4E 49 43 |".WISSEN SIE NIC|
00001680: 48 54 53 20 55 45 42 45 52 20 44 45 4E 20 41 53 |HTS UEBER DEN AS|
00001690: 43 49 49 2D 43 4F 44 45 2C 22 00 C8 1E 32 05 99 |CII-CODE,"...2..|
000016A0: 22 11 43 4F 44 45 2C 20 44 41 4E 4E 20 53 43 48 |".CODE, DANN SCH|
000016B0: 4C 41 47 45 4E 20 53 49 45 20 49 4D 20 41 4E 48 |LAGEN SIE IM ANH|
000016C0: 41 4E 47 20 44 45 53 22 00 F9 1E 3C 05 99 22 11 |ANG DES"...<..".|
000016D0: 48 41 4E 44 42 55 43 48 53 20 4E 41 43 48 2C 20 |HANDBUCHS NACH, |
000016E0: 44 4F 52 54 20 49 53 54 20 45 52 20 41 55 46 47 |DORT IST ER AUFG|
000016F0: 45 46 55 45 48 52 54 2E 22 00 16 1F 46 05 99 22 |EFUEHRT."...F.."|
00001700: 11 4A 45 54 5A 54 20 5A 55 4D 20 50 52 4F 47 52 |.JETZT ZUM PROGR|
00001710: 41 4D 4D 20 3A 22 00 3C 1F 50 05 99 22 11 20 4C |AMM :".<.P..". L|
00001720: 44 41 20 23 36 35 20 20 20 3B 41 53 43 49 49 2D |DA #65 ;ASCII-|
00001730: 43 4F 44 45 20 46 55 45 52 20 41 22 00 61 1F 5A |CODE FUER A".a.Z|
00001740: 05 99 22 11 20 4A 4D 50 20 24 46 46 44 32 20 3B |..". JMP $FFD2 ;|
00001750: 53 50 52 55 4E 47 20 5A 55 20 43 48 52 4F 55 54 |SPRUNG ZU CHROUT|
00001760: 22 00 7E 1F 78 05 99 22 11 22 A3 31 34 29 22 54 |".~.x..".".14)"T|
00001770: 41 53 54 45 20 44 52 55 45 43 4B 45 4E 22 00 90 |ASTE DRUECKEN"..|
00001780: 1F 82 05 99 22 11 22 A3 31 38 29 22 2D 39 2D 22 |....".".18)"-9-"|
00001790: 00 AD 1F 8C 05 8D 20 32 35 30 20 3A 20 91 41 20 |...... 250 : .A |
000017A0: 89 20 31 34 34 30 20 2C 20 31 31 30 30 00 D2 1F |. 1440 , 1100...|
000017B0: 96 05 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
000017C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000017D0: 2A 2A 00 F7 1F A0 05 8F 2A 2D 2D 2D 2D 2D 2D 2D |**......*-------|
000017E0: 2D 2D 20 53 45 49 54 45 20 31 30 20 2D 2D 2D 2D |-- SEITE 10 ----|
000017F0: 2D 2D 2D 2D 2D 2D 2A 00 1C 20 AA 05 8F 2A 2A 2A |------*.. ...***|
00001800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 49 20 B4 |************.I .|
00001820: 05 99 22 93 48 41 42 45 4E 20 53 49 45 20 42 45 |..".HABEN SIE BE|
00001830: 4D 45 52 4B 54 2C 20 44 49 45 53 4D 41 4C 20 48 |MERKT, DIESMAL H|
00001840: 41 42 45 4E 20 57 49 52 22 00 78 20 BE 05 99 22 |ABEN WIR".x ..."|
00001850: 11 44 45 4E 20 44 45 5A 49 4D 41 4C 4D 4F 44 55 |.DEN DEZIMALMODU|
00001860: 53 20 28 5A 41 48 4C 20 36 35 29 20 49 4E 20 44 |S (ZAHL 65) IN D|
00001870: 45 4E 20 41 4B 4B 55 22 00 A2 20 C8 05 99 22 11 |EN AKKU".. ...".|
00001880: 47 45 4C 41 44 45 4E 2E 20 57 45 4E 4E 20 49 4E |GELADEN. WENN IN|
00001890: 20 45 49 4E 45 4D 20 28 4E 4F 52 4D 41 4C 45 4E | EINEM (NORMALEN|
000018A0: 29 22 00 D1 20 D2 05 99 22 11 41 53 53 45 4D 42 |)".. ...".ASSEMB|
000018B0: 4C 45 52 50 52 4F 47 52 41 4D 4D 20 44 41 53 20 |LERPROGRAMM DAS |
000018C0: 5A 45 49 43 48 45 4E 20 12 24 92 20 57 45 47 2D |ZEICHEN .$. WEG-|
000018D0: 22 00 FF 20 DC 05 99 22 11 47 45 4C 41 53 53 45 |".. ...".GELASSE|
000018E0: 4E 20 57 49 52 44 2C 20 44 41 4E 4E 20 47 45 48 |N WIRD, DANN GEH|
000018F0: 54 20 44 41 53 20 50 52 4F 47 52 41 4D 4D 22 00 |T DAS PROGRAMM".|
00001900: 2F 21 E6 05 99 22 11 56 4F 4E 20 45 49 4E 45 52 |/!...".VON EINER|
00001910: 20 44 45 5A 49 4D 41 4C 45 4E 20 5A 41 48 4C 20 | DEZIMALEN ZAHL |
00001920: 41 55 53 20 28 12 41 43 48 54 55 4E 47 92 22 00 |AUS (.ACHTUNG.".|
00001930: 5C 21 F0 05 99 22 11 44 49 45 53 20 47 49 4C 54 |\!...".DIES GILT|
00001940: 20 4E 49 43 48 54 20 46 55 45 52 20 41 4C 4C 45 | NICHT FUER ALLE|
00001950: 20 41 53 53 45 4D 42 4C 45 52 2E 22 00 8D 21 FA | ASSEMBLER."..!.|
00001960: 05 99 22 11 53 43 48 41 55 45 4E 20 53 49 45 20 |..".SCHAUEN SIE |
00001970: 41 4D 20 42 45 53 54 45 4E 20 49 4E 20 44 45 52 |AM BESTEN IN DER|
00001980: 20 50 52 4F 47 52 41 4D 4D 41 4E 2D 22 00 BD 21 | PROGRAMMAN-"..!|
00001990: 04 06 99 22 4C 45 49 54 55 4E 47 20 4E 41 43 48 |..."LEITUNG NACH|
000019A0: 2E 20 45 49 4E 20 5A 57 45 49 54 45 52 20 50 55 |. EIN ZWEITER PU|
000019B0: 4E 4B 54 20 49 53 54 20 44 45 52 2C 22 00 E9 21 |NKT IST DER,"..!|
000019C0: 0E 06 99 22 44 41 53 53 20 41 4D 20 50 52 4F 47 |..."DASS AM PROG|
000019D0: 52 41 4D 4D 45 4E 44 45 20 4B 45 49 4E 20 52 54 |RAMMENDE KEIN RT|
000019E0: 53 20 42 45 46 45 48 4C 22 00 06 22 2C 06 99 22 |S BEFEHL"..",.."|
000019F0: 11 22 A3 31 34 29 22 54 41 53 54 45 20 44 52 55 |.".14)"TASTE DRU|
00001A00: 45 43 4B 45 4E 22 00 19 22 36 06 99 22 11 22 A3 |ECKEN".."6..".".|
00001A10: 31 37 29 22 2D 31 30 2D 22 00 37 22 40 06 8D 20 |17)"-10-".7"@.. |
00001A20: 32 35 30 20 3A 20 91 20 41 20 89 20 31 36 31 30 |250 : . A . 1610|
00001A30: 20 2C 20 31 32 35 30 00 5C 22 4A 06 8F 2A 2A 2A | , 1250.\"J..***|
00001A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 81 22 54 |************.."T|
00001A60: 06 8F 2A 2D 2D 2D 2D 2D 2D 20 53 45 49 54 45 20 |..*------ SEITE |
00001A70: 31 31 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |11 -------------|
00001A80: 2A 00 A6 22 5E 06 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*.."^..*********|
00001A90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001AA0: 2A 2A 2A 2A 2A 2A 00 D2 22 68 06 99 22 93 49 53 |******.."h..".IS|
00001AB0: 54 2C 20 44 45 52 20 44 49 45 20 52 55 45 43 4B |T, DER DIE RUECK|
00001AC0: 4B 45 48 52 20 5A 55 20 42 41 53 49 43 20 45 52 |KEHR ZU BASIC ER|
00001AD0: 2D 22 00 01 23 72 06 99 22 11 4D 4F 45 47 4C 49 |-"..#r..".MOEGLI|
00001AE0: 43 48 54 2E 20 44 41 53 20 47 45 48 45 49 4D 4E |CHT. DAS GEHEIMN|
00001AF0: 49 53 20 49 53 54 20 47 41 4E 5A 20 45 49 4E 2D |IS IST GANZ EIN-|
00001B00: 22 00 32 23 7C 06 99 22 11 46 41 43 48 3A 41 4D |".2#|..".FACH:AM|
00001B10: 20 45 4E 44 45 20 44 45 52 20 43 48 52 4F 55 54 | ENDE DER CHROUT|
00001B20: 20 52 4F 55 54 49 4E 45 20 42 45 46 49 4E 44 45 | ROUTINE BEFINDE|
00001B30: 54 22 00 5D 23 86 06 99 22 53 49 43 48 20 45 49 |T".]#..."SICH EI|
00001B40: 4E 20 52 54 53 20 42 45 46 45 48 4C 2E 20 57 41 |N RTS BEFEHL. WA|
00001B50: 45 52 45 20 41 4D 20 45 4E 44 45 20 22 00 8C 23 |ERE AM ENDE "..#|
00001B60: 90 06 99 22 11 55 4E 53 45 52 45 53 20 50 52 4F |...".UNSERES PRO|
00001B70: 47 52 41 4D 4D 53 20 45 49 4E 20 52 54 53 20 42 |GRAMMS EIN RTS B|
00001B80: 45 46 45 48 4C 2C 20 44 41 4E 4E 22 00 BC 23 9A |EFEHL, DANN"..#.|
00001B90: 06 99 22 11 57 41 45 52 45 20 45 49 4E 20 42 59 |..".WAERE EIN BY|
00001BA0: 54 45 20 56 45 52 47 45 55 44 45 54 2C 20 44 41 |TE VERGEUDET, DA|
00001BB0: 20 4E 49 43 48 54 20 4D 45 48 52 22 00 EB 23 A4 | NICHT MEHR"..#.|
00001BC0: 06 99 22 11 49 4E 20 55 4E 53 45 52 20 50 52 4F |..".IN UNSER PRO|
00001BD0: 47 52 41 4D 4D 20 5A 55 52 55 45 43 4B 47 45 4B |GRAMM ZURUECKGEK|
00001BE0: 45 48 52 54 20 57 49 52 44 2E 22 00 1B 24 AE 06 |EHRT WIRD."..$..|
00001BF0: 99 22 11 44 49 45 53 20 57 41 45 52 45 20 4E 55 |.".DIES WAERE NU|
00001C00: 52 20 44 45 52 20 46 41 4C 4C 2C 20 57 45 4E 4E |R DER FALL, WENN|
00001C10: 20 57 49 52 20 45 49 4E 45 4E 22 00 4C 24 B8 06 | WIR EINEN".L$..|
00001C20: 99 22 11 4A 53 52 2D 42 45 46 45 48 4C 20 42 45 |.".JSR-BEFEHL BE|
00001C30: 4E 55 54 5A 54 20 48 41 45 54 54 45 4E 2E 20 44 |NUTZT HAETTEN. D|
00001C40: 41 53 20 50 52 4F 47 52 41 4D 4D 22 00 69 24 CC |AS PROGRAMM".i$.|
00001C50: 06 99 22 11 22 A3 31 34 29 22 54 41 53 54 45 20 |..".".14)"TASTE |
00001C60: 44 52 55 45 43 4B 45 4E 22 00 7C 24 D6 06 99 22 |DRUECKEN".|$..."|
00001C70: 11 22 A3 31 37 29 22 2D 31 31 2D 22 00 9A 24 E0 |.".17)"-11-"..$.|
00001C80: 06 8D 20 32 35 30 20 3A 20 91 20 41 20 89 20 31 |.. 250 : . A . 1|
00001C90: 37 38 30 20 2C 20 31 34 34 30 00 BF 24 EA 06 8F |780 , 1440..$...|
00001CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001CB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001CC0: E4 24 F4 06 8F 2A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.$...*----------|
00001CD0: 2D 20 53 45 49 54 45 20 31 32 20 2D 2D 2D 2D 2D |- SEITE 12 -----|
00001CE0: 2D 2D 2D 2A 00 09 25 FE 06 8F 2A 2A 2A 2A 2A 2A |---*..%...******|
00001CF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 20 25 08 07 99 22 |*********. %..."|
00001D10: 93 53 49 45 48 54 20 53 4F 20 41 55 53 20 3A 22 |.SIEHT SO AUS :"|
00001D20: 00 48 25 12 07 99 22 11 20 4C 44 41 20 23 36 35 |.H%...". LDA #65|
00001D30: 20 20 3B 36 35 20 49 4E 20 44 45 4E 20 41 4B 4B | ;65 IN DEN AKK|
00001D40: 55 20 4C 41 44 45 4E 22 00 6C 25 1C 07 99 22 11 |U LADEN".l%...".|
00001D50: 20 4A 53 52 20 24 46 46 44 32 3B 53 50 52 55 4E | JSR $FFD2;SPRUN|
00001D60: 47 20 5A 55 20 43 48 52 4F 55 54 22 00 91 25 26 |G ZU CHROUT"..%&|
00001D70: 07 99 22 11 20 52 54 53 20 20 20 20 20 20 3B 5A |..". RTS ;Z|
00001D80: 55 52 55 45 43 4B 20 49 4E 53 20 42 41 53 49 43 |URUECK INS BASIC|
00001D90: 22 00 C1 25 3A 07 99 22 11 53 49 45 20 57 49 53 |"..%:..".SIE WIS|
00001DA0: 53 45 4E 20 4A 45 54 5A 54 20 41 55 43 48 2C 20 |SEN JETZT AUCH, |
00001DB0: 44 41 53 53 20 53 49 45 20 48 49 45 52 20 20 20 |DASS SIE HIER |
00001DC0: 22 00 F1 25 44 07 99 22 11 4E 49 43 48 54 20 44 |"..%D..".NICHT D|
00001DD0: 41 53 20 50 52 4F 47 52 41 4D 4D 20 41 42 42 52 |AS PROGRAMM ABBR|
00001DE0: 45 43 48 45 4E 20 4D 55 45 53 53 45 4E 2C 20 20 |ECHEN MUESSEN, |
00001DF0: 22 00 21 26 4E 07 99 22 11 53 4F 4E 44 45 52 4E |".!&N..".SONDERN|
00001E00: 20 53 49 45 20 4B 4F 45 4E 4E 45 4E 20 4A 45 54 | SIE KOENNEN JET|
00001E10: 5A 54 20 47 41 4E 5A 20 47 45 57 4F 48 4E 54 20 |ZT GANZ GEWOHNT |
00001E20: 22 00 48 26 58 07 99 22 11 46 4F 52 54 46 41 48 |".H&X..".FORTFAH|
00001E30: 52 45 4E 20 4D 49 54 20 49 48 52 45 4D 20 50 52 |REN MIT IHREM PR|
00001E40: 4F 47 52 41 4D 4D 2E 22 00 65 26 62 07 99 22 11 |OGRAMM.".e&b..".|
00001E50: 22 A3 31 34 29 22 54 41 53 54 45 20 44 52 55 45 |".14)"TASTE DRUE|
00001E60: 43 4B 45 4E 22 00 78 26 6C 07 99 22 11 22 A3 31 |CKEN".x&l..".".1|
00001E70: 37 29 22 2D 31 32 2D 22 00 96 26 76 07 8D 20 32 |7)"-12-"..&v.. 2|
00001E80: 35 30 20 3A 20 91 20 41 20 89 20 31 39 32 30 20 |50 : . A . 1920 |
00001E90: 2C 20 31 36 31 30 00 BB 26 80 07 8F 2A 2A 2A 2A |, 1610..&...****|
00001EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001EB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E0 26 8A 07 |***********..&..|
00001EC0: 8F 2A 2D 2D 2D 2D 2D 2D 2D 20 53 45 49 54 45 20 |.*------- SEITE |
00001ED0: 31 33 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2A |13 ------------*|
00001EE0: 00 05 27 94 07 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..'...**********|
00001EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001F00: 2A 2A 2A 2A 2A 00 2D 27 9E 07 99 22 93 47 45 42 |*****.-'...".GEB|
00001F10: 45 4E 20 53 49 45 20 57 49 45 44 45 52 20 49 48 |EN SIE WIEDER IH|
00001F20: 52 20 47 45 52 41 45 54 20 45 49 4E 22 00 4F 27 |R GERAET EIN".O'|
00001F30: A8 07 41 24 20 B2 20 22 22 20 3A 20 85 22 11 12 |..A$ . "" : ."..|
00001F40: 44 92 20 4F 44 45 52 20 12 46 92 22 3B 41 24 00 |D. ODER .F.";A$.|
00001F50: 6D 27 B2 07 8B 20 41 24 20 B2 20 22 44 22 20 A7 |m'... A$ . "D" .|
00001F60: 20 46 B2 31 20 3A 20 89 20 32 30 30 30 00 85 27 | F.1 : . 2000..'|
00001F70: B7 07 8B 20 41 24 20 B2 20 22 5A 22 20 A7 20 89 |... A$ . "Z" . .|
00001F80: 20 31 37 37 30 00 A3 27 BC 07 8B 20 41 24 20 B2 | 1770..'... A$ .|
00001F90: 20 22 46 22 20 A7 20 46 B2 38 20 3A 20 89 20 32 | "F" . F.8 : . 2|
00001FA0: 30 30 30 00 B5 27 C1 07 8B 20 41 24 20 B2 20 22 |000..'... A$ . "|
00001FB0: 22 20 A7 20 80 00 C0 27 C6 07 89 20 31 39 36 30 |" . ...'... 1960|
00001FC0: 00 FD 27 D0 07 97 20 32 2C 46 20 3A 20 97 20 34 |..'... 2,F : . 4|
00001FD0: 36 20 2C 20 38 3A 97 20 34 35 2C 33 20 3A 20 97 |6 , 8:. 45,3 : .|
00001FE0: 20 32 30 35 30 20 2C 30 3A 93 20 22 4C 45 4B 54 | 2050 ,0:. "LEKT|
00001FF0: 49 4F 4E 20 37 22 20 2C 20 C2 28 32 29 00 00 00 |ION 7" , .(2)...|
..(....*********************************
.O....*----------LEKTION-6------------*.
V....*-------------------------------*..
....*----(W)-BY-ARNO-FREISINGER-----*.D.
...*-------------------------------*....
..*--------TEACHMASTER------------*.....
.*-------------------------------*.9....
*********************************.N....
53280 , 11 : . 53281 , 11 : . "." : . 20
50 , 1...... 42291 : . 46 , B(35) : . 45
, B (781) . 2 : ..F...."...........".15
)"TEACHMASTER"......".".09)"(W) BY ARNO
FREISINGER"...(..".".10)"FOR S+S SOFT IN
1987".%.2.. I . 1 . 2000 : ..I.<.."....
.........".15)"LEKTION 6".`.F.. I . 1 .
1000 : ..W.P.. A$ : . A$ : . A$...D..***
*****************************.C.N..*----
----- SEITE 1 ------------*...X..*******
*************************......".IN DIES
ER LEKTION WOLLEN WIR EIN PAAR".:....".N
EUE BEFEHLE KENNENLERNEN.".F....".DER ER
STE BEFEHL IN DIESER LEKTION "... ..".IS
T .JMP.. ER IST VERGLEICHBAR MIT DEM".E.
...".BEFEHL GOTO. DER JMP-BEFEHL IST 3 B
YTES"......".LANG. ER LAUTET KORREKT JMP
(ADRESSE)."."....".DER NAECHSTE BEFEHL
IST .JSR.. ER IST".P.H..".DER GOSUB-BEFE
HL IN MASCHINENSPRACHE.".}.R..".ER LAUTE
T KORREKT SO: JSR (ADRESSE)."......".".1
4)"TASTE DRUECKEN"......".".18)"-1-".G..
.. 250 : . A . 300 , 60......***********
*********************......*-------TASTE
N-ABFRAGE---------*.9....***************
*****************.T.... A$ : . A$ . "" .
250.O.... A$ . "Z" . A . 2 : ..}...A .
1 : .......*****************************
***.I....*---------- SEITE 2 -----------
*..."..********************************.
..,..".BEI DIESEM BEFEHL WIRD DIE AKTUEL
LE".H.6..".ADRESSE IN DEN STACK GELEGT,
ZUR ER-".Q.@..".INNERUNG DER STACK IST E
INE ART "...J..".ZWISCHENSPEICHER. IM BE
KANNTEN FORMAT".O.T..".LOW-BYTE, HI-BYTE
. DER RETURN-BEFEHL IN"...^..".MASCHINEN
SPRACHE LAUTET RTS. IHN HABEN".(.H..".WI
R ABER SCHON KENNENGELERNT. ".Y.R..".
DER NAECHSTE BEFEHL LAUTET NOP. DIES IST
"...|.."EIN KOMISCHER KAMERAD, ER HAT NA
EM-"......".LICH KEINE FUNKTION. ER HEIS
ST AUCH AUF".Q....".".14)"TASTE DRUECKEN
"......".".18)"-2-" : . 250 : . A . 440
, 100.#....*****************************
***.I....*-------- SEITE 3 -------------
*.O.B..********************************.
..G..".DEUTSCH UNGEFAEHR KEINE OPERATION
.".H.L..".SO, JETZT WOLLEN WIR UNSEREM C
OMPUTER"...V..".DAS RECHNEN BEIBRINGEN.
ZUERST EINMAL". ....".ADDIEREN, DIES TUN
WIR MIT .ADC..".K....".BEVOR WIR NUN AN
FANGEN ZU RECHNEN ".W....".MUESSEN WIR D
AS C-FLAG LOESCHEN, UM"......".FESTZUSTE
LLEN,OB DAS ERGEBNIS GROESSER".U....".AL
S 255 IST.ZUERST DIE DIREKTE ADRESS-"...
...".IERUNG.DORT LAUTET DER BEFEHL SO ".
..&..".ADC (WERT). DER WERT WIRD MIT DEM
AKKU".H.:...14)"TASTE DRUECKEN".T.D..".
".18)"-3-" : . 250 : . A . 600 , 300...N
..********************************...X..
*-------- SEITE 4 -------------*...B..**
******************************...L..".AD
DIERT.".!.V..".NUN WIEDER EIN KLEINES PR
OGRAMM :".>.W..".".14)"TASTE DRUECKEN".P
.X..".".18)"-4-".L.Y.. 250 : . A . 636 ,
440...Z..******************************
**...{..*-------- SEITE 5 -------------*
...|..********************************..
....". LDA $1000;WERT AUS SPEICHERSTELLE
".7....". ;$1000 (4096) IN DEN
AKKU .".Y....". CLC ;C-FLAG LOESCHEN
"......". ADC #$10;AKKU MIT $10 (16) ADD
IEREN"......". BCS LOOP;WENN C-FLAG = 1
DANN NACH LOOP"......" RTS ;WENN C-F
LAG = 0 WAR DANN ZU-"......". ;R
UECK (HIER INS BASIC).:....".LOOP CLC ;W
ENN C-FLAG = 1 WAR, DANN ".\.F..".
;C-FLAG LOESCHEN"...P..". RTS ;ZU
RUECK (HIER INS BASIC)...Z..".".14)"TAST
E DRUECKEN)"......".".18)"-5-".R.... 250
: . A . 770 , 600......****************
****************......*-------- SEITE 6
-------------*.D....********************
************.T....".DIES WAR EIN KLEINES
PROGRAMM,DAS IHNEN". . ..".DIE FUNKTION
SWEISE DER BEFEHLE VER-".L.*..".DEUTLICH
EN SOLL. NUN WEITER MIT DER"...4..".SUBT
RAKTION. DER BEFEHL DAZU LAUTET .SBC..".
-.>.."HIER SOLLTEN SIE DAS C-FLAG SETZEN
, DA".\.H..".SIE FESTSTELLEN MUESSEN,OB
DIE RECHEN-"...R..".OPERATION EINE MINUS
ZAHL ERGEBEN HAT."...\..".HIER SEHEN WI
R EINE WEITERE FUNKTION DES"...F.."C-FLA
GS,ES REAGIERT NICHT NUR AUF UEBER-"...P
.."LAEUFE (GROESSER ALS 255), SONDERN AU
CH".8....".".14)"TASTE DRUECKEN".J....".
".18)"-6-".F.... 250 : . A . 940 , 636..
....********************************....
..*------- SEITE 7 --------------*.X....
********************************......".
AUF ZAHLEN, DIE KLEINER ALS 0 SIND.".1.J
..".DAS C-FLAG IST IST ALSO EIN BIT, DAS
".Y.T..".UNS JEDE ILLEGALE ZAHL ANZEIGT.
"......".SO,JETZT KOENNEN SIE EINFACHE R
ECHNUNGEN"......"DURCHFUEHREN. FUER DIE
MULTIPLIKATION"......".UND DIVISION EXIS
TIEREN LEIDER KEINE"......".BEFEHLE. HIE
RZU MUESSEN SIE IHR EIGENES".D....".PROG
RAMM SCHREIBEN. LASSEN SIE SICH DA-".T..
..".DURCH NICHT ENTMUTIGEN,ICH ZEIGE IHN
EN,"......".WIE SIE DIESE TATSACHE UMGEH
EN KOENNEN."...$...14)".TASTE DRUECKEN".
Q....".".18)"-7-"...8.. 250 : . A . 1100
, 770...B..****************************
***.8.L..*------- SEITE 8 -------------*
.].V..*******************************...
`..".DAZU ABER SPAETER. HABEN SIE SCHON
VOM"...J..".KERNAL GEHOERT. DIES IST BEI
FAST ALLEN"...T..".COMMODORE COMPUTERN
GLEICH. DORT SIND"...~..".NUETZLICHE ROU
TINEN ZUSAMMEN GEFASST.".G....".DIE ERST
E, DIE WIR DAVON NUTZEN WOLLEN".V....".H
EISST .CHROUT. UND DEREN STARTADRESSE"..
....".LIEGT BEI $FFD2. SIE MUESSEN VOR D
EM".P....".ANSPRUNG (JMP ODER JSR) DEN W
ERT DES"......".ZEICHENS IM ASCII-CODE I
N DEN AKKU LADEN"...D..".".14)"TASTE DRU
ECKEN".0.N..".".18)"-8-".M.X.. 250 : . A
. 1250 , 940.R....*********************
**********......*------- SEITE 9 -------
------*......***************************
****......".UND DANACH DIE ROUTINE ANSPR
INGEN."......".DIE ROUTINE DRUCKT DAS ZE
ICHEN BEI DER".F....".AKTUELLEN CURSORPO
SITION AUS, DIE ZUVOR".J....".UM EINS ER
HOEHT WORDEN IST."...(..".WISSEN SIE NIC
HTS UEBER DEN ASCII-CODE,".H.2..".CODE,
DANN SCHLAGEN SIE IM ANHANG DES"...<..".
HANDBUCHS NACH, DORT IST ER AUFGEFUEHRT.
"...F..".JETZT ZUM PROGRAMM :".<.P..". L
DA #65 ;ASCII-CODE FUER A".A.Z..". JMP
$FFD2 ;SPRUNG ZU CHROUT".~.X..".".14)"T
ASTE DRUECKEN"......".".18)"-9-"...... 2
50 : .A . 1440 , 1100.R....*************
******************... ..*--------- SEITE
10 ----------*.. ...*******************
************.I ...".HABEN SIE BEMERKT, D
IESMAL HABEN WIR".X ...".DEN DEZIMALMODU
S (ZAHL 65) IN DEN AKKU".. H..".GELADEN.
WENN IN EINEM (NORMALEN)".Q R..".ASSEMB
LERPROGRAMM DAS ZEICHEN .$. WEG-".. ..."
.GELASSEN WIRD, DANN GEHT DAS PROGRAMM".
/!...".VON EINER DEZIMALEN ZAHL AUS (.AC
HTUNG.".\!...".DIES GILT NICHT FUER ALLE
ASSEMBLER."..!...".SCHAUEN SIE AM BESTE
N IN DER PROGRAMMAN-"..!..."LEITUNG NACH
. EIN ZWEITER PUNKT IST DER,"..!..."DASS
AM PROGRAMMENDE KEIN RTS BEFEHL"..",.."
.".14)"TASTE DRUECKEN".."6..".".17)"-10-
".7"@.. 250 : . A . 1610 , 1250.\"J..***
****************************.."T..*-----
- SEITE 11 -------------*.."^..*********
**********************.R"H..".IST, DER D
IE RUECKKEHR ZU BASIC ER-"..#R..".MOEGLI
CHT. DAS GEHEIMNIS IST GANZ EIN-".2#|.."
.FACH:AM ENDE DER CHROUT ROUTINE BEFINDE
T".]#..."SICH EIN RTS BEFEHL. WAERE AM E
NDE "..#...".UNSERES PROGRAMMS EIN RTS B
EFEHL, DANN"..#...".WAERE EIN BYTE VERGE
UDET, DA NICHT MEHR"..#...".IN UNSER PRO
GRAMM ZURUECKGEKEHRT WIRD."..$...".DIES
WAERE NUR DER FALL, WENN WIR EINEN".L$..
.".JSR-BEFEHL BENUTZT HAETTEN. DAS PROGR
AMM".I$L..".".14)"TASTE DRUECKEN".|$V.."
.".17)"-11-"..$... 250 : . A . 1780 , 14
40..$...*******************************.
.$...*----------- SEITE 12 --------*..%.
..*******************************. %..."
.SIEHT SO AUS :".H%...". LDA #65 ;65 IN
DEN AKKU LADEN".L%...". JSR $FFD2;SPRUN
G ZU CHROUT"..%&..". RTS ;ZURUECK I
NS BASIC".A%:..".SIE WISSEN JETZT AUCH,
DASS SIE HIER "..%D..".NICHT DAS PROGR
AMM ABBRECHEN MUESSEN, ".!&N..".SONDERN
SIE KOENNEN JETZT GANZ GEWOHNT ".H&X.."
.FORTFAHREN MIT IHREM PROGRAMM.".E&B..".
".14)"TASTE DRUECKEN".X&L..".".17)"-12-"
..&V.. 250 : . A . 1920 , 1610..&...****
***************************..&...*------
- SEITE 13 ------------*..'...**********
*********************.-'...".GEBEN SIE W
IEDER IHR GERAET EIN".O'..A$ . "" : ."..
D. ODER .F.";A$.M'... A$ . "D" . F.1 : .
2000..'... A$ . "Z" . . 1770..'... A$ .
"F" . F.8 : . 2000..'A.. A$ . "" . ...'
F.. 1960..'P.. 2,F : . 46 , 8:. 45,3 : .
2050 ,0:. "LEKTION 7" , B(2)...
> CLICK IMAGE PREVIEW FOR FULL MODAL