_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

DEMO DYCPER.SRC

FILE INFORMATION

FILENAME(S): DEMO DYCPER.SRC

FILE TYPE(S): PRG

FILE SIZE: 2.9K

FIRST SEEN: 2025-11-30 01:13:05

APPEARS ON: 1 disk(s)

FILE HASH

b5d6f671dafcd8d7efe8d265953dda7ab1f814466042f57fbc829032767511f5

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10303 SEITE B DEMO DYCPER.SRC PRG C64er 15 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: C1 24 43 30 30 30 00 CA  4D 00 01 00 54 41 42 C0  |.$C000..M...TAB.|
00000010: 24 31 43 30 30 01 20 53  43 52 45 45 4E 20 4D 49  |$1C00. SCREEN MI|
00000020: 54 20 44 41 54 41 53 00  53 49 4E 54 41 42 C0 24  |T DATAS.SINTAB.$|
00000030: 31 42 30 30 01 20 53 49  4E 55 53 57 45 52 54 45  |1B00. SINUSWERTE|
00000040: 00 53 43 C0 24 30 34 30  30 01 20 42 49 4C 44 53  |.SC.$0400. BILDS|
00000050: 43 48 49 52 4D 53 50 45  49 43 48 45 52 00 48 31  |CHIRMSPEICHER.H1|
00000060: C0 32 35 31 01 20 48 49  4C 46 53 41 44 52 45 53  |.251. HILFSADRES|
00000070: 53 45 4E 00 48 32 C0 32  35 33 00 01 00 AB 00 95  |SEN.H2.253......|
00000080: 23 30 00 4C 4F 4F 50 30  8D 23 30 00 8C 4F 4C 44  |#0.LOOP0.#0..OLD|
00000090: 4C 4F 2C 58 01 20 50 4F  49 4E 54 45 52 20 49 4E  |LO,X. POINTER IN|
000000A0: 49 54 49 41 4C 49 53 49  45 52 45 4E 00 8D 23 3E  |ITIALISIEREN..#>|
000000B0: 53 43 01 20 44 41 4D 49  54 20 4E 49 43 48 54 20  |SC. DAMIT NICHT |
000000C0: 53 4F 4E 53 54 57 4F 48  49 4E 00 8C 4F 4C 44 48  |SONSTWOHIN..OLDH|
000000D0: 49 2C 58 01 20 47 45 53  43 48 52 49 45 42 45 4E  |I,X. GESCHRIEBEN|
000000E0: 20 57 49 52 44 00 9F 00  87 23 33 39 00 A6 4C 4F  | WIRD....#39..LO|
000000F0: 4F 50 30 00 01 20 47 52  41 46 49 4B 20 49 4E 49  |OP0.. GRAFIK INI|
00000100: 54 49 41 4C 49 53 49 45  52 45 4E 00 8D 23 32 34  |TIALISIEREN..#24|
00000110: 01 20 5A 45 49 43 48 45  4E 53 41 54 5A 00 8C 35  |. ZEICHENSATZ..5|
00000120: 33 32 37 32 01 20 41 42  20 24 32 30 30 30 20 41  |3272. AB $2000 A|
00000130: 4E 00 8D 23 31 00 95 23  30 00 4C 4F 4F 50 31 8D  |N..#1..#0.LOOP1.|
00000140: 23 31 00 8C 24 44 38 30  30 2C 58 01 20 46 41 52  |#1..$D800,X. FAR|
00000150: 42 53 50 45 49 43 48 45  52 00 8C 24 44 39 30 30  |BSPEICHER..$D900|
00000160: 2C 58 01 20 4D 49 54 20  57 45 49 53 53 20 46 55  |,X. MIT WEISS FU|
00000170: 45 4C 4C 45 4E 00 8C 24  44 41 30 30 2C 58 00 8C  |ELLEN..$DA00,X..|
00000180: 24 44 42 30 30 2C 58 00  8D 23 30 00 8C 53 43 2C  |$DB00,X..#0..SC,|
00000190: 58 01 20 42 49 4C 44 53  43 48 49 52 4D 00 8C 53  |X. BILDSCHIRM..S|
000001A0: 43 2B 24 31 30 30 2C 58  01 20 4C 4F 45 53 43 48  |C+$100,X. LOESCH|
000001B0: 45 4E 00 8C 53 43 2B 24  32 30 30 2C 58 00 8C 53  |EN..SC+$200,X..S|
000001C0: 43 2B 24 32 45 38 2C 58  00 9F 00 A6 4C 4F 4F 50  |C+$2E8,X....LOOP|
000001D0: 31 00 8D 23 30 01 20 52  41 48 4D 45 4E 20 55 4E  |1..#0. RAHMEN UN|
000001E0: 44 00 8C 24 44 30 32 30  01 20 48 49 4E 54 45 52  |D..$D020. HINTER|
000001F0: 47 52 55 4E 44 00 8C 24  44 30 32 31 01 20 41 55  |GRUND..$D021. AU|
00000200: 46 20 53 43 48 57 41 52  5A 00 01 20 49 4E 54 45  |F SCHWARZ.. INTE|
00000210: 52 55 50 54 20 49 4E 49  54 49 41 4C 49 53 49 45  |RUPT INITIALISIE|
00000220: 52 45 4E 00 8D 23 3C 49  52 51 41 01 20 49 52 51  |REN..#<IRQA. IRQ|
00000230: 20 41 55 46 00 8C 24 33  31 34 01 20 45 49 47 45  | AUF..$314. EIGE|
00000240: 4E 45 00 8D 23 3E 49 52  51 41 01 20 52 4F 55 54  |NE..#>IRQA. ROUT|
00000250: 49 4E 45 00 8C 24 33 31  35 01 20 55 4D 42 49 45  |INE..$315. UMBIE|
00000260: 47 45 4E 3B 00 8D 23 32  35 30 01 20 42 45 49 20  |GEN;..#250. BEI |
00000270: 5A 45 49 4C 45 20 32 35  30 00 8C 24 44 30 31 32  |ZEILE 250..$D012|
00000280: 01 20 41 55 53 4C 4F 45  53 45 4E 3B 00 8D 23 32  |. AUSLOESEN;..#2|
00000290: 37 01 20 48 49 2D 42 59  54 45 00 8C 24 44 30 31  |7. HI-BYTE..$D01|
000002A0: 31 01 20 56 4F 4E 20 5A  45 49 4C 45 20 4C 4F 45  |1. VON ZEILE LOE|
000002B0: 53 43 48 45 4E 3B 00 8D  23 30 01 20 52 41 53 54  |SCHEN;..#0. RAST|
000002C0: 45 52 2D 49 52 51 00 8C  24 44 43 30 45 01 20 45  |ER-IRQ..$DC0E. E|
000002D0: 52 4D 4F 45 47 4C 49 43  48 45 4E 00 8D 23 24 46  |RMOEGLICHEN..#$F|
000002E0: 31 00 8C 24 44 30 31 41  00 AA 00 4C B3 4C 01 20  |1..$D01A...L.L. |
000002F0: 46 45 52 54 49 47 20 55  4E 44 20 57 41 52 54 45  |FERTIG UND WARTE|
00000300: 4E 00 01 00 49 52 51 41  B1 44 59 43 50 01 20 44  |N...IRQA.DYCP. D|
00000310: 59 43 50 45 52 20 5A 45  49 43 48 4E 45 4E 00 8D  |YCPER ZEICHNEN..|
00000320: 23 31 01 20 4E 41 45 43  48 53 54 45 52 00 8C 24  |#1. NAECHSTER..$|
00000330: 44 30 31 39 01 20 49 52  51 00 B3 24 45 41 37 45  |D019. IRQ..$EA7E|
00000340: 01 20 41 55 46 57 49 45  44 45 52 53 45 48 45 4E  |. AUFWIEDERSEHEN|
00000350: 20 21 00 01 00 44 59 43  50 95 53 4F 46 54 01 20  | !...DYCP.SOFT. |
00000360: 53 4F 46 54 20 52 45 47  49 53 54 45 52 00 A7 44  |SOFT REGISTER..D|
00000370: 59 43 50 31 01 20 53 43  48 4F 4E 20 55 4E 54 45  |YCP1. SCHON UNTE|
00000380: 52 20 4E 55 4C 4C 20 3F  00 BD 01 20 4E 4F 45 2C  |R NULL ?... NOE,|
00000390: 20 4B 45 49 4E 20 48 41  52 44 53 43 52 4F 4C 4C  | KEIN HARDSCROLL|
000003A0: 3B 00 94 53 4F 46 54 01  20 4D 45 52 4B 45 4E 00  |;..SOFT. MERKEN.|
000003B0: 94 35 33 32 37 30 01 20  53 4F 46 54 20 52 45 47  |.53270. SOFT REG|
000003C0: 49 53 54 45 52 20 53 43  48 52 45 49 42 45 4E 00  |ISTER SCHREIBEN.|
000003D0: B3 44 59 43 50 32 01 20  57 45 49 54 45 52 3B 00  |.DYCP2. WEITER;.|
000003E0: 44 59 43 50 31 8D 23 37  01 20 53 4F 46 54 53 43  |DYCP1.#7. SOFTSC|
000003F0: 52 4F 4C 4C 00 8C 53 4F  46 54 01 20 5A 55 52 55  |ROLL..SOFT. ZURU|
00000400: 45 43 4B 00 8C 35 33 32  37 30 00 95 23 30 00 44  |ECK..53270..#0.D|
00000410: 59 43 50 31 41 8D 4C 49  4E 45 2B 31 2C 58 01 20  |YCP1A.LINE+1,X. |
00000420: 54 45 58 54 5A 45 49 4C  45 00 8C 4C 49 4E 45 2C  |TEXTZEILE..LINE,|
00000430: 58 01 20 48 41 52 44 53  43 52 4F 4C 4C 45 4E 00  |X. HARDSCROLLEN.|
00000440: 9F 00 87 23 33 38 00 A6  44 59 43 50 31 41 00 95  |...#38..DYCP1A..|
00000450: 48 41 52 44 01 20 4E 45  55 45 53 20 5A 45 49 43  |HARD. NEUES ZEIC|
00000460: 48 45 4E 00 8D 54 45 58  54 2C 58 01 20 48 4F 4C  |HEN..TEXT,X. HOL|
00000470: 45 4E 00 8C 4C 49 4E 45  2B 33 38 00 97 53 49 4E  |EN..LINE+38..SIN|
00000480: 55 53 01 20 53 49 4E 55  53 20 4B 4F 52 52 49 47  |US. SINUS KORRIG|
00000490: 49 45 52 45 4E 00 97 48  41 52 44 01 20 5A 45 49  |IEREN..HARD. ZEI|
000004A0: 43 48 45 4E 20 45 52 48  4F 45 48 45 4E 00 95 48  |CHEN ERHOEHEN..H|
000004B0: 41 52 44 00 87 23 4C 41  45 4E 47 45 01 20 54 45  |ARD..#LAENGE. TE|
000004C0: 58 54 20 5A 55 45 4E 44  45 20 3F 00 A6 44 59 43  |XT ZUENDE ?..DYC|
000004D0: 50 32 00 8D 23 30 01 20  44 41 4E 4E 20 56 4F 4E  |P2..#0. DANN VON|
000004E0: 20 56 4F 52 4E 45 00 8C  48 41 52 44 00 44 59 43  | VORNE..HARD.DYC|
000004F0: 50 32 97 53 49 4E 55 53  01 20 53 49 4E 55 53 57  |P2.SINUS. SINUSW|
00000500: 45 4C 4C 45 3B 00 95 23  30 01 20 53 54 41 52 54  |ELLE;..#0. START|
00000510: 20 42 45 49 00 94 50 4F  53 01 20 53 50 41 4C 54  | BEI..POS. SPALT|
00000520: 45 20 30 00 85 23 34 30  01 20 59 2D 52 45 47 20  |E 0..#40. Y-REG |
00000530: 49 4E 49 54 00 44 59 43  50 33 8D 4F 4C 44 4C 4F  |INIT.DYCP3.OLDLO|
00000540: 2C 58 01 20 41 4C 54 45  53 00 8C 48 32 01 20 5A  |,X. ALTES..H2. Z|
00000550: 45 49 43 48 45 4E 00 8D  4F 4C 44 48 49 2C 58 01  |EICHEN..OLDHI,X.|
00000560: 20 4C 4F 45 53 43 48 45  4E 00 8C 48 32 2B 31 00  | LOESCHEN..H2+1.|
00000570: 8D 23 30 00 8C 28 48 32  29 2C 59 01 20 55 4E 54  |.#0..(H2),Y. UNT|
00000580: 45 52 45 20 48 41 45 4C  46 54 45 00 85 23 30 00  |ERE HAELFTE..#0.|
00000590: 8C 28 48 32 29 2C 59 01  20 4F 42 45 52 45 20 48  |.(H2),Y. OBERE H|
000005A0: 41 45 4C 46 54 45 00 01  00 8D 53 49 4E 55 53 01  |AELFTE....SINUS.|
000005B0: 20 53 49 4E 55 53 20 50  4F 53 49 54 49 4F 4E 00  | SINUS POSITION.|
000005C0: A8 01 20 48 4F 4C 45 4E  00 8B 50 4F 53 01 20 4D  |.. HOLEN..POS. M|
000005D0: 49 54 20 53 50 41 4C 54  45 20 41 44 44 49 45 52  |IT SPALTE ADDIER|
000005E0: 45 4E 00 9D 01 20 55 4E  44 00 8D 53 49 4E 54 41  |EN... UND..SINTA|
000005F0: 42 2C 59 01 20 41 55 53  4C 45 53 45 4E 00 8C 53  |B,Y. AUSLESEN..S|
00000600: 49 4E 01 20 4D 45 52 4B  45 4E 00 89 23 37 01 20  |IN. MERKEN..#7. |
00000610: 50 49 58 45 4C 20 56 45  52 53 43 48 49 45 42 55  |PIXEL VERSCHIEBU|
00000620: 4E 47 00 9D 01 20 44 45  53 20 5A 45 49 43 48 45  |NG... DES ZEICHE|
00000630: 4E 3B 00 8D 4C 49 4E 45  2C 58 01 20 5A 45 49 43  |N;..LINE,X. ZEIC|
00000640: 48 45 4E 20 48 4F 4C 45  4E 00 A8 01 20 55 4E 44  |HEN HOLEN... UND|
00000650: 00 8B 4C 4F 54 41 42 2C  59 01 20 4D 49 54 20 53  |..LOTAB,Y. MIT S|
00000660: 49 4E 55 53 00 8C 48 31  01 20 44 49 45 00 8D 23  |INUS..H1. DIE..#|
00000670: 3E 54 41 42 01 20 50 49  58 45 4C 56 45 52 53 43  |>TAB. PIXELVERSC|
00000680: 48 49 45 42 55 4E 47 00  8B 48 49 54 41 42 2C 59  |HIEBUNG..HITAB,Y|
00000690: 01 20 44 45 43 4F 44 49  45 52 45 4E 00 8C 48 31  |. DECODIEREN..H1|
000006A0: 2B 31 00 01 00 8D 53 49  4E 01 20 4E 55 4E 00 92  |+1....SIN. NUN..|
000006B0: 01 20 44 49 45 20 5A 45  49 43 48 45 4E 00 92 01  |. DIE ZEICHEN...|
000006C0: 20 50 4F 53 49 54 49 4F  4E 00 89 23 25 31 31 31  | POSITION..#%111|
000006D0: 31 31 31 31 30 01 20 42  45 52 45 43 48 4E 45 4E  |11110. BERECHNEN|
000006E0: 00 9D 00 8D 50 4F 53 01  20 53 50 41 4C 54 45 00  |....POS. SPALTE.|
000006F0: A8 01 20 4E 45 48 4D 45  4E 00 8B 41 44 44 54 41  |.. NEHMEN..ADDTA|
00000700: 42 2C 59 01 20 55 4E 44  00 8C 48 32 01 20 5A 45  |B,Y. UND..H2. ZE|
00000710: 49 4C 45 00 8C 4F 4C 44  4C 4F 2C 58 01 20 44 41  |ILE..OLDLO,X. DA|
00000720: 5A 55 41 44 44 49 45 52  45 4E 00 8D 23 30 01 20  |ZUADDIEREN..#0. |
00000730: 44 41 42 45 49 00 8B 41  44 44 54 41 42 2B 31 2C  |DABEI..ADDTAB+1,|
00000740: 59 01 20 44 49 45 20 50  4F 53 49 54 49 4F 4E 00  |Y. DIE POSITION.|
00000750: 8C 48 32 2B 31 01 20 5A  55 4D 20 4C 4F 45 53 43  |.H2+1. ZUM LOESC|
00000760: 48 45 4E 00 8C 4F 4C 44  48 49 2C 58 01 20 49 4E  |HEN..OLDHI,X. IN|
00000770: 20 4F 4C 44 4C 4F 20 55  4E 44 20 4F 4C 44 48 49  | OLDLO UND OLDHI|
00000780: 3B 00 85 23 30 01 20 4A  45 54 5A 54 00 8D 28 48  |;..#0. JETZT..(H|
00000790: 31 29 2C 59 01 20 4E 4F  43 48 00 8C 28 48 32 29  |1),Y. NOCH..(H2)|
000007A0: 2C 59 01 20 5A 45 49 43  48 45 4E 00 85 23 34 30  |,Y. ZEICHEN..#40|
000007B0: 01 20 48 4F 4C 45 4E 20  55 4E 44 00 8D 28 48 31  |. HOLEN UND..(H1|
000007C0: 29 2C 59 01 20 44 49 45  20 5A 57 45 49 00 8C 28  |),Y. DIE ZWEI..(|
000007D0: 48 32 29 2C 59 01 20 48  41 45 4C 46 54 45 4E 20  |H2),Y. HAELFTEN |
000007E0: 53 43 48 52 45 49 42 45  4E 3B 00 97 50 4F 53 01  |SCHREIBEN;..POS.|
000007F0: 20 53 43 48 4F 4E 20 33  39 00 95 50 4F 53 01 20  | SCHON 39..POS. |
00000800: 53 50 41 4C 54 45 4E 00  87 23 33 39 01 20 46 45  |SPALTEN..#39. FE|
00000810: 52 54 49 47 20 3F 00 A6  44 59 43 50 33 01 20 4E  |RTIG ?..DYCP3. N|
00000820: 4F 45 2C 20 4E 4F 43 48  4D 41 4C 00 83 01 20 53  |OE, NOCHMAL... S|
00000830: 4F 4E 53 54 20 45 4E 44  45 20 21 00 01 00 53 49  |ONST ENDE !...SI|
00000840: 4E C2 30 01 20 53 49 4E  55 53 20 4D 45 52 4B 45  |N.0. SINUS MERKE|
00000850: 4E 00 53 49 4E 55 53 C2  30 01 20 54 41 42 45 4C  |N.SINUS.0. TABEL|
00000860: 4C 45 4E 20 50 4F 53 49  54 49 4F 4E 00 50 4F 53  |LEN POSITION.POS|
00000870: C2 30 01 20 50 4F 53 49  54 49 4F 4E 20 46 55 45  |.0. POSITION FUE|
00000880: 52 20 53 43 52 4F 4C 4C  45 52 00 53 4F 46 54 C2  |R SCROLLER.SOFT.|
00000890: 37 01 20 53 4F 46 54 53  43 52 4F 4C 4C 20 42 59  |7. SOFTSCROLL BY|
000008A0: 54 45 00 48 41 52 44 C2  30 01 20 54 45 58 54 50  |TE.HARD.0. TEXTP|
000008B0: 4F 53 49 54 49 4F 4E 20  49 4D 20 53 50 45 49 43  |OSITION IM SPEIC|
000008C0: 48 45 52 00 01 20 48 49  45 52 20 57 49 52 44 20  |HER.. HIER WIRD |
000008D0: 44 49 45 20 5A 45 49 4C  45 20 5A 57 49 53 43 48  |DIE ZEILE ZWISCH|
000008E0: 45 4E 47 53 50 45 49 43  48 45 52 54 00 4C 49 4E  |ENGSPEICHERT.LIN|
000008F0: 45 D4 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |E."             |
00000900: 20 20 20 20 20 20 20 22  00 D4 22 20 20 20 20 20  |       ".."     |
00000910: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
00000920: 00 01 20 53 55 4D 4D 45  4E 54 41 42 45 4C 4C 45  |.. SUMMENTABELLE|
00000930: 4E 20 46 55 45 52 20 43  4F 44 49 45 52 54 45 20  |N FUER CODIERTE |
00000940: 5A 45 49 43 48 45 4E 00  4C 4F 54 41 42 C2 24 30  |ZEICHEN.LOTAB.$0|
00000950: 30 2C 24 35 30 2C 24 41  30 2C 24 46 30 00 C2 24  |0,$50,$A0,$F0..$|
00000960: 34 30 2C 24 39 30 2C 24  45 30 2C 24 33 30 00 48  |40,$90,$E0,$30.H|
00000970: 49 54 41 42 C2 24 30 30  2C 24 30 30 2C 24 30 30  |ITAB.$00,$00,$00|
00000980: 2C 24 30 30 00 C2 24 30  31 2C 24 30 31 2C 24 30  |,$00..$01,$01,$0|
00000990: 31 2C 24 30 32 00 01 20  53 55 4D 4D 45 4E 54 41  |1,$02.. SUMMENTA|
000009A0: 42 45 4C 4C 45 4E 20 46  55 45 52 20 42 49 4C 44  |BELLEN FUER BILD|
000009B0: 53 43 48 49 52 4D 2D 5A  45 49 4C 45 4E 00 41 44  |SCHIRM-ZEILEN.AD|
000009C0: 44 54 41 42 C3 53 43 2B  24 30 30 30 2C 53 43 2B  |DTAB.SC+$000,SC+|
000009D0: 24 30 32 38 2C 53 43 2B  24 30 35 30 2C 53 43 2B  |$028,SC+$050,SC+|
000009E0: 24 30 37 38 2C 53 43 2B  24 30 41 30 2C 53 43 2B  |$078,SC+$0A0,SC+|
000009F0: 24 30 43 38 00 C3 53 43  2B 24 30 46 30 2C 53 43  |$0C8..SC+$0F0,SC|
00000A00: 2B 24 31 31 38 2C 53 43  2B 24 31 34 30 2C 53 43  |+$118,SC+$140,SC|
00000A10: 2B 24 31 36 38 2C 53 43  2B 24 31 39 30 2C 53 43  |+$168,SC+$190,SC|
00000A20: 2B 24 31 42 38 00 C3 53  43 2B 24 31 45 30 2C 53  |+$1B8..SC+$1E0,S|
00000A30: 43 2B 24 32 30 38 2C 53  43 2B 24 32 33 30 2C 53  |C+$208,SC+$230,S|
00000A40: 43 2B 24 32 35 38 2C 53  43 2B 24 32 38 30 2C 53  |C+$258,SC+$280,S|
00000A50: 43 2B 24 32 41 38 00 C3  53 43 2B 24 32 44 30 2C  |C+$2A8..SC+$2D0,|
00000A60: 53 43 2B 24 32 46 38 2C  53 43 2B 24 33 32 30 2C  |SC+$2F8,SC+$320,|
00000A70: 53 43 2B 24 33 34 38 2C  53 43 2B 24 33 37 30 2C  |SC+$348,SC+$370,|
00000A80: 53 43 2B 24 33 39 38 00  01 20 54 45 58 54 20 49  |SC+$398.. TEXT I|
00000A90: 4D 20 56 49 44 45 4F 46  4F 52 4D 41 54 00 54 45  |M VIDEOFORMAT.TE|
00000AA0: 58 54 D4 22 53 4F 20 45  49 4E 46 41 43 48 20 4B  |XT."SO EINFACH K|
00000AB0: 41 4E 4E 20 4D 41 4E 20  45 49 4E 45 4E 20 22 00  |ANN MAN EINEN ".|
00000AC0: D4 22 44 59 43 50 20 43  4F 44 45 4E 20 4F 48 4E  |."DYCP CODEN OHN|
00000AD0: 45 20 44 41 53 53 20 4D  41 4E 20 22 00 D4 22 44  |E DASS MAN ".."D|
00000AE0: 49 45 20 5A 45 49 43 48  45 4E 20 44 49 52 45 4B  |IE ZEICHEN DIREK|
00000AF0: 54 20 4D 41 4E 49 50 55  4C 49 45 52 45 4E 20 22  |T MANIPULIEREN "|
00000B00: 00 D4 22 4D 55 53 53 20  20 20 20 20 20 20 20 20  |.."MUSS         |
00000B10: 20 22 00 45 4E 44 45 C2  30 00 01 00 4C 41 45 4E  | ".ENDE.0...LAEN|
00000B20: 47 45 C0 45 4E 44 45 2D  54 45 58 54 00 01 20 48  |GE.ENDE-TEXT.. H|
00000B30: 49 45 52 20 57 45 52 44  45 4E 20 44 49 45 20 41  |IER WERDEN DIE A|
00000B40: 4C 54 45 4E 20 50 4F 53  49 54 49 4F 4E 45 4E 20  |LTEN POSITIONEN |
00000B50: 47 45 4D 45 52 4B 54 00  4F 4C 44 4C 4F C0 2A 00  |GEMERKT.OLDLO.*.|
00000B60: 4F 4C 44 48 49 C0 4F 4C  44 4C 4F 2B 33 39 00     |OLDHI.OLDLO+39. |
A$C000.JM...TAB.$1C00. SCREEN MIT DATAS.
SINTAB.$1B00. SINUSWERTE.SC.$0400. BILDS
CHIRMSPEICHER.H1.251. HILFSADRESSEN.H2.2
53......#0.LOOP0.#0..OLDLO,X. POINTER IN
ITIALISIEREN..#>SC. DAMIT NICHT SONSTWOH
IN..OLDHI,X. GESCHRIEBEN WIRD....#39..LO
OP0.. GRAFIK INITIALISIEREN..#24. ZEICHE
NSATZ..53272. AB $2000 AN..#1..#0.LOOP1.
#1..$D800,X. FARBSPEICHER..$D900,X. MIT 
WEISS FUELLEN..$DA00,X..$DB00,X..#0..SC,
X. BILDSCHIRM..SC+$100,X. LOESCHEN..SC+$
200,X..SC+$2E8,X....LOOP1..#0. RAHMEN UN
D..$D020. HINTERGRUND..$D021. AUF SCHWAR
Z.. INTERUPT INITIALISIEREN..#<IRQA. IRQ
 AUF..$314. EIGENE..#>IRQA. ROUTINE..$31
5. UMBIEGEN;..#250. BEI ZEILE 250..$D012
. AUSLOESEN;..#27. HI-BYTE..$D011. VON Z
EILE LOESCHEN;..#0. RASTER-IRQ..$DC0E. E
RMOEGLICHEN..#$F1..$D01A...L.L. FERTIG U
ND WARTEN...IRQA.DYCP. DYCPER ZEICHNEN..
#1. NAECHSTER..$D019. IRQ..$EA7E. AUFWIE
DERSEHEN !...DYCP.SOFT. SOFT REGISTER..D
YCP1. SCHON UNTER NULL ?... NOE, KEIN HA
RDSCROLL;..SOFT. MERKEN..53270. SOFT REG
ISTER SCHREIBEN..DYCP2. WEITER;.DYCP1.#7
. SOFTSCROLL..SOFT. ZURUECK..53270..#0.D
YCP1A.LINE+1,X. TEXTZEILE..LINE,X. HARDS
CROLLEN....#38..DYCP1A..HARD. NEUES ZEIC
HEN..TEXT,X. HOLEN..LINE+38..SINUS. SINU
S KORRIGIEREN..HARD. ZEICHEN ERHOEHEN..H
ARD..#LAENGE. TEXT ZUENDE ?..DYCP2..#0. 
DANN VON VORNE..HARD.DYCP2.SINUS. SINUSW
ELLE;..#0. START BEI..POS. SPALTE 0..#40
. Y-REG INIT.DYCP3.OLDLO,X. ALTES..H2. Z
EICHEN..OLDHI,X. LOESCHEN..H2+1..#0..(H2
),Y. UNTERE HAELFTE..#0..(H2),Y. OBERE H
AELFTE....SINUS. SINUS POSITION... HOLEN
..POS. MIT SPALTE ADDIEREN... UND..SINTA
B,Y. AUSLESEN..SIN. MERKEN..#7. PIXEL VE
RSCHIEBUNG... DES ZEICHEN;..LINE,X. ZEIC
HEN HOLEN... UND..LOTAB,Y. MIT SINUS..H1
. DIE..#>TAB. PIXELVERSCHIEBUNG..HITAB,Y
. DECODIEREN..H1+1....SIN. NUN... DIE ZE
ICHEN... POSITION..#%11111110. BERECHNEN
....POS. SPALTE... NEHMEN..ADDTAB,Y. UND
..H2. ZEILE..OLDLO,X. DAZUADDIEREN..#0. 
DABEI..ADDTAB+1,Y. DIE POSITION..H2+1. Z
UM LOESCHEN..OLDHI,X. IN OLDLO UND OLDHI
;..#0. JETZT..(H1),Y. NOCH..(H2),Y. ZEIC
HEN..#40. HOLEN UND..(H1),Y. DIE ZWEI..(
H2),Y. HAELFTEN SCHREIBEN;..POS. SCHON 3
9..POS. SPALTEN..#39. FERTIG ?..DYCP3. N
OE, NOCHMAL... SONST ENDE !...SINB0. SIN
US MERKEN.SINUSB0. TABELLEN POSITION.POS
B0. POSITION FUER SCROLLER.SOFTB7. SOFTS
CROLL BYTE.HARDB0. TEXTPOSITION IM SPEIC
HER.. HIER WIRD DIE ZEILE ZWISCHENGSPEIC
HERT.LINET"                    ".T"     
               ".. SUMMENTABELLEN FUER C
ODIERTE ZEICHEN.LOTABB$00,$50,$A0,$F0.B$
40,$90,$E0,$30.HITABB$00,$00,$00,$00.B$0
1,$01,$01,$02.. SUMMENTABELLEN FUER BILD
SCHIRM-ZEILEN.ADDTABCSC+$000,SC+$028,SC+
$050,SC+$078,SC+$0A0,SC+$0C8.CSC+$0F0,SC
+$118,SC+$140,SC+$168,SC+$190,SC+$1B8.CS
C+$1E0,SC+$208,SC+$230,SC+$258,SC+$280,S
C+$2A8.CSC+$2D0,SC+$2F8,SC+$320,SC+$348,
SC+$370,SC+$398.. TEXT IM VIDEOFORMAT.TE
XTT"SO EINFACH KANN MAN EINEN ".T"DYCP C
ODEN OHNE DASS MAN ".T"DIE ZEICHEN DIREK
T MANIPULIEREN ".T"MUSS          ".ENDEB
0...LAENGE.ENDE-TEXT.. HIER WERDEN DIE A
LTEN POSITIONEN GEMERKT.OLDLO.*.OLDHI.OL
DLO+39.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL