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

投稿プログラム : ペイントバトル

パンくずリスト

2016年2月20日投稿 / 投稿者 : haru66kero / タグ : 投稿プログラム 2人対戦専用 ゲーム QRコード 初代対応 陣取りゲーム 対戦

本当の対戦ゲーム!?

本格的な対戦ゲームをつくってみました! CPU対戦機能はありませんが・・・。

概要

二人対戦用ゲームです。

ルール

1Pが青、2Pが赤色の棒人間を操作して、通った所が自分の色になるので、
できるだけ多くのタイルを自分の色にします。

操作方法

まず、制限時間を決めます。(6で1秒)(初期値は300)

1P

十字キー:移動
Lキー:アタック

2P

A、B、X、Yキー:移動
Rキー:アタック

アタックをするには、左(右)のメーターが満タンになっている必要があります。
メーターは移動するごとに増えていきます。
メーターが満タンになると、メーターの色が変わります。
アタックをすると直線上のタイルが自分の色になります。
直線上に相手がいると、気絶させることができます。
最終的に自分の色のタイルが多い方が勝ちです!

QR コード

プチコンmkII 向けの QR コードです。

qr400.pngqr401.png

プログラムリスト

初代の人は、WAITをVSYNCに変えてください。

  1. ’2016/2/10:18:35
  2. CLS:CLEAR:COLOR 0:BGMSTOP
  3. FOR I=0 TO 31:FOR J=0 TO 23
  4. BGPUT 0,I,J,0,0,0,0:NEXT:NEXT
  5. LOCATE 1,1:?”┌──────────┐
  6. LOCATE 1,2:?”│ヘ゜イント ハ゛トル│
  7. LOCATE 1,3:?”└──────────┘
  8. LOCATE 1,9:?”1P(BLUE)2P(RED)
  9. LOCATE 1,10:?”↑  UP   Ф
  10. LOCATE 1,11:?”↓ DOWN  Б
  11. LOCATE 1,12:?”← LEFT  Х
  12. LOCATE 1,13:?”→ RIGHT А
  13. LOCATE 1,14:?”К FIRE  н
  14. LOCATE 8,16:?”コノケ゛ームハ、「г」ヲソウサ
  15. LOCATE 8,17:?”シテ ナルヘ゛クオオクノ
  16. LOCATE 8,18:?”タイルヲシ゛フ゛ンノイロニ
  17. LOCATE 8,19:?”スルケ゛ームテ゛ス。
  18. LOCATE 0,6:?”300”:LOCATE 0,5
  19. INPUT”セイケ゛ンシ゛カンハ”;TIME:CLS
  20. COLOR 11:LOCATE 8,12:?”г”
  21. COLOR 13:LOCATE 23,12:?”г”
  22. FOR I=8 TO 23:FOR J=4 TO 19
  23. BGPUT 0,I,J,944,11,0,0
  24. NEXT:NEXT:PX(0)=8:PY(0)=12
  25. PC(0)=11PX(1)=23:PY(1)=12
  26. PC(1)=13PU(0)=1PD(0)=2PL(0)=4
  27. PR(0)=8PU(1)=64PD(1)=32
  28. PL(1)=128PR(1)=16PA(0)=256
  29. PA(1)=512FOR I=0 TO 2:BEEP 16
  30. WAIT 60:NEXT:BEEP 18
  31. WAIT 60:BGMPLAY 23
  32. FOR I=TIME TO 0 STEP −1
  33. FOR J=0 TO 1:COLOR 0
  34. LOCATE 8,2:? I” ”:COLOR PC(J)
  35. LOCATE PX(J),PY(J):?” ”
  36. LOCATE (PC(J)==13)*30,9
  37. CX=0:CY=0:FOR S=S(J) TO 0
  38. B=BUTTON()
  39. IF B AND PU(J) THEN CY=−1
  40. IF B AND PD(J) THEN CY=1
  41. IF B AND PL(J) THEN CX=−1
  42. IF B AND PR(J) THEN CX=1
  43. PX(J)=PX(J)+CX:PY(J)=PY(J)+CY
  44. IF PY(J)<4 THEN PY(J)=4
  45. IF PY(J)>19 THEN PY(J)=19
  46. IF PX(J)<8 THEN PX(J)=8
  47. IF PX(J)>23 THEN PX(J)=23
  48. NEXT:LOCATE PX(J),PY(J)
  49. ? CHR$(244+S(J)%4)
  50. X=PX(J):Y=PY(J)
  51. IF PC(J)==13 THEN C=2
  52. IF PC(J)==11 THEN C=4
  53. BGREAD(0,X,Y),Z,Q,Z,Z
  54. IF Q!=C THEN P(J)=P(J)+1
  55. IF Q!=C THEN BEEP 9
  56. BGPUT 0,X,Y,944,C,0,0
  57. IF P(J)>120 THEN P(J)=120
  58. IF B AND PA(J) THEN GOSUB@AT
  59. IF S(J)>0 THEN S(J)=S(J)−1
  60. IF J==0 THEN COLOR 9
  61. IF J==1 THEN COLOR 12
  62. IF P(J)<120 THEN COLOR PC(J)
  63. FOR COL=0 TO 12
  64. LOCATE (J==1)*30,COL+5:?” ”
  65. NEXT:FOR COL=1 TO P(J)/10
  66. LOCATE (J==1)*30,COL+5:?”┷”
  67. NEXT:WAIT 5:NEXT:NEXT
  68. COLOR 0:BGMSTOP:BEEP 34
  69. LOCATE 13,2:?”シュウリョウ!”
  70. FOR I=8 TO 23:FOR J=4 TO 19
  71. BGREAD(0,I,J),Z,Q,Z,Z
  72. IF Q==4 THEN SC(0)=SC(0)+1
  73. IF Q==2 THEN SC(1)=SC(1)+1
  74. NEXT:NEXT:WAIT 180
  75. LOCATE 13,2
  76. ? SC(0)”/”SC(1)”    ”
  77. LOCATE 13,3:COLOR 9
  78. IF SC(0)>SC(1) THEN ?”1P WIN!”
  79. COLOR 12
  80. IF SC(0)<SC(1) THEN ?”2P WIN!”
  81. COLOR 4:BGMPLAY 9
  82. IF SC(0)==SC(1) THEN ?”DRAW”
  83. LOCATE 10,20:?”PUSH ANY KEY
  84. FOR I=0 TO 1:I=BUTTON():NEXT
  85. FOR I=0 TO 31:FOR J=0 TO 23
  86. BGPUT 0,I,J,0,0,0,0:NEXT:NEXT
  87. CLS:COLOR 0:BGMSTOP
  88. BGCLIP 0,0,31,23:END
  89. @AT
  90. IF P(J)<120 THEN RETURN
  91. FOR H=8 TO 23:V=PY(J)
  92. BGPUT 0,H,V,944,C,0,0:NEXT
  93. H=PX(J):FOR V=4 TO 19
  94. BGPUT 0,H,V,944,C,0,0
  95. IF X==PX(J==0)THEN S(J==0)=30
  96. IF Y==PY(J==0)THEN S(J==0)=30
  97. NEXT:BEEP 13:P(J)=0:RETURN
  98. ’2016/2/11:13:53

ご感想をどうぞ

選択肢 投票
読み込んでみた 2  
楽しかった! 0  
普通 0  
微妙… 0  
対戦相手がいない 0  

CHECKER FLAG (ひとことコメント)

この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)

  • BlackSoft : 遊んでみました!対戦型ボードゲームですね。アイデアは面白いと思いました。対戦ゲームは、簡単でも良いのでCPU対戦があると良いと思いますよ(思考部分はプログラミングの醍醐味でもありますから)。個人的な感想としては、移動スピードが速くなる等のアイテムがあると、より楽しめるかなと思いました。これからも頑張ってください(^-^) (2016/02/21 (日) 12:46:57)

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