Derniers sujets
» HRC (Hires RLE Compressed)
copie d'écran text EmptyMar 15 Oct 2019 - 20:16 par Hialmar

» CEO-MAG 354
copie d'écran text EmptyDim 13 Oct 2019 - 10:14 par didierv

» Version compatible 64 bits de WAVtoTAP ?
copie d'écran text EmptySam 12 Oct 2019 - 16:48 par markerror

» Lot de livres et revues Oric sur LBC
copie d'écran text EmptyVen 11 Oct 2019 - 21:37 par didierv

» rs
copie d'écran text EmptyMer 9 Oct 2019 - 0:29 par kenneth

» Écriture stylée sur MCP 40
copie d'écran text EmptyDim 6 Oct 2019 - 17:38 par Dbug

» CEO-MAG 353
copie d'écran text EmptyDim 6 Oct 2019 - 15:27 par Symoon

» Vieumikro 2019
copie d'écran text EmptyLun 30 Sep 2019 - 16:34 par Hialmar

» [sujet Public] - le Ceo-Mag
copie d'écran text EmptyDim 29 Sep 2019 - 22:31 par didierv

» Vidéos en anglais
copie d'écran text EmptyDim 29 Sep 2019 - 15:22 par Dbug

» Nouvelles commandes SEDORIC
copie d'écran text EmptySam 28 Sep 2019 - 20:57 par Sheld67

» A venir: nouvelle version TAP2WAV
copie d'écran text EmptyMer 25 Sep 2019 - 21:03 par Symoon

» Twilighte card, 6502 et joysticks
copie d'écran text EmptyMar 24 Sep 2019 - 12:29 par Jede

» Boitier Oric HD
copie d'écran text EmptyLun 23 Sep 2019 - 12:58 par Jede

» OSDK & gnu/Linux...
copie d'écran text EmptyVen 20 Sep 2019 - 4:39 par Symoon

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 193 membres enregistrés
L'utilisateur enregistré le plus récent est Oric Man

Nos membres ont posté un total de 7938 messages dans 684 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 : 178
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 : 254
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 : 178
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 : 254
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 : 178
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