スクリプト公開所

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム  
44 / 101 ﾂﾘｰ ←次へ　｜　前へ→
無限回廊 香流 08/9/11(木) 14:01 [添付][添付]
Re:無限回廊 すっぴん 08/9/13(土) 23:04
Re:無限回廊 香流 08/9/15(月) 0:51
Re:無限回廊 aaaa 08/9/15(月) 11:47
Re:無限回廊 香流 08/9/15(月) 15:16
無限回廊(CSV版) 香流 08/9/16(火) 19:16 [添付][添付]
Re:無限回廊(CSV版) すっぴん 08/9/16(火) 22:02
Re:無限回廊(CSV版) 香流 08/9/16(火) 22:56
無限回廊(CSV版) v2.0 香流 08/10/16(木) 13:25 [添付][添付]
↑思いっきり不具合ばっかりorz 香流 08/10/24(金) 15:33
無限回廊(CSV版) v2.1 香流 08/11/10(月) 12:25 [添付][添付]
無限回廊(CSV版) v2.1　改良案 香流 09/3/8(日) 11:51
Re:無限回廊(CSV版) v2.1　改良案 Maya 09/3/8(日) 16:10
Re:無限回廊(CSV版) v2.1　改良案 香流 09/3/8(日) 16:36
Re:無限回廊(CSV版) v2.1　改良案 あ 09/3/9(月) 11:37
Re:無限回廊(CSV版) v2.1　改良案 香流 09/3/9(月) 15:56
Re:無限回廊(CSV版) v2.1　改良案 Maya 09/3/9(月) 19:00
Re:無限回廊(CSV版) v2.1　改良案 mau 09/3/11(水) 12:22
Re:無限回廊(CSV版) v2.1　改良案 香流 09/3/11(水) 18:42
無限回廊(CSV版) v3.0a 香流 09/3/15(日) 23:41 [添付][添付]
無限回廊(CSV版) v3.0a 改良案 香流 09/3/16(月) 9:32
Re:無限回廊(CSV版) v3.0a 不具合 ［名無し］ 09/3/18(水) 10:39
無限回廊
 香流  - 08/9/11(木) 14:01 -
  
無限に敵と戦うダンジョンです。
内容
・敵と戦えます。
・基本枝モンスターですが、属性・大きさ・種族縛りの部屋があります。
・参加は１PTのみ、1時間の制限、ギブアップ不可能です。
・Infinity_Point(説明では魔力ポイント)が増えます。
・Infinity_Pointはその階のWPに乗ることでその階数分だけ増加します。

前準備
PVPスペースを使ってるので、
pvp_n_1-5.gat,pvp_n_2-5.gat,pvp_n_3-5.gat,pvp_n_4-5.gatを使用している鯖は変更が必要です。
↑のMAPのフラグの変更が必要です。

汎用性を重視してませんので、改造はしにくいと思います。
また、スクリプトを書くにあたって、俺のスーパー生搾りだ!さんのエンドレスタワーを参考にさせていただきました。
この場をお借りしてお礼申し上げます。

添付画像
【screenAthena013.jpg : 187.7KB】
引用なし
パスワード
[添付]〜添付ファイル〜
・名前 ： infinity_room.txt
・サイズ ： 21.7KB
[添付]〜添付ファイル〜
・名前 ： screenAthena013.jpg
・サイズ ： 187.7KB
Re:無限回廊
 すっぴん  - 08/9/13(土) 23:04 -
  
出現させるモンスターの一覧はcsv系を使ってdb/mob_db.txtから自動的に読み込むようにすると、柔軟性があってイイかもしれませんね。
引用なし
パスワード
Re:無限回廊
 香流  - 08/9/15(月) 0:51 -
  
＞すっぴんさん
それは私も考えたんですが、1000体近くあるMOBをFor文で走査とかしてたら、無限ループ警告が来そうだったので、やめました＞＜
Athenaがどこまで読み込んでるのか分からないのですが、現状のIDリストをCSV化してみるのもいいかもしれないですね。

現状では、20体倒されるごとに、50体を環境変数に組み込んで、20体抜き取り召喚するようになってます。

追記として、モンスターリスト内にまだ重力エラーを吐くMOBが居ますorz
引用なし
パスワード
Re:無限回廊
 aaaa  - 08/9/15(月) 11:47 -
  
>無限ループ警告が来そうだったので、やめました＞＜
つ警告前にsleep
引用なし
パスワード
Re:無限回廊
 香流  - 08/9/15(月) 15:16 -
  
>aaaaさん

一度sleepしてしまえば警告は出ないのですか。勉強になります（＠＠
でも、そこまでしてMOB_DB.txtを使用するメリットはあるのでしょうか？＾＾；
よくよく考えてみたら重力エラーを吐くMOBも居るわけで・・・

種族、大きさ、属性ごとにあらかじめ分けられたMOBリストをCSVで作成して、
そこから読み込むようにやってみます。
引用なし
パスワード
無限回廊(CSV版)
 香流  - 08/9/16(火) 19:16 -
  
一応出来たのでテスト実装して様子を見てるのですが、まだエラーがあるかもしれません。

見た目的に変わったところは、
・特殊部屋の出現確立が50%から少しだけ落ちてます。
・MOBの召喚の仕方が変わったので、前のやつより偏りが少なくなってる･･･はず？

実装めんどくさいし、誰も使わないかな・・・？(´・ω・`)
引用なし
パスワード
[添付]〜添付ファイル〜
・名前 ： infinity_mob.txt
・サイズ ： 7.7KB
[添付]〜添付ファイル〜
・名前 ： infinity_room2.txt
・サイズ ： 7.6KB
Re:無限回廊(CSV版)
 すっぴん  - 08/9/16(火) 22:02 -
  
CSVは128列までしか読み込めないはずだけど、その辺は大丈夫なのかな？
引用なし
パスワード
Re:無限回廊(CSV版)
 香流  - 08/9/16(火) 22:56 -
  
▼すっぴんさん：
！！知りませんでした･･･orz
召喚スクリプト作って試したところ、中型と小型がオーバーしてますね･･･

何か対策考えときます
引用なし
パスワード
無限回廊(CSV版) v2.0
 香流  - 08/10/16(木) 13:25 -
  
まだ十分にテストしてませんので、ご利用の際は気をつけてください。

CSVを90度回転した感じです。
列数に128制限があるので、
行方向に伸ばしてみました。
CSVの書き方に気をつけてください。
「E」を入れないと多分バグります。

何かいい案ないですかねぇ…
引用なし
パスワード
[添付]〜添付ファイル〜
・名前 ： infinity_room2(2).txt
・サイズ ： 7.6KB
[添付]〜添付ファイル〜
・名前 ： infinity_mob(2).txt
・サイズ ： 16.9KB
↑思いっきり不具合ばっかりorz
 香流  - 08/10/24(金) 15:33 -
  
なので、使用しないほうがいいと思います。
特殊部屋がボロボロです…orz
引用なし
パスワード
無限回廊(CSV版) v2.1
 香流  - 08/11/10(月) 12:25 -
  
安定したようなので、とりあえず公開です。

AthenaでもAurigaでも動作すると思います。
・$@Csv_File$の場所とかを正しいものに変更してください。
・MPをPC_SHOP_POINTに変えてますので、不都合があるなら変更してください。

//最近忙しいので、どこかで使われることを夢見ながら休止しときます。また会う日まで〜
引用なし
パスワード
[添付]〜添付ファイル〜
・名前 ： infinity_room2(3).txt
・サイズ ： 7.7KB
[添付]〜添付ファイル〜
・名前 ： infinity_mob(3).txt
・サイズ ： 16.9KB
無限回廊(CSV版) v2.1　改良案
 香流  - 09/3/8(日) 11:51 -
  
１PT制限という事で多人数だと独占問題が起きてるようです。
IDで連続作成禁止しては？という書き込みを見かけたので案を…
行数がずれるので下から書きます。

102〜103行目　NPCから飛ぶとき(最初に入る時)に各アカウントにクールタイム記録
if (select("行く","行かない")==1)
callfunc "Warp_Exe";
↓
if (select("行く","行かない")==1){
if (#CoolTime != $@CoolTime)
set #CoolTime,$@CoolTime;
callfunc "Warp_Exe";
}

48行目　部屋を作る時にクールタイムをMAP変数にセット。開始からの時間なので、挑戦時間＋クールタイム(秒）
//必要変数をセット
↓
//必要変数をセット
set $@CoolTime, gettimetick()+7200;//7200秒のクールタイム？(稼動からなので終了から1時間)

3４行目　はじめに話しかけた時にクールタイムのチェック。'ptid == 0(回廊未作成)の時だけチェック。
//----------終了-------
mes "[美妙枝]";
mes "いきますか？いきませんか？";
↓
//----------終了-------
mes "[美妙枝]";
if (#CoolTime < gettimetick()) {
mes "申し訳ありません。クールタイム中です。";
close;
}
mes "いきますか？いきませんか？";
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 Maya  - 09/3/8(日) 16:10 -
  
>>香流さん

ありがとうございます。クールタイムをETスクリプト見ながら導入しようと思ってたのですが、
既に対応しているようだったので早速導入したいと思います。
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 香流  - 09/3/8(日) 16:36 -
  
>>Mayaさん
どういたしまして♪
ちょっと時間がないのと、v3として複数部屋に対応したものをつくろうかなと
スクリプトをいじりすぎてて、稼動テストが出来てないので、案として出させていただきました。

また何かありましたらよろしくお願いしますです＾＾
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 あ  - 09/3/9(月) 11:37 -
  
ところどころ、おかしくて動かないみたいです。
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 香流  - 09/3/9(月) 15:56 -
  
＞あさん
ところどころ、ってどこなのでしょうか？

Athena？Auriga？どんな症状でどのようなエラーメッセージが出てます？
一応、Mayaさんの鯖ともう一つの鯖ではちゃんと動作してたようなのですが…
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 Maya  - 09/3/9(月) 19:00 -
  
>>あさん・香流さん
私が運営しているデバッグの方ですが、正常に動作していることを確認しています…
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 mau  - 09/3/11(水) 12:22 -
  
はじめまして

導入しようと思い、クールタイムの部分を修正してみたら、

下記のエラーがでます。

aurigaを使用してます。

-------------------------------------------------------
script error on script/npc/infinity_room2.txt line 35
　　illegal number of parameters
　　30 :　　　　　　　　　　　　}
　　31 :　　　　　　　　}
　　32 :　　　　//----------終了-------
　　33 :　　　　if ('ptid == 0) {
　　34 :　　　　mes "[美妙枝]";
*　 35 :　　　　if (#CoolTime < gettimetick(')') {
　　36 :　　　　mes "申し訳ありません。クールタイム中です。";
　　37 :　　　　close;
　　38 :　　　　}
　　39 :　　　　mes "いきますか？いきませんか？";
　　40 :　　　　　　　　next;
bad duplicate name! (not exist) : 美妙枝#main line 253
-----------------------------------------------------------------


▼香流さん：
>１PT制限という事で多人数だと独占問題が起きてるようです。
>IDで連続作成禁止しては？という書き込みを見かけたので案を…
>行数がずれるので下から書きます。
>
>102〜103行目　NPCから飛ぶとき(最初に入る時)に各アカウントにクールタイム記録
>if (select("行く","行かない")==1)
>callfunc "Warp_Exe";
>↓
>if (select("行く","行かない")==1){
>if (#CoolTime != $@CoolTime)
>set #CoolTime,$@CoolTime;
>callfunc "Warp_Exe";
>}
>
>48行目　部屋を作る時にクールタイムをMAP変数にセット。開始からの時間なので、挑戦時間＋クールタイム(秒）
>//必要変数をセット
>↓
>//必要変数をセット
>set $@CoolTime, gettimetick()+7200;//7200秒のクールタイム？(稼動からなので終了から1時間)
>
>3４行目　はじめに話しかけた時にクールタイムのチェック。'ptid == 0(回廊未作成)の時だけチェック。
>//----------終了-------
>mes "[美妙枝]";
>mes "いきますか？いきませんか？";
>↓
>//----------終了-------
>mes "[美妙枝]";
>if (#CoolTime < gettimetick()) {
>mes "申し訳ありません。クールタイム中です。";
>close;
>}
>mes "いきますか？いきませんか？";
引用なし
パスワード
Re:無限回廊(CSV版) v2.1　改良案
 香流  - 09/3/11(水) 18:42 -
  
gettimetick(2)
ですね、申し訳ないですorz

やっぱり試験運転してないと、粗が出てきますねぇorz
引用なし
パスワード
無限回廊(CSV版) v3.0a
 香流  - 09/3/15(日) 23:41 -
  
複数設置に対応。1箇所printarrayがあるので、Auriga用です。
Athena用の記述もコメントアウトで書いたのですが合ってるのかわかりませんorz
ただし、v2の改良案のクールタイムは導入してません。
CSVファイルに変更はありません。(多分…)

一人でチェック限りでは一応動いてますが、完全に人柱バージョンです。
V2から、特殊部屋の0番目(小型部屋？)が出てこないバグの修正。

設定項目
71行目　//必要変数をセット　の下2行
　　set $@End_Time['@menu],60;　←大体60分
　　set $@Mob_Count['@menu], 10;　←１F配置10体

100行目　OnInit:　の下数行(初期設定では4つ分のMAPになってます。)
duplicate関連とあわせて増減してください。
わかんなかったら、set $@Gate_num,4;を減らすとゲート数も減るです。

また、使用MAPは全てPVP関連のMAPなのでmapflagを設定しなおす事と、PVPドアマン等の撤去が必要になると思います。

添付画像
【screenAuriga000.jpg : 86.1KB】
引用なし
パスワード
[添付]〜添付ファイル〜
・名前 ： infinity_room3.txt
・サイズ ： 11.6KB
[添付]〜添付ファイル〜
・名前 ： screenAuriga000.jpg
・サイズ ： 86.1KB
無限回廊(CSV版) v3.0a 改良案
 香流  - 09/3/16(月) 9:32 -
  
１．回廊内でPT抜けても弾き出されないバグ？の修正
178行目　　　　set PC_SHOP_POINT,PC_SHOP_POINT + $@Now_Area - 1;
の下に追記
　　　　if ($@ptid[strnpcinfo(1)] == getcharid(1)){
　　　　　　　　warp "this","SavePoint",0,0;
　　　　　　　　end;
　　　　}
２．特殊部屋の出る確率を上げる
295行目　　　　set $@Next_Info[getarg(0)],rand($@Rooms * 2);
の変更。好きにいじってください。
set $@Next_Info[getarg(0)],rand($@Rooms * 2 - ($@Now_Area[getarg(0)] % $@Rooms));
↑最大部屋数の倍数に近づくほど特殊部屋の出る確率がUPする。
if ((($@Now_Area[getarg(0)] + 1) % 15) == 0) set $@Next_Info[getarg(0)],24;
↑こっちは下に追加です。15Fごとに特殊部屋24番目(MVP部屋)の出現。(番号は0から数えます。）

クールタイムの導入はV2.1のを参考にしてくださいorz
注意点としては$@CoolTimeもゲート数に応じて設定しないといけないって所です＞＜
あとゲートごとに難易度を変えるとかの場合はスイッチか何かで分岐させないといけないのでメンドクサイです。
引用なし
パスワード
Re:無限回廊(CSV版) v3.0a 不具合
 ［名無し］  - 09/3/18(水) 10:39 -
  
178行目付近
　　　　set PC_SHOP_POINT,PC_SHOP_POINT + $@Now_Area - 1;
　　　　↓
　　　　set PC_SHOP_POINT,PC_SHOP_POINT + $@Now_Area[strnpcinfo(1)] - 1;

ポイントが毎回-1されるバグの修正ですorz
引用なし
パスワード
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム  
 44 / 101 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：   
152158
(SS)C-BOARD v3.8 is Free