;;  show loop, array access

;; // global  

;; A[10], I;

;; main(){
;;  I = 0;
;;  while( I < 10 ) {
;;    A[I] = I + 2;
;;    I = I + 1;
;;  }
;; }

;; let r2 = I, r3 = temp

.s
A  2000
.a 0
.c 
	xor r2 r2 r2
:while	sub r0 r2 #10
	jmp ge exit
	add r3 r2 #2
	st @A r2 r3
	add r2 r2 #1
	jmp always while
:exit	trap stop r0
.e

