game

defcfunc.hsp
title "カーソルキーで●を動かせます。
sample\game\defcfunc.hsp - 2005/08/01

facemove1.hsp
複数の物体を動かす(1) randomize buffer 3 picload "face.bmp" 画像ファイル screen 0,640,480 facemax=30 物体の最大数 gosub *faceini *main redraw 0 描画始め color 0,64,0 boxf 背景を消す gosub *facemove 物体を動かす gosub *facedraw 物体を描画 redraw 1 描画終わり await 20 goto *main *faceini 物体の初期化
sample\game\facemove1.hsp - 2005/08/01

facemove2.hsp
複数の物体を動かす(2) randomize buffer 3 picload "face.bmp" 画像ファイル screen 0,640,480 facemax=30 物体の最大数 gosub *faceini *main redraw 0 描画始め color 0,64,0 boxf 背景を消す gosub *facemove 物体を動かす gosub *facedraw 物体を描画 redraw 1 描画終わり await 20 goto *main *faceini 物体の初期化
sample\game\facemove2.hsp - 2005/08/01

grotate.hsp
title "grotate" buffer 3,256,256,0 picload "face.bmp" screen 0,640,480,0 cls 4 font "Arial",14 m="HSP3.0 grotate sample" max=20 dim xx,max dim yy,max dim px,max dim py,max dim rot,max dim prot,max repeat max xx.cnt=rnd(640) yy.cnt=rnd(480)
sample\game\grotate.hsp - 2005/08/01

keymove1.hsp
カーソルキーで画像を動かす(1) buffer 3 picload "face.bmp" 画像ファイル screen 0,640,480 x1=0 : y1=0 左上XY x2=640-64 : y2=480-64 右下XY mx=304 X座標 my=204 Y座標 msp=4 スピード *main redraw 0 描画始め color 0,0,64 boxf 背景を消す gmode 2,64,64 画像サイズ pos mx,my gcopy 3 画像コピー redraw 1 描画終わり
sample\game\keymove1.hsp - 2005/08/01

keymove2.hsp
カーソルキーで画像を動かす(2) buffer 3 picload "face.bmp" 画像ファイル screen 0,640,480 x1=0 : y1=0 左上XY x2=640 : y2=480 右下XY 角度のリスト(90度単位) rotdir=0.0, 1.57079632, 3.14159264, 4.71238896 mx=320 X座標 my=240 Y座標 msp=4 スピード mr=0 角度 *main redraw 0 描画始め color 0,0,64 boxf
sample\game\keymove2.hsp - 2005/08/01

keymove3.hsp
カーソルキーで画像を動かす(3) buffer 3 picload "face.bmp" 画像ファイル screen 0,640,480 x1=0 : y1=0 左上XY x2=640 : y2=480 右下XY mx=320.0 X座標 my=240.0 Y座標 msp=4.0 スピード mr=0.0 角度 mrsp=0.1 角度回転スピード *main redraw 0 描画始め color 0,0,64 boxf 背景を消す gmode 2,64,64 画像サイズ pos mx,my
sample\game\keymove3.hsp - 2005/08/01

mapedit.hsp
簡易マップ編集ツール cx=64:cy=64 チップXYサイズ csrc=3 チップのあるウィンドウID mapsx=32 マップ全体Xサイズ mapsy=32 マップ全体Yサイズ *start dim map,mapsx,mapsy mapvx=9:mapvy=7 表示XYチップ数 mapx=0:mapy=0 mapcode=0 buffer csrc picload "testchr.bmp" 画像ファイル screen 0,mapvx*cx,mapvy*cy+24
sample\game\mapedit.hsp - 2005/08/01

mapmove1.hsp
マップ表示(1) (マップデータはmapedit.hspで作成します) cx=64:cy=64 チップXYサイズ csrc=3 チップのあるウィンドウID mapsx=32 マップ全体Xサイズ mapsy=32 マップ全体Yサイズ dim map,mapsx,mapsy mapvx=9:mapvy=7 表示XYチップ数 mapx=0:mapy=0 bload "test.map",map マップ読み込み buffer csrc picload "testchr.bmp" 画像ファイル
sample\game\mapmove1.hsp - 2005/08/01

mapmove2.hsp
マップ表示(2) (マップデータはmapedit.hspで作成します) cx=64:cy=64 チップXYサイズ csrc=3 チップのあるウィンドウID mapsx=32 マップ全体Xサイズ mapsy=32 マップ全体Yサイズ dim map,mapsx,mapsy mapvx=9:mapvy=7 表示XYチップ数 mapx=0:mapy=0 mapex=(mapsx-mapvx)*cx mapey=(mapsy-mapvy)*cy bload "test.map",map マップ読み込み
sample\game\mapmove2.hsp - 2005/08/01

shoot.hsp
シューティングゲームのサンプル (onitama 2004/11) (HSP3以降専用) バッファIDの設定 #define global bgbuf 2 #define global chrbuf 3 #define global bombuf 4 #enum SE_BOM = 0 レーザーの移動 #module mylaser x,y #modinit int px, int py x=px : y=py return #modfunc laser_move x+=12 if x>640
sample\game\shoot.hsp - 2005/08/01

typing.hsp
title "タイピングゲーム" randomize *start ゲーム開始 score=0 *greset 問題の準備 cursor=0 timer=250 typemode=0 m=rnd(3) if m=0 : mondai="HOTSOUPPROCESSOR":mondai2="ホットスーププロセッサ" if m=1 : mondai="HSPSCRIPTEDITOR":mondai2="HSPスクリプトエディタ" if m=2 :
sample\game\typing.hsp - 2005/08/01