assert p1 [デバッグウィンドウ表示]
p1(0) : デバッグ時の条件式
プログラムを一時的に中断してデバッグウィンドウを表示します。 p1に条件式が指定された場合には、p1の条件が正しくない場合にのみデバッグ ウィンドウを表示します。 (p1には、通過する時の条件式を書くことになるので注意してください。) assert a>5 ; aが5以下の時にデバッグする 実行ファイル作成時は、この命令は無効になります。
§ logmes
getkey p1,p2 [キー入力チェック]
p1=変数 : 読み込むための変数 p2=1〜(1) : キーコード
キーボード及びマウスボタンの状態をチェックして変数に代入します。指定し
たボタンが押されていれば、1を代入し、押されていなければ0が代入されます
。キーコードで指定する値の詳細は、以下の通りです。
キーコード : 実際のキー
------------------------------------------
1 : マウスの左ボタン
2 : マウスの右ボタン
3 : キャンセル（[CTRL]+[BREAK]）
4 : ３ボタンマウスのまん中のボタン
8 : [BACKSPACE]（PC98の[BS]）
9 : [TAB]
13 : [ENTER]
16 : [SHIFT]
17 : [CTRL]
18 : [ALT]（PC98の[GRPH]）
20 : [CAPSLOCK]
27 : [ESC]
32 : スペースキー
33 : [PAGEUP]（PC98の[ROLLDOWN]）
34 : [PAGEDOWN]（PC98の[ROLLUP]）
35 : [END]（PC98の[HELP]）
36 : [HOME]（PC98の[HOMECLR]）
37 : カーソルキー[←]
38 : カーソルキー[↑]
39 : カーソルキー[→]
40 : カーソルキー[↓]
48〜57 : [0]〜[9]（メインキーボード）
65〜90 : [A]〜[Z]
96〜105 : [0]〜[9]（テンキー）
112〜121 : ファンクションキー [F1]〜[F10]
この表に載っているキー以外でも、取得できる場合があります。
(サンプルを実行するとキーコードを調べることができます。)
title "キー入力してください(^^)v"
onkey *inkey
onclick *inkey
stop
*inkey
if lparam>>30:stop
mes iparam
stop§ stick
logmes "message" [デバッグメッセージ送信]
"message" : ログに記録するメッセージ
デバッグウィンドウ表示時に、"message"の内容をデバッグログに記録します。 ある時点での変数の内容や、通過チェックなどに利用できます。 スクリプトエディタからデバッグウィンドウの表示モードを設定するか、 assert命令によってデバッグウィンドウを表示させておく必要があります。 実行ファイル作成時は、この命令は無効になります。
§ assert
mcall p1,p2,p3… [メソッドの呼び出し]
p1 : 変数名 p2 : メソッド名 p3 : パラメーター
p1で指定された変数の型に応じてメソッドを呼び出します。 p1の変数にCOMオブジェクト型を指定することで、COMオートメーションのメソ ッドを呼び出すことが可能です。 p2でメソッド名(文字列)または、ディスパッチID(DISPID)を指定して、p3以降 に引数を指定します。 p3以降のパラメーター数や、型はそのまま適切に変換されメソッドに渡されま す。メソッドを実行した結果の返値は、comres命令で設定された変数に代入さ れます。 また、メソッド実行が成功した場合にはシステム変数 statは0になり、実行エ ラーが起こった場合には、 システム変数statに結果コード(HRESULT)が代入さ れます。 mcall命令は、拡張された変数の型を用意することで、 新しい機能を提供する ことが可能です。標準では、COMオブジェクト型のみに対応しています。
§ #usecom newcom delcom querycom comres
mouse p1,p2 [マウスカーソル座標設定]
p1,p2 : 設定するX,Y座標
マウスカーソルをp1,p2で指定した座標に変更します。 指定する座標は、 ウィンドウ内の座標ではなくディスプレイでの座標(X=0〜 ginfo_dispx/Y=0〜ginfo_dispy)を指定します。 p1または、p2が-1の場合は、HSPウィンドウ上でのマウスカーソルの表示をOFFにします。 p1やp2の指定を省略した場合は、現在の座標がそのまま適用されます。 マウスカーソルの表示をOFFにした後は、p1とp2を省略した「mouse」のみを実 行すると再び表示されるようになります。 マウスカーソル表示の設定は、システムの内部カウンタにより制御されています。 OFFにした表示を、再度表示するためには、OFFにした回数分だけ表示のリクエストを行なう必要があ るので注意してください。
randomize p1 [乱数発生の初期化]
p1=0〜(不定) : 乱数の初期化パラメーター
rnd関数で発生させる乱数のパターンを初期化します。 p1に同じ値を指定して初期化された乱数は、常に同じパターンで乱数を発生さ せられます。p1を省略した場合は、 Windowsのタイマから得られた不定な値を 使って初期化します。これによって、毎回まったく違う乱数を発生させること ができます。
§ rnd
stick p1,p2,p3 [キー入力情報取得]
p1=変数 : 読み込むための変数 p2=0〜(0) : 非トリガータイプキー指定 p3=0〜1(1) : ウィンドウアクティブチェックON/OFF
よく使われるキーボード及びマウスボタンの状態をまとめてチェックして変数
に代入します。
stick命令が実行されると以下のような複数のボタン情報が１つの数値として、
p1で指定した変数に代入されます。
1 : カーソルキー左(←)
2 : カーソルキー上(↑)
4 : カーソルキー右(→)
8 : カーソルキー下(↓)
16 : スペースキー
32 : Enterキー
64 : Ctrlキー
128 : ESCキー
256 : マウスの左ボタン
512 : マウスの右ボタン
1024 : TABキー
何もボタンが押されていない場合には0が代入されます。
もし複数のボタンが同時に押されていた場合には、それらの数値がすべて加算
されます。たとえば、カーソルキーの右とスペースキーが同時に押されている
場合には、4+16の20が変数に読み込まれます。この数値をif命令などでチェッ
クする場合には、演算子「&」が役に立ちます。
例 :
stick a,0 ; 変数aにキー状態を読み出し
if a&16 : goto *spc ; スペースが押されたか?
if a&32 : goto *ent ; Enterが押されたか?
このように「変数&キー情報」で複数のボタン情報が入った数値から、 １つだ
けのキー情報を取り出すことができます。
stick命令は、 getkey命令によく似ていますが、最大の違いはボタンが押され
た瞬間だけを検出する点です。つまり、ボタンが押された時に１度だけ押され
ている情報を返し、あとは押されているボタンをはなすまでは、押されている
ことになりません。
ただし、p2の非トリガータイプキー指定により、押しっぱなしであっても情報
を検出することができるようになります。
p2に押しっぱなしでも検出されるキーのコード(上の表にあるコードです。 複
数の場合はそれぞれの数値を加えます)を指定すると、 そのキーだけはボタン
が押されている間ずっと検出されるようになります。
この命令は、非常に複雑に見えますがキーを使ったスクリプトを作る際にとて
も便利な機能となるでしょう。たとえば、シューティングゲームを思い浮かべ
てみてください。自分の機体は上下左右の方向にボタンが押されている間ずっ
と移動しなければなりません。しかし、ミサイルを発射するボタンは１回押し
てはなすまでは次の弾は発射されません。このような場合には、上下左右のキ
ーだけは非トリガータイプのキーに指定して、それ以外は１度だけ押された情
報を返すようにすればいいわけです。
また、p3でウィンドウがアクティブでない場合は入力を無効にする機能をON/OFF
することができます。
p3が1か省略された場合は、HSPウィンドウがアクティブでない場合にはキー入
力が無効になります。
p3が0の場合は、すべての状況下でキー入力を行ないます。
§ getkey