HSPTV!掲示板

#deffuncで定義した命令の引数にlabel型を使いたいのですが、

#module
	#deffunc test label sub

	return
#global

test *subroutine

stop
*subroutine

return

これを実行すると「モジュール変数の指定が無効です。」という実行時エラーが出ます。
何かコードに問題はありますか?あれば教えてください。お願いします。

因みにHSP3.2aです。

まず「label」はラベル型ではありません。
ためしにlabel=1と打てばわかります。
ラベルはstr型で処理しましょう。

次にモジュール内でgotoを使うと言うことは
"そのモジュール内の"ラベルに飛びます。

#module
	#deffunc test str sub
		gosub sub
	return	
#global

test "*subroutine"

stop
*subroutine

return

としても*subroutineへ飛ぶことはありません。

できません。
「label」の引数は、なぜだか知りませんが、実装されていません。

一旦ラベル型の変数にラベルを代入して、それを var 引数で命令に渡す、という方法が主流です。

// サンプル

#module

// マクロ。受け取った引数を _label_arg に代入してから、命令を呼ぶ。
#define global jump(%1) \
_label_arg = %1 : jump_dummy _label_arg

// 命令の実体。jump_dummy は仮の名前。lb は label の略ということで。
#deffunc jump_dummy var lb
	gosub lb
	return
	
#global

	jump *TestRoutine
	stop
	
*TestRoutine
	mes "TestRoutineに来たよ！"
	return

そうだったんですか。参考になりました。ありがとうございます