HSPTV!掲示板

プログラムにメニューバーを表示したいのですが・・・

#include "mod_menu.as"
#define ctype LOWORD(%1) (%1 & $FFFF)
#enum IDM_LOGT
#enum IDM_EXIT
#enum IDM_VER
#enum IDM_READ
oncmd gosub *command, $111
;メニューバー
	CreatePopupMenu
	hMenu.2 = stat
		AppendMenu hMenu.2, 0, IDM_READ, "ReadMeの表示"
		AppendMenu hMenu.2, 0, IDM_VER, "バージョン情報"
	CreatePopupMenu
	hMenu.1 = stat
		AppendMenu hMenu.1, $8, IDM_LOGT, "ログの記録を停止"
		AppendMenu hMenu.1, $800, 0, ""	// 区切り線
		AppendMenu hMenu.1, 0, IDM_EXIT, "終了"
		CreateMenu
	hMenu.0 = stat
		AppendMenu hMenu.0, $10, hMenu.1, "設定"
		AppendMenu hMenu.0, $10, hMenu.2, "ヘルプ"
		SetMenu hwnd, hMenu.0
	DrawMenuBar hwnd
;中略
*command
	if lparam = 0 {
		wID = LOWORD(wparam)
		if wID = ID_LOGT {
			dialog "ログの記録を停止しました。",0,"Lock PC"
		return
		}
	if wID = IDM_LOGT {
			if checkmenu {
				uCheck = $0 :goto *owari
			} else {
				uCheck = $8 :dialog"aa"
			}
			CheckMenuItem hMenu.1, IDM_LOGT, uCheck
			return
		}
		if wID = IDM_EXIT {
			goto *owari
			return
		}
	return
*owari
        end

これを実行すると、
#HSP script preprocessor ver3.32 / onion software 1997-2013(c)
#Use file [hspdef.as]
#HSP code generator ver3.32 / onion software 1997-2013(c)
#未初期化の変数があります(というのが何個か)
test.hsp(193) : error 2 : 文法が間違っています (193行目)
--> checkmenuitem hmenu.1, 0, ucheck
とエラーになってしまいます。
どこが悪いのでしょうか？
メニューバーを初めて使うので、教えてもらえると助かります。
よろしくお願いします。

ちなみに、スクリプトは
http://lhsp.s206.xrea.com/hsp_menu.html
から抜き出したものです。

エラーの内容は、checkmenuitemって命令？変数？文法違うんじゃないの？

ですが。。。
mod_menu.as の方を見た限りだと、CheckMenuItem は命令登録されていないような・・・

あと、if 分を{}で記載するなら、ちゃんと{}で終わるようにしましょう。
閉じられていないエラーになります。

/*ご参考(下記 3 項目の追加で一応動いた:訂正)*/

#include "user32.as"   ; 先頭に追加(メニューＡＰＩ命令)
;#include "mod_menu.as"; 注釈化
		}}     ; if lparam = 0 {に対する"}"を追加
	return
*owari
        end

/*補足：引用されたスクリプトのＡＰＩ定義(user32.as)と(mod_menu.as)
　の定義に同名や重複があるので(mod_menu.as)を注釈にしないと動かない。
*/

#include "mod_menu.as"
#uselib "user32.dll"
#func global AppendMenu         "AppendMenuA"           int, int, int, str
#func global CreatePopupMenu    "CreatePopupMenu"

#include "user32.as"
#uselib "user32.dll"
#define global AppendMenu AppendMenuA
#func global AppendMenuA "AppendMenuA" sptr,sptr,sptr,sptr
#func global CreatePopupMenu "CreatePopupMenu"