4度目の正直携帯ﾎｰﾑﾍﾟｰｼﾞﾌｫﾚｽﾄ

お知らせ―　―　―　―　―
企画「1000HIT　『フェチ』」　髪(柳生比呂士)追加
―　―　―　―　―　―　―

メイン／アンケ／↑誤字脱字の報告やリクエスト等

;
; カーソルキーで画像を動かす(1)
;
celload "face.bmp" ; 元画像ファイル
face=stat ; 元画像のIDを保存

mx=320 ; X座標
my=240 ; Y座標
msp=4 ; スピード
*main
redraw 0 ; 描画始め

color 0,0,64
boxf ; 背景を消す

gmode 2 ; 透明色ありの指定
pos mx,my ; 表示位置の設定
celput face ; 画像コピー

redraw 1 ; 描画終わり
await 20

stick key,15 ; キー入力

if key&1 : mx=mx-msp
if key&4 : mx=mx+msp
if key&2 : my=my-msp
if key&8 : my=my+msp

goto *main