contrib/pep8analysis/tests/privat/05-simul_x.pep

   1 ; Semaine 5
   2 ; Simulation de l'adressage indexé avec l'adressage indirect
   3 ; Jean Privat (C) 2010
   4 ;
   5 ; Version originale
   6          LDX     index,d     ; X = mem[index] = 4
   7          CHARO   mot,x       ; mem[mot+X] = mem[mot+4] = 'X'
   8 ; Version simulée
   9          LDA     mot,i       ; A <- mot
  10          ADDA    index,d     ; A <- A+mem[index] = mot+4
  11          STA     ptr,d       ; mem[ptr] <- A = mot+4
  12          CHARO   ptr,n       ; mem[mem[ptr]] = mem[mot+4] = 'X'
  13          STOP
  14 index:   .WORD   4
  15 mot:     .ASCII  "....X...."
  16 ptr:     .BLOCK  2           ; #2h
  17          .END