テトリスを作る

テトリスを作る (774ﾚｽ)
上下前次1-新
抽出解除ﾚｽ栞

531(10): 2005/12/22(木)10:21 ID:gp4MJFmZ(1) AAS
HSPでテトリス作りたいんですけど、何から手をつけて良いかがわかりません。
2次元配列を使うのですか?

532(1): 2005/12/22(木)20:37 ID:rrOTwdfx(1) AAS
>>531
まずはこのｽﾚを頭から読み直せ
話はそれからだ。
何がわからないか書いてみな、
今漏れも久しぶりにHSPさわってるから。

533: 531 2005/12/26(月)15:02 ID:TOAf+nRF(1/5) AAS
532さん、レスありがとうございます。
とりあえず、見づらいですが途中までのソース載せときます。
buffer 1,,,1
picload "tetris.bmp" ;32×32の灰色のブロックと黄色いブロック
screen 0,415,607,1
palcopy 1
*START
省2

534: 531 2005/12/26(月)15:04 ID:TOAf+nRF(2/5) AAS
*LOOP1
redraw 0
gosub *ブロック
gosub *DRAWMAP
redraw 1
await 60
goto *LOOP1
省7

535: 531 2005/12/26(月)15:08 ID:TOAf+nRF(3/5) AAS
*DRAWMAP
color 0,0,0 :boxf 0,0,414,606
repeat 19
RCNT=cnt
repeat 19
if MAP.cnt.RCNT=1 {
pos cnt*32,RCNT*32 :gcopy 1,0,0,32,32 ;壁用灰色ブロック
省5

536: 531 2005/12/26(月)15:14 ID:TOAf+nRF(4/5) AAS
*SETMAP
dim MAP,19,19
MAP.0.0=1,0,0,0,0,0,2,0,0,0,0,0,1
MAP.0.1=1,0,0,0,0,0,0,0,0,0,0,0,1
∫
MAP.0.17=1,0,0,0,0,0,0,0,0,0,0,0,1
MAP.0.18=1,1,1,1,1,1,1,1,1,1,1,1,1
省10

537: 531 2005/12/26(月)15:19 ID:TOAf+nRF(5/5) AAS
これで以上です。
まずは黄色いブロックが、底辺まできたら蓄積されるようにしたいのですがどうしたら良いでしょうか？
ちなみに、１が壁用ブロック、２が落下用ブロックです。
（本当は１２×１９マスの配列にしたいのですが、良くわからず１９×１９の配列になってます）

538(1): 531 2005/12/28(水)08:35 ID:ex+d93O5(1) AAS
レスがありませんね。
いや、随分と素っ頓狂なプログラムを書いてしまいました。
アドバイスのしようがありませんものね。
どうぞ、僕のことはスルーして次の話題に行ってください。

540: 531 2005/12/28(水)21:00 ID:az8NFlCH(1) AAS
レスありがとうございます。
リンク先見ました。
スプライトとプレイフィールドの意味がわからないですが、
とりあえずペイントソフトで七種のブロックをつくってみます。

541: 531 2005/12/29(木)15:38 ID:w8wWzACB(1/2) AAS
リンク先にあった〜コウのポケット〜をみて、ＨＳＰ風に変えてみました。
dim A.12.21
A.0.0=9,0,0,0,0,0,0,0,0,0,0,9
A.0.1=9,0,0,0,0,0,0,0,0,0,0,9
( 省　略 )
A.0.19=9,0,0,0,0,0,0,0,0,0,0,9
A.0.20=9,9,9,9,9,9,9,9,9,9,9,9
省8

542: 531 2005/12/29(木)15:42 ID:w8wWzACB(2/2) AAS
ここまでが僕の限界です。
ブロックは別に配列を作るそうですが、どうしたら良いのかまったくわかりません。

上下前次1-新書関写板覧索設栞歴

ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.019s