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

Toukou/ドアまで忍者! の変更点

パンくずリスト


#title(投稿プログラム : ドアまで忍者!)
#contents
// ↑この2行は削除しないでください。
// ←このように「//」で始まる行はコメントです。ページ本文には反映されません。
//------------------------------------------------------------------------------
// ・投稿年月日は、このページを投稿しようとしている今日の日付を半角数字で入力してください。
//   この日付は、投稿プログラムを自動的に年月日順に並べる際に使用されます。
// ↓↓↓
2012年08月15日投稿
// ↑↑↑
//------------------------------------------------------------------------------
// ・投稿者名は、将来的に投稿プログラム一覧に表示するために使用します。
// ・「名無しさん」のままにしておくと、匿名の方からの投稿として扱われます。
// ↓↓↓
/ 投稿者 : 中1プログラマー?
// ↑↑↑
//------------------------------------------------------------------------------
// ・適当にタグをつけることができます。半角のコンマ区切りで複数つけられます。
//   タグをつけると、同じタグが付いたページを検索することができます。
// ★次に該当するプログラムは、特定のタグを設定するようご協力お願いします。
//   これらを設定すると、将来的に投稿プログラム一覧に目立つマークが付くようになる予定です。
// ・短いプログラム → 「1行プログラム」「数行プログラム」「1画面プログラム」タグのいずれか1つ
// ・初代プチコンでも動作するプログラム → 「初代対応」タグ
// ・mkII 以降専用のプログラム → 「mkII専用」タグ
// ・QRコードを掲載している → 「QRコード」タグ
// ・該当するなら「ゲーム」「実用ツール」「音楽」タグのいずれか
// ↓↓↓
/ &tag(投稿プログラム,ゲーム,QRコード,mkII専用);
// ↑↑↑

//------------------------------------------------------------------------------
// ここに概要とか書きます。
// ・** や *** で始まる行は子見出しとなります。* の数で深さが決まります。
// ・[#英数字] はページ内リンクに使用されるアンカーですが、
//   書かなかったり、消したりしてもかまいません。ない場合はランダムな文字列が自動付与されます。
*申し上げなければいけないこと [#i35ca5ca]
修正版を出す前は、かなり操作しにくく、

誠に申し訳ありませんでした。

修正部分 3行目 &basic{W=10};:&basic{T=100};

→&basic{W=5};:&basic{T=100};

若干操作しにくいですが、お好みに変えて頂いて構いません。

* 遊び方 [#Summary]
Aボタンで前に進み、Bボタンで後ろに戻ります。

** 使用上のご注意[#Komidashi1]
とっても難しいです。全5ステージ(多分。)です。

難しすぎてやる気が失せると思います。

DSi、または3DS、3DSLLにやつあたりしないようにお願いします。

難しすぎると思ったら簡単バージョンをご用意致しましたので

そちらをどうぞ。

**ゲーム目的 [#Komidashi1-1]
ドアまで制限時間以内にたどり着かなければなりません。

しかし、そこには、敵(くせもの)が監視しています。

四角い壁に隠れつつ、ゴールを目指して下さい。

*最後に[#Komidashi1-2]
忍者の時代にドア?と思わないで下さい。

そう思う方は、「ふすま」とお考え下さい。


/////////////////////////////////

* 動画・スクリーンショット [#ScreenShots]
すいません。ありません。

// ページを作成すると、画像の添付ができるようになります。(作成する前はできません)
// 作成後のページの右上、ウィキメニューにある「添付」から画像をアップロードできます。
// (添付ファイルはページごとに別個に管理されています。必ず作成後のページに添付してください)
// 画像をアップロードしたら、以下の書式でページ内に貼り付けられます。
// #ref(添付ファイル名)

// 以下の書式で、YouTube やニコニコ動画を貼り付けられます。
// #youtube(0HWX7kovgY8)
// #nicovideo(sm13684820)

/////////////////////////////////
// QR コードがない場合は、この部分は削除してください

* QR コード [#QR]

// 【重要】旧プチコンから mkII に転送したプログラムは、mkII で保存しなおしてから
// QR コード化すると、枚数が半分ぐらいに減ります。ぜひお試し下さい。
// 【重要】添付できるのは画像ファイルのみです。zip ファイルは解凍してください。

// ページを作成すると、QR コードの添付ができるようになります。(作成する前はできません)
// 作成後のページの右上、ウィキメニューにある「添付」から画像をアップロードできます。
// (添付ファイルはページごとに別個に管理されています。必ず作成後のページに添付してください)
// QR コードをアップロードしたら、以下の書式でページ内に貼り付けられます。
// #ref(アップロードしたファイル名)

// QR コードを大きくしたい場合は、倍率指定ができます。コンマは必ず 2 つ指定してください。
// ブラウザによっては補完がかかってボケますが、それでも問題なく読み込み可能です。
//#ref(qr0.png,,200%)

// 複数の QR コードを貼り付けるために表組みを用いる場合、&ref(); を使用します。
// (#ref() を表に埋め込んでしまうと、古い Internet Explorer でうまく表示されません)
修正版を出しました。前回より操作しやすいと思いますので、

修正版前を持っている方は、お願いします。

|~PRG:TSTRS|
|~1/1|
|&ref(qr00.png,,200%);|
---------------------------------------------------
簡単バージョンです。

RND128さんと、名無しさんのアドバイスのもと、

作らせて頂きました。

|~PRG:TSTRSK|
|~1/1|
|&ref(qr0k.png,,200%);|

////////////////////////////////
*プログラムリスト [#y034fb3a]
修正版です。
#basic{{
@STRT
CLEAR:BGP=13
W=5:T=100
S=1
@START
CLS
BGMPLAY BGP
JX=2:JY=19
TX=4:TY=1
@MAIN
?"  Щ    Р";T 
?" ┿ ┿        
?"       ステ-シ゛
?" ┿ ┿     ";S
?"            
?" ┿ ┿        
?"            
?" ┿ ┿        
?"            
?" ┿ ┿        
?"            
?" ┿ ┿        
?"            
?" ┿ ┿        
?"            
?" ┿ ┿        
?"            
?" ┿ ┿        
?"            
?" ┿┿┿        
TK=RND(2)+1
IF BUTTON()==16 THEN JY=JY-1
IF BUTTON()==32 THEN JY=JY+1
IF JY>=18 THEN JY=18
IF TK==1 THEN TY=TY+RND(2)
IF TK==2 THEN TY=TY-RND(2)
TY2=TY+2:TY3=TY+4:TY4=TY+6
LOCATE TX,TY ?"Н"
LOCATE TX,TY2 ?"Н"
LOCATE TX,TY3 ?"Н"
LOCATE TX,TY4 ?"Н"
LOCATE JX,JY ?"г"
IF TY<=0 THEN TY=0
IF TY4>=18 THEN TY4=18
IF TY==JY THEN GOSUB @SIN
IF TY2==JY THEN GOSUB @SIN
IF TY3==JY THEN GOSUB @SIN
IF TY4==JY THEN GOSUB @SIN
IF JY==0 THEN GOTO @CL
IF T==0 THEN @GV
T=T-1
WAIT W:CLS:GOTO @MAIN
'---
@SIN
IF JY==0 THEN GOTO @GV
IF JY==2 THEN GOTO @GV
IF JY==4 THEN GOTO @GV
IF JY==6 THEN GOTO @GV
IF JY==8 THEN GOTO @GV
IF JY==10 THEN GOTO @GV
IF JY==12 THEN GOTO @GV
IF JY==14 THEN GOTO @GV
IF JY==16 THEN GOTO @GV
IF JY==18 THEN GOTO @GV
RETURN
'---
@GV
BGMPLAY 6
WAIT 30
@VK
IF BUTTON()==16 THEN @STRT
GOTO @VK
'---
@CL
WAIT 40
CLS
BGMPLAY 5
T=T+50:S=S+1
IF S>=3 THEN T=T+30
IF S>=4 THEN T=T+40
IF S>=5 THEN T=T+50
IF S>=6 THEN T=T+60
IF S>=7 THEN T=T+70
IF S>=8 THEN T=T+80
IF S>=9 THEN T=T+90
IF S>=10 THEN T=T+100
?"А ステ-シ゛";S"ヘ"
?"
?"Б ヤメル
@CG
IF W==1 THEN @KCL
IF BUTTON()==16 THEN W=W-1:BGP=BGP+1:GOTO @START
IF BUTTON()==32 THEN END
GOTO @CG
'---
@KCL
CLS
?"100%クリア オメテ゛トウ!"
BGMPLAY 9
@OM
IF BUTTON()==16 THEN END
GOTO @OM
}}

/////////////////////////////////
// コメントを募集したくないなら、ここから下は削除してください
*今更なんですが・・・ [#gf359e8e]
今更なんですが、文字変数(A$など)をSAVEしたり、LOADしたりする方法は、ありますか?

お願いします!
- ''hatena'' : セーブデータのファイル名は&basic{XXXXXXXX};とします。&br;セーブは&basic{MEM$=A$:SAVE"MEM:XXXXXXXX"};&br;ロードは&basic{MEM$="":LOAD"MEM:XXXXXXXX":A$=MEM$};&br; (&new{2012/08/28 (火) 20:36:09};)
- ''中1'' : 有難うございます!会社プロジェクトは、100%と書きましたが、「あれ!?文字変数をどうやってMEMに?」って思ってました。改めまして有難うございます! (&new{2012/08/29 (水) 17:39:47};)
- ''hatena'' : 質問はなるべく[[掲示板>http://jbbs.livedoor.jp/bbs/read.cgi/computer/43199/1345877567/l50]]でやった方が良いかも。 (&new{2012/08/29 (水) 19:33:03};)
- ''中1プログラマー?'' : 今やってみたのですが、文字をセーブして、ロードすると、数字になってしまいました!どうすればいいですか? (&new{2012/09/08 (土) 14:43:15};)
- ''進'' : strやりませんでしたか? (&new{2012/09/09 (日) 00:56:38};)
- ''中1プログラマー?'' : hatenaさんから教えてもらったのをやってみましたが、うまくいきません。 (&new{2012/09/09 (日) 11:21:44};)
- ''中1プログラマー?'' : すみません、タイピングミスだったようです。ご迷惑をおかけしました。 (&new{2012/09/09 (日) 11:30:02};)


* ドアまで忍者!に関してのコメント [#Comments]
COLOR(red){今日から(9/2)コメントで「中1」ではなく「中1プログラマー?」とさせて頂きます。}

ご了承ください。

この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は[[掲示板>Board]]へ)
- ''hatena'' : 102行か。中1さんへ。このページにプログラムリストを載せても良いですか。 (&new{2012/08/15 (水) 16:49:24};)
- ''中1'' : 修正版を出すので、もう少し待ってもらってもよろしいでしょうか。 (&new{2012/08/15 (水) 16:50:53};)
- ''中1'' : hatenaさんへ 修正版を出しました。宜しければプログラムリストをお願いします。 (&new{2012/08/15 (水) 16:58:55};)
- ''早くプログラムリスト入れないとおれがやるぞ'' : ←の通り (&new{2012/08/15 (水) 17:19:48};)
- ''中1'' : プログラムリスト有難うございます。 (&new{2012/08/15 (水) 17:52:05};)
- ''.EXE(腐ったので汚名復活)'' : 中1様のでしたか! すごいですね! P S (プレイステーションじゃないよ)クソコンビニ無双2出すかも (&new{2012/08/15 (水) 19:01:50};)
- ''中1'' : あんまり自己嫌悪にならないで下さい。「中1」で結構です。 (&new{2012/08/15 (水) 20:15:30};)
- ''.EXE(Wow)'' : 了解 (&new{2012/08/16 (木) 08:27:15};)
- ''名無しさん'' : 中一 もっといい次回作を期待 (&new{2012/08/16 (木) 10:46:17};)
- ''タイクーン'' : こりゃー期待できる (&new{2012/08/16 (木) 13:24:52};)
- ''中1'' : ↑↑今回あまりうまく出来ませんでした。(短時間で作ったので)次回頑張ります。 (&new{2012/08/16 (木) 14:17:02};)
- ''.EXE(わたしは4才です?)'' : いい感じですよ。 (&new{2012/08/16 (木) 16:56:57};)
- ''中1'' : 有難うございます。 (&new{2012/08/16 (木) 19:18:00};)
- ''.EXE(わたしは4才です?)'' : あなたをコンビニ無双2に出演させたいです (&new{2012/08/16 (木) 20:21:37};)
- ''中1'' : と、言いますと? (&new{2012/08/16 (木) 22:21:45};)
- ''進'' : grpで (&new{2012/08/16 (木) 22:28:05};)
- ''中1'' : grp・・・「プログラム」ですか? (&new{2012/08/16 (木) 23:21:29};)
- ''進'' : なんでもないです。 (&new{2012/08/16 (木) 23:31:03};)
- '''''Lv100''''' : GRPはグラフィックのことですね。 (&new{2012/08/17 (金) 00:06:50};)
- ''中1'' : あ、そういう意味ですか!CHRやGRPなど使ったことがほとんど無いので・・・。 (&new{2012/08/17 (金) 19:24:00};)
- ''ウイング'' : 迷路式だったらよかったのに (&new{2012/08/17 (金) 19:35:18};)
- ''中1'' : 残念ながら迷路式は壁の中に入らないようにするプログラムがIF〜THENしか思いつかなく、大変そうです。壁に入らない良いプログラムの組み方はありますか? (&new{2012/08/18 (土) 13:38:14};)
- ''中1'' : 「申し上げなければいけないこと」でBASICにしてくれた人がいるようです。有難うございます。 (&new{2012/08/18 (土) 17:14:21};)
- '''''Lv100''''' : BACIC→BASICね。 (&new{2012/08/18 (土) 18:36:17};)
- ''hatena'' : ↑↑フォントの事なら私がいじりましたが。 (&new{2012/08/18 (土) 19:02:53};)
- ''中1'' : ↑↑あれ?タイピングミス!直します。 (&new{2012/08/18 (土) 20:29:40};)
- ''なーゆ'' : 普通バージョンも、簡単バージョンも無理ゲー (&new{2012/09/01 (土) 15:23:06};)
- ''名無しさん'' : 大変失礼だがLOCATE命令をご存じで? (&new{2012/09/01 (土) 15:42:58};)
- ''中1'' : ↑LOCATE命令は、勿論。プログラムリストにありませんか? (&new{2012/09/01 (土) 16:48:07};)
- ''中1'' : ↑↑↑かと言ってDSを真っ二つにしないように・・・。 (&new{2012/09/01 (土) 16:49:17};)
- ''中1プログラマー?'' : というコメントでの名前にさせて頂きました。改めまして宜しくお願いします。 (&new{2012/09/02 (日) 17:30:28};)
- ''名無しさん'' : 中二になったら改名? (&new{2012/09/02 (日) 18:20:35};)
- ''hatena'' : ↑*5 このプログラムの38行から42行に5つLOCATE命令がありますよ。 (&new{2012/09/02 (日) 19:28:12};)
- ''中1プログラマー?'' : ↑↑「中2プログラマー?」となると思います。(ストレートです。つまり、年齢丸分かりですね。私は構いませんが・・・。) (&new{2012/09/02 (日) 20:15:30};)
- ''tamagosan'' : リスト見やすい!! 本当に私と同じ歳?(中1) (&new{2012/09/08 (土) 15:29:33};)
- ''中1プログラマー?'' : 勿論です。(今日第2回定期考査終わった!)リストが見やすいとは嬉しいです。でも、tamagosan さんのプログラムには恐れ入ります・・・。宜しければ上の文字変数MEM$について教えて頂けると有難いです・・・。 (&new{2012/09/08 (土) 23:22:19};)
- ''進'' : ロード毎に他の変数に移し替えてますか? (&new{2012/09/09 (日) 00:58:22};)
- ''削除'' : 誤更新
- ''中1プログラマー?'' : LOAD毎に変数は変えていないです。 (&new{2012/09/09 (日) 11:20:38};)


#comment

*バグ、こうしたら良いなどありましたら書き込んで下さい。 [#c8cab4fd]
- ''とある名無しの日本人'' : Please use the SPRITE. (&new{2012/08/15 (水) 16:42:21};)
- ''中1'' : 修正版を出しました。申し訳ありませんでした。 (&new{2012/08/15 (水) 16:56:15};)
- ''中1'' : 修正版を出したので修正版前のコメントは、失礼ながら削除させて頂きました。 (&new{2012/08/15 (水) 16:57:45};)
- ''RND128'' : 79~86行目は&br;&basic{FOR I=3 TO 10};&br;&basic{ IF S>=I THEN T=T+I*10};&br;&basic{NEXT};&br;で短縮可能ですよ〜 (&new{2012/08/19 (日) 08:47:02};)
- ''中1'' : そうなんですか!FOR〜NEXTは、知らないもので・・・。勉強になります。 (&new{2012/08/19 (日) 11:22:02};)
- ''RND128'' : ついでにもうひとつ、55~64行目は&br;&basic{IF JY%2==0 GOTO @GV};&br;あるいは、mkII専用として&br;&basic{IF !(JY%2) GOTO @GV};&br;ができますよ〜 (&new{2012/08/19 (日) 12:26:40};)
- ''中1'' : 有難うございます。短縮のやり方勉強になります。 (&new{2012/08/19 (日) 12:33:08};)
- ''名無しさん'' : くせものも人にして、プレイヤーの色を変えればいいと思う (&new{2012/08/19 (日) 17:42:34};)
- ''名無しさん'' : FOR〜NEXT知らないとかよくゲーム作れたな (&new{2012/08/19 (日) 20:30:10};)
- ''中1'' : そうですね・・・。 (&new{2012/08/19 (日) 20:37:38};)
- ''ウイング'' : でもfor使うより変数とかif文使う法ほうが楽 (&new{2012/08/19 (日) 20:48:32};)
- ''中1'' : 楽ですね。しかし、今のところIF〜THEN文ですがFOR〜NEXT文を学習します。 (&new{2012/08/19 (日) 21:37:37};)
- ''名無しさん'' : 俺も最初はFOR文知らなくて同じようなBGPUTを何百行も並べたり苦行かとおもった (&new{2012/08/29 (水) 18:58:18};)
- ''中1'' : 頑張って学習します・・・。 (&new{2012/08/29 (水) 19:55:16};)
- ''名無しさん'' : ifが楽って…forとifって全然ちゃうじゃん (&new{2012/08/29 (水) 19:58:08};)
- ''名無しさん'' : ifが楽って…forとifって全然ちゃうじゃん (&new{2012/08/29 (水) 19:59:31};)
- ''RND128'' : 関係ないけど、FOR TO NEXTを使用したIF文&br;&basic{FOR _=1 TO (IF)};&br;&basic{(THEN)};&br;&basic{NEXT:FOR _=_-1 TO 0};&br;&basic{(ELSE)};&br;&basic{NEXT};&br;知ってはったらすいません (&new{2012/08/31 (金) 00:24:14};)
- ''名無しさん'' : FOR TO STEP NEXTじゃね (&new{2012/08/31 (金) 00:27:27};)
- ''hata0401'' : MUZUI (&new{2012/09/01 (土) 15:16:29};)

#comment

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