================================================================
以前寫了很多的遊戲房，今年想說遊戲房都沒在用很浪費就想要放出來
，所以改成使用者可以玩的，但是單純放出來又不太好玩，所以跟增加
了跟我區域的副本做連結的動作。
================================================================
增加了這個vobjs
副本使用券(物品編號: j806).......目前只有在遊戲房會拿的到，
遊戲房在黔闇城的左上角那邊，其它說明去遊戲中心看。
目前只放出遊戲房 黑白棋而己，其它的要修改才能放出來。
================================================================
其它有修改的
1.傭兵行會任務改成15個、至少3個G級。
2.傭兵行會任務增加B級副本任務。(j027~j030)
3.找菲辛斯分解成o001~o012吧的能力關掉，
因為己經變了，要修完才能開放。
4.大羅天增加終焉之門。
5.天外天增加vobjs，這樣m001~m103應該剩下6個左右沒設定。
其它有想到再列上去。
================================================================
其它沒放出來的東西
1.詩文殿(/d/ppl/justinj/trace/poem)
應該是寫完了，但是這個遺跡的第二層，單獨放出來就不好玩，
不過遺跡大概很難繼續大概就廢了。
黃泉世界預定是第六層外的世界，反正己放在迪菲爾大陸上就不動了。
2.白骨深淵(/u/j/justinj/area/abyss)
應該是缺裝備沒放吧，BOSS、小兵、地圖都做完了，找個時間整理一下
放出來。
3.廢棄飛空艇(/u/j/justinj/area/airshop)
寫一半，不過應該也廢了。
4.岩漿炎龍拉弗(/u/j/justinj/mob/magma.c)
預定放在傭兵任務A or S級。怪物己寫好，還沒想好其它用途。
5.白澤(/u/j/justinj/mob/shirasawa.c)
因果類的生物，一樣還沒想好要做什麼。
6.八岐大蛇(/u/j/justinj/mob/orochi.c,light.c,thunder.c)
只寫2個頭，一樣還沒想好要做什麼。
7.陸吾(/d/ppl/justinj/desert/mob/luwu.c)
青鸞(/d/ppl/justinj/forest/mob/argus.c)
我還以為沒放出來。
===================================================================
副本的路新增加決定這樣做，先寫一條正確道路，然後從第6格後開始
隨機增加方向。(目前只會寫在副本j027之後)
//隨機map
varargs int instance_random_exits(string files,object room,string floor)
{
mixed dirs=
({
"east","west","south","north","up","down",
"northeast","northwest","southeast","southwest",
"eastdown","eastup","westup","westdown",
"northdown","northup","southup","southdown",
});
string ppl_name,tmp;
object ob,iroom;
mapping setting_data,idata=([]);
int i,idx,max;
if((int)room->query("instance_flags")) return 1;
room->set("instance_flags",1);
ob=find_object_or_load(INSTANCE_ROOMS);
ppl_name = room->query("instance_player");
setting_data = ob->ppl_instance("query",ppl_name);
max = sizeof(instance_files);
foreach(tmp in instance_files)
{
idx = atoi(tmp[8..10]);
if(idx==max) continue;
if(idx<6) continue;
iroom=setting_data[tmp];
idata=iroom->query_ob_data();
i =random(sizeof(dirs));
if(undefinedp(idata["exits"][dirs[i]]))
{
idata["exits"][dirs[i]] = setting_data[instance_files[random(idx-3)]];
}
i =random(sizeof(dirs));
if(undefinedp(idata["exits"][dirs[i]]))
{
idata["exits"][dirs[i]] = setting_data[instance_files[random(idx-3)]];
}
}
return 1;
}