HSPTV!掲示板

もし、on(0,0)もon(0,1)もon(0,1)もon(0,2)もon(0,3)もon(0,4)も･･･
1だったら変数aに1を足す、ということをしたいときはどうすればいいですか？
if on(0,0)=1{
if on(0,1)=1{
a+1
}
}
というような書き方だと数が多くて大変なんです
お願いします

onは予約語なので↓では_onとします。

count=0
repeat length2(_on)
   if (_on(0,cnt)==1) : count++
loop
if (count==length2(_on)) : a=1

訂正。一番最後は

a=1

ではなく、

a++

でした。

または、
「on(0,0)かon(0,1)かon(0,1)かon(0,2)かon(0,3)かon(0,4)…のどれか一つでも 1 でなければ a には 1を足さない」、という考え方をしてみるのもよいでしょう。

c=0
repeat length2(_on)
   if (_on(0,cnt)!=1) : break
   c++
loop
if (c==length2(_on)) : a += 1

やりたいことを同じ意味を保ったまま、別の表現にしてみると、処理の効率がよくなったりわるくなったりすることがあってｵﾓｼﾛｲですよ。

onだと命令と被るので避けられるなら別の名前のほうが良いかと思います。
ソース中では onの変数名を oと変えています。

dim o,10,10

;テスト用
repeat 10
	o(0,cnt)=1
loop

;カウンタ
i=0
repeat 10
	if o(0,cnt)=1 : i++
loop

mes "1 だった数 : "+i

;カウンタと一致すれば表示
if i=10 : mes "全部 1 でした"

上記のは確保した２次元目が全て１だった時と言う条件などに限られますが…
一体どこまで確保していて、どんな処理でどんな結果が出ればいいんでしょうか？

onは変数名の一部でした〜
分かりました。ちゃんとできました。
length2というのを初めてみたんですが、ヘルプで配列について検索するとすぐに出てきますね。
次からは気をつけます。
ありがとうございました。

SYAMさんのソースの方がシンプル…　orz