hsp3/モジュール変数 - HSP開発wiki
http://hspwiki.nm.land.to/?cmd=read&page=hsp3%2F%A5%E2%A5%B8%A5%E5%A1%BC%A5%EB%CA%D1%BF%F4&word=%A5%E2%A5%B8%A5%E5%A1%BC%A5%EB%CA%D1%BF%F4
を参考にして、モジュール変数の動作について調べていたのですが、
#module testmod modno,modvalue,body
; コンストラクタ
#modinit
; インスタンスの数をインクリメント
mes "コンストラクタが呼び出されました。"
modcnt ++
return
; デストラクタ
#modterm
; インスタンスの数をデクリメント
mes "デストラクタが呼び出されました。"
modcnt--
return
; インスタンスの個数を得る
#modfunc tm_getcnt var v
v = modcnt
return
; モジュールのメンバ変数にモジュール番号と値をセット
#modfunc tm_setvalue int n
modno = modcnt-1
modvalue = n
return
; モジュールのメンバ変数を表示
#modfunc tm_dispvalue
mes "mod["+modno+"] = "+modvalue+"("+body.0+","+body.1+","+body.2+")"
return
; インスタンス毎のスリーサイズをセット(メンバ変数を配列にできた)
#modfunc tm_setbody int b, int w, int h
body = b, w, h
return
// ここから
#modfunc tm_get var b1, var w1, var h1
b1 = body.0
w1 = body.1
h1 = body.2
return
// ここまで
#global
repeat 3
newmod m, testmod
tm_setvalue m(cnt), rnd(10)
tm_setbody m.cnt, 80+rnd(3), 59+rnd(3), 82+rnd(3)
tm_dispvalue m.cnt
loop
mes "配列の確保済み領域:"+length.m
tm_getcnt m, i
mes "インスタンスの数:"+i
mes "<< 有効なインスタンスの列挙 >>"
foreach m
tm_dispvalue m.cnt
loop
// ここから
tm_get b0, w0, h0
mes b0 + " " + w0 + " " + h0
//ここまで
というコードにしてみたところ、エラーになります。
書いたのは、「ここから〜ここまで」の部分です。
なぜ、エラーになるのか、ご教授いただけないでしょうか。