if keybuf.VK_UP = 1 : E3DPosForward hsid(0), 10 if keybuf.VK_DOWN = 1 : E3DPosForward hsid(0), -10 if keybuf.VK_LEFT = 1 : E3DRotateY hsid(0), -5 if keybuf.VK_RIGHT = 1 : E3DRotateY hsid(0), 5
オブジェクト0のキーボード操作を追加しました。
[↑]前進、[↓]後退、[←]左旋回、[→]右旋回します。
keybuf は、GetKeyboardState 命令で、セットされます。
もし「↑」キーが押されたら、「E3DPosForward p1,p2」で、形状データを、現在向いている方向に、p2だけ移動する。
[p1]オブジェクト0である形状データを識別するid
[p2]移動距離を指定する。
もし「↓」キーが押されたら、「E3DPosForward p1,p2」で、形状データを、現在向いている方向に、p2(マイナスの値)だけ後退する。
もし「←」キーが押されたら、「E3DRotateY p1,p2」で、形状データを、Y軸に関して、p2度だけ回転します。
[p1]オブジェクト0である形状データを識別するid
[p2]回転角度。
もし「→」キーが押されたら、「E3DRotateY p1,p2」で、形状データを、Y軸に関して、p2度だけ回転します。