tmi2-mudlib 的更改 - MUD Game

網頁好讀版: http://www.ptt.cc/bbs/mud/M.1403073218.A.F78.html

tmi2_fluffos_v3_改，20140618 版本

http://sanclaechan.myweb.hinet.net/tmi2_fluffos_v3_modify.rar

建議下載並解壓縮後目錄位置為 D:\tmi2_fluffos_v3_改\

(底下以 tmi2_v3_改 簡稱)

WinXP 使用者，可直接雙擊 D:\tmi2_fluffos_v3_改\bin\啟動 mud 捷徑，
即可執行 mud。Win7 或 Win8 使用者，則務必先參考底下這篇:

http://www.ptt.cc/bbs/mud/M.1399357070.A.366.html

mud 啟動成功後，目前確定以 pietty 連線 localhost 5000 (Telnet)，可
連線成功:

http://imgur.com/IQwusvX.jpg

在 tmi2_fluffos_v3_改\ 目錄下會放一些圖片及說明文件。

目前連線 telnet://210.61.157.53:5000 可連到以最新版本所架的測試站
，有公頻聊天指令可使用，也有遠端頻道指令 tmi2 可使用，使用前 mail
給 [email protected] 提出申請，信件內容需有:

1.你所架的站台 ip 及 port
2.你所架的站台之名稱(若沒有這個名稱會內定為 XXX's PC)

==================================================================

本次修改範圍: 2014/06/13～2014/06/18

這次的修改量比較多。

一、修改 /std/user/autoload.c

讓使用者帶著東西離線後再登入，東西還是會在身上，也就是可儲存離
線前帶在身上的物品，並新增物品可設定 sdata 的額外儲存資料功能。

sdata 在 sanc 目前是用來儲存認主資料，武防具只要有底下設定:

set("sdata",({"names"}));

則當玩家拿到認主的武防具時

set("names",ppl->query("name"));

這項資訊在玩家帶著該武防離線時會一起被儲存起來，下次登入時該武
防的認主資料就會一起被載入。

二、新增 /adm/daemons/runnumd.c

此即數字圖防機系統，底下是呼叫後會得到的結果範例:

> call /adm/daemons/runnumd;runnum

*
*****
** ** ***** ***** ******* * * ******
** * * * * ***** * *
* ***** ***** * * * *
* * * ******* * ******
* ***** ***** ** * * *
* * *
* ******* * ******

答案是：122892 <= 玩家並不會看到這個訊息只有 wiz 會看到

> call /adm/daemons/runnumd;runnum;123456 <= 若給數字就顯示該數字的字圖

* * * *
* ***** ***** * * ****** ******
* * * * * * * *
* * * * ***** ***** ****** * *
* * * * * ******* * ****
***** ** ** * * * *
* * * * *
****** ******
答案是：123456

/adm/daemons/logind.c 的 get_name 函數、及 /std/user.c
的 cmd_hook 函數，都有寫如何引用數字圖防機系統的段落，
/include/runnum.h 檔則有定義如何使這兩個區段的防機能夠
work，使用者可自行參考。

三、修改 /adm/daemons/channeld.c

讓 semote 內的 $T、$M、$M1 等參數可以 work，以及當玩家
下 semote 相關指令時能顯示 semote 的內容，底下有 demo

四、修改 /std/user/tsh.c

主要是讓 !指令 可支援被 alias 過的指令，底下有 demo。

五、重寫 /cmds/std/_help.c

這個即 input_to 式的 help，在 sanc 類似 xhelp，但是比
xhelp 更好用。原先的 _help.c 則更名為 help.c，為 help
後面有接字串時實際會呼叫的物件檔案，沒接字串時就是使用
新的 help 功能。

help 預設會導向 /doc 目錄，所有的說明文件都將放在這裡

六、新增區域產生組合

/cmds/wiz/_drawmap.c x-x 型地圖繪圖指令
/cmds/wiz/_makearea.c x-x 型地圖產生及讀取指令
/cmds/wiz/_trans.c 數字圖轉實體區域房間指令

/d/area/00 新型態區域需包含的元素範例
│
└/d/area/area_room.h 關鍵定義檔
/d/area/area_room.c 關鍵繼承檔
/d/area/mapX 關鍵地圖檔
/d/area/script_X 關鍵腳本檔

/d/area/01/01 目錄下的東西，即是以上述組合所產生的區域
，寫這樣一個簡單的區域只需要 30 分鐘，而且與區域的大小
　　、規模無關。

換言之，有心的話一天要量產十幾個區域就跟吃飯喝水一樣簡
單。

底下亦會有 demo。

七、其它修改

對 /std/monster.c 及 /std/user.c 新增 query_attac_msg()
函數。

空手時:
> call me;query_attack_msg
OBJ(laechan /std/user#3)-> query_attack_msg() = "$N用砂鍋大的拳頭打向$O"

拿武器時
> wear dagger
你裝備上格鬥匕首(fight dagger).
> call me;query_attack_msg
OBJ(laechan /std/user#3)-> query_attack_msg() = "$N手握格鬥匕首戳向$O"

至於怪物則 follow set_verbs 的設定

> call rabbit;query_attack_msg
OBJ(小兔兔 /d/area/newbie/mob/rabbit1#12)-> query_attack_msg() =
"$N用兔牙咬向$O"

目前也實裝了戰鬥中會損血的設定。

增加了一些說明文件。會陸續增加。

新增 semote_search 指令

> semote_search 某人
come2
.tme
$O突然打起了一陣冷顫, 似乎某人正打算對$O做什麼詭異的事...

come
.tme
$O的眼前突然一黑, 接著幾記悶棍將$O打的趴在地上, 哇! 被"come"布袋了!
隱約中只聽到某人的奸笑聲...

八、待修改事項

目前 數字 指令 的指令格式因故失效，將於下個版本修正。

==========================================================

底下是相關 demo。

> l
[/d/area/newbie/room/003 ]
[寧靜的街道]

你注意到北邊有塊醒目的招牌, 那裡是一家[道具屋],
有不少稀奇古怪的東西, 可以去逛逛看喔. 南邊則是一
家[修理店], 專門修復損壞的物品.

明顯出口有: south, north, east, 和 west.
魁爾加鎮民(quarcha man)
魁爾加鎮民(quarcha woman)

> semote aluba
.me
$N把自己抓去ㄚ魯巴～～魯～～魯
.tme
$N與$O互相對望了一眼, 突然一起衝上前去, 分別拉住$T
的左右手後, 拉去羅德斯巨型高塔下阿～魯～巴～你聽到從遠處傳來$T
的哀叫聲！！ㄠㄨ～～ㄠㄨ～～

> aluba
你把自己抓去ㄚ魯巴～～魯～～魯

> aluba woman;man
你與 魁爾加鎮民 互相對望了一眼, 突然一起衝上前去, 分別拉住 魁爾加鎮民
的左右手後, 拉去羅德斯巨型高塔下阿～魯～巴～你聽到從遠處傳來 魁爾加鎮民
的哀叫聲！！ㄠㄨ～～ㄠㄨ～～

> chat *aluba woman;man
【閒聊】你與 魁爾加鎮民 互相對望了一眼, 突然一起衝上前去, 分別拉住 魁爾加鎮民
的左右手後, 拉去羅德斯巨型高塔下阿～魯～巴～你聽到從遠處傳來 魁爾加鎮民
的哀叫聲！！ㄠㄨ～～ㄠㄨ～～

> semote m3
.me
$N舉刀向兄弟們大呼：兄弟們！$M1！$M2！$M3！
.tme
$N舉刀向$O大呼：$O！$M1！$M2！$M3！
.mod
搶錢,搶糧,搶娘們

> chat *m3
【閒聊】你舉刀向兄弟們大呼：兄弟們！搶錢！搶糧！搶娘們！

> chat *m3 man:練功,打怪,賺錢
【閒聊】你舉刀向 魁爾加鎮民 大呼： 魁爾加鎮民 ！練功！打怪！賺錢！

> chat *m3 man:,,,搶怪
【閒聊】你舉刀向 魁爾加鎮民 大呼： 魁爾加鎮民 ！搶錢！搶糧！搶怪！

> semote chou10
.me
$N：『$M！$W你見過沒有？不要逼我出手吧！我發起瘋來, 連自己也怕呀！』
.tme
$N：『$O！這是什麼？$W你見過沒有？不要逼我出手吧！我發起瘋來, 連自己也怕呀！』
.mod
老伯

> wear dagger
你裝備上格鬥匕首(fight dagger).

> chat *chou10
【閒聊】你：『老伯！格鬥匕首你見過沒有？不要逼我出手吧！我發起瘋來,
連自己也怕呀！』

================================================================

防機範例

> more /include/runnum.h
#define RUNNUM_LOGIN_CHECK 3 <= login 時最多答錯幾次
#define RUNNUM_CMD_HOOK_CHECK 30 <= 每隔幾秒在下指令時就觸發防機

登入時

目前在線的使用者: Laechan.

請輸入您的角色帳號或是您欲註冊的新帳號: testing

* *
* ***** ****** *****
* * * * * ****** * * *
* * * * * * * *****
* * * * ****** * * ***** *
* * ***** * ***** * *****
* * * * * * * *
****** * *
****** *

上圖的數字是: 123456
你答錯了!!
上圖的數字是: 987654
你答錯了!!
上圖的數字是: 105642
你答對了!!
請輸入您的登入密碼:

下指令時

> look

* ** *******
* ******* * * * ***** * *
* * * ******* ***** * * * *
* * * * * * ***** * *
* * * ** * * * * *
* * * ******* ***** * * *
* ** * * * *******
* * ******* *
*******

上圖的數字是: 123456
你答錯了!!

> look

***** * ***** ****** *
* * * * * * *
* * * * * * ***** ***** * <= 數字跟前一次不會
* * * ***** * * * ** 一樣
* * * * ***** ***** *
* * * *
* * ******* * * *
*
* *

上圖的數字是: 104281

> look
[寧靜的街道]

北邊是鎮上唯一的[武器店], 提供了不少冒險者適用的
武器, 南邊的[防具店]賣的都是相當實用的裝備.

明顯出口有: south, north, east, 和 west.

====================================================================

> alias cc update $*
Alias: cc (update $*) altered.

> cc here
/d/area/wiz: Updated and loaded.

> h
1 note list
2 more /include/runnum.h
3 h
4 cc here <= 它會紀錄 alias 過的指令
5 h

> !cc
cc here
/d/area/wiz: Updated and loaded. <= 它會正確執行 update

> h
1 note list
2 more /include/runnum.h
3 h
4 cc here
5 h
6 cc here
7 h

============================================================

> help
[/doc/]
1.讀我 2.[concepts] 3.[daemons]
4.[driverdoc] 5.[etc] 6.[functions]
7.[help] 8.[LPC相關] 9.[mudlib]
10.[properties] 11.[wizhelp] 12.[技能]
13.[指令] 14.回上一層.

(已經有做一些設定)

請輸入: ?
數字 : 進入一個目錄或觀看一個說明檔案
0 或 < : 回上一層
del 數字 : 將某一項目遮蔽不顯示
name 數字 = 名稱 : 將某一項目取新的名稱
data : 顯示所在目錄有哪些設定資料
q : 離開
請按 enter 鍵繼續:
[/doc/]
1.讀我 2.[concepts] 3.[daemons]
4.[driverdoc] 5.[etc] 6.[functions]
7.[help] 8.[LPC相關] 9.[mudlib]
10.[properties] 11.[wizhelp] 12.[技能]
13.[指令] 14.回上一層.

請輸入: data
help_data["name"]["/doc/"]=
([ "lpc" : "LPC相關", "README" : "讀我" ]) <= 有設定的別名

help_data["del"]["/doc/"]= <= 有設定的無視項
({ "emote" })

請按 enter 鍵繼續...
[/doc/]
1.讀我 2.[concepts] 3.[daemons]
4.[driverdoc] 5.[etc] 6.[functions]
7.[help] 8.[LPC相關] 9.[mudlib]
10.[properties] 11.[wizhelp] 12.[技能]
13.[指令] 14.回上一層.

(所以 LPC相關 實際上是 lpc 目錄、讀我 實際上是 README 檔案，
以及它不會顯示 emote 目錄)

請輸入: name 6 = 函數
functions 已更名為 函數.
[/doc/]
1.讀我 2.[concepts] 3.[daemons]
4.[driverdoc] 5.[etc] 6.[函數]
7.[help] 8.[LPC相關] 9.[mudlib]
10.[properties] 11.[wizhelp] 12.[技能]
13.[指令] 14.回上一層.

(這樣第六項的 functions 就會被更名為 函數)

請輸入: del 10
properties 已刪除.
[/doc/]
1.讀我 2.[concepts] 3.[daemons]
4.[driverdoc] 5.[etc] 6.[函數]
7.[help] 8.[LPC相關] 9.[mudlib]
10.[wizhelp] 11.[技能] 12.[指令]
13.回上一層.

(這樣 properties 就會不見)

請輸入: 2
[/doc/concepts/] <= 這樣就會進入 concepts 目錄去看它裡面的內容
1.ChangeLog 2.README 3.attacks
4.banishing 5.bodies 6.domains
7.encumbrance 8.events 9.gamedriver
10.guilds 11.healing 12.invisibility
13.keys 14.locks 15.magic
16.money 17.permission.prop 18.permissions
19.player_killing 20.quests 21.races
22.rooms 23.security 24.shsh
25.stats_and_skills 26.virtual_objects 27.vrgrid
28.回上一層.

請輸入: 2 <= 看項目 2.README 的內容
This directory contains documents which describe the various features
of the MUD: eg, the magic system, the skill system, the virtual room
grid, etc. They describe what the objects are and how they work together
in a general sense rather than discussing the code specifically.
lfun documents are found in /doc/functions/lfuns.
請按 enter 鍵繼續...
[/doc/concepts/]
1.ChangeLog 2.README 3.attacks
4.banishing 5.bodies 6.domains
7.encumbrance 8.events 9.gamedriver
10.guilds 11.healing 12.invisibility
13.keys 14.locks 15.magic
16.money 17.permission.prop 18.permissions
19.player_killing 20.quests 21.races
22.rooms 23.security 24.shsh
25.stats_and_skills 26.virtual_objects 27.vrgrid
28.回上一層.

請輸入: 21 <= 看項目 21.races 的內容
The MudOS mudlib comes with player races but they do very little. They are
mostly there so that you have a foundation that you can build on more than
because we had any uses in mind.
The one thing that they DO do is affect player statistics. Statistics are
rolled up between 9 and 21, and all races except human have their statistics
modified by up to 3 points either way. All modifications are zero sum, so that
the total of stats is unaffected. Thus, the final range of possible statistics
is from 6 to 24. The statistics rolls and modifications take place in the file
adm/obj/login/cretion.c, if you want to modify them.
There are a lot of things you can do with races that are only being done
on a few MUDs. Perhaps the most common is languages: allow players of the
same race to send messages that aren't understood by members of other races.
Then you can allow dwarves to learn the elven tongue...
Another thing you can do is make areas of the MUD off-limits to some races,
ie have a dwarf cave city where elves and orcs are not permitted to enter. You
can also make the interactions of NPCs and players be race-dependent: for
example, have a wandering monster that only attacks orcs. You can make the
player's starting location depend on his race, so that you appear in the city
of your race.
There are lots more creative ways to use the race property and we encourage
you to go nuts with it. Having meaningful races is one way to add a lot to
the role-playing aspect of the game, to steer away from the hack-and-slash
--more-- <= 超過一頁的話游標會停在這裡等待按 enter
mentality that LPs are infamous for. If you think of something clever to do
with races, send mail back to TMI and let us know what it is!

請按 enter 鍵繼續...
[/doc/concepts/]
1.ChangeLog 2.README 3.attacks
4.banishing 5.bodies 6.domains
7.encumbrance 8.events 9.gamedriver
10.guilds 11.healing 12.invisibility
13.keys 14.locks 15.magic
16.money 17.permission.prop 18.permissions
19.player_killing 20.quests 21.races
22.rooms 23.security 24.shsh
25.stats_and_skills 26.virtual_objects 27.vrgrid
28.回上一層.

請輸入: < <= 回前一層按 < 或 0
[/doc/] <= 這樣就回到了前一層
1.讀我 2.[concepts] 3.[daemons]
4.[driverdoc] 5.[etc] 6.[函數]
7.[help] 8.[LPC相關] 9.[mudlib]
10.[wizhelp] 11.[技能] 12.[指令]
13.回上一層.

請輸入: q <= 這樣就離開

如果 help 接字串，就執行原先的 help 功能:

> help quit
[1] /doc/functions/lfuns/quit.l: /doc/functions/lfuns/
[2] /doc/help/quit: /doc/help/
Which doc [1-2,q]? 2
Usage: quit

The quit command makes your character leave the game. You will drop your
items but not any money you may be carrying. The next time you log in,
you will reappear in the start room, not in the room where you quit.

>

================================================================

> cd /d/area/01/01
/d/area/01/01

> ls
Path: [/d/area/01/01]
4 area_room.c 1 map1 1 script_mob
3 area_room.h 1 map1x 1 script_room

> more map1
::::::::::::::
/d/area/01/01/map1
::::::::::::::

001-002-003-004-005-006-007-008
| | | | | | | |
009-010-011-012-013-014-015-016
| | | | | | | |
017-018-019-020-021-022-023-024
| | | | | | | |
025-026-027-028-029-030-031-032
| | | | | | | |
033-034-035-036-037-038-039-040
| | | | | | | |
041-042-043-044-045-046-047-048
| | | | | | | |
049-050-051-052-053-054-055-056

我已經使用 drawmap 或 makearea 指令產生出 map1x 圖檔，並使用
makearea 指令將其轉成 map1 圖檔，內容如上圖。

> trans map1 to /d/area/01/01 by script_room
圖檔: /d/area/01/01/map1
目錄: /d/area/01/01
腳本: /d/area/01/01/script_room
請按[enter]鍵進行圖檔轉換...
資料讀取完成，共讀進了 56 個房間資料。
確定無誤的話請按[enter]開始檔案產生作業，否則請按[q+enter]後離開:
檔案 /d/area/01/01/019.c 產生中......ok!
請按[enter]後繼續，或按[q+enter]後離開:
檔案 /d/area/01/01/018.c 產生中......ok!
請按[enter]後繼續，或按[q+enter]後離開:
檔案 /d/area/01/01/017.c 產生中......ok!
請按[enter]後繼續，或按[q+enter]後離開:
.
.
請按[enter]後繼續，或按[q+enter]後離開:
檔案 /d/area/01/01/050.c 產生中......ok!
請按[enter]後繼續，或按[q+enter]後離開:
本次作業結束，共產生 56 個檔案。

> ls
Path: [/d/area/01/01]
1 001.c 1 017.c 1 033.c 1 049.c
1 002.c 1 018.c 1 034.c 1 050.c
1 003.c 1 019.c 1 035.c 1 051.c
1 004.c 1 020.c 1 036.c 1 052.c
1 005.c 1 021.c 1 037.c 1 053.c
1 006.c 1 022.c 1 038.c 1 054.c
1 007.c 1 023.c 1 039.c 1 055.c
1 008.c 1 024.c 1 040.c 1 056.c
1 009.c 1 025.c 1 041.c 4 area_room.c
1 010.c 1 026.c 1 042.c 3 area_room.h
1 011.c 1 027.c 1 043.c 1 map1
1 012.c 1 028.c 1 044.c 1 map1x
1 013.c 1 029.c 1 045.c 1 script_mob
1 014.c 1 030.c 1 046.c 1 script_room
1 015.c 1 031.c 1 047.c
1 016.c 1 032.c 1 048.c

這樣 001.c～056.c 即依照 map1 圖檔以及 script_room 的內容，由
trans 指令產生，如上圖。

script_room 的內容如下圖:

> more script_room
::::::::::::::
/d/area/01/01/script_room
::::::::::::::

inherit __DIR__+"area_room.c";

void create()
{
::create();
seteuid(getuid());
set("light",1);
SET_EXITS;
SET_ROOM_FILE;
init();
}

實際產生出的房間檔例如 001.c 的內容如下圖

> more 001.c
::::::::::::::
/d/area/01/01/001.c
::::::::::::::

// 作者: Laechan@Sanc 時間: Wed Jun 18 14:10:44 2014
inherit __DIR__+"area_room.c"; ↑
　　 自動產生作者等資訊
void create()
{
::create();
seteuid(getuid());
set("light",1);
set("exits/south",__DIR__"009");
set("exits/east",__DIR__"002");
set("room_file","001");
init();
}

由上可知 SET_EXITS 及 SET_ROOM_FILES 都被正確替換。

> goto 001
[/d/area/01/01/001 ]
小草原
這裡是一座小草原，位於村子的東邊，棲息著數量眾多的小黑鼠
，令村民頗為困擾，如果你看見了牠們，就幫村民除害一下吧。

明顯出口有: south 和 east.
兩鍋小黑鼠(small-black rat)
大黑鼠(large-black rat)

房間的 short、long 以及生怪，則由 area_room.c 負責，所生
的怪物放在 mob 目錄下。

> ls mob
Path: [/d/area/01/01/mob]
1 mob1.c* 1 mob2.c*

同樣來對照 script_mob 與實際怪物檔的差異

> more script_mob
#include "../area_room.h"
inherit AREA_MONSTERS;

void create()
{
SET_LEVELS;
SET_RACES;
SET_UNITS;
::create();
seteuid(getuid(this_object()));
SET_IDS;
add("id",({"MONSTER"}));
SET_SHORTS;
SET_LONGS;
set("hp",100);
set("hp_src",100);
SET_NAMES;
SET_LIVING_NAMES;
set_verbs(({"用身體撞向",
"用兔牙咬向",}));
enable_commands();
}

> more mob/mob1.c
#include "../area_room.h"
inherit AREA_MONSTERS;

void create()
{
set("level",1);
set("race","animal");
set("unit","隻");
::create();
seteuid(getuid(this_object()));
set("id",({ "small-black rat", "rat" }));
add("id",({"MONSTER"}));
set("short","小黑鼠(small-black rat)");
set("long","一隻小黑鼠。\n");
set("hp",100);
set("hp_src",100);
set_name("小黑鼠");
set_living_name("rat");
set_verbs(({"用身體撞向",
"用兔牙咬向",}));
enable_commands();
}

同樣的上面一堆 SET_XXXX 也都會被正確替換為相對的設定呼叫。

至於上面為何會有 add("id",({"MONSTER"})); 則是為了統一其 id，
也就是說被依這樣的方式生出來的怪物，其 id 一定有 "MONSTER"。

> data rat
id : ({ "small-black rat", "rat", "MONSTER" })

這樣我們要判斷房間是不是還有生出的怪，用一行就能解決

// 通過下面的判斷就代表房間還有生出的怪
if(present("MONSTER",room))


使用者可自行 cd /d/area/01/01 實測。



--