Je me demande si il y a un bug du vg5000 ou pas. En effet quand j'utilise tous les caractères setet et seteg il y a quelques caractères aléatoires qui s'affichent a la place des caractères redéfinis.Si je pouvais avoir quelques éclaircissements svp. Ci joint mon code en asm pour une fois (j'ai trouvé un site online pour ça " clrhome.org ")
Code : Tout sélectionner
.org 28672
nop
_boucle:
ld a,0
ld ($4A0A),a ;----------adresse de debut de redefinition caracteres setet et seteg------------
nop
ld a,(28672+4)
inc a
nop
ld (28672+4),a
cp $0
jp nz,_boucle
ld a,$00
ld (28672+4),a
nop
ld a,(28672+5)
inc a
ld (28672+5),a
nop
cp $51
jp nz,_boucle
ld a,$4A
ld (28672+5),a
nop
ld a,$0A
ld (28672+4),a
nop ;---------------------------------------------
_boucle2:
ld a,255
ld ($4A0A),a
nop
ld a,(28672+54)
inc a
inc a
nop
ld (28672+54),a
nop
ld (28672+54),a
cp $0
jp nz,_boucle2
ld a,$00
ld (28672+54),a
nop
ld a,(28672+55)
inc a
ld (28672+55),a
nop
cp $51
jp nz,_boucle2
ld a,$4A
ld (28672+55),a
nop
ld a,$0A
ld (28672+54),a
nop
nop
nop
nop
_debut: ;--------------construit setet--------------------
ld a,(_setetcode)
inc a
ld (_setetcode),a
cp 255 ;---------------dernier caractere----------------
jp z,_suite
ld hl,$4A0A
call $001B
ld a,(28672+122)
add a,10
nop
ld (28672+122),a
nop
ld a,(28672+122)
cp $0A
jp nz,_debut
ld a,(28672+123)
inc a
ld (28672+123),a
nop
jp _debut
nop
nop
_setetcode:
.db 31
_resetsetet:
.db 31
nop
_reseth:
.db $0
_setet:
.db 31
_suite:
ld a,31
ld (_setet),a
nop
nop
nop
di
_boucle3: ;---------------------affichage à l'écran -----------------------
nop
call $00A4
ld hl,_ef9345
call $00AD
nop
ld a,(_caratere)
inc a
ld (_caratere),a
cp 255
jp z,_fin
ld a,(_cursorx)
inc a
ld (_cursorx),a
cp 39
jp z,_resetcursorx
jp _boucle3
_suitey:
ld a,(_cursory)
inc a
ld (_cursory),a
nop
jp _boucle3
_resetcursorx:
call $00A4
ld a,0
ld (_cursorx),a
jp _suitey
_fin:
ld a,0
ld (_cursorx),a
ld a,8
ld (_cursory),a
ld a,32
ld (_caratere),a
jp _fin
nop
nop
_ef9345:
.db $1c,$20,$81,$29,$00,$20,$82,$29,$00,$20,$83,$29,$67,$20,$84,$29,$13,$21
_caratere:
.db $20,$22,$D8,$23,$5A,$26
_cursory:
.db $08,$27
_cursorx:
.db $00,$28,$00