Derniers sujets
» Scans programmes Oric
copie d'écran text EmptyHier à 19:06 par markerror

» rs
copie d'écran text EmptyLun 22 Avr 2019 - 19:19 par Oric1-Atmos

» L'ile oubliée
copie d'écran text EmptyLun 22 Avr 2019 - 14:18 par Dbug

» le retour du Commodore 64
copie d'écran text EmptyLun 22 Avr 2019 - 10:32 par froggy

» images pictconv
copie d'écran text EmptyDim 21 Avr 2019 - 17:41 par kenneth

» Mushroom Mania
copie d'écran text EmptySam 20 Avr 2019 - 14:47 par Dom50

» Annonces insolites
copie d'écran text EmptyVen 19 Avr 2019 - 14:43 par kenneth

» Interview du rédac' chef
copie d'écran text EmptyMer 17 Avr 2019 - 23:11 par drpsy

» Interview John S Sinclair
copie d'écran text EmptyMer 17 Avr 2019 - 7:21 par Symoon

» Le secret de Kaipur
copie d'écran text EmptyDim 14 Avr 2019 - 20:51 par Invité

» le fer d'Amnukor (Tyrann 2)
copie d'écran text EmptyDim 14 Avr 2019 - 16:41 par assinie

» ORIC-1 sur LE BON COIN
copie d'écran text EmptySam 13 Avr 2019 - 18:14 par Oric1-Atmos

» Oricutron linux et DSK
copie d'écran text EmptySam 13 Avr 2019 - 10:31 par froggy

» scrolling en mode Text
copie d'écran text EmptyVen 12 Avr 2019 - 11:44 par goyo

» Enfer !
copie d'écran text EmptyJeu 11 Avr 2019 - 11:52 par Dom50

Qui est en ligne ?
Il y a en tout 2 utilisateurs en ligne :: 0 Enregistré, 0 Invisible et 2 Invités

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

Nos membres ont posté un total de 7084 messages dans 608 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 : 157
Date d'inscription : 02/05/2014
Age : 47
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 : 233
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 : 157
Date d'inscription : 02/05/2014
Age : 47
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 : 233
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 : 157
Date d'inscription : 02/05/2014
Age : 47
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