#module
#deffunc add1 array aa
len = length(aa)
repeat len
aa(cnt)++
loop
return
#global

dim xx,5
repeat 5
xx(cnt) = cnt
loop
add1(xx)
repeat 5
mes xx(cnt)
loop
stop

これでわかる？