Re: [問題] 一堆問題

作者: laechan (揮淚斬馬雲)   2014-03-25 09:32:37
※ 引述《justinj (黑旋風)》之銘言:
: 下午的時候..我做了一個ob->remove()的動作(應該有毀掉不該毀的東西)
: 部分玩家被迫quit..
: 請有遺失裝備的找我補發(目前我只試opb的補發完...)
備份檔在 /data/std/user.bak,為 324 早上的裝備資料。
我大致說一下做法,你可以實做,但是要盡量先以自己沒什麼用途的
角色(有備份檔,所以角色檔壞掉也沒關係)來實驗。
首先最簡單的做法,就是請玩家先到你的 workroom,然後你用 clean
指令清掉他的裝備,然後你的 workroom 再寫一個函數,載入玩家的
裝備,比方..
mapping auto_load;
int reload_ppl_data(string names)
{
mixed tmps=({}),tmps2=({});
string tmp,tmp1,tmp2;
object ppl,ob;
int tt;
auto_load=([]);
if(!ppl=find_player(names))
{
write(names+" 不在線上喔.\n");
return 1;
}
if(file_exists("/data/std/user.bak/"+names[0..0]+"/"+names+".o"))
restore_object("/data/std/user.bak/"+names[0..0]+"/"+names);
return 1;
}
這時 auto_load 的資料就長得類似底下
> call here;reload_ppl_data;"hmml5"
auto_load=([
"/d/ppl/wide/virtue/eq/mikof#226" :([ "names" : "hmml5" ]),
"/d/ppl/ina/moon/eq/soul1#195" : ([ "names" : "hmml5" ]),
"/d/ppl/wide/virtue/eq/an-trail#214" : 0,
.
.
])
也就是說主 key 是 file_name (不是 base_name),其所帶的資料一
樣是 mapping 資料,其子 key 就是額外設定資料,所以 restore後
接著就這樣寫
tmps=keys(auto_load);
foreach(tmp in tmps)
{
sscanf(tmp,"%s#%s",tmp1,tt);
if(!file_exists(tmp1+".c")) continue;
ob=clone_object(tmp1);
if(auto_load[tmp1])
{
tmps2=keys(auto_load[tmp1]);
foreach(tmp2 in tmps2)
ob->set(tmp2,auto_load[tmp1][tmp2]);
}
ob->move(this_object());
}
則底下就是執行結果
> l
[/u/l/laechan/workroom ]
@@query_short
灰暗的天空下起了一陣的毛毛細雨,大地是朦朦朧朧的一片.
明顯出口有: 無
淨罪の神槍─梅基德‧蒂雅(Sacer Lancea ad Abstergere: Megiddo Tear)
撒旦內褲(Satan Underwear)
部落勳章(Medallion of the Horde)
兩顆神之水晶球(God Crystal Ball)
∮傳送卷軸∮(Transport Scroll)
五行之靈(spirit of five elements)
.
.
再請玩家 get all 即可。處理完一個玩家的裝備問題後就 update here,
再抓下一位過來。當然你也不一定要用 call,比方用 add_action 寫成指
令亦可,或是設定一些過濾條件、顯示資訊等,很彈性。
那比較複雜的做法就是更動 /data/std/user 下的資料,直接以 user.bak
的 auto_load 資料,替換 user 的 auto_load 資料,它的風險就是有可
能寫錯檔案、資料漏寫等等。
這個我一般是在工作站下以 vi 的方法做,所以如果受影響的玩家不多,
我大多採取這種做法,要復原裝備的玩家需 quit 直到我做完為止,平均
處理一位玩家約 20 秒,處理順手後 10~15 秒。
Laechan

Links booklink

Contact Us: admin [ a t ] ucptt.com