Derniers sujets
» Visu Hivernale 2020
copie d'écran text EmptyAujourd'hui à 12:03 par didierv

» Bocco's adventures - nouveau jeu pour Oric
copie d'écran text EmptyVen 24 Jan 2020 - 10:09 par Dom50

» Fifteen Puzzle - [raxiss]
copie d'écran text EmptyVen 24 Jan 2020 - 9:50 par jbperin

» Bonnes fêtes
copie d'écran text EmptyDim 19 Jan 2020 - 19:36 par retroric

» rs
copie d'écran text EmptyDim 19 Jan 2020 - 10:18 par Symoon

» Ca se frite sur eBay ! :-)
copie d'écran text EmptyMer 15 Jan 2020 - 10:36 par Oric1-Atmos

» Cartouche telestrat
copie d'écran text EmptySam 11 Jan 2020 - 22:59 par 6502man

» Contrôleur microdisc (mini)
copie d'écran text EmptyMer 8 Jan 2020 - 12:11 par Oric1-Atmos

» Abonnement
copie d'écran text EmptyMar 7 Jan 2020 - 3:50 par didierv

» ROM 1.22?
copie d'écran text EmptyLun 6 Jan 2020 - 19:33 par froggy

» Oricutron - Problème touche clavier
copie d'écran text EmptyDim 5 Jan 2020 - 9:16 par jbperin

» Telestrat a Vendre
copie d'écran text EmptyVen 3 Jan 2020 - 22:30 par didierv

» Nouveau site ceo.oric.org
copie d'écran text EmptyMar 31 Déc 2019 - 0:17 par didierv

» jeu Rain Panic
copie d'écran text EmptyLun 30 Déc 2019 - 22:27 par jbperin

» Branchement alimentation péritel [Résolu]
copie d'écran text EmptyJeu 26 Déc 2019 - 19:41 par jbperin

Qui est en ligne ?
Il y a en tout 1 utilisateur en ligne :: 0 Enregistré, 0 Invisible et 1 Invité

Aucun

Le record du nombre d'utilisateurs en ligne est de 29 le Mer 25 Fév 2015 - 14:01
Connexion

Récupérer mon mot de passe

Statistiques
Nous avons 205 membres enregistrés
L'utilisateur enregistré le plus récent est TOOR

Nos membres ont posté un total de 8479 messages dans 735 sujets
Portail ORIC




copie d'écran text

Aller en bas

copie d'écran text Empty copie d'écran text

Message par goyo le Mar 2 Avr 2019 - 13:57

Je fais une copie d'écran d'une zone mémoire non visible (0x93C7) vers la zone visible (0xBB80+40).

je ne comprends pas pourquoi avec cet algo tout l'écran n'est pas recopié ?  il manque 39 caractères dans la dernière ligne visible.

pourtant je copie bien 5 x bloc de 208 bytes = 1040, soit 26*40, taille de l'écran TEXT (- 1ere ligne)

Code:

                                    CAPS
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
CB------------- screen from 0x93C7-----A
C                                                          <- manque le reste de la ligne ici?                              

le code :
Code:


#include <lib.h>
int i,j,x,y,xx,yy;
unsigned char c;

void AdvancedPrint(char x_pos,char y_pos,const char *ptr_message);
 
fasttextcopy()
{
 asm("lda #$A7;" // A8 - A7 target address low -1  
 "sta write_+1;"
 "lda #$BB;"
 "sta write_+2;"
 "lda #$C6;" // C7 - C6 source address low -1
 "sta read_+1;"
 "lda #$93;"
 "sta read_+2;"
 
    "ldy #5;"  // for 5 x 208 bytes = 1040
 
 "suite1:"
 "ldx #209;"
 "clc;"
 "suite2:"
 "read_:"
 "lda $1234,x;"
 "write_:"
 "sta $1234,x;"
 "dex;"
 "bne suite2;"
 
    // retenue addition #208 pour read
 "lda read_+1;"
 "adc #208;"
 "bcc saut_retenue1;"
 "inc read_+2;"
 "saut_retenue1:"
 "sta read_+1;"
    
 // retenue addition #208 pour write
 "clc;"
 "lda write_+1;"
 "adc #208;"
 "bcc saut_retenue2;"
 "inc write_+2;"
 "saut_retenue2:"
 "sta write_+1;"
 "clc;"
 "dey;"
 "bne suite1;"
 "");
}


void main()
{
 
 
 
 c=32;
 for (j=0;j<100;j++)
 {
 //test cadre
 for (xx=0;xx<40;xx++)
 poke(0x93C7+xx,65);
 
 poke(0x93C7,18);
 
 
 
 for (yy=0;yy<26;yy++)
 {
 poke(0x93C7+(yy*40),65);
 poke(0x93C7+(yy*40)+39,65);
 
 }
 for (yy=1;yy<27;yy++)
 {
 poke(0x93C7+(yy*40)+1,66);
 poke(0x93C7+(yy*40),67);
 AdvancedPrint(2,yy,"------------- screen from 0x93C7-----");
 }
 
 for (xx=0;xx<40;xx++)
 poke(0x93C7+(27*40)+xx,66);
 /*
 for (i=0;i<1040;i++)
 {
 if (c>32&&c<128)
 poke(0x93C7+i,c);
 else
 poke(0x93C7+i,32);
 c++;
 }
 */
 
 gotoxy(0,0);printf("nbr=%d",j);
 
 fasttextcopy();
 }
}
goyo
goyo

Messages : 182
Date d'inscription : 02/05/2014
Age : 48
Localisation : Massy

Revenir en haut Aller en bas

copie d'écran text Empty Re: copie d'écran text

Message par assinie le Mer 3 Avr 2019 - 12:43

L'écran texte fait 28 lignes de 40 caractères et va de #BB80 à #BFDF, soit 1120 caractères au total.
Si on enlève la première ligne, il reste 1080 caractères et non 1040.

Il faudrait donc que tu modifies la valeur d'initialisation de X par 1080 / 5 +1 = 217, ainsi que les additions pour ajouter 216 au lieu de 208.

Pour le code assembleur, j'aurai plutôt fait une première boucle pour copier 4 blocs de 256 octets , soit 1024 octets, suivi d'une seconde pour les 56 octets restants.

L'avantage de copier des blocs de 256 octets et que pour passer d'un bloc à l'autre, il suffit d'incrémenter le poids fort des adresses stockées en read+1 et write+1 ce qui évite l'addition de 208, au 216, avec gestion de la retenue éventuelle.
Un autre avantage est que l'initialisation de X n'a pas besoin d'être faite à chaque itération de la première boucle mais unquement juste avant la première exécution (LDX #$00  avec incrémentation de X dans la boucle).
Ce qui permet un code plus concis et peut-être un peu plus rapide.
assinie
assinie

Messages : 255
Date d'inscription : 09/02/2014

Revenir en haut Aller en bas

copie d'écran text Empty Re: copie d'écran text

Message par goyo le Mer 3 Avr 2019 - 14:06

assinie a écrit:L'écran texte fait 28 lignes de 40 caractères et va de #BB80 à #BFDF, soit 1120 caractères au total.
Si on enlève la première ligne, il reste 1080 caractères et non 1040.

Il faudrait donc que tu modifies la valeur d'initialisation de X par 1080 / 5 +1 = 217, ainsi que les additions pour ajouter 216 au lieu de 208.

Pour le code assembleur, j'aurai plutôt fait une première boucle pour copier 4 blocs de 256 octets , soit 1024 octets, suivi d'une seconde pour les 56 octets restants.

L'avantage de copier des blocs de 256 octets et que pour passer d'un bloc à l'autre, il suffit d'incrémenter le poids fort des adresses stockées en read+1 et write+1 ce qui évite l'addition de 208, au 216, avec gestion de la retenue éventuelle.
Un autre avantage est que l'initialisation de X n'a pas besoin d'être faite à chaque itération de la première boucle mais unquement juste avant la première exécution (LDX #$00  avec incrémentation de X dans la boucle).
Ce qui permet un code plus concis et peut-être un peu plus rapide.

Merci assinie de tes remarques, je vais pouvoir optimiser mon code.

Quant au nombre de ligne, si je ne me trompe pas, je vois qu'il est de 27 (ligne du CAPS comprise) et donc de 26 lignes PLOTables.
goyo
goyo

Messages : 182
Date d'inscription : 02/05/2014
Age : 48
Localisation : Massy

Revenir en haut Aller en bas

copie d'écran text Empty Re: copie d'écran text

Message par assinie le Mer 3 Avr 2019 - 17:02

La mémoire écran pour en mode TEXT s'étend de #BB80 à #BFDF soit #BFDF-#BB80+1 = 1120 octets et 1120 / 40 = 28.
Il y a bien 28 lignes au total.

La commande PLOT prend une valeur entre 0 et 26 pour le numéro de ligne ce qui fait bien 27 lignes, mais la ligne 0 correspond en fait à la deuxième ligne de l'écran (celle sous la ligne contenant CAPS).

Tu peux le vérifier en faisant:
Code:
PLOT 2,0,"LIGNE 0"
PLOT 2,26,"LIGNE 26"
assinie
assinie

Messages : 255
Date d'inscription : 09/02/2014

Revenir en haut Aller en bas

copie d'écran text Empty Re: copie d'écran text

Message par goyo le Mer 3 Avr 2019 - 17:44

assinie a écrit:La mémoire écran pour en mode TEXT s'étend de #BB80 à #BFDF soit #BFDF-#BB80+1 = 1120 octets et 1120 / 40 = 28.
Il y a bien 28 lignes au total.

La commande PLOT prend une valeur entre 0 et 26 pour le numéro de ligne ce qui fait bien 27 lignes, mais la ligne 0 correspond en fait à la deuxième ligne de l'écran (celle sous la ligne contenant CAPS).

Tu peux le vérifier en faisant:
Code:
PLOT 2,0,"LIGNE 0"
PLOT 2,26,"LIGNE 26"

Ha oui pardon ! j'ai zappé la ligne 0 qui compte bien comme une ligne... :-o

du coup ça résout mon problème!

Merci assinie de ta réponse Smile
goyo
goyo

Messages : 182
Date d'inscription : 02/05/2014
Age : 48
Localisation : Massy

Revenir en haut Aller en bas

copie d'écran text Empty Re: copie d'écran text

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum