Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 2 sur 2
  1. #1
    Membre du Club
    Homme Profil pro Seif El Islam Guizani
    Développeur informatique
    Inscrit en
    février 2009
    Messages
    108
    Détails du profil
    Informations personnelles :
    Nom : Homme Seif El Islam Guizani
    Âge : 34
    Localisation : Canada

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

    Informations forums :
    Inscription : février 2009
    Messages : 108
    Points : 63
    Points
    63

    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 :
    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 du Club
    Homme Profil pro Seif El Islam Guizani
    Développeur informatique
    Inscrit en
    février 2009
    Messages
    108
    Détails du profil
    Informations personnelles :
    Nom : Homme Seif El Islam Guizani
    Âge : 34
    Localisation : Canada

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

    Informations forums :
    Inscription : février 2009
    Messages : 108
    Points : 63
    Points
    63

    Par défaut prog assembleur en pep8

    c bon j'ai trouvé la solution.
    la voici
    Code :
    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.

Liens sociaux

Règles de messages

  • Vous ne pouvez pas créer de nouvelles discussions
  • Vous ne pouvez pas envoyer des réponses
  • Vous ne pouvez pas envoyer des pièces jointes
  • Vous ne pouvez pas modifier vos messages
  •