home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
92xx
/
9210a.d64
/
char-trans.seq
< prev
next >
Wrap
Text File
|
1995-03-30
|
802b
|
33 lines
*= $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 ;BLOCKVERSCHIEBUNG
STA $FC ;VORBEREITEN
LDA #$38 ;
STA $FE ;
LOOP1 LDY #$00 ;BLOCKVERSCHIEBUNG
LOOP LDA ($FB),Y;AUSFUEHREN
STA ($FD),Y;(VON $D000 BIS
INY ; $D7FF NACH
BNE LOOP ; $3800)
INC $FC ;HIGHBYTE ERHOEHEN
INC $FE ;
LDA $FC ;UND PRUEFEN OB
CMP #$D8 ;BEREITS FERTIG
BNE LOOP1 ;NEIN DANN LOOP1
LDA #$37 ;JA DANN PLA
STA $01 ;AUF STANDARD
CLI ;IRQ FREIGEBEN
RTS ;UND FERTIG