sample\hgimg\mesh_x.hsp » Plain Format
#include "hgimgx.as" ; 板をY軸で回転させるサンプル ; (パレットモード) ; ; ウインドゥサイズの設定 ; screen 0,640,480,0 cls 4 ; 初期設定 ; hgini onexit *owari ; BOXオブジェクトを登録 ; setsizef 100.0f, 100.0f ; PLATEのXYサイズ setuv 0,0,127,127 ; テクスチャUV座標 addmesh mdid,16,16,16 ; 16x16 MESHモデルを作成 texload "btex.bmp" ; テクスチャの登録 regobj mychr,mdid ; MESHモデルをオブジェクトとして登録 selang mychr objsetf3 -1.5708f, 00.0f, 0.0f selpos mychr objsetf3 0.0f, 0.0f, 0.0f ; カメラ位置設定 ; gsel 0 selcpos objsetf3 0.0f, -50.0f, 100.0f selcang objsetf3 0.2f, 0.0f, 0.0f *main ; 描画メイン ; hgdraw ; 描画処理 hgsync 20 ; 時間待ち stick k,127 if k&128 : goto *owari ; [ESC]で終了 ; キー操作で回転 ; selpos mychr if k&2 : objaddf3 0.0f, 0.0f, 1.0f if k&8 : objaddf3 0.0f, 0.0f, -1.0f selcang if k&1 : objaddf3 0.0f, -0.05f, 0.0f if k&4 : objaddf3 0.0f, 0.05f, 0.0f goto *main *owari hgbye end