routine d'affichage de caractères sur vg5000
;org 28672
push bc
push de
ld bc,16384 ; adresse de l'ecran en haut a gauche
ld de,20480 ; adresse ou se trouvent les caracteres a afficher
loop: ;label de la boucle
ld a,(de)
cp 59 ; des que l'on arrive au caractere 59 le programme s'arrete et retourne au basic
jp z,fin : saute au label fin tant que cp n'est pas = 59
inc de
ld (bc),a; lecture des caracteres en 20480
ld a,2 ; couleur verte toutes a partir de 16385,16387,16389... toutes les adresses impaires de l'ecran
inc bc; ajoutes les caracteres 0,1,2,3,4,5,6,7,8,9,:
ld (bc),a ; affiche les caracteres en 16384, 16386, 16388... adresses paires
inc bc
jp loop ; retour au label loop
fin: retour basic
pop bc
pop de
ret
Download
Commentaires
Enregistrer un commentaire