>>657
ひょっとしてこれがやりたいのか？
配列使ったほうが簡潔に書けるから、
積極的に使ったほうがいいと思うぞ。

randomize
sdim s,64,8

screen 0,160,280,1 : cls 4
font "ＭＳ Ｐゴシック",12
objmode 2 : objsize 120,20
color 255,0,0

repeat 8
pos 10,cnt*30+14
n=cnt+1 : mes n
pos 30,cnt*30+10
input s.cnt
loop

objsize 140,21
font "MS 明朝",13,1
pos 10,250 : button "並" ,*suc
stop

*suc
cls 4 : color 0,0,255 : pos 10,10
repeat 8
rnd n,8-cnt : mes s.n
repeat 7-n,n : m=cnt+1 : s.cnt=s.m : loop
loop
stop