tamane_s2_dish.hsp

sample\hsp3dish\tamane_s2_dish.hsp » Plain Format

#include "hsp3dish.as"

	tamas=ginfo_newid
	celload dir_tv+"tamane_s.png",tamas		; 素材フォルダから読み込みます
	celdiv tamas,256,512

	;	標準のサイズで表示
	screen 0,640,480

*main
	redraw 0
	color 0,160,160
	boxf

	gmode 2
	repeat 5
	x=rnd(640):y=rnd(480)
	i=rnd(8)
	pos x-128,y-256			; 適当な座標に表示
	celput tamas,i			; ランダムに表情を選ぶ
	loop

	redraw 1
	wait 100
	goto *main