2 ; Simulation de l'adressage indexé avec l'adressage indirect
6 LDX index,d ; X = mem[index] = 4
7 CHARO mot,x ; mem[mot+X] = mem[mot+4] = 'X'
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'
15 mot: .ASCII "....X...."