更新サボりのお詫びといっちゃなんですが、作りかけのゲームを公開しようと思います。
非常に単純なパズルゲームです。マウス入力です。
これ
まだ、ツメがあれなので、不快に思われる方がおられるかもしれません。
完成度の低いゲームが大嫌い！と言う方はご遠慮ください。

万が一、アドバイスをして頂ける方がおられましたら、メールでよろしくお願いします。
すぐに対応するのは難しいかもしれませんが・・・

 // 配列変数にそれぞれ値を代入
 tekix(0) = 100
 tekiy(0) = 100
 tekix(1) = 200
 tekiy(1) = 200
 tekix(2) = 300
 tekiy(2) = 300

 // それぞれの位置に円を描画
 repeat 3
  circle tekix(cnt) - 5, tekiy(cnt) - 5, tekix(cnt) + 5, tekiy(cnt) + 5
 loop

　 実行すると小さい円が斜めに3つ表示されます。

　プログラムを最初から見ていきましょう。まず
 dim tekix, 3
 dim tekiy, 3
があります。dim命令が使われていますが、これはそれぞれ、「tekixという要素数が3の配列変数を作れ」「tekiyという要素数が3の配列変数を作れ」といっています。実はこのdim命令をつかって
　dim 変数名
と言う風に要素数を指定しなければ、普通の変数を作ることが出来ますが、今までは省略してきました。この命令を使わなくても、最初に変数に代入した時にHSPが勝手に作ってくれるからです。配列変数でもこの命令を使わなくとも、最初に代入した時に配列変数を作ってくれます。つまり、この2行は無くてもとりあえず問題ありません。こういう命令があることを示すために書いておきました。

　つぎに、
 tekix(0) = 100
 tekiy(0) = 100
 tekix(1) = 200
 tekiy(1) = 200
 tekix(2) = 300
 tekiy(2) = 300
とあります。これは、tekix、tekiyという配列変数の各要素に値を代入しています。普通の変数と違うのは、何番目の要素かを示す添え字があるところです。ここで注意して欲しいのは、要素の番号は0から始まる、と言うことです。よってこの場合、要素数が3であるため、添え字に指定できるのは、0、1、2の3つです。

　そして、注目して欲しいのはこの部分です。
 repeat 3
  circle tekix(cnt) - 5, tekiy(cnt) - 5, tekix(cnt) + 5, tekiy(cnt) + 5
 loop
repeat命令とloop命令で、circle命令を3回繰り返しています。このcircle命令ではtekix、tekiyの配列変数の要素の値を利用して円を描画するわ訳ですが、添え字の部分に「cnt」とかかれています。これはシステム変数の1種で、repeat-loop命令で何回目の繰り返しか、と言う値が入っています。つまり、一番最初の繰り返しでは0、次の繰り返しでは1、その次の繰り返しでは2、・・・と言う風に順次変化していきます。よって、3つの円がそれぞれの位置に描画されます。
　ここで味噌なのが、添え字には普通の命令のパラメータと同じように、変数や、計算式を入れることが出来る、と言うことです。これが、普通の変数の名前の最後に数字を付ける時との大きな差で、配列変数を利用する時の最大の利点です。上のプログラムの描画部分のような書き方は、ゲームを作る際にたくさん出てくると思うので是非身につけて下さい。

　今回の例はあまり面白くないかもしれませんが、これから配列変数は割と出てくると思います。いろいろ、配列変数で遊んでください。

  // マウス左ボタン検出
  getkey lclick, 1
  // マウス右ボタン検出
  getkey rclick, 2

  // 条件：左が押されていれば
  if (lclick == 1) {
   // 色：ランダム
   color rnd(256), rnd(256), rnd(256)
   // 半径：1から100の間でランダム
   r = rnd(100) + 1
   // (mousex, mousey)中心の円描画
   circle mousex - r, mousey - r, mousex + r, mousey + r
  }

  // 条件：右が押されていれば
  if (rclick == 1) {
   // 色：白
   color 255, 255, 255
   // 画面内塗りつぶし
   boxf
  }

  wait 5
 loop

　if文の色をちょっと変えてみました。見やすいでしょうか？

　実行すると、マウスを押している間、ずっと円が描画されると思います。円と次の円が描画されるまでの時間が、「wait 5」です。（実際は、他の処理も多少時間をとっていますが）


　プログラムの説明ですが、getkey命令付近は、大体分かると思います。前回説明したとおりです。

　今回は色と半径をランダムにしています。「r = rnd(100) + 1」の「+1」は「r」が0になるのを防ぐ役割があります。「+1」がなければ、rの範囲は0～99ですが、「+1」することで1~100となっています。　

　問題のマウス座標ですが、円描画の行を見てください。
   circle mousex - r, mousey - r, mousex + r, mousey + r
　となっています。このように、「mousex」「mousey」というシステム変数も、代入さえしなければ、普通の変数のように利用することが出来ます。この「mousex」「mousey」には、常に、その時のマウスの座標が入っているため、マウスを押しながら移動させたりしても円はマウスの位置にちゃんと描画されます。

　とても簡単だとは思いませんか？ここまでやってくれば、簡単なペイントソフトみたいなものは出来そうな気がしますね。

 // 移動スピード
 sp = 10

 // 半径
 r = 10

 repeat

  // キー情報取得
  getkey hidari, 37
  getkey ue, 38
  getkey migi, 39
  getkey sita, 40

  // 移動
  if (hidari == 1) {
   x -= sp
  }
  if (ue == 1) {
   y -= sp
  }
  if (migi == 1) {
   x += sp
  }
  if (sita == 1) {
   y += sp
  }

  // 描画始め ++++++++++++++++++
  redraw 0
 
  // 背景
  color 0, 0, 0
  boxf

  // 玉
  color 255, 255, 255
  circle x - r, y - r, x + r, y + r

  redraw 1
  // 描画終わり ++++++++++++++++

  wait 3

 loop

　カーソルキー（十字キー）を押すと、その方向に玉が動くと思います。

　最初に
  x -= sp
　という書き方に触れておきますが、これは今まで使ってきた、
  x = x - sp　
　と同じことです。つまり、xの値をspの値だけ減らす、と言う意味です。スマートに見えるので書き換えました。
　今まではspの部分は定数を用いてきましたが、変数にすることで、「アイテム取得でスピードアップ！」と言うような処理が出来ます。今回はしていませんが、今後ゲームを作る際に、こういう書き方が必要になると思うので、こうしておきました。他に、spの代入する値を変更するだけで、spの部分の値を一括変更できるというメリットもあります。

　キーの情報の取得はこの部分です。
  getkey hidari, 37
  getkey ue, 38
  getkey migi, 39
  getkey sita, 40
　37,38,39,40と言うキーコードは、上の表で見ると、カーソルキーの左、上、右、下であることが分かると思います。
　つまり、カーソルキーが押されているか押されていないかの情報が、それぞれ、hidari、ue、migi、sitaと言う変数に代入されることになります。

　そして、その変数の値を利用しているところがここです。
  if (hidari == 1) {
   x -= sp
  }
  if (ue == 1) {
   y -= sp
  }
  if (migi == 1) {
   x += sp
  }
  if (sita == 1) {
   y += sp
  }
　ここで、if (なんたら) {　かんたら }　という文が出てきました。この文をif文と言います。ifと言うのは英語で「もしも～ならば」という意味を持ちますが、プログラム上のif文もそうです。もし（）内の条件が満たされていれば、｛｝内の処理をします。逆に（）内の条件が満たされていなければ、｛｝内の処理を行いません。
　ここで==は左辺と右辺が等しい場合、という条件を示します。つまり、それぞれ、hidari、ue、migi、sitaの値が1、つまりキーが押されている状態であれば｛｝内の処理を行うというものです。｛｝内の処理はそれぞれ、x座標、あるいはy座標を変化させる処理となっているので、カーソルキーを押すと、円が移動する、ということになります。
　xを増やすか減らすかという符合の問題は、x座標の正方向が右、y座標の正方向が下、と言うことを考えれば分かると思います。

　

　なんだかゲームっぽくなってきたと思いませんか？次はマウスでも触ってみるかもしれません。

　あと、HSP　HELP　Browser　Ⅱは、スクリプトエディタのメニューのヘルプ＞HSP命令リファレンスを開く、から起動することが出来ますので、命令の詳細が知りたい時や、どんな命令や関数があるか知りたい時は開いてみてください。

  // ランダムに位置を決める
  x = rnd(640)
  y = rnd(480)

  // 円の描画
  circle x - r, y - r, x + r, y + r
 
  wait 1
  
 loop

実行したら、黒い点が次々に表示されます。

もう、大体のプログラムの流れは分かると思うので割愛します。

乱数を使う時は、使う前にrandomize命令を置いて下さい。乱数が初期化されます。
これをしないと、乱数が毎回同じ、つまり乱数でなくなってしまいます。

それをしたあとに、
 x = rnd(640)
 y = rnd(480)
のところで、乱数を作っています。
rnd関数が乱数を発生させる関数で、数値のパラメータを1つとります。
上のプログラムの場合、xに0から639までの数（640通り）の中のどれか、
yに0から479までの数（480通り）のどれかがランダムで代入されます。

前にも言った通り、ウィンドウのサイズはデフォルト（標準初期値）で640×480なので、
rnd関数によって決められた円の中心座標は、画面内のどこかの点です。

乱数の使い方は大体分かったでしょうか？
ゲームでも、
降り注ぐ岩の位置とか、
的の出てくる微妙なタイミングとか
煙球のランダムな色など
色々使えるとおもうので、覚えておきましょう。


次回はキーボードの情報を利用する予定です。
ここから、面白くなってくる可能性があります。

 repeat

  // 描画モード→0
  redraw 0

  // 背景塗りつぶし
  color 0,  0,  0 // 黒
  boxf

  // 円の描画
  color 255, 255, 255 // 白
  circle x - r, y - r,  x + r, y + r

  // 描画モード→1
  redraw 1

  // x座標を5増やす
  x = x + 5

  // 50ms待つ
  wait 5

 loop


redraw命令が新しく加わりました。redraw命令は描画モードを変更する命令です。
描画モード0は、描画命令が実行されても、実際の画面には反映されず、仮想画面上の描画にとどまる、と言う状態です。
一方描画モード1は、描画命令が実行されたその時に、実際の画面に反映されるというモードです。
また、描画モード1にした瞬間、それまで仮想画面にあったイメージが実際の画面に反映されます。

と言うことは、いろいろ描画する前に描画モードを0にしておいて、全ての描画が終わったところでモードを1にすれば、描画の過程は画面に反映されず、結果のみが見えるということになります。これで、ちらつきが解決されます。
これから、いろいろプログラムを書いていく上で、呪文のように毎回書くことになります。大切なことなので、是非覚えておきましょう。