HSPTV!掲示板

半年未満の初心者です。以下のスクリプトで0から5までの数字を各々ランダムに並べたものを
3行表示しています。そしてbは3行目の最初の数字になっていますが、これを任意（例えば
2行目左から3番目）の数字にしたいと思っています。色々と試行錯誤しましたがダメでした。
解決法をご教授ください。厚かましいですができれば分かり易く説明していただければ幸いです。

dim a, 5

	randomize

    repeat 5
		a(cnt) = cnt
	loop

	px = 24 : py = 16
	repeat 3
	ycn = cnt
	gosub *shufl
		repeat 5
			pos cnt*px, ycn*py
			mes a(cnt)
     	loop
     loop
     b = a(cnt)
     mes b
     stop
 
*shufl
	repeat 200
		r1 = rnd(5)
		r2 = rnd(5)
		wk = a(r1)
		a(r1) = a(r2)
		a(r2) = wk
	loop
	return

別の配列に順に代入していけば良いんじゃ？

dim a, 5
dim b, 5,3

	randomize

    repeat 5
		a(cnt) = cnt
	loop

	px = 24 : py = 16
	repeat 3
		ycn = cnt
		gosub *shufl
		repeat 5
			pos cnt*px, ycn*py
			mes a(cnt)
			b(cnt,ycn)=a(cnt)
     	loop
     loop
     
     mes b(2,1)

	stop

*shufl
	repeat 200
		r1 = rnd(5)
		r2 = rnd(5)
		wk = a(r1)
		a(r1) = a(r2)
		a(r2) = wk
	loop
	return

これでいいのでは？

dim a, 5
	randomize

    repeat 5
		a(cnt) = cnt
	loop

	px = 24 : py = 16
	repeat 3
	ycn = cnt
	gosub *shufl
		repeat 5
			pos cnt*px, ycn*py
			mes a(cnt)
			b(cnt+ycn*5)=a(cnt)	// ここでコピーを取っておく
     	loop
     loop
     ;b = a(cnt)
     mes b(7)	// コピーから表示
     stop
 
*shufl
	repeat 200
		r1 = rnd(5)
		r2 = rnd(5)
		wk = a(r1)
		a(r1) = a(r2)
		a(r2) = wk
	loop
	return

シャッフルの処理はこれでいいのかなぁ・・とか思いましたけど。
とりあえずそれは置いときます。

あ、同じ方法を書かれてたｗ
そうですね、この場合２次元配列のほうが分かりやすいかも。

そういうことなんですか！確かに表示されました。
まだまだ勉強不足＆頭の回転不足ですね。
暇人様　ありがとうございました。

どちらがいいとか良く分かりませんが単純なことだったのですね。
窓月らら様　ありがとうございます。