ラベルの通過チェック命令と画像の読み込みチェック命令

タイトル通りのものは既にlchkやfchkがあるが、これはif(やnotif)の条件式としての扱いしかできない。
なので、変数に落としこむ何かを作ってみる。

define節game以上

labellog ; 必須
filelog  ; 必須
numalias chk_arg,(適当な数値)
defsub label_check
defsub file_check

game以下start以上

*label_check
getparam i%chk_arg,$chk_arg
                 mov %%chk_arg,0
if lchk $chk_arg mov %%chk_arg,1
return

*file_check
getparam i%chk_arg,$chk_arg
                 mov %%chk_arg,0
if fchk $chk_arg mov %%chk_arg,1
return

解説

特殊な命令だったのをわざわざ使いにくい通常命令のレベルまで落としてしまって何か意味があるのかと考えないでもないが、きっと既読未読情報を配列とかに格納するのに使えるさきっときっときっと。