contrib/pep8analysis/tests/privat/06-print-non-pur.pep

   1 ; Semaine 6
   2 ; Programme non pur qui affiche une chaîne
   3 ; Jean Privat (C) 2010
   4 loop:    LDA     0,i
   5          LDBYTEA msg,d
   6          BREQ    fin         ; while(msg[0]!=0) {
   7          CHARO   msg,d       ;   print msg[0];
   8          LDA     op1,d
   9          ADDA    1,i
  10          STA     op1,d
  11          STA     op2,d       ;   msg++;
  12          BR      loop        ; }
  13 fin:     STOP
  14 msg:     .ASCII  "Hello World\x00"
  15 op1:     .EQUATE 0x0004      ; Adresse de l'opérande du LDBYTEA msg
  16 op2:     .EQUATE 0x000A      ; Adresse de l'opérande du CHARO msg
  17          .END