IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Autres architectures Assembleur Discussion :

prog assembleur en pep8


Sujet :

Autres architectures Assembleur

  1. #1
    Membre régulier
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Février 2009
    Messages
    119
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2009
    Messages : 119
    Points : 114
    Points
    114
    Par défaut prog assembleur en pep8
    bonjour,
    je ve ke mon prog calcule le nombre des chiffres d'un nombre ainsi que le nombre des séparateurs (nbr des séparateurs calculé sert pour tester si le nombre est erroné ou pas:
    si on a 0 ==> le prog affiche nbr car = 0 et nbr sep = 0
    si on a 0.23 ==> le prog affiche nbr car = 4 et nbr sep = 1
    si on a 10..23 ==> le prog affiche nbr car = 6 et nbr sep = 2 ==> nombre erroné
    l'execution de ce programme ne m'affiche pas ce que je veux et en debuggant j'arrive pas a trouver l'erreur.
    voici le code

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    ;ce prog calcule le nombre des chiffres d'un nombre ainsi que le nombre
    ;des séparateurs (nbr des séparateurs calculé sert pour tester si le nombre est erroné ou pas
    ;si on a 0 ==> le prog affiche nbr car = 0 et nbr sep = 0
    ;si on a 0.23 ==> le prog affiche nbr car = 4 et nbr sep = 1
    ;si on a 10..23 ==> le prog affiche nbr car = 6 et nbr sep = 2 ==> nombre erroné
     
                     lda 0, i
                     ldx 0, i
     
    boucle1:         chari sCar, d            ;compter le nombre des caracteres
                     ldbytea    sCar, d
                     cpa     0x0A, i          ;fin de la ligne
                     breq    fboucle1         ;si fin ligne ==> aller au traitement après la boucle
     
                     ldbytex nbCar, d         ;initialiser x par nbCar pour l'augmenter et le stocker de nouveau à nbCar
                     addx 1, i
                     stx nbCar, d
     
                     ldbytex nbSep, d         ;initialiser x par nbSep pour l'augmenter et le stocker de nouveau à nbSep
                     cpx ".", i
                     brne boucle1             ;si != "." ==> re-boucle
                     addx 1, i                ;sinon ajouter 1
                     stx nbSep, d             ;nbSep := x de nouveau
     
                     br boucle1
     
    fboucle1:        stx  nbCar, d            ;fin de la boucle
                     deco nbCar, d
                     charo 0x0A, i
                     deco nbSep, d
                     stop
     
    ;variables
    sCar:            .block 1                 ;le caractère lu
    nbCar:           .block 2                 ;nombre des caractères
    nbSep:           .block 2                 ;nombre des séparateurs
     
                     stop
    .end
    merci d'avance.

  2. #2
    Membre régulier
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Février 2009
    Messages
    119
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : Canada

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Février 2009
    Messages : 119
    Points : 114
    Points
    114
    Par défaut prog assembleur en pep8
    c bon j'ai trouvé la solution.
    la voici
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    ;ce prog calcule le nombre des chiffres d'un nombre ainsi que le nombre
    ;des séparateurs (nbr des séparateurs calculé sert pour tester si le nombre est erroné ou pas
    ;si on a 0 ==> le prog affiche nbr car = 0 et nbr sep = 0
    ;si on a 0.23 ==> le prog affiche nbr car = 4 et nbr sep = 1
    ;si on a 10..23 ==> le prog affiche nbr car = 6 et nbr sep = 2 ==> nombre erroné
     
                     lda 0, i
                     sta nbCar, d
                     ldx 0, i
                     stx nbSep, d
     
    boucle1:         chari sCar, d            ;compter le nombre des caracteres
                     ldbytea    sCar, d
                     cpa     0x0A, i          ;fin de la ligne
                     breq    fboucle1         ;si fin ligne ==> aller au traitement après la boucle
     
                     ldx nbCar, d             ;initialiser x par nbCar pour l'augmenter et le stocker de nouveau à nbCar
                     addx 1, i
                     stx nbCar, d
     
     
                     cpa ".", i
                     brne orSep             ;si != "." ==> re-boucle sinon continue
     
                     ldx nbSep, d             ;initialiser x par nbSep pour l'augmenter et le stocker de nouveau à nbSep
                     addx 1, i                ;sinon ajouter 1
                     stx nbSep, d             ;nbSep := x de nouveau
     
     
    cpVirg:          cpa ",", i
                     brne boucle1             ;si != "," ==> re-boucle sinon continue
     
                     ldx nbSep, d             ;initialiser x par nbSep pour l'augmenter et le stocker de nouveau à nbSep
                     addx 1, i                ;sinon ajouter 1
                     stx nbSep, d             ;nbSep := x de nouveau
     
                     br boucle1
     
    fboucle1:     deco nbCar, d            ;juste pour test                 
                     charo 0x0A, i            ;juste pour test
                     deco nbSep, d            ;juste pour test
                     lda nbSep, d
                     cpa 0, i
                     brgt errNbr
                     stop
     
    orSep:           br cpVirg 
     
    ;variables
    sCar:            .block 1                 ;#1c ;le caractère lu
    nbCar:           .block 2                 ;#2d ;nombre des caractères 
    nbSep:           .block 2                 ;#2d ;nombre des séparateurs 
    errNbr:          stro errNbrm, d
                     stop
     
    ;variables msg
    errNbrm:         .ASCII "nombre erroné\x00"
    .end

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Tutoriels, F.A.Q : la rubrique Assembleur de Developpez.com
    Par Alcatîz dans le forum Assembleur
    Réponses: 3
    Dernier message: 07/06/2007, 20h14
  2. ecrire son OS (assembleur ??)
    Par Anonymous dans le forum Programmation d'OS
    Réponses: 9
    Dernier message: 25/11/2002, 20h25
  3. Existe-t-il un langage de prog "virtuel" en Français
    Par HRS dans le forum Langages de programmation
    Réponses: 4
    Dernier message: 10/06/2002, 19h11
  4. Quel désassembleur/assembleur pour un exe Windows ?
    Par Anonymous dans le forum x86 32-bits / 64-bits
    Réponses: 6
    Dernier message: 17/04/2002, 11h59

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo