テトリスを作る (774ﾚｽ)
上下前次1-新
526: 2005/08/24(水)16:35 ID:eB4TKXgy(1) AA×
527: 2005/08/25(木)03:04 ID:gBFFCRwb(1) AAS
少なくとも、俺の周りでテトリス好きの人は>>524がクリアできてるゲームしか遊んでないけどね
ただ、確かにシフトして底面を合わせる回転方式をスマートに実装するのは難しいな。
補正量を記述した定義ファイルを別に作ってそれを読み込ませて対応したが、少し非効率な気もする。
528: 2005/11/04(金)01:17 ID:TvoHZ9wF(1) AAS
なるほど
529: 2005/11/06(日)01:22 ID:u20WXTTw(1) AAS
テトラミノのそれぞれの名称ってありますか？
530: 2005/11/06(日)01:52 ID:9g77vaev(1) AAS
ＴＯＬＩＳＺｒ
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
gmode 2
gosub *SETMAP
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
*ブロック
BY+3
stick KY,8
if KY=1 :BX=BX-32
if KY=4 :BX=BX+32
if KY=8 :BY=BY+16
return
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 ;壁用灰色ブロック
}
loop
loop
pos BX,BY :gcopy 1,32,0,32,32 ;落下用黄色ブロック
return
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
repeat 19
RCNT=cnt
repeat 19
if MAP.cnt.RCNT=2 {
BX=cnt*32 :BY=RCNT+32
MAP.cnt.RCNT=0
}
loop
loop
return
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
レスがありませんね。
いや、随分と素っ頓狂なプログラムを書いてしまいました。
アドバイスのしようがありませんものね。
どうぞ、僕のことはスルーして次の話題に行ってください。
539: 2005/12/28(水)11:43 ID:xg7Xr6Bl(1) AAS
>>538
ちょｗｗｗ自分のﾚｽ遅かったのにそれかよｗｗｗ
>>532が来るまでこれでも見とけ
外部ﾘﾝｸ:gamdev.org
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
repeat 21
rcnt=cnt
repeat 12
pos cnt*15,rcnt*15
if A.cnt.rcnt=9 { mes "口" }
loop
loop
stop
542: 531 2005/12/29(木)15:42 ID:w8wWzACB(2/2) AAS
ここまでが僕の限界です。
ブロックは別に配列を作るそうですが、どうしたら良いのかまったくわかりません。
543: 2006/02/01(水)21:56 ID:SLzdgd4f(1) AAS
ここのを参考にしながら作ってみた。
外部ﾘﾝｸ[html]:kasamatusan.sakura.ne.jp
win32 SDL.dll 必須(同じフォルダに置く)
SDL.dll
外部ﾘﾝｸ[zip]:www.libsdl.org
544: 2006/05/01(月)23:56 ID:cQ5CvRYf(1) AAS
テトリスのCPUアルゴリズムのコンテストってこのスレでやった方がいい？
545: 2006/05/02(火)11:11 ID:UeNfZ0vH(1) AAS
おもしろそうだな
ム板に将棋や麻雀のCPUアルゴリズムを競うスレがあったが
ID表示が無いせいでなかなか議論が進まない傾向が見られた
一方こちらは人が居ない
546(2): 2006/05/20(土)04:26 ID:uT0leoeU(1) AAS
オセロと同じでテトリスは単純だからアルゴリズムはFAが出てる
だから速度で競うしかないからやってもつまらんよ
547: 2006/05/20(土)19:52 ID:sPNnlt1N(1) AAS
>>546
後はTGMみたいにアイデアと操作性の勝負になるんだよな。
548: 2006/06/27(火)21:10 ID:SYe9nV57(1) AAS
保守
549: 2006/06/28(水)02:46 ID:oP0nDtg4(1) AAS
ＮＥＸＴがかなり先まで見える状態で
下まで掘り返すプログラムも簡単にできるのか？
550: 2006/06/28(水)16:16 ID:J/FopGa8(1) AAS
今だーーー！550ゲットーーーーーー！！！！！！！！
551: 2006/07/08(土)06:15 ID:iDFm5g4r(1) AAS
>>546
パズルモードを攻略できるの？
552(4): 2006/08/18(金)22:21 ID:9Ph8mdvx(1) AAS
ただいまTETRIS2002ガイドラインになんちゃって準拠したテトリスを作ってるところでつが、
T-SPINとスーパーローテーションの実装方法が分かりませんでつ。
ご指南いただければ幸いかと。
553: 2006/08/18(金)23:00 ID:2vFjQPe3(1) AAS
候補を総当りしちゃってもいいんじゃないかね
554: 2006/08/19(土)16:59 ID:mSi6sXts(1) AAS
Tスピンねぇ…
?固定される直前の動作が回転である
?左右移動できない
?最後に回転した方向にもう一度回転できない
この条件がすべて揃っていればｲｲんじゃないでしょうかね
555(1): 2006/08/20(日)02:16 ID:F5ABO99M(1) AAS
>>552
晒すのが先
出来たところまででいいからさ
上下前次1-新書関写板覧索設栞歴
あと 219 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ
ぬこの手 ぬこTOP 0.019s