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

Toukou/プチコちゃんとレーダーバトル の変更点


#title(投稿プログラム : プチコちゃんとレーダーバトル)
2014年8月10日投稿 / 投稿者 : まげ / &tag(投稿プログラム,ゲーム,QRコード,mkII専用,海戦ゲーム,プチコちゃん);

#contents

今日のアクセス:&counter(today);  トータルアクセス:&counter(total);

* 概要 [#o31c27c3]
#ref(pckrader_op.jpg)
いわゆる「海戦ゲーム」です。見えない敵艦を、レーダーの反応を頼りに発見し、撃沈してください。&br;
従来はターン制ですが、本作ではお互いの攻撃が同時に行われるため、「引き分け」もあります。敵艦数も1隻だけなので、気軽に遊べると思います。&br;

元々のルールをご存知ない方は、「海戦ゲーム」で検索すると詳しく知ることができます。…手抜きでゴメンなさい(^^;)。&br;

※「プチコちゃん」はオリジナルキャラであり、同名の他のキャラとは無関係です。

* 遊び方 [#fcc8096c]
** タイトル画面 [#h7062726]
Aボタンでゲーム開始、Xボタンで終了します。&br;

** ゲーム画面 [#s8ccf032]
#ref(pckrader_gm.jpg)
方向ボタンの上下左右で、攻撃するポイントを指定し、Aボタンで決定します。&br;
攻撃の結果が「○」ならハズレ、「◎」ならその線上に敵艦がいる印で、敵艦に命中した時は「*」となります。&br;

Yボタンを押すと、ゲームを中断できます。

* 戯れ言 [#f5a2309c]
コンソール表現の魅力は、ダンボーの魅力に通じるような。実はMZ-700の実機を見たことがありません…。&br;

プチコちゃんシリーズ作品です。リアルタイムじゃない、ゆっくりと考えて遊べるゲームにしたくて作りました。学生時代によく遊んだものです(紙とペンで)。&br;
このテのゲームは敵アルゴリズムをどーするかが勝負です。その昔、ゲームボーイソフトとして発売されたこのテのは、最低でした(定価で購入したので断言しました)。なるべく「人」の考え方に基づくようにしたかったのですが、一部ズルしてます。せめて、理不尽さはないようにしたつもりです。&br;

よろしければ拙HP・[[【プチコRoom】:http://mage.kir.jp/puchiko_hp]]へもお越しください。こちらには絶対に載せられない作品もあります(^^;)。&br;

* アンケート [#yd92e3e3]
海戦ゲームで遊んだことはありますか?(アナログ、デジタル問わず)
#vote(ある[10],ない[4])

* QR コード [#g5c4d812]
プチコンmkII 向けの QR コードです。

|&ref(qr000.gif);|&ref(qr001.gif);|&ref(qr002.gif);|&ref(qr003.gif);|

* プログラムリスト [#k1530e96]

#region(プログラムリスト/530行)
#basic{{
CLEAR:COLOR 0,0:ACLS:PNLTYPE "OFF":BGMSTOP

TB$="@S9@E10@N2450@T70"
DIM MM$(2,9),PM$(9,9),MI$(2,2)
DIM PCK$(11,11),PMES$(11)
RX(0)=22:RY(0)=1
RX(1)=0:RY(1)=1
MI$(0,0)="▲":MI$(0,1)="・"
MI$(1,0)="・":MI$(1,1)="▼"
BS(0)=127:BS(1)=0
RESTORE @PCK
FOR Y=0 TO 10:FOR X=0 TO 10
READ PCK$(Y,X)
NEXT X:READ PMES$(Y):NEXT Y


'タイトル<---------------------
@TITLE
IF BUTTON()!=0 THEN @TITLE

CLS
BGMSTOP

GOSUB @PCKMOVE

COLOR 12
LOCATE 0,3:?"フ゜チコチャン ト"
COLOR 9:LOCATE 0,4
?"     ┝┸л "
?"    ┝┸  л    ┝┿┿┿┸л┫л"
?"   ┝┸       ┝┸ ┝┸    л"
?"  ┝┸   ┝┿┿┸лл┝┿┸┝┿┿┸л "
?" ┝┸ ┝┸лл     ┝┸ л    л"
?"┝┿┿┿┸  лл  ┝┿┸   л    "
?"л          л      "
?" л           ┝┸┝┸л┫ ┝┸л  ┝┸┝┸л "
?"            ┝┸┝┸   ┝┸   ┝┸┝┸  л"
?"  RADER    ┝┸┝┸   ┝┿┿┿┸┝┸┝┸┝┸л "
?"          ┝┸ ┿   ┝┸   ┝┸┝┸┝┸  л"
?"BATTLE  ┝┿┸  ┿┿┸┝┸  ┝┿┸┝┿┿┸    "
?"        л       л   л          "
?"         л       л   л         "
COLOR 14
LOCATE 3,0:?"(C)MAGE/Studio LOVEMARINE"

IM$="Аスタ-ト  Фエント゛"
GOSUB @INFO

@TILOOP
IF BUTTON() AND 16 GOTO @START
IF BUTTON() AND 64 GOTO @QUIT
WAIT 1
GOTO @TILOOP


'セットアッフ゜<------------------
@START
IF BUTTON()!=0 THEN @START

BGMSTOP 0,1
GOSUB @FADE
WAIT 40

FOR Q=0 TO 1
X=RND(7):Y=RND(7):SM=RND(2)
MX=7:MY=7
IF SM==0 THEN MX=MX-1 ELSE MY=MY-1
IF X>=MX THEN X=MX
IF Y>=MY THEN Y=MY
FOR VY=0 TO 8
MP$=""
FOR VX=0 TO 8
MPP$="С"
IF VY>=Y AND VY<=Y+2-(1-SM) AND VX>=X AND VX<=X+2-SM THEN MPP$="■"
MP$=MP$+MPP$
NEXT VX
MM$(Q,VY)=MP$
NEXT VY
NEXT Q

FOR Y=0 TO 8:FOR X=0 TO 8
PM$(X,Y)="С"
NEXT X:NEXT Y

COLOR 12
LOCATE 23,0:?"フ゜チコノMAP";
COLOR 7
LOCATE 0,0:?"アナタノMAP";

COLOR 4
TN=0:GOSUB @STAGE
TN=1:GOSUB @STAGE
PN=0:GOSUB @PCKVIEW
SX(0)=4:SY(0)=4
GC(0)=6:GC(1)=GC(0)
BT=0

'メイン<----------------------

@LOOP
IF BUTTON()!=0 THEN @LOOP

PN=0:GOSUB @PCKVIEW:GOSUB @PCKMES

BEEP 3
IM$="←↑→↓カ-ソルイト゛ウ  Аケッテイ  Хコウサン"
GOSUB @INFO

'フ゜レイヤ- コウケ゛キ<----
@SLOOP
TN=0:GOSUB @STAGE
COLOR 0
LOCATE RX(0)+SX(0),RY(0)+SY(0):?"П"
@SWAIT
BN=BUTTON()
WAIT 1
IF BN==BT THEN @SWAIT
BT=BN
IF BT AND 128 THEN GOSUB @GIVE:GOTO @ENDSUB
IF BT AND 16 THEN @SPASS
IF (BT AND 1)!=0 AND SY(0)>0 THEN SY(0)=SY(0)-1
IF (BT AND 2)!=0 AND SY(0)<8 THEN SY(0)=SY(0)+1
IF (BT AND 4)!=0 AND SX(0)>0 THEN SX(0)=SX(0)-1
IF (BT AND 8)!=0 AND SX(0)<8 THEN SX(0)=SX(0)+1
GOTO @SLOOP
@SPASS
MCK$=MID$(MM$(0,SY(0)),SX(0),1)
IF MCK$!="С" AND MCK$!="■" THEN @SLOOP

'フ゜チコ コウケ゛キ<----
@PLOOP
SX(1)=RND(9):SY(1)=RND(9)
FMC$=PM$(SX(1),SY(1))
IF FMC$!="С" AND FMC$!="■" AND FMC$!="╂" THEN @PLOOP
MCK$=MID$(MM$(1,SY(1)),SX(1),1)
IF MCK$!="С" AND MCK$!="■" THEN @PLOOP

GOSUB @INFODEL

'セントウ<----------------------
PN=1:GOSUB @PCKVIEW:GOSUB @PCKMES
IF FMC$=="╂" THEN GOSUB @ASE

BEEP 10
FOR VY=8 TO 0 STEP -1
FOR TN=0 TO 1
GOSUB @STAGE
COLOR 13
LOCATE RX(0)+SX(0),RY(0)+SY(0):?"П"
COLOR 2
LOCATE RX(TN)+SX(TN),RY(TN)+VY:? MI$(TN,0)
'WAIT 1
NEXT TN
NEXT VY
TN=0:GOSUB @STAGE
TN=1:GOSUB @STAGE
WAIT 10
FOR VY=0 TO 8
FOR TN=0 TO 1
GOSUB @STAGE
IF VY>SY(TN) THEN @MPASS
COLOR 2
LOCATE RX(TN)+SX(TN),RY(TN)+VY:? MI$(TN,1)
@MPASS
'WAIT 1
NEXT TN
NEXT VY

'セントウ ケッカ<-----------------
FOR TN=0 TO 1
CK$(TN)="○"
FOR C=0 TO 8
IF MID$(MM$(TN,C),SX(TN),1)=="■" THEN CK$(TN)="◎"
IF MID$(MM$(TN,SY(TN)),C,1)=="■" THEN CK$(TN)="◎"
NEXT C
IF MID$(MM$(TN,SY(TN)),SX(TN),1)=="■" THEN CK$(TN)="*"
IF CK$(TN)=="○" THEN BEEP 59,0,64,BS(TN):RN(TN)=3
IF CK$(TN)=="◎" THEN BEEP 36,0,64,BS(TN):RN(TN)=4
IF CK$(TN)=="*" THEN BEEP 13,0,64,BS(TN):RN(TN)=5:GC(TN)=GC(TN)-1
MM$(TN,SY(TN))=SUBST$(MM$(TN,SY(TN)),SX(TN),1,CK$(TN))
GOSUB @STAGE
NEXT TN

'フ゜チコ リアクション<--------------
IF RN(0)>RN(1) THEN RNN=0 ELSE RNN=1
IF RN(0)==RN(1) THEN RNN=RND(2)
IF RN(0)==5 AND RN(1)==5 THEN IF GC(0)<GC(1) THEN RNN=0 ELSE RNN=1
PN=RN(RNN)+RNN*4
GOSUB @PCKVIEW:GOSUB @PCKMES

'ケッカ フ゜チコ メモ<--------------
PM$(SX(1),SY(1))=CK$(1)
IF CK$(1)!="○" THEN @KM2

FOR C=0 TO 8
PM$(SX(1),C)="○"
PM$(C,SY(1))="○"
NEXT C
IF SX(1)==1 THEN FOR C=0 TO 8:PM$(0,C)="○":NEXT C
IF SX(1)==7 THEN FOR C=0 TO 8:PM$(8,C)="○":NEXT C
IF SY(1)==1 THEN FOR C=0 TO 8:PM$(C,0)="○":NEXT C
IF SY(1)==7 THEN FOR C=0 TO 8:PM$(C,8)="○":NEXT C
GOTO @KMPASS

@KM2
IF CK$(1)!="◎" THEN @KM3
FOR C=0 TO 8
IF PM$(SX(1),C)!="○" AND PM$(SX(1),C)!="◎" THEN PM$(SX(1),C)="■"
IF PM$(C,SY(1))!="○" AND PM$(C,SY(1))!="◎" THEN PM$(C,SY(1))="■"
NEXT C

FOR Y=0 TO 8:FOR X=0 TO 8
K$=PM$(X,Y)
IF X!=SX(1) AND Y!=SY(1) AND K$!="◎" AND K$!="■" THEN PM$(X,Y)="○"
NEXT X:NEXT Y
GOTO @KMPASS

@KM3
IF CK$(1)!="*" THEN @KMPASS
FOR Y=0 TO 8:FOR X=0 TO 8
IF MID$(MM$(1,Y),X,1)!="■" THEN AW$="○" ELSE AW$="■"
PM$(X,Y)=AW$
NEXT X:NEXT Y
@KM3B
X=RND(8):Y=RND(8)
IF PM$(X,Y)=="■" THEN @KM3B
PM$(X,Y)="╂"

@KMPASS
'FOR Y=0 TO 8:FOR X=0 TO 8
'LOCATE 15+X,12+Y:? PM$(X,Y)
'NEXT X:NEXT Y

WAIT 60

'シュウリョウ ハンテイ<--------------
FOR I=0 TO 1
IF GC(I)==0 THEN @END
NEXT I

GOTO @LOOP


'エント゛<---------------------
@END
IF BUTTON()!=0 THEN @END

WAIT 30
BGMPLAY 6

IF GC(0)==0 THEN MES$="アナタ ノ カチ":PN=6
IF GC(1)==0 THEN MES$="フ゜チコ ノ カチ":PN=10
IF GC(0)==GC(1) THEN MES$="ヒキワケ テ゛ス":PN=2
GOSUB @PCKVIEW:GOSUB @PCKMES
LOCATE 0,11:COLOR 3:? MES$

@ENDSUB
IM$="Аスタ-ト  Бタイトル"
GOSUB @INFO

@EWAIT
IF BUTTON(2) AND 16 GOTO @START
IF BUTTON(2)!=32 GOTO @EWAIT

GOTO @TITLE

'オワリ-----------------------
@QUIT
COLOR 0,0:CLS
BGMSTOP 0,1
WAIT 30
COLOR 0:LOCATE 0,8
?"     ┌─────────┐  ┝┿┿┿┰    "
?"     │         │  ┸┥┥┥┥    "
?"     │ マ タ ネ ♪ ├ ┝│^ ^│┰   "
?"     │         │ ┸└ ▽ ┘┥   "
?"     └─────────┘  к   л";:COLOR 12:?"フ゜チコ"
COLOR 0

TALK TB$+"マタ'ネ-?"
WAIT 60

END


'┿┿┿┿┿ サフ゛ル-チン ┿┿┿┿┿┿┿┿┿┿┿┿

'マッフ゜ ヒョウシ゛<---------------
@STAGE
FOR VVY=0 TO 8
MVB$=MM$(TN,VVY)
FOR VVX=0 TO 8
MVV$=MID$(MVB$,VVX,1)
COLOR 4
IF MVV$=="■" AND TN==0 THEN MVV$="С"
IF MVV$=="○" THEN COLOR 11
IF MVV$=="◎" THEN COLOR 9
IF MVV$=="*" THEN COLOR 13
IF MVV$=="■" THEN COLOR 7
LOCATE RX(TN)+VVX,RY(TN)+VVY:? MVV$;
NEXT VVX
COLOR 4:?"У";
NEXT VVY
LOCATE RX(TN),RY(TN)+9:COLOR 4:?"Т"*9;
RETURN

'フ゜チコ ヒョウシ゛<---------------
@PCKVIEW
COLOR 12
FOR VVC=0 TO 10
LOCATE 10,7+VVC:? PCK$(PN,VVC)
NEXT VVC
RETURN

@PCKMES
COLOR 12
LOCATE 10,5:?" "*11
LOCATE 16-(LEN(PMES$(PN))/2),5:? PMES$(PN)
RETURN

@ASE
COLOR 12
LOCATE 10,5:?" ア、シマッタ・・・"
LOCATE 15,9:?" -;"
RETURN

'インフォメ- ヒョウシ゛<-------------
@INFO
IL=LEN(IM$)
GOSUB @INFODEL
COLOR 2
LOCATE 15-IL/2,21:?"─"*(IL+2)
WAIT 5
LOCATE 15-IL/2,20:?"┌";"─"*(IL);"┐"
LOCATE 15-IL/2,21:?"│";IM$;"│"
LOCATE 15-IL/2,22:?"└";"─"*(IL);"┘"
RETURN

@INFODEL
LOCATE 0,20:?" "*32;
LOCATE 0,21:?" "*32;
LOCATE 0,22:?" "*32;
RETURN

'フェ-ト゛<--------------------
@FADE
COLOR 4
FOR C=0 TO 1
FOR X=0 TO 30 STEP 2
FOR Y=0 TO 23
LOCATE X,Y:? MID$("С ",C,1);
NEXT Y
WAIT 1
NEXT X
FOR Y=0 TO 22 STEP 2
LOCATE 0,Y:? MID$("С ",C,1)*32;
WAIT 1
NEXT Y
NEXT C
CLS
RETURN

'フ゜チコ タイトルアニメ<-------------
@PCKMOVE
WT=10
BGMPLAY 18
COLOR 12
LOCATE 23,3:?"  ┝┿┿┿┰  "
LOCATE 23,4:?"  ┿┸┸┸┸  "
LOCATE 23,5:?" ┝┸ ・ │  "
LOCATE 23,6:?" ┸└йй^┘┰ "
LOCATE 23,7:?"  и й○з  "
LOCATE 23,8:?"  и  ▲)  "
LOCATE 23,9:?"   з и○  "
LOCATE 23,10:?"  ┝┿┿┿┰  "
LOCATE 23,11:?"  ┿┿┿┿┿  "
LOCATE 23,12:?"  ии зз  "
LOCATE 23,13:?"   ┿ ┿   "
LOCATE 23,14:?"   ╂ ╂   "
WAIT WT
LOCATE 23,3:?"  ┝┿┿┿┰  "
LOCATE 23,4:?"  ┸┥┥┥┥  "
LOCATE 23,5:?"┝┿│・ ・│┿┰"
LOCATE 23,6:?"  к○-й┘  "
LOCATE 23,7:?"  ллмкл  "
LOCATE 23,8:?"  ( ▲ )з "
LOCATE 23,9:?"   з и○  "
LOCATE 23,10:?" ┝┿┿┿┿┿┰ "
LOCATE 23,11:?"  ии зз  "
LOCATE 23,12:?"  ии зз  "
LOCATE 23,13:?"   ┿ ┿   "
LOCATE 23,14:?"   ╂ ╂   "
WAIT WT
LOCATE 23,3:?"  ┝┿┿┿┰  "
LOCATE 23,4:?"  ┥┥┥┥┿  "
LOCATE 23,5:?" ○│ ・ ┥┰ "
LOCATE 23,6:?" л└▽  ┘┥ "
LOCATE 23,7:?"  лмкжл  "
LOCATE 23,8:?"  (▲  зз "
LOCATE 23,9:?"   з ○к  "
LOCATE 23,10:?"  ┝┿┿┿┰  "
LOCATE 23,11:?"  ┿┿┿┿┿  "
LOCATE 23,12:?"  ии зз  "
LOCATE 23,13:?"   ┿ ┿   "
LOCATE 23,14:?"   ╂ ╂   "
WAIT WT
COLOR 3:LOCATE 22,4:?"И"
BEEP 7
WAIT 2
LOCATE 22,4:?" "
WAIT 2
COLOR 12
FOR X=13 TO 0 STEP -1
LOCATE X,3:?"フ゜チコチャン ト "
WAIT 2
NEXT X
WAIT 10
COLOR 9
LOCATE 0,6
?"       ┝┸"
?"      ┝┸       ┝┿┿┿┸ ┫"
?"     ┝┸       ┝┸ ┝┸"
?"    ┝┸   ┝┿┿┸  ┝┿┸┝┿┿┸"
?"   ┝┸ ┝┸       ┝┸"
?"  ┝┿┿┿┸      ┝┿┸"
?
?"               ┝┸┝┸ ┫ ┝┸   ┝┸┝┸"
?"              ┝┸┝┸   ┝┸   ┝┸┝┸"
?"             ┝┸┝┸   ┝┿┿┿┸┝┸┝┸┝┸"
?"            ┝┸ ┿   ┝┸   ┝┸┝┸┝┸"
?"          ┝┿┸  ┿┿┸┝┸  ┝┿┸┝┿┿┸"
WAIT 5
LOCATE 0,5
?"      ┝┸л "
?"     ┝┸       ┝┿┿┿┸л┫л "
?"    ┝┸       ┝┸ ┝┸     "
?"   ┝┸   ┝┿┿┸лл┝┿┸┝┿┿┸л "
?"  ┝┸ ┝┸лл     ┝┸ л     "
?" ┝┿┿┿┸      ┝┿┸        "
?" л          л     "
?"              ┝┸┝┸л┫ ┝┸л  ┝┸┝┸л"
?"             ┝┸┝┸   ┝┸   ┝┸┝┸  "
?"            ┝┸┝┸   ┝┿┿┿┸┝┸┝┸┝┸л"
?"           ┝┸ ┿   ┝┸   ┝┸┝┸┝┸  "
?"         ┝┿┸  ┿┿┸┝┸  ┝┿┸┝┿┿┸   "
?"         л       л   л         "
WAIT 5
LOCATE 0,4
?"     ┝┸л "
?"    ┝┸  л    ┝┿┿┿┸л┫л "
?"   ┝┸       ┝┸ ┝┸    л"
?"  ┝┸   ┝┿┿┸лл┝┿┸┝┿┿┸л "
?" ┝┸ ┝┸лл     ┝┸ л    л"
?"┝┿┿┿┸  лл  ┝┿┸   л    "
?"л          л      "
?" л           ┝┸┝┸л┫ ┝┸л  ┝┸┝┸л "
?"            ┝┸┝┸   ┝┸   ┝┸┝┸  л"
?"           ┝┸┝┸   ┝┿┿┿┸┝┸┝┸┝┸л "
?"          ┝┸ ┿   ┝┸   ┝┸┝┸┝┸  л"
?"        ┝┿┸  ┿┿┸┝┸  ┝┿┸┝┿┿┸    "
?"        л       л   л          "
?"         л       л   л         "
BEEP 55
RETURN

@GIVE
COLOR 12
LOCATE 12,5:?"エ〜-・・・"
LOCATE 16,9:?"●"
LOCATE 15,10:?"□"
RETURN

'┿┿┿┿┿ テ゛-タ ┿┿┿┿┿┿┿┿┿┿┿┿┿┿┿

@PCK
DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ . ┥┰ "
DATA "    └- ─┘┥ "," ╂╂╂ймк л┛ "," ╂╂╂ ▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","エ-ット・・・"

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ . ┥┰ "
DATA "    └・ ─┘┥ "," ╂╂╂ мк л┛ "," ╂╂╂○▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","・・・・・・"

DATA "    ┝┿┿┿┰  ","    ○┥┥┥┿  ","   кк ・;┥┰ "
DATA "   л└▽ ─┘┥ "," ╂╂╂ мк з┛ "," ╂╂╂(▲ккз┛ "
DATA "┬───────┬─┬","│ │ ┝○┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","フ-・・・"

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ _ ┥┰ "
DATA "    └・ ─┘┥ "," ╂╂╂ мк л┛ "," ╂╂╂○▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","・・・セ-フ"

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ .;┥┰ "
DATA "    └- ─┘┥ "," ╂╂╂ мк л┛ "," ╂╂╂○▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","ア、ヤハ゛

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ <;┿  "
DATA "    └^○┝┸  "," ╂╂╂ мллз┛ "," ╂╂╂○▲  з┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │╂┸┥╂┻│┛│","│ │  ┛┛┻│┛│","アウ-ン!"

DATA "           ","    ┝┿┿┿┰  ","    ┿┿┿┿┿  "
DATA "    ┥┥┥┥┿┰ "," ╂╂╂└───┸┥ "," ╂╂╂<○○йк┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","マケチャッタ・・・"

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ _ ┥┰ "
DATA "    └・ ─┘┥ "," ╂╂╂ мк л┛ "," ╂╂╂○▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","タ゛メカ-・・・"

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿  ","    │ ・ ┥┰ "
DATA "    └▽ ─┘┥ "," ╂╂╂ мк л┛ "," ╂╂╂○▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┿┛┻│┛│","│ │ ╂╂┛┻│┛│","ミッケ!"

DATA "    ┝┿┿┿┰  ","    ┥┥┥┥┿┝ ","   ○│ ^ ┥┸ "
DATA "   л└▽ ─┘  "," ╂╂╂ мк л┛ "," ╂╂╂(▲ ○к┛ "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │ ┿┥╂┻│┛│","│ │ ╂┛┛┻│┛│","ヤッタ-♪"

DATA "    ┝┿┿┿┰  ","    ┸┥┥┥┥  ","   ┝│^ ^│┰ "
DATA "   ┸└ ▽й┘V "," ╂╂╂ мк л○ "," ╂╂╂(▲ илк "
DATA "┬───────┬─┬","│ │ ┝┿┿┿│┛│","│ │иии┏╋│┛│"
DATA "│ │╂┸┥╂┻│┛│","│ │  ┛┛┻│┛│","フ゛イッа"

}}
#endregion

/////////////////////////////////
// コメントを募集したくないなら、ここから下は削除してください

* CHECKER FLAG (ひとことコメント) [#ic2a6aad]
この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は[[掲示板>Board]]へ)
- ''かつみ'' : 俺もやったことあります。俺も作ったけどかなり出来が悪い…あと、DSiウェアに「レーダーウォー」という名前で海戦ゲームが楽しめます。是非一度でもやってみては?(^^) (&new{2014/08/10 (日) 22:33:04};)
- ''投稿者'' : >かつみさん:レーダーウォー、HPを見てみました。まぁ…これが本当ですよね(^^;)。 (&new{2014/08/10 (日) 23:48:18};)

#comment

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