CHAR-TRANS.SEQ
FILE INFORMATION
FILENAME(S): CHAR-TRANS.SEQ
FILE TYPE(S): SEQ
FILE SIZE: 802b
FIRST SEEN: 2025-11-30 01:12:59
APPEARS ON: 1 disk(s)
FILE HASH
d178fb360b2a27a50c0c8545429dd69c473fdca7b8c77466df08a12bbae18706
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10210 SEITE A | CHAR-TRANS.SEQ | SEQ | C64er | 26 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 20 20 20 20 20 20 20 20 2A 3D 20 24 31 30 30 | *= $100| 00000010: 30 0D 0D 20 20 20 20 20 20 20 20 20 53 45 49 20 |0.. SEI | 00000020: 20 20 20 20 20 20 20 3B 49 52 51 20 53 50 45 52 | ;IRQ SPER| 00000030: 52 45 4E 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |REN. LDA| 00000040: 20 23 24 33 33 20 20 20 3B 50 4C 41 20 41 55 46 | #$33 ;PLA AUF| 00000050: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 30 |. STA $0| 00000060: 31 20 20 20 20 3B 5A 45 49 43 48 45 4E 20 52 4F |1 ;ZEICHEN RO| 00000070: 4D 20 53 45 54 5A 45 4E 0D 0D 20 20 20 20 20 20 |M SETZEN.. | 00000080: 20 20 20 4C 44 41 20 23 24 30 30 20 20 20 3B 48 | LDA #$00 ;H| 00000090: 49 47 48 20 55 4E 44 0D 20 20 20 20 20 20 20 20 |IGH UND. | 000000A0: 20 53 54 41 20 24 46 42 20 20 20 20 3B 4C 4F 57 | STA $FB ;LOW| 000000B0: 20 42 59 54 45 0D 20 20 20 20 20 20 20 20 20 53 | BYTE. S| 000000C0: 54 41 20 24 46 44 20 20 20 20 3B 46 55 45 52 0D |TA $FD ;FUER.| 000000D0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 44 | LDA #$D| 000000E0: 30 20 20 20 3B 42 4C 4F 43 4B 56 45 52 53 43 48 |0 ;BLOCKVERSCH| 000000F0: 49 45 42 55 4E 47 0D 20 20 20 20 20 20 20 20 20 |IEBUNG. | 00000100: 53 54 41 20 24 46 43 20 20 20 20 3B 56 4F 52 42 |STA $FC ;VORB| 00000110: 45 52 45 49 54 45 4E 0D 20 20 20 20 20 20 20 20 |EREITEN. | 00000120: 20 4C 44 41 20 23 24 33 38 20 20 20 3B 0D 20 20 | LDA #$38 ;. | 00000130: 20 20 20 20 20 20 20 53 54 41 20 24 46 45 20 20 | STA $FE | 00000140: 20 20 3B 0D 0D 4C 4F 4F 50 31 20 20 20 20 4C 44 | ;..LOOP1 LD| 00000150: 59 20 23 24 30 30 20 20 20 3B 42 4C 4F 43 4B 56 |Y #$00 ;BLOCKV| 00000160: 45 52 53 43 48 49 45 42 55 4E 47 0D 4C 4F 4F 50 |ERSCHIEBUNG.LOOP| 00000170: 20 20 20 20 20 4C 44 41 20 28 24 46 42 29 2C 59 | LDA ($FB),Y| 00000180: 3B 41 55 53 46 55 45 48 52 45 4E 0D 20 20 20 20 |;AUSFUEHREN. | 00000190: 20 20 20 20 20 53 54 41 20 28 24 46 44 29 2C 59 | STA ($FD),Y| 000001A0: 3B 28 56 4F 4E 20 24 44 30 30 30 20 42 49 53 0D |;(VON $D000 BIS.| 000001B0: 20 20 20 20 20 20 20 20 20 49 4E 59 20 20 20 20 | INY | 000001C0: 20 20 20 20 3B 20 24 44 37 46 46 20 4E 41 43 48 | ; $D7FF NACH| 000001D0: 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 4C 4F |. BNE LO| 000001E0: 4F 50 20 20 20 3B 20 24 33 38 30 30 29 0D 0D 20 |OP ; $3800).. | 000001F0: 20 20 20 20 20 20 20 20 49 4E 43 20 24 46 43 20 | INC $FC | 00000200: 20 20 20 3B 48 49 47 48 42 59 54 45 20 45 52 48 | ;HIGHBYTE ERH| 00000210: 4F 45 48 45 4E 0D 20 20 20 20 20 20 20 20 20 49 |OEHEN. I| 00000220: 4E 43 20 24 46 45 20 20 20 20 3B 0D 0D 20 20 20 |NC $FE ;.. | 00000230: 20 20 20 20 20 20 4C 44 41 20 24 46 43 20 20 20 | LDA $FC | 00000240: 20 3B 55 4E 44 20 50 52 55 45 46 45 4E 20 4F 42 | ;UND PRUEFEN OB| 00000250: 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 24 |. CMP #$| 00000260: 44 38 20 20 20 3B 42 45 52 45 49 54 53 20 46 45 |D8 ;BEREITS FE| 00000270: 52 54 49 47 0D 20 20 20 20 20 20 20 20 20 42 4E |RTIG. BN| 00000280: 45 20 4C 4F 4F 50 31 20 20 3B 4E 45 49 4E 20 44 |E LOOP1 ;NEIN D| 00000290: 41 4E 4E 20 4C 4F 4F 50 31 0D 0D 20 20 20 20 20 |ANN LOOP1.. | 000002A0: 20 20 20 20 4C 44 41 20 23 24 33 37 20 20 20 3B | LDA #$37 ;| 000002B0: 4A 41 20 44 41 4E 4E 20 50 4C 41 0D 20 20 20 20 |JA DANN PLA. | 000002C0: 20 20 20 20 20 53 54 41 20 24 30 31 20 20 20 20 | STA $01 | 000002D0: 3B 41 55 46 20 53 54 41 4E 44 41 52 44 0D 20 20 |;AUF STANDARD. | 000002E0: 20 20 20 20 20 20 20 43 4C 49 20 20 20 20 20 20 | CLI | 000002F0: 20 20 3B 49 52 51 20 46 52 45 49 47 45 42 45 4E | ;IRQ FREIGEBEN| 00000300: 0D 20 20 20 20 20 20 20 20 20 52 54 53 20 20 20 |. RTS | 00000310: 20 20 20 20 20 3B 55 4E 44 20 46 45 52 54 49 47 | ;UND FERTIG| 00000320: 0D 0D |.. |
*= $1000.. SEI ;
IRQ SPERREN. LDA #$33 ;PLA AUF
. STA $01 ;ZEICHEN ROM SETZEN
.. LDA #$00 ;HIGH UND.
STA $FB ;LOW BYTE. STA $FD
;FUER. LDA #$D0 ;BLOCKVERSCH
IEBUNG. STA $FC ;VORBEREITEN.
LDA #$38 ;. STA $FE
;..LOOP1 LDY #$00 ;BLOCKVERSCHIEB
UNG.LOOP LDA ($FB),Y;AUSFUEHREN.
STA ($FD),Y;(VON $D000 BIS.
INY ; $D7FF NACH. BNE LO
OP ; $3800).. INC $FC ;HIGH
BYTE ERHOEHEN. INC $FE ;..
LDA $FC ;UND PRUEFEN OB.
CMP #$D8 ;BEREITS FERTIG. BN
E LOOP1 ;NEIN DANN LOOP1.. LDA
#$37 ;JA DANN PLA. STA $01
;AUF STANDARD. CLI ;IRQ F
REIGEBEN. RTS ;UND FERTIG
..
> CLICK IMAGE PREVIEW FOR FULL MODAL