プチコンまとめWiki (初代/mkII)

Toukou/2048 の変更点

パンくずリスト


#title(投稿プログラム : 2048)
#contents
2014年3月31日投稿 / 投稿者 : OBONO / &tag(投稿プログラム,mkII専用,パズル,QRコード);&br;

* 概要 [#Summary]
ここ半月ばかりネット上で話題になっているパズル [[2048:http://gabrielecirulli.github.io/2048/]] のプチコン移植版。&br;
数字のタイルが次々に出てくるので、うまく移動させて大きい数字のタイルを作っていく。

* 遊び方 [#Rule]
-十字キーを押すと、画面内の全てのタイルがその方向に移動する。
-同じ数字のタイルがくっつくと、大きな数字のタイルに変化する。
-どの方向に動かしてもパネルが動かせなくなったらゲーム終了。
-Bボタンでいつでもやり直し。

* スクリーンショット [#ScreenShots]
#ref(2048_shot.jpg)

* QR コード [#QR]
プチコンmkII 向けのQRコードです。
#ref(2048_qr.png)

* プログラムリスト [#List]
#region(&basic{LOAD”2048”};)
#basic{{
ACLS:GCLS 34GFILL 23,0,214,191,83GPAGE 1FOR C=1TO 13READ C$Л
COLSET”SP”,C,C$GFILL 0,0,22,22,CЛ
Z=POW(2,C)L=(C−1−(C>12))/3OR 0X=8+L*3FOR I=0TO LЛ
GPUTCHR X,8,”BGF”,Z%10+48,0,1X=X−6Z=Z/10NEXTЛ
FOR I=0TO 3FOR J=0TO 3C$=””FOR K=0TO 63C$=C$+HEX$(GSPOIT(J*8+K%8,I*8+K/8))NEXTЛ
CHRSET”SPU”,C*16+I*4+J,C$NEXT:NEXT:NEXTЛ
@IЛ
CLEAR:SPCLR:CLS:COLOR 8?” ”*27;”SCOREЛ
DIM F(6,6),C(18)FOR I=0TO 5F(0,I)=1F(5,I)=1F(I,0)=1F(I,5)=1NEXTЛ
C(1)=−1GOSUB@A:GOSUB@AЛ
@LЛ
B=BTRIG()IF B==32THEN@IЛ
V=(B==8)−(B==4)W=(B==2)−(B==1)IF!V*!W THEN@LЛ
P=(V−W>0)*3+1Q=(V+W>0)*3+1U=0FOR I=0TO 15F=F(P,Q)C=C(F)F(P,Q)=0X=P:Y=QЛ
@MЛ
X=X+V:Y=Y+W:E=F(X,Y)Z=C(E)IF!E THEN@M ELSE IF C==Z THEN C(F)=C+.5C(E)=0ELSE X=X−V:Y=Y−WЛ
IF F THEN Z=ABS(P+Q−X−Y)SPOFS F,X*48,Y*48−23,Z*4U=U+(Z>U)*(Z−U)F(X,Y)=FЛ
Z=I%4==3P=P−V+Z*(V*4+W)Q=Q−W+Z*(W*4−V)NEXT:IF!U THEN@LЛ
WAIT U*3FOR I=2TO 17C=C(I)IF!C THEN SPCLR IЛ
IF C%1THEN C=C+.5C(I)=C:N=N+POW(2,C)SPCHR I,C*4SPSCALE I,100SPSCALE I,200,8Л
NEXT:GOSUB@AЛ
GOTO@LЛ
@AЛ
X=RND(4)+1Y=RND(4)+1IF C(F(X,Y))THEN@AЛ
@SЛ
S=S%17+1IF C(S)THEN@SЛ
C=!RND(16)+1C(S)=C:F(X,Y)=S:LOCATE 27,1?NЛ
SPSET S,C*4,0,0,0,1,32,32SPHOME S,12,12SPOFS S,X*48,Y*48−23SPSCALE S,0SPSCALE S,200,8WAIT 8RETURNЛ
DATA BFBFBF,DFBF9F,FFBF7F,FF9F6F,FF7F5F,FF5F3F,FFCF7F,FFC76F,FFBF5F,FFB73F,FFAF1F,CFD700,9FFF00Л
}}
#endregion

* 改良ポイント [#Improve]
-グラフィックを変更する
--パネルの角を丸くする
--文字をもっとクールな感じにする
-音楽/効果音をつける
--できる数字パネルの種類によって異なる効果音を鳴らす
--パネルが埋まってくるなどの状況に応じてBGMを変化させる
-ゲームオーバーの判定をする
-一手戻し機能をつける

* 実績報告 [#Vote]
自慢をしたければご自由に。
#vote(2048作れた![20],4096作れた!![4],8192作れた!!![2],16384作ったらバグった[74])
#vote(2048作れた![20],4096作れた!![4],8192作れた!!![2],16384作ったらバグった[75])

* CHECKER FLAG (ひとことコメント) [#Comments]
※要望は一切受け付けません。頑張って自分で改良してみましょう。
- ''OBONO'' : 作者はケチで貧乏なので、どうしても要望があるのであれば、このWikiの住人の優しい人にでも頼みこんでくださいな。 (&new{2014/03/31 (月) 22:00:00};)
- ''三毛乱ジェロ'' : 待ってました。自分で作ろうかどうしようか悩んでましたので。ゲームオーバーですが、「全部のパネルが埋まった時に縦横隣同士のパネルが同じヤツがあるかチェックして、無ければゲームオーバー」でいいと思います。てか私がそうしようと考えてました。 (&new{2014/03/31 (月) 23:48:02};)
- ''tm'' : 32768作れた!(嘘 (&new{2014/04/01 (火) 15:02:26};)
- ''よこやん'' : ↑エイプリルフール? (&new{2014/04/01 (火) 20:46:43};)
- ''名無しさん'' : 524288までいったらOverflowになった (&new{2014/04/01 (火) 23:51:38};)
- ''かつみ'' : 个 (&new{2014/04/02 (水) 16:15:54};)
- ''かつみ'' : 524287までがプチコンの限界だから仕方ない (&new{2014/04/02 (水) 16:17:47};)
- ''/Tachesci'' : 結構面白いですよね、これ。 (&new{2014/04/03 (木) 09:30:07};)
- ''/Tachesci'' : プチコン3号が出たらジャイロセンサーで動かせますね。 (&new{2014/04/03 (木) 21:46:35};)
- ''名無しさん'' : 512と1024の間にテラ深い溝がある・・・案外ムズゲーだった (&new{2014/04/26 (土) 07:58:05};)
- ''Citrine'' : とうとうプチコンにまで移植されたか...w (&new{2014/05/20 (火) 17:26:41};)
// - ''名無しさん'' : もし、アップしてるなら、こーど教えてください (&new{2015/07/19 (日) 09:46:26};)
// - ''tkzfxbgbvj'' : hLJErmKBtvptvPRVD (&new{2015/12/21 (月) 09:27:57};)
// - ''hqcwnq'' : LumTXVvIQgZNOS (&new{2016/01/05 (火) 21:13:03};)
// - ''gebreswaoq'' : JwiEpRKPLIoUFZrOL (&new{2016/01/07 (木) 02:46:26};)
// - ''afxgimyzfwp'' : JYPMYZMw (&new{2016/01/20 (水) 23:22:43};)

#comment

表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.013 秒 | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30