2011年04月24日投稿 / 投稿者 : 名無しさん / タグ : 投稿プログラム サンプル
DATA文に書かれたスクリプトデータによってキャラクタの動きなどを制御する、サンプル的なプログラムです。
複雑なアニメーションをさせたいときによく使われる手法です。
プチコンだと重いかな?と思って、キャラクタ数が少ない格闘ゲームとして作り始めたのですが、
いろいろ試してみて、16体まで出してもサクサク動いていたので、途中で面倒くさくなったし
サンプル用に整理しました。
コマンドとして以下のものがあります。
キー入力判定はコマンドにしない方がよかったかもしれません。
他にもBEEP音やダメージなど、必要に応じて追加できます。
例えばレミングスで「このタイミングで地面を掘る」というような制御をするのに向いています。
背景も何も無いところでスプライトのキャラが動いているだけです
- ’スクリフ゜ト セイキ゛ョ by ウル
- CLEAR
- VISIBLE 1,1,1,1,1,1
- CLS
- ’アニメ テ゛ータ & テーフ゛ル
- DIM AD(999)
- DIM ADT(99)
- RESTORE @ANMDATA
- N=0
- P=0
- @ANMDATA1
- ADT(N)=P:N=N+1
- @ANMDATA2
- READ D
- AD(P)=D:P=P+1
- IF D>−99 GOTO @ANMDATA2
- IF D>−999 GOTO @ANMDATA1
- ’キャラクタ ワーク
- NN=4
- DIM FL(NN) ’サユウ フリッフ゜
- DIM AP(NN) ’アニメ ホ゜インタ
- DIM PL(NN) ’ハ゜レット
- DIM PX(NN) ’ホシ゛ション X
- DIM PY(NN) ’ホシ゛ション Y
- NN=NN−1
- SPPAGE 0
- SPCLR
- FOR N=0 TO NN
- FL(N)=0
-
- AP(N)=ADT(0)
-
- PL(N)=2+(N>0)*3
-
- PX(N)=RND(240)+8
- PY(N)=128
-
- SPSET N,0,0,0,0,1
- NEXT
- ’メイン ルーフ゜
- @MAIN
- BT=BUTTON()
- IF FL(0)==0 GOTO @MAIN1
- B=BT
- BT=BT AND &HF3
- IF B AND 4 THEN BT=BT OR 8
- IF B AND 8 THEN BT=BT OR 4
- @MAIN1
- FOR N=0 TO NN
- P=AP(N)
- GOSUB @ANM
- AP(N)=P
- NEXT
- FOR N=0 TO NN
- SPOFS N,PX(N)−8,PY(N)−8
- NEXT
- VSYNC 1
- GOTO @MAIN
- ’アニメ テ゛ータ ショリ
- @ANM
- C=AD(P)
- ON C/10 GOTO @C0,@C1,@C2
- @C0
- ON C GOTO @WT,@AR,@JP,@MV,@FL
- @C1
- ON C−10 GOTO @SP,@SPA
- @C2
- ON C−20 GOTO @KI
- PRINT ”ERROR!”;C
- ’0 ツキ゛ ノ フレーム マテ゛ マツ
- @WT
- P=P+1
- RETURN
- ’1 アニメ リクエスト
- @AR
- P=ADT( AD(P+1) )
- RETURN
- ’2 ホ゜インタ シ゛ャンフ゜
- @JP
- P=P+AD(P+1)
- GOTO @ANM
- ’3 イト゛ウ
- @MV
- X=AD(P+1)
- IF FL(N) THEN X=−X
- PX(N)=PX(N)+X
- PY(N)=PY(N)+AD(P+2)
- P=P+3
- GOTO @ANM
- ’4 フリッフ゜
- @FL
- FL(N)=1−FL(N)
- P=P+1
- GOTO @ANM
- ’10 スフ゜ライト セット
- @SP
- SPCHR N,AD(P+1),PL(N),FL(N),0,0
- SPANIM N,1,0,0
- P=P+2
- GOTO @ANM
- ’11 スフ゜ライト アニメーション
- @SPA
- SPANIM N,AD(P+1),AD(P+2)
- P=P+3
- GOTO @ANM
- ’20 キー ニュウリョク チェック
- @KI
- IF N>0 GOTO @KI0
- B=BT AND AD(P+1)
- IF B==0 GOTO @KI0
- P=P+3
- GOTO @ANM
- @KI0
- P=P+3+AD(P+2)
- GOTO @ANM
- ’アニメ テ゛ータ
- @ANMDATA
- ’0 ニュートラル
- DATA 10,64
- DATA 20, 8,2, 1,1
- DATA 20, 4,2, 1,2
- DATA 0
- DATA 2,−11
- DATA −99
- ’1 セ゛ンシン
- ’ TODO:テキAI ノ ルーフ゜
- DATA 11,4,5
- DATA 3,1,0
- DATA 0
- DATA 20,8,2, 2,−7
- DATA 1,0
- DATA −99
- ’2 フリムキ
- DATA 10,68
- DATA 0,0
- DATA 4
- DATA 1,0
- DATA −99
- ’* オワリ
- DATA −999
この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)
表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.111 秒 | このページの最終更新 : 2022/09/20 (火) 12:43:56 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30