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

DYPP.SRC/SEQ

FILE INFORMATION

FILENAME(S): DYPP.SRC/SEQ

FILE TYPE(S): SEQ

FILE SIZE: 6.5K

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

APPEARS ON: 1 disk(s)

FILE HASH

a4ac8b212cb7c0bd0660d823184baee4fd92063b0d8fca461bbe6724a41c6806

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10302 SEITE A DYPP.SRC/SEQ SEQ C64er 6 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 20 20 20 20 20 20 20 20  20 2A 3D 20 24 32 30 30  |         *= $200|
00000010: 30 0D 0D 3B A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |0..;............|
00000020: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A3 A3  |................|
00000030: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 0D 3B 20 20 44  |............;  D|
00000040: 2E 59 2E 50 2E 50 2E 2D  52 4F 55 54 49 4E 45 20  |.Y.P.P.-ROUTINE |
00000050: 42 59 20 55 57 45 20 4D  49 43 48 45 4C 20 27 39  |BY UWE MICHEL '9|
00000060: 32 0D 3B 20 20 20 20 20  20 20 20 20 27 54 57 49  |2.;         'TWI|
00000070: 4C 49 47 48 54 27 0D 3B  20 20 20 20 20 20 54 55  |LIGHT'.;      TU|
00000080: 52 42 4F 2D 41 53 53 20  46 4F 52 4D 41 54 2E 2E  |RBO-ASS FORMAT..|
00000090: 2E 0D 3B A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |..;.............|
000000A0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
000000B0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 0D 0D 0D 4D 4F 56  |.............MOV|
000000C0: 45 31 20 20 20 20 3D 20  24 30 30 0D 0D 20 20 20  |E1    = $00..   |
000000D0: 20 20 20 20 20 20 4C 44  41 20 23 24 30 31 20 20  |      LDA #$01  |
000000E0: 20 20 3B 5A 45 49 43 48  45 4E 46 41 52 42 45 0D  |  ;ZEICHENFARBE.|
000000F0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 30 32  |         STA $02|
00000100: 38 36 20 20 20 3B 0D 20  20 20 20 20 20 20 20 20  |86   ;.         |
00000110: 4A 53 52 20 24 45 35 34  34 0D 20 20 20 20 20 20  |JSR $E544.      |
00000120: 20 20 20 4C 44 41 20 23  24 30 30 20 20 20 20 3B  |   LDA #$00    ;|
00000130: 20 43 48 41 52 20 4D 41  53 4B 45 20 46 55 45 52  | CHAR MASKE FUER|
00000140: 0D 20 20 20 20 20 20 20  20 20 4C 44 58 20 23 24  |.         LDX #$|
00000150: 30 30 20 20 20 20 3B 20  44 2E 59 2E 50 2E 50 2E  |00    ; D.Y.P.P.|
00000160: 0D 20 20 20 20 20 20 20  20 20 54 41 59 0D 4D 41  |.         TAY.MA|
00000170: 50 20 20 20 20 20 20 54  59 41 0D 20 20 20 20 20  |P      TYA.     |
00000180: 20 20 20 20 53 54 41 20  24 30 34 30 30 2C 58 0D  |    STA $0400,X.|
00000190: 20 20 20 20 20 20 20 20  20 49 4E 59 0D 20 20 20  |         INY.   |
000001A0: 20 20 20 20 20 20 54 59  41 0D 20 20 20 20 20 20  |      TYA.      |
000001B0: 20 20 20 53 54 41 20 24  30 34 32 38 2C 58 0D 20  |   STA $0428,X. |
000001C0: 20 20 20 20 20 20 20 20  49 4E 59 0D 20 20 20 20  |        INY.    |
000001D0: 20 20 20 20 20 54 59 41  0D 20 20 20 20 20 20 20  |     TYA.       |
000001E0: 20 20 53 54 41 20 24 30  34 35 30 2C 58 0D 20 20  |  STA $0450,X.  |
000001F0: 20 20 20 20 20 20 20 49  4E 59 0D 20 20 20 20 20  |       INY.     |
00000200: 20 20 20 20 54 59 41 0D  20 20 20 20 20 20 20 20  |    TYA.        |
00000210: 20 53 54 41 20 24 30 34  37 38 2C 58 0D 20 20 20  | STA $0478,X.   |
00000220: 20 20 20 20 20 20 49 4E  59 0D 20 20 20 20 20 20  |      INY.      |
00000230: 20 20 20 54 59 41 0D 20  20 20 20 20 20 20 20 20  |   TYA.         |
00000240: 53 54 41 20 24 30 34 41  30 2C 58 0D 20 20 20 20  |STA $04A0,X.    |
00000250: 20 20 20 20 20 49 4E 59  0D 20 20 20 20 20 20 20  |     INY.       |
00000260: 20 20 54 59 41 0D 20 20  20 20 20 20 20 20 20 53  |  TYA.         S|
00000270: 54 41 20 24 30 34 43 38  2C 58 0D 20 20 20 20 20  |TA $04C8,X.     |
00000280: 20 20 20 20 49 4E 59 0D  20 20 20 20 20 20 20 20  |    INY.        |
00000290: 20 54 59 41 0D 20 20 20  20 20 20 20 20 20 53 54  | TYA.         ST|
000002A0: 41 20 24 30 34 46 30 2C  58 0D 20 20 20 20 20 20  |A $04F0,X.      |
000002B0: 20 20 20 49 4E 59 0D 20  20 20 20 20 20 20 20 20  |   INY.         |
000002C0: 54 59 41 0D 20 20 20 20  20 20 20 20 20 53 54 41  |TYA.         STA|
000002D0: 20 24 30 35 31 38 2C 58  0D 20 20 20 20 20 20 20  | $0518,X.       |
000002E0: 20 20 49 4E 59 0D 20 20  20 20 20 20 20 20 20 54  |  INY.         T|
000002F0: 59 41 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |YA.         STA |
00000300: 24 30 35 34 30 2C 58 0D  20 20 20 20 20 20 20 20  |$0540,X.        |
00000310: 20 49 4E 58 0D 20 20 20  20 20 20 20 20 20 49 4E  | INX.         IN|
00000320: 59 0D 20 20 20 20 20 20  20 20 20 43 50 58 20 23  |Y.         CPX #|
00000330: 24 30 31 0D 20 20 20 20  20 20 20 20 20 42 4E 45  |$01.         BNE|
00000340: 20 4D 41 50 0D 0D 20 20  20 20 20 20 20 20 20 4C  | MAP..         L|
00000350: 44 58 20 23 24 30 30 0D  43 48 41 52 20 20 20 20  |DX #$00.CHAR    |
00000360: 20 4C 44 41 20 23 24 46  46 20 20 20 20 3B 57 45  | LDA #$FF    ;WE|
00000370: 52 54 45 20 46 55 45 52  20 43 48 41 52 0D 20 20  |RTE FUER CHAR.  |
00000380: 20 20 20 20 20 20 20 53  54 41 20 24 35 33 30 30  |       STA $5300|
00000390: 2C 58 20 3B 49 4E 20 44  49 45 53 45 4D 20 42 45  |,X ;IN DIESEM BE|
000003A0: 49 53 50 2E 0D 20 20 20  20 20 20 20 20 20 49 4E  |ISP..         IN|
000003B0: 58 20 20 20 20 20 20 20  20 20 3B 45 49 4E 20 4B  |X         ;EIN K|
000003C0: 41 52 52 4F 2E 2E 2E 21  0D 20 20 20 20 20 20 20  |ARRO...!.       |
000003D0: 20 20 43 50 58 20 23 24  30 38 0D 20 20 20 20 20  |  CPX #$08.     |
000003E0: 20 20 20 20 42 4E 45 20  43 48 41 52 0D 3B A4 A4  |    BNE CHAR.;..|
000003F0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000400: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000410: A4 A4 A4 A4 A4 0D 0D 20  20 20 20 20 20 20 20 20  |.......         |
00000420: 53 45 49 20 20 20 20 20  20 20 20 20 3B 49 52 51  |SEI         ;IRQ|
00000430: 20 53 50 45 52 52 45 4E  21 0D 20 20 20 20 20 20  | SPERREN!.      |
00000440: 20 20 20 4C 44 41 20 23  24 37 46 20 20 20 20 3B  |   LDA #$7F    ;|
00000450: 54 49 4D 45 52 0D 20 20  20 20 20 20 20 20 20 53  |TIMER.         S|
00000460: 54 41 20 24 44 43 30 44  20 20 20 3B 53 45 54 5A  |TA $DC0D   ;SETZ|
00000470: 45 4E 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |EN.         LDA |
00000480: 23 24 30 31 20 20 20 20  3B 4E 55 52 20 52 41 53  |#$01    ;NUR RAS|
00000490: 54 45 52 20 49 52 51 0D  20 20 20 20 20 20 20 20  |TER IRQ.        |
000004A0: 20 53 54 41 20 24 44 30  31 41 20 20 20 3B 5A 55  | STA $D01A   ;ZU|
000004B0: 4C 41 53 53 45 4E 0D 20  20 20 20 20 20 20 20 20  |LASSEN.         |
000004C0: 4C 44 41 20 23 24 33 30  20 20 20 20 3B 52 41 53  |LDA #$30    ;RAS|
000004D0: 54 45 52 20 49 52 51 20  42 45 49 0D 20 20 20 20  |TER IRQ BEI.    |
000004E0: 20 20 20 20 20 53 54 41  20 24 44 30 31 32 20 20  |     STA $D012  |
000004F0: 20 3B 52 41 53 54 45 52  5A 45 49 4C 45 20 33 30  | ;RASTERZEILE 30|
00000500: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 3C  |.         LDA #<|
00000510: 49 52 51 31 0D 20 20 20  20 20 20 20 20 20 53 54  |IRQ1.         ST|
00000520: 41 20 24 30 33 31 34 0D  20 20 20 20 20 20 20 20  |A $0314.        |
00000530: 20 4C 44 41 20 23 3E 49  52 51 31 0D 20 20 20 20  | LDA #>IRQ1.    |
00000540: 20 20 20 20 20 53 54 41  20 24 30 33 31 35 0D 20  |     STA $0315. |
00000550: 20 20 20 20 20 20 20 20  43 4C 49 0D 43 4F 4D 20  |        CLI.COM |
00000560: 20 20 20 20 20 4C 44 41  20 24 44 43 30 31 20 20  |     LDA $DC01  |
00000570: 20 3B 57 45 4E 4E 20 43  3D 20 47 45 52 55 45 43  | ;WENN C= GERUEC|
00000580: 4B 54 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |KT.         CMP |
00000590: 23 24 44 46 20 20 20 20  3B 52 55 45 43 4B 53 50  |#$DF    ;RUECKSP|
000005A0: 52 55 4E 47 20 49 4E 0D  20 20 20 20 20 20 20 20  |RUNG IN.        |
000005B0: 20 42 4E 45 20 43 4F 4D  20 20 20 20 20 3B 54 55  | BNE COM     ;TU|
000005C0: 52 42 4F 2D 41 53 53 2E  2E 2E 0D 20 20 20 20 20  |RBO-ASS....     |
000005D0: 20 20 20 20 4A 4D 50 20  24 39 30 30 30 0D 3B A4  |    JMP $9000.;.|
000005E0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
000005F0: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000600: A4 A4 A4 A4 A4 A4 0D 0D  49 52 51 31 20 20 20 20  |........IRQ1    |
00000610: 20 49 4E 43 20 24 44 30  31 39 0D 20 20 20 20 20  | INC $D019.     |
00000620: 20 20 20 20 4C 44 41 20  23 24 31 42 0D 20 20 20  |    LDA #$1B.   |
00000630: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 31 0D  |      STA $D011.|
00000640: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 31  |         LDA #$1|
00000650: 46 20 20 20 20 3B 43 48  41 52 53 45 54 20 42 45  |F    ;CHARSET BE|
00000660: 49 20 24 33 38 30 30 0D  20 20 20 20 20 20 20 20  |I $3800.        |
00000670: 20 53 54 41 20 24 44 30  31 38 0D 20 20 20 20 20  | STA $D018.     |
00000680: 20 20 20 20 4C 44 41 20  23 24 43 38 20 20 20 20  |    LDA #$C8    |
00000690: 3B 53 49 4E 47 4C 45 20  43 4F 4C 4F 52 0D 20 20  |;SINGLE COLOR.  |
000006A0: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 31 36  |       STA $D016|
000006B0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 24  |.         LDA #$|
000006C0: 30 30 20 20 20 20 3B 52  41 48 4D 45 4E 20 55 2E  |00    ;RAHMEN U.|
000006D0: 20 48 49 4E 54 45 52 47  2E 0D 20 20 20 20 20 20  | HINTERG..      |
000006E0: 20 20 20 53 54 41 20 24  44 30 32 30 20 20 20 3B  |   STA $D020   ;|
000006F0: 53 43 48 57 41 52 5A 0D  20 20 20 20 20 20 20 20  |SCHWARZ.        |
00000700: 20 53 54 41 20 24 44 30  32 31 0D 20 20 20 20 20  | STA $D021.     |
00000710: 20 20 20 20 4C 44 58 20  23 24 30 30 0D 43 4C 45  |    LDX #$00.CLE|
00000720: 41 52 20 20 20 20 4C 44  41 20 23 24 30 30 20 20  |AR    LDA #$00  |
00000730: 20 20 3B 43 48 41 52 53  45 54 4C 4F 45 53 43 48  |  ;CHARSETLOESCH|
00000740: 45 4E 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |EN.         STA |
00000750: 24 33 38 30 30 2C 58 0D  20 20 20 20 20 20 20 20  |$3800,X.        |
00000760: 20 49 4E 58 0D 20 20 20  20 20 20 20 20 20 42 4E  | INX.         BN|
00000770: 45 20 43 4C 45 41 52 0D  20 20 20 20 20 20 20 20  |E CLEAR.        |
00000780: 20 44 45 43 20 4D 4F 56  45 31 0D 20 20 20 20 20  | DEC MOVE1.     |
00000790: 20 20 20 20 4A 53 52 20  44 59 50 50 0D 20 20 20  |    JSR DYPP.   |
000007A0: 20 20 20 20 20 20 4C 44  41 20 23 24 46 41 0D 20  |      LDA #$FA. |
000007B0: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 31  |        STA $D01|
000007C0: 32 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |2.         LDA #|
000007D0: 3C 49 52 51 31 0D 20 20  20 20 20 20 20 20 20 53  |<IRQ1.         S|
000007E0: 54 41 20 24 30 33 31 34  0D 20 20 20 20 20 20 20  |TA $0314.       |
000007F0: 20 20 4C 44 41 20 23 3E  49 52 51 31 0D 20 20 20  |  LDA #>IRQ1.   |
00000800: 20 20 20 20 20 20 53 54  41 20 24 30 33 31 35 0D  |      STA $0315.|
00000810: 20 20 20 20 20 20 20 20  20 4A 4D 50 20 24 45 41  |         JMP $EA|
00000820: 37 45 0D 3B A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |7E.;............|
00000830: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00000840: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 0D 0D 44 59 50  |.............DYP|
00000850: 50 20 20 20 20 20 4C 44  58 20 4D 4F 56 45 31 0D  |P     LDX MOVE1.|
00000860: 20 20 20 20 20 20 20 20  20 4C 44 59 20 53 49 4E  |         LDY SIN|
00000870: 2C 58 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |,X.         LDA |
00000880: 24 35 33 30 30 20 20 20  3B 5F 20 45 52 53 54 45  |$5300   ;_ ERSTE|
00000890: 53 20 43 48 41 52 42 59  54 45 0D 20 20 20 20 20  |S CHARBYTE.     |
000008A0: 20 20 20 20 41 4E 44 20  23 24 43 30 20 20 20 20  |    AND #$C0    |
000008B0: 3B 5F 20 45 52 53 54 45  5A 45 49 4C 45 20 43 48  |;_ ERSTEZEILE CH|
000008C0: 41 52 0D 20 20 20 20 20  20 20 20 20 4F 52 41 20  |AR.         ORA |
000008D0: 24 33 38 30 30 2C 59 0D  20 20 20 20 20 20 20 20  |$3800,Y.        |
000008E0: 20 53 54 41 20 24 33 38  30 30 2C 59 0D 20 20 20  | STA $3800,Y.   |
000008F0: 20 20 20 20 20 20 4C 44  41 20 24 35 33 30 31 20  |      LDA $5301 |
00000900: 20 20 3B 5A 57 45 49 54  45 53 2E 2E 2E 0D 20 20  |  ;ZWEITES....  |
00000910: 20 20 20 20 20 20 20 41  4E 44 20 23 24 43 30 0D  |       AND #$C0.|
00000920: 20 20 20 20 20 20 20 20  20 4F 52 41 20 24 33 38  |         ORA $38|
00000930: 30 31 2C 59 0D 20 20 20  20 20 20 20 20 20 53 54  |01,Y.         ST|
00000940: 41 20 24 33 38 30 31 2C  59 0D 20 20 20 20 20 20  |A $3801,Y.      |
00000950: 20 20 20 4C 44 41 20 24  35 33 30 32 20 20 20 3B  |   LDA $5302   ;|
00000960: 33 2E 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |3..         AND |
00000970: 23 24 43 30 0D 20 20 20  20 20 20 20 20 20 4F 52  |#$C0.         OR|
00000980: 41 20 24 33 38 30 32 2C  59 0D 20 20 20 20 20 20  |A $3802,Y.      |
00000990: 20 20 20 53 54 41 20 24  33 38 30 32 2C 59 0D 20  |   STA $3802,Y. |
000009A0: 20 20 20 20 20 20 20 20  4C 44 41 20 24 35 33 30  |        LDA $530|
000009B0: 33 20 20 20 3B 34 2E 0D  20 20 20 20 20 20 20 20  |3   ;4..        |
000009C0: 20 41 4E 44 20 23 24 43  30 0D 20 20 20 20 20 20  | AND #$C0.      |
000009D0: 20 20 20 4F 52 41 20 24  33 38 30 33 2C 59 0D 20  |   ORA $3803,Y. |
000009E0: 20 20 20 20 20 20 20 20  53 54 41 20 24 33 38 30  |        STA $380|
000009F0: 33 2C 59 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |3,Y.         LDA|
00000A00: 20 24 35 33 30 34 20 20  20 3B 35 2E 0D 20 20 20  | $5304   ;5..   |
00000A10: 20 20 20 20 20 20 41 4E  44 20 23 24 43 30 0D 20  |      AND #$C0. |
00000A20: 20 20 20 20 20 20 20 20  4F 52 41 20 24 33 38 30  |        ORA $380|
00000A30: 34 2C 59 0D 20 20 20 20  20 20 20 20 20 53 54 41  |4,Y.         STA|
00000A40: 20 24 33 38 30 34 2C 59  0D 20 20 20 20 20 20 20  | $3804,Y.       |
00000A50: 20 20 4C 44 41 20 24 35  33 30 35 20 20 20 3B 36  |  LDA $5305   ;6|
00000A60: 2E 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |..         AND #|
00000A70: 24 43 30 0D 20 20 20 20  20 20 20 20 20 4F 52 41  |$C0.         ORA|
00000A80: 20 24 33 38 30 35 2C 59  0D 20 20 20 20 20 20 20  | $3805,Y.       |
00000A90: 20 20 53 54 41 20 24 33  38 30 35 2C 59 0D 20 20  |  STA $3805,Y.  |
00000AA0: 20 20 20 20 20 20 20 4C  44 41 20 24 35 33 30 36  |       LDA $5306|
00000AB0: 20 20 20 3B 37 2E 0D 20  20 20 20 20 20 20 20 20  |   ;7..         |
00000AC0: 41 4E 44 20 23 24 43 30  0D 20 20 20 20 20 20 20  |AND #$C0.       |
00000AD0: 20 20 4F 52 41 20 24 33  38 30 36 2C 59 0D 20 20  |  ORA $3806,Y.  |
00000AE0: 20 20 20 20 20 20 20 53  54 41 20 24 33 38 30 36  |       STA $3806|
00000AF0: 2C 59 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |,Y.         LDA |
00000B00: 24 35 33 30 37 20 20 20  3B 38 2E 0D 20 20 20 20  |$5307   ;8..    |
00000B10: 20 20 20 20 20 41 4E 44  20 23 24 43 30 0D 20 20  |     AND #$C0.  |
00000B20: 20 20 20 20 20 20 20 4F  52 41 20 24 33 38 30 37  |       ORA $3807|
00000B30: 2C 59 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,Y.         STA |
00000B40: 24 33 38 30 37 2C 59 0D  20 20 20 20 20 20 20 20  |$3807,Y.        |
00000B50: 20 49 4E 58 0D 20 20 20  20 20 20 20 20 20 4C 44  | INX.         LD|
00000B60: 59 20 53 49 4E 2C 58 0D  20 20 20 20 20 20 20 20  |Y SIN,X.        |
00000B70: 20 4C 44 41 20 24 35 33  30 30 0D 20 20 20 20 20  | LDA $5300.     |
00000B80: 20 20 20 20 41 4E 44 20  23 24 33 30 20 20 20 20  |    AND #$30    |
00000B90: 3B 5F 20 5A 57 45 49 54  45 5A 45 49 4C 45 20 43  |;_ ZWEITEZEILE C|
00000BA0: 48 41 52 0D 20 20 20 20  20 20 20 20 20 4F 52 41  |HAR.         ORA|
00000BB0: 20 24 33 38 30 30 2C 59  0D 20 20 20 20 20 20 20  | $3800,Y.       |
00000BC0: 20 20 53 54 41 20 24 33  38 30 30 2C 59 0D 20 20  |  STA $3800,Y.  |
00000BD0: 20 20 20 20 20 20 20 4C  44 41 20 24 35 33 30 31  |       LDA $5301|
00000BE0: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 24  |.         AND #$|
00000BF0: 33 30 0D 20 20 20 20 20  20 20 20 20 4F 52 41 20  |30.         ORA |
00000C00: 24 33 38 30 31 2C 59 0D  20 20 20 20 20 20 20 20  |$3801,Y.        |
00000C10: 20 53 54 41 20 24 33 38  30 31 2C 59 0D 20 20 20  | STA $3801,Y.   |
00000C20: 20 20 20 20 20 20 4C 44  41 20 24 35 33 30 32 0D  |      LDA $5302.|
00000C30: 20 20 20 20 20 20 20 20  20 41 4E 44 20 23 24 33  |         AND #$3|
00000C40: 30 0D 20 20 20 20 20 20  20 20 20 4F 52 41 20 24  |0.         ORA $|
00000C50: 33 38 30 32 2C 59 0D 20  20 20 20 20 20 20 20 20  |3802,Y.         |
00000C60: 53 54 41 20 24 33 38 30  32 2C 59 0D 20 20 20 20  |STA $3802,Y.    |
00000C70: 20 20 20 20 20 4C 44 41  20 24 35 33 30 33 0D 20  |     LDA $5303. |
00000C80: 20 20 20 20 20 20 20 20  41 4E 44 20 23 24 33 30  |        AND #$30|
00000C90: 0D 20 20 20 20 20 20 20  20 20 4F 52 41 20 24 33  |.         ORA $3|
00000CA0: 38 30 33 2C 59 0D 20 20  20 20 20 20 20 20 20 53  |803,Y.         S|
00000CB0: 54 41 20 24 33 38 30 33  2C 59 0D 20 20 20 20 20  |TA $3803,Y.     |
00000CC0: 20 20 20 20 4C 44 41 20  24 35 33 30 34 0D 20 20  |    LDA $5304.  |
00000CD0: 20 20 20 20 20 20 20 41  4E 44 20 23 24 33 30 0D  |       AND #$30.|
00000CE0: 20 20 20 20 20 20 20 20  20 4F 52 41 20 24 33 38  |         ORA $38|
00000CF0: 30 34 2C 59 0D 20 20 20  20 20 20 20 20 20 53 54  |04,Y.         ST|
00000D00: 41 20 24 33 38 30 34 2C  59 0D 20 20 20 20 20 20  |A $3804,Y.      |
00000D10: 20 20 20 4C 44 41 20 24  35 33 30 35 0D 20 20 20  |   LDA $5305.   |
00000D20: 20 20 20 20 20 20 41 4E  44 20 23 24 33 30 0D 20  |      AND #$30. |
00000D30: 20 20 20 20 20 20 20 20  4F 52 41 20 24 33 38 30  |        ORA $380|
00000D40: 35 2C 59 0D 20 20 20 20  20 20 20 20 20 53 54 41  |5,Y.         STA|
00000D50: 20 24 33 38 30 35 2C 59  0D 20 20 20 20 20 20 20  | $3805,Y.       |
00000D60: 20 20 4C 44 41 20 24 35  33 30 36 0D 20 20 20 20  |  LDA $5306.    |
00000D70: 20 20 20 20 20 41 4E 44  20 23 24 33 30 0D 20 20  |     AND #$30.  |
00000D80: 20 20 20 20 20 20 20 4F  52 41 20 24 33 38 30 36  |       ORA $3806|
00000D90: 2C 59 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,Y.         STA |
00000DA0: 24 33 38 30 36 2C 59 0D  20 20 20 20 20 20 20 20  |$3806,Y.        |
00000DB0: 20 4C 44 41 20 24 35 33  30 37 0D 20 20 20 20 20  | LDA $5307.     |
00000DC0: 20 20 20 20 41 4E 44 20  23 24 33 30 0D 20 20 20  |    AND #$30.   |
00000DD0: 20 20 20 20 20 20 4F 52  41 20 24 33 38 30 37 2C  |      ORA $3807,|
00000DE0: 59 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |Y.         STA $|
00000DF0: 33 38 30 37 2C 59 0D 20  20 20 20 20 20 20 20 20  |3807,Y.         |
00000E00: 49 4E 58 0D 20 20 20 20  20 20 20 20 20 4C 44 59  |INX.         LDY|
00000E10: 20 53 49 4E 2C 58 0D 20  20 20 20 20 20 20 20 20  | SIN,X.         |
00000E20: 4C 44 41 20 24 35 33 30  30 0D 20 20 20 20 20 20  |LDA $5300.      |
00000E30: 20 20 20 41 4E 44 20 23  24 30 43 20 20 20 20 3B  |   AND #$0C    ;|
00000E40: 33 2E 5A 45 49 4C 45 20  43 48 41 52 0D 20 20 20  |3.ZEILE CHAR.   |
00000E50: 20 20 20 20 20 20 4F 52  41 20 24 33 38 30 30 2C  |      ORA $3800,|
00000E60: 59 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |Y.         STA $|
00000E70: 33 38 30 30 2C 59 0D 20  20 20 20 20 20 20 20 20  |3800,Y.         |
00000E80: 4C 44 41 20 24 35 33 30  31 0D 20 20 20 20 20 20  |LDA $5301.      |
00000E90: 20 20 20 41 4E 44 20 23  24 30 43 0D 20 20 20 20  |   AND #$0C.    |
00000EA0: 20 20 20 20 20 4F 52 41  20 24 33 38 30 31 2C 59  |     ORA $3801,Y|
00000EB0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 33  |.         STA $3|
00000EC0: 38 30 31 2C 59 0D 20 20  20 20 20 20 20 20 20 4C  |801,Y.         L|
00000ED0: 44 41 20 24 35 33 30 32  0D 20 20 20 20 20 20 20  |DA $5302.       |
00000EE0: 20 20 41 4E 44 20 23 24  30 43 0D 20 20 20 20 20  |  AND #$0C.     |
00000EF0: 20 20 20 20 4F 52 41 20  24 33 38 30 32 2C 59 0D  |    ORA $3802,Y.|
00000F00: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 33 38  |         STA $38|
00000F10: 30 32 2C 59 0D 20 20 20  20 20 20 20 20 20 4C 44  |02,Y.         LD|
00000F20: 41 20 24 35 33 30 33 0D  20 20 20 20 20 20 20 20  |A $5303.        |
00000F30: 20 41 4E 44 20 23 24 30  43 0D 20 20 20 20 20 20  | AND #$0C.      |
00000F40: 20 20 20 4F 52 41 20 24  33 38 30 33 2C 59 0D 20  |   ORA $3803,Y. |
00000F50: 20 20 20 20 20 20 20 20  53 54 41 20 24 33 38 30  |        STA $380|
00000F60: 33 2C 59 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |3,Y.         LDA|
00000F70: 20 24 35 33 30 34 0D 20  20 20 20 20 20 20 20 20  | $5304.         |
00000F80: 41 4E 44 20 23 24 30 43  0D 20 20 20 20 20 20 20  |AND #$0C.       |
00000F90: 20 20 4F 52 41 20 24 33  38 30 34 2C 59 0D 20 20  |  ORA $3804,Y.  |
00000FA0: 20 20 20 20 20 20 20 53  54 41 20 24 33 38 30 34  |       STA $3804|
00000FB0: 2C 59 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |,Y.         LDA |
00000FC0: 24 35 33 30 35 0D 20 20  20 20 20 20 20 20 20 41  |$5305.         A|
00000FD0: 4E 44 20 23 24 30 43 0D  20 20 20 20 20 20 20 20  |ND #$0C.        |
00000FE0: 20 4F 52 41 20 24 33 38  30 35 2C 59 0D 20 20 20  | ORA $3805,Y.   |
00000FF0: 20 20 20 20 20 20 53 54  41 20 24 33 38 30 35 2C  |      STA $3805,|
00001000: 59 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |Y.         LDA $|
00001010: 35 33 30 36 0D 20 20 20  20 20 20 20 20 20 41 4E  |5306.         AN|
00001020: 44 20 23 24 30 43 0D 20  20 20 20 20 20 20 20 20  |D #$0C.         |
00001030: 4F 52 41 20 24 33 38 30  36 2C 59 0D 20 20 20 20  |ORA $3806,Y.    |
00001040: 20 20 20 20 20 53 54 41  20 24 33 38 30 36 2C 59  |     STA $3806,Y|
00001050: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 24 35  |.         LDA $5|
00001060: 33 30 37 0D 20 20 20 20  20 20 20 20 20 41 4E 44  |307.         AND|
00001070: 20 23 24 30 43 0D 20 20  20 20 20 20 20 20 20 4F  | #$0C.         O|
00001080: 52 41 20 24 33 38 30 37  2C 59 0D 20 20 20 20 20  |RA $3807,Y.     |
00001090: 20 20 20 20 53 54 41 20  24 33 38 30 37 2C 59 0D  |    STA $3807,Y.|
000010A0: 20 20 20 20 20 20 20 20  20 49 4E 58 0D 20 20 20  |         INX.   |
000010B0: 20 20 20 20 20 20 4C 44  59 20 53 49 4E 2C 58 0D  |      LDY SIN,X.|
000010C0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 35 33  |         LDA $53|
000010D0: 30 30 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |00.         AND |
000010E0: 23 24 30 33 20 20 20 20  3B 34 2E 5A 45 49 4C 45  |#$03    ;4.ZEILE|
000010F0: 20 43 48 41 52 0D 20 20  20 20 20 20 20 20 20 4F  | CHAR.         O|
00001100: 52 41 20 24 33 38 30 30  2C 59 0D 20 20 20 20 20  |RA $3800,Y.     |
00001110: 20 20 20 20 53 54 41 20  24 33 38 30 30 2C 59 0D  |    STA $3800,Y.|
00001120: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 35 33  |         LDA $53|
00001130: 30 31 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |01.         AND |
00001140: 23 24 30 33 0D 20 20 20  20 20 20 20 20 20 4F 52  |#$03.         OR|
00001150: 41 20 24 33 38 30 31 2C  59 0D 20 20 20 20 20 20  |A $3801,Y.      |
00001160: 20 20 20 53 54 41 20 24  33 38 30 31 2C 59 0D 20  |   STA $3801,Y. |
00001170: 20 20 20 20 20 20 20 20  4C 44 41 20 24 35 33 30  |        LDA $530|
00001180: 32 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |2.         AND #|
00001190: 24 30 33 0D 20 20 20 20  20 20 20 20 20 4F 52 41  |$03.         ORA|
000011A0: 20 24 33 38 30 32 2C 59  0D 20 20 20 20 20 20 20  | $3802,Y.       |
000011B0: 20 20 53 54 41 20 24 33  38 30 32 2C 59 0D 20 20  |  STA $3802,Y.  |
000011C0: 20 20 20 20 20 20 20 4C  44 41 20 24 35 33 30 33  |       LDA $5303|
000011D0: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 24  |.         AND #$|
000011E0: 30 33 0D 20 20 20 20 20  20 20 20 20 4F 52 41 20  |03.         ORA |
000011F0: 24 33 38 30 33 2C 59 0D  20 20 20 20 20 20 20 20  |$3803,Y.        |
00001200: 20 53 54 41 20 24 33 38  30 33 2C 59 0D 20 20 20  | STA $3803,Y.   |
00001210: 20 20 20 20 20 20 4C 44  41 20 24 35 33 30 34 0D  |      LDA $5304.|
00001220: 20 20 20 20 20 20 20 20  20 41 4E 44 20 23 24 30  |         AND #$0|
00001230: 33 0D 20 20 20 20 20 20  20 20 20 4F 52 41 20 24  |3.         ORA $|
00001240: 33 38 30 34 2C 59 0D 20  20 20 20 20 20 20 20 20  |3804,Y.         |
00001250: 53 54 41 20 24 33 38 30  34 2C 59 0D 20 20 20 20  |STA $3804,Y.    |
00001260: 20 20 20 20 20 4C 44 41  20 24 35 33 30 35 0D 20  |     LDA $5305. |
00001270: 20 20 20 20 20 20 20 20  41 4E 44 20 23 24 30 33  |        AND #$03|
00001280: 0D 20 20 20 20 20 20 20  20 20 4F 52 41 20 24 33  |.         ORA $3|
00001290: 38 30 35 2C 59 0D 20 20  20 20 20 20 20 20 20 53  |805,Y.         S|
000012A0: 54 41 20 24 33 38 30 35  2C 59 0D 20 20 20 20 20  |TA $3805,Y.     |
000012B0: 20 20 20 20 4C 44 41 20  24 35 33 30 36 0D 20 20  |    LDA $5306.  |
000012C0: 20 20 20 20 20 20 20 41  4E 44 20 23 24 30 33 0D  |       AND #$03.|
000012D0: 20 20 20 20 20 20 20 20  20 4F 52 41 20 24 33 38  |         ORA $38|
000012E0: 30 36 2C 59 0D 20 20 20  20 20 20 20 20 20 53 54  |06,Y.         ST|
000012F0: 41 20 24 33 38 30 36 2C  59 0D 20 20 20 20 20 20  |A $3806,Y.      |
00001300: 20 20 20 4C 44 41 20 24  35 33 30 37 0D 20 20 20  |   LDA $5307.   |
00001310: 20 20 20 20 20 20 41 4E  44 20 23 24 30 33 0D 20  |      AND #$03. |
00001320: 20 20 20 20 20 20 20 20  4F 52 41 20 24 33 38 30  |        ORA $380|
00001330: 37 2C 59 0D 20 20 20 20  20 20 20 20 20 53 54 41  |7,Y.         STA|
00001340: 20 24 33 38 30 37 2C 59  0D 20 20 20 20 20 20 20  | $3807,Y.       |
00001350: 20 20 52 54 53 0D 3B A4  A4 A4 A4 A4 A4 A4 A4 A4  |  RTS.;.........|
00001360: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00001370: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 0D 0D  |................|
00001380: 53 49 4E 20 20 20 20 20  20 2E 42 59 54 45 20 24  |SIN      .BYTE $|
00001390: 32 46 2C 24 32 45 2C 24  32 43 2C 24 32 42 2C 24  |2F,$2E,$2C,$2B,$|
000013A0: 32 39 2C 24 32 37 0D 20  20 20 20 20 20 20 20 20  |29,$27.         |
000013B0: 2E 42 59 54 45 20 24 32  36 2C 24 32 35 2C 24 32  |.BYTE $26,$25,$2|
000013C0: 33 2C 24 32 32 2C 24 32  31 2C 24 32 30 0D 20 20  |3,$22,$21,$20.  |
000013D0: 20 20 20 20 20 20 20 2E  42 59 54 45 20 24 32 30  |       .BYTE $20|
000013E0: 2C 24 31 46 2C 24 31 45  2C 24 31 45 2C 24 31 45  |,$1F,$1E,$1E,$1E|
000013F0: 2C 24 31 45 0D 20 20 20  20 20 20 20 20 20 2E 42  |,$1E.         .B|
00001400: 59 54 45 20 24 31 45 2C  24 31 45 2C 24 31 45 2C  |YTE $1E,$1E,$1E,|
00001410: 24 31 46 2C 24 31 46 2C  24 32 30 0D 20 20 20 20  |$1F,$1F,$20.    |
00001420: 20 20 20 20 20 2E 42 59  54 45 20 24 32 31 2C 24  |     .BYTE $21,$|
00001430: 32 32 2C 24 32 33 2C 24  32 34 2C 24 32 36 2C 24  |22,$23,$24,$26,$|
00001440: 32 37 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |27.         .BYT|
00001450: 45 20 24 32 38 2C 24 32  39 2C 24 32 42 2C 24 32  |E $28,$29,$2B,$2|
00001460: 43 2C 24 32 44 2C 24 32  46 0D 20 20 20 20 20 20  |C,$2D,$2F.      |
00001470: 20 20 20 2E 42 59 54 45  20 24 33 30 2C 24 33 31  |   .BYTE $30,$31|
00001480: 2C 24 33 32 2C 24 33 33  2C 24 33 34 2C 24 33 34  |,$32,$33,$34,$34|
00001490: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
000014A0: 24 33 35 2C 24 33 36 2C  24 33 36 2C 24 33 36 2C  |$35,$36,$36,$36,|
000014B0: 24 33 36 2C 24 33 36 0D  20 20 20 20 20 20 20 20  |$36,$36.        |
000014C0: 20 2E 42 59 54 45 20 24  33 36 2C 24 33 35 2C 24  | .BYTE $36,$35,$|
000014D0: 33 34 2C 24 33 34 2C 24  33 33 2C 24 33 32 0D 20  |34,$34,$33,$32. |
000014E0: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 24 33  |        .BYTE $3|
000014F0: 30 2C 24 32 46 2C 24 32  44 2C 24 32 43 2C 24 32  |0,$2F,$2D,$2C,$2|
00001500: 41 2C 24 32 38 0D 20 20  20 20 20 20 20 20 20 2E  |A,$28.         .|
00001510: 42 59 54 45 20 24 32 36  2C 24 32 34 2C 24 32 33  |BYTE $26,$24,$23|
00001520: 2C 24 32 31 2C 24 31 45  2C 24 31 43 0D 20 20 20  |,$21,$1E,$1C.   |
00001530: 20 20 20 20 20 20 2E 42  59 54 45 20 24 31 42 2C  |      .BYTE $1B,|
00001540: 24 31 39 2C 24 31 37 2C  24 31 35 2C 24 31 33 2C  |$19,$17,$15,$13,|
00001550: 24 31 31 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |$11.         .BY|
00001560: 54 45 20 24 31 30 2C 24  30 45 2C 24 30 44 2C 24  |TE $10,$0E,$0D,$|
00001570: 30 43 2C 24 30 42 2C 24  30 41 0D 20 20 20 20 20  |0C,$0B,$0A.     |
00001580: 20 20 20 20 2E 42 59 54  45 20 24 30 39 2C 24 30  |    .BYTE $09,$0|
00001590: 39 2C 24 30 38 2C 24 30  38 2C 24 30 38 2C 24 30  |9,$08,$08,$08,$0|
000015A0: 38 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |8.         .BYTE|
000015B0: 20 24 30 38 2C 24 30 39  2C 24 30 39 2C 24 30 41  | $08,$09,$09,$0A|
000015C0: 2C 24 30 42 2C 24 30 43  0D 20 20 20 20 20 20 20  |,$0B,$0C.       |
000015D0: 20 20 2E 42 59 54 45 20  24 30 44 2C 24 30 45 2C  |  .BYTE $0D,$0E,|
000015E0: 24 30 46 2C 24 31 30 2C  24 31 31 2C 24 31 33 0D  |$0F,$10,$11,$13.|
000015F0: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 24  |         .BYTE $|
00001600: 31 34 2C 24 31 35 2C 24  31 37 2C 24 31 38 2C 24  |14,$15,$17,$18,$|
00001610: 31 39 2C 24 31 41 0D 20  20 20 20 20 20 20 20 20  |19,$1A.         |
00001620: 2E 42 59 54 45 20 24 31  42 2C 24 31 43 2C 24 31  |.BYTE $1B,$1C,$1|
00001630: 44 2C 24 31 45 2C 24 31  46 2C 24 31 46 0D 20 20  |D,$1E,$1F,$1F.  |
00001640: 20 20 20 20 20 20 20 2E  42 59 54 45 20 24 32 30  |       .BYTE $20|
00001650: 2C 24 32 30 2C 24 32 30  2C 24 32 30 2C 24 32 30  |,$20,$20,$20,$20|
00001660: 2C 24 32 30 0D 20 20 20  20 20 20 20 20 20 2E 42  |,$20.         .B|
00001670: 59 54 45 20 24 31 46 2C  24 31 46 2C 24 31 45 2C  |YTE $1F,$1F,$1E,|
00001680: 24 31 44 2C 24 31 43 2C  24 31 42 0D 20 20 20 20  |$1D,$1C,$1B.    |
00001690: 20 20 20 20 20 2E 42 59  54 45 20 24 31 41 2C 24  |     .BYTE $1A,$|
000016A0: 31 39 2C 24 31 37 2C 24  31 36 2C 24 31 34 2C 24  |19,$17,$16,$14,$|
000016B0: 31 33 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |13.         .BYT|
000016C0: 45 20 24 31 31 2C 24 30  46 2C 24 30 45 2C 24 30  |E $11,$0F,$0E,$0|
000016D0: 43 2C 24 30 42 2C 24 30  39 0D 20 20 20 20 20 20  |C,$0B,$09.      |
000016E0: 20 20 20 2E 42 59 54 45  20 24 30 38 2C 24 30 36  |   .BYTE $08,$06|
000016F0: 2C 24 30 35 2C 24 30 34  2C 24 30 33 2C 24 30 32  |,$05,$04,$03,$02|
00001700: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
00001710: 24 30 31 2C 24 30 31 2C  24 30 30 2C 24 30 30 2C  |$01,$01,$00,$00,|
00001720: 24 30 30 2C 24 30 30 0D  20 20 20 20 20 20 20 20  |$00,$00.        |
00001730: 20 2E 42 59 54 45 20 24  30 30 2C 24 30 30 2C 24  | .BYTE $00,$00,$|
00001740: 30 31 2C 24 30 31 2C 24  30 32 2C 24 30 33 0D 20  |01,$01,$02,$03. |
00001750: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 24 30  |        .BYTE $0|
00001760: 34 2C 24 30 35 2C 24 30  37 2C 24 30 38 2C 24 30  |4,$05,$07,$08,$0|
00001770: 41 2C 24 30 42 0D 20 20  20 20 20 20 20 20 20 2E  |A,$0B.         .|
00001780: 42 59 54 45 20 24 30 44  2C 24 30 46 2C 24 31 31  |BYTE $0D,$0F,$11|
00001790: 2C 24 31 33 2C 24 31 35  2C 24 31 37 0D 20 20 20  |,$13,$15,$17.   |
000017A0: 20 20 20 20 20 20 2E 42  59 54 45 20 24 31 38 2C  |      .BYTE $18,|
000017B0: 24 31 41 2C 24 31 43 2C  24 31 45 2C 24 31 46 2C  |$1A,$1C,$1E,$1F,|
000017C0: 24 32 31 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |$21.         .BY|
000017D0: 54 45 20 24 32 32 2C 24  32 34 2C 24 32 35 2C 24  |TE $22,$24,$25,$|
000017E0: 32 36 2C 24 32 37 2C 24  32 38 0D 20 20 20 20 20  |26,$27,$28.     |
000017F0: 20 20 20 20 2E 42 59 54  45 20 24 32 38 2C 24 32  |    .BYTE $28,$2|
00001800: 39 2C 24 32 39 2C 24 32  39 2C 24 32 41 2C 24 32  |9,$29,$29,$2A,$2|
00001810: 39 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |9.         .BYTE|
00001820: 20 24 32 39 2C 24 32 39  2C 24 32 38 2C 24 32 38  | $29,$29,$28,$28|
00001830: 2C 24 32 37 2C 24 32 36  0D 20 20 20 20 20 20 20  |,$27,$26.       |
00001840: 20 20 2E 42 59 54 45 20  24 32 35 2C 24 32 34 2C  |  .BYTE $25,$24,|
00001850: 24 32 33 2C 24 32 32 2C  24 32 31 2C 24 31 46 0D  |$23,$22,$21,$1F.|
00001860: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 24  |         .BYTE $|
00001870: 31 45 2C 24 31 44 2C 24  31 43 2C 24 31 42 2C 24  |1E,$1D,$1C,$1B,$|
00001880: 31 41 2C 24 31 39 0D 20  20 20 20 20 20 20 20 20  |1A,$19.         |
00001890: 2E 42 59 54 45 20 24 31  38 2C 24 31 37 2C 24 31  |.BYTE $18,$17,$1|
000018A0: 36 2C 24 31 35 2C 24 31  35 2C 24 31 35 0D 20 20  |6,$15,$15,$15.  |
000018B0: 20 20 20 20 20 20 20 2E  42 59 54 45 20 24 31 35  |       .BYTE $15|
000018C0: 2C 24 31 34 2C 24 31 35  2C 24 31 35 2C 24 31 35  |,$14,$15,$15,$15|
000018D0: 2C 24 31 36 0D 20 20 20  20 20 20 20 20 20 2E 42  |,$16.         .B|
000018E0: 59 54 45 20 24 31 37 2C  24 31 37 2C 24 31 38 2C  |YTE $17,$17,$18,|
000018F0: 24 31 41 2C 24 31 42 2C  24 31 43 0D 20 20 20 20  |$1A,$1B,$1C.    |
00001900: 20 20 20 20 20 2E 42 59  54 45 20 24 31 45 2C 24  |     .BYTE $1E,$|
00001910: 31 46 2C 24 32 31 2C 24  32 33 2C 24 32 35 2C 24  |1F,$21,$23,$25,$|
00001920: 32 37 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |27.         .BYT|
00001930: 45 20 24 32 38 2C 24 32  41 2C 24 32 43 2C 24 32  |E $28,$2A,$2C,$2|
00001940: 45 2C 24 33 30 2C 24 33  32 0D 20 20 20 20 20 20  |E,$30,$32.      |
00001950: 20 20 20 2E 42 59 54 45  20 24 33 33 2C 24 33 35  |   .BYTE $33,$35|
00001960: 2C 24 33 37 2C 24 33 38  2C 24 33 39 2C 24 33 42  |,$37,$38,$39,$3B|
00001970: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
00001980: 24 33 43 2C 24 33 43 2C  24 33 44 2C 24 33 45 2C  |$3C,$3C,$3D,$3E,|
00001990: 24 33 45 2C 24 33 45 0D  20 20 20 20 20 20 20 20  |$3E,$3E.        |
000019A0: 20 2E 42 59 54 45 20 24  33 45 2C 24 33 45 2C 24  | .BYTE $3E,$3E,$|
000019B0: 33 45 2C 24 33 45 2C 24  33 44 2C 24 33 43 0D 20  |3E,$3E,$3D,$3C. |
000019C0: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 24 33  |        .BYTE $3|
000019D0: 43 2C 24 33 42 2C 24 33  39 2C 24 33 38 2C 24 33  |C,$3B,$39,$38,$3|
000019E0: 37 2C 24 33 36 0D 20 20  20 20 20 20 20 20 20 2E  |7,$36.         .|
000019F0: 42 59 54 45 20 24 33 34  2C 24 33 33 2C 24 33 31  |BYTE $34,$33,$31|
00001A00: 2C 24 32 46 2C 24 46 46  0D 3B A4 A4 A4 A4 A4 A4  |,$2F,$FF.;......|
00001A10: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00001A20: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A4 A4  |................|
00001A30: A4 0D 0D                                          |...             |
         *= $2000..;....................
....................;  D.Y.P.P.-ROUTINE 
BY UWE MICHEL '92.;         'TWILIGHT'.;
      TURBO-ASS FORMAT....;.............
.............................MOVE1    = 
$00..         LDA #$01    ;ZEICHENFARBE.
         STA $0286   ;.         JSR $E54
4.         LDA #$00    ; CHAR MASKE FUER
.         LDX #$00    ; D.Y.P.P..       
  TAY.MAP      TYA.         STA $0400,X.
         INY.         TYA.         STA $
0428,X.         INY.         TYA.       
  STA $0450,X.         INY.         TYA.
         STA $0478,X.         INY.      
   TYA.         STA $04A0,X.         INY
.         TYA.         STA $04C8,X.     
    INY.         TYA.         STA $04F0,
X.         INY.         TYA.         STA
 $0518,X.         INY.         TYA.     
    STA $0540,X.         INX.         IN
Y.         CPX #$01.         BNE MAP..  
       LDX #$00.CHAR     LDA #$FF    ;WE
RTE FUER CHAR.         STA $5300,X ;IN D
IESEM BEISP..         INX         ;EIN K
ARRO...!.         CPX #$08.         BNE 
CHAR.;..................................
.......         SEI         ;IRQ SPERREN
!.         LDA #$7F    ;TIMER.         S
TA $DC0D   ;SETZEN.         LDA #$01    
;NUR RASTER IRQ.         STA $D01A   ;ZU
LASSEN.         LDA #$30    ;RASTER IRQ 
BEI.         STA $D012   ;RASTERZEILE 30
.         LDA #<IRQ1.         STA $0314.
         LDA #>IRQ1.         STA $0315. 
        CLI.COM      LDA $DC01   ;WENN C
= GERUECKT.         CMP #$DF    ;RUECKSP
RUNG IN.         BNE COM     ;TURBO-ASS.
...         JMP $9000.;.................
........................IRQ1     INC $D0
19.         LDA #$1B.         STA $D011.
         LDA #$1F    ;CHARSET BEI $3800.
         STA $D018.         LDA #$C8    
;SINGLE COLOR.         STA $D016.       
  LDA #$00    ;RAHMEN U. HINTERG..      
   STA $D020   ;SCHWARZ.         STA $D0
21.         LDX #$00.CLEAR    LDA #$00  
  ;CHARSETLOESCHEN.         STA $3800,X.
         INX.         BNE CLEAR.        
 DEC MOVE1.         JSR DYPP.         LD
A #$FA.         STA $D012.         LDA #
<IRQ1.         STA $0314.         LDA #>
IRQ1.         STA $0315.         JMP $EA
7E.;....................................
.....DYPP     LDX MOVE1.         LDY SIN
,X.         LDA $5300   ;_ ERSTES CHARBY
TE.         AND #$C0    ;_ ERSTEZEILE CH
AR.         ORA $3800,Y.         STA $38
00,Y.         LDA $5301   ;ZWEITES....  
       AND #$C0.         ORA $3801,Y.   
      STA $3801,Y.         LDA $5302   ;
3..         AND #$C0.         ORA $3802,
Y.         STA $3802,Y.         LDA $530
3   ;4..         AND #$C0.         ORA $
3803,Y.         STA $3803,Y.         LDA
 $5304   ;5..         AND #$C0.         
ORA $3804,Y.         STA $3804,Y.       
  LDA $5305   ;6..         AND #$C0.    
     ORA $3805,Y.         STA $3805,Y.  
       LDA $5306   ;7..         AND #$C0
.         ORA $3806,Y.         STA $3806
,Y.         LDA $5307   ;8..         AND
 #$C0.         ORA $3807,Y.         STA 
$3807,Y.         INX.         LDY SIN,X.
         LDA $5300.         AND #$30    
;_ ZWEITEZEILE CHAR.         ORA $3800,Y
.         STA $3800,Y.         LDA $5301
.         AND #$30.         ORA $3801,Y.
         STA $3801,Y.         LDA $5302.
         AND #$30.         ORA $3802,Y. 
        STA $3802,Y.         LDA $5303. 
        AND #$30.         ORA $3803,Y.  
       STA $3803,Y.         LDA $5304.  
       AND #$30.         ORA $3804,Y.   
      STA $3804,Y.         LDA $5305.   
      AND #$30.         ORA $3805,Y.    
     STA $3805,Y.         LDA $5306.    
     AND #$30.         ORA $3806,Y.     
    STA $3806,Y.         LDA $5307.     
    AND #$30.         ORA $3807,Y.      
   STA $3807,Y.         INX.         LDY
 SIN,X.         LDA $5300.         AND #
$0C    ;3.ZEILE CHAR.         ORA $3800,
Y.         STA $3800,Y.         LDA $530
1.         AND #$0C.         ORA $3801,Y
.         STA $3801,Y.         LDA $5302
.         AND #$0C.         ORA $3802,Y.
         STA $3802,Y.         LDA $5303.
         AND #$0C.         ORA $3803,Y. 
        STA $3803,Y.         LDA $5304. 
        AND #$0C.         ORA $3804,Y.  
       STA $3804,Y.         LDA $5305.  
       AND #$0C.         ORA $3805,Y.   
      STA $3805,Y.         LDA $5306.   
      AND #$0C.         ORA $3806,Y.    
     STA $3806,Y.         LDA $5307.    
     AND #$0C.         ORA $3807,Y.     
    STA $3807,Y.         INX.         LD
Y SIN,X.         LDA $5300.         AND 
#$03    ;4.ZEILE CHAR.         ORA $3800
,Y.         STA $3800,Y.         LDA $53
01.         AND #$03.         ORA $3801,
Y.         STA $3801,Y.         LDA $530
2.         AND #$03.         ORA $3802,Y
.         STA $3802,Y.         LDA $5303
.         AND #$03.         ORA $3803,Y.
         STA $3803,Y.         LDA $5304.
         AND #$03.         ORA $3804,Y. 
        STA $3804,Y.         LDA $5305. 
        AND #$03.         ORA $3805,Y.  
       STA $3805,Y.         LDA $5306.  
       AND #$03.         ORA $3806,Y.   
      STA $3806,Y.         LDA $5307.   
      AND #$03.         ORA $3807,Y.    
     STA $3807,Y.         RTS.;.........
................................SIN     
 .BYTE $2F,$2E,$2C,$2B,$29,$27.         
.BYTE $26,$25,$23,$22,$21,$20.         .
BYTE $20,$1F,$1E,$1E,$1E,$1E.         .B
YTE $1E,$1E,$1E,$1F,$1F,$20.         .BY
TE $21,$22,$23,$24,$26,$27.         .BYT
E $28,$29,$2B,$2C,$2D,$2F.         .BYTE
 $30,$31,$32,$33,$34,$34.         .BYTE 
$35,$36,$36,$36,$36,$36.         .BYTE $
36,$35,$34,$34,$33,$32.         .BYTE $3
0,$2F,$2D,$2C,$2A,$28.         .BYTE $26
,$24,$23,$21,$1E,$1C.         .BYTE $1B,
$19,$17,$15,$13,$11.         .BYTE $10,$
0E,$0D,$0C,$0B,$0A.         .BYTE $09,$0
9,$08,$08,$08,$08.         .BYTE $08,$09
,$09,$0A,$0B,$0C.         .BYTE $0D,$0E,
$0F,$10,$11,$13.         .BYTE $14,$15,$
17,$18,$19,$1A.         .BYTE $1B,$1C,$1
D,$1E,$1F,$1F.         .BYTE $20,$20,$20
,$20,$20,$20.         .BYTE $1F,$1F,$1E,
$1D,$1C,$1B.         .BYTE $1A,$19,$17,$
16,$14,$13.         .BYTE $11,$0F,$0E,$0
C,$0B,$09.         .BYTE $08,$06,$05,$04
,$03,$02.         .BYTE $01,$01,$00,$00,
$00,$00.         .BYTE $00,$00,$01,$01,$
02,$03.         .BYTE $04,$05,$07,$08,$0
A,$0B.         .BYTE $0D,$0F,$11,$13,$15
,$17.         .BYTE $18,$1A,$1C,$1E,$1F,
$21.         .BYTE $22,$24,$25,$26,$27,$
28.         .BYTE $28,$29,$29,$29,$2A,$2
9.         .BYTE $29,$29,$28,$28,$27,$26
.         .BYTE $25,$24,$23,$22,$21,$1F.
         .BYTE $1E,$1D,$1C,$1B,$1A,$19. 
        .BYTE $18,$17,$16,$15,$15,$15.  
       .BYTE $15,$14,$15,$15,$15,$16.   
      .BYTE $17,$17,$18,$1A,$1B,$1C.    
     .BYTE $1E,$1F,$21,$23,$25,$27.     
    .BYTE $28,$2A,$2C,$2E,$30,$32.      
   .BYTE $33,$35,$37,$38,$39,$3B.       
  .BYTE $3C,$3C,$3D,$3E,$3E,$3E.        
 .BYTE $3E,$3E,$3E,$3E,$3D,$3C.         
.BYTE $3C,$3B,$39,$38,$37,$36.         .
BYTE $34,$33,$31,$2F,$FF.;..............
...........................
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL