作者laechan (小太保)
看板mud
標題Fw: [活動] 第一屆聖殿盃線上擲筊大賽活動開催
時間Tue Jul 1 16:13:55 2014
※ [本文轉錄自 mud_sanc 看板 #1Jicng18 ]
作者: laechan (小太保) 看板: mud_sanc
標題: [活動] 第一屆聖殿盃線上擲筊大賽活動開催
時間: Tue Jul 1 16:08:06 2014
> divine
divine(線上擲筊大賽)指令說明:
=================================================
divine -pay 付出 1000 影特幣
divine -throw 做出擲筊的動作
參與條件: 等級 60 且身上或銀行存款有 1000 影特幣
只要有付出 1000 影特幣的玩家，都可以馬上開始擲筊
，做出擲筊的動作時會瞬間出現兩個發光的筊自玩家的
手中丟出。
只要出現了聖筊，就可以一直擲，直到出現笑筊為止。
每天都可以 divine -pay 最多 10 次。
活動結束時將選出擲出了最多聖筊的前幾名玩家，給予
獎品。首獎：可以許願的油燈。
=================================================
指令就兩個，divine -pay 與 divine -throw，每天可以玩 10 次，
擲出超過兩個聖筊時訊息就會顯示在公頻上，破紀錄時也會顯示。
暫定就先舉辦個一星期至 10 天吧，比方今天 7/1 號，那就 7/7 號
或是 7/10 號小結一次，頒個獎這樣，然後再重置。
目前只有首獎是確定的就是可以許願，然後假設我們挑出前 n 名，
那第 n 名至少可拿到不少的影特幣這樣。
參加條件只有身上或銀行存款要有 1000 影特幣，以及必須是 60 級
以上的玩家這兩個要求。
Laechan
程式碼:
// /cmds/std/_divine.c
// laechan@sanc add in 2014/07/01
// 2014 暑假活動─聖殿擲筊大賽
#define DIVINE_PAY 1000
#define DIVINE_TIME 10
inherit DAEMON;
mapping divine_data;
static mapping divine_temp,divine_times;
static mixed divine_names;
int pays,max_throw;
void create()
{
mixed tmps;
string tmp;
seteuid(getuid(this_object()));
if(file_exists(__DIR__+"divine.o"))
restore_object(__DIR__+"divine");
if(!divine_data)
divine_data=([]);
if(!divine_temp)
divine_temp=([]);
if(!divine_times)
divine_times=([]);
if(!pays) pays=0;
if(!max_throw) max_throw=0;
if(!divine_names)
{
divine_names=({});
tmps=keys(divine_data);
foreach(tmp in tmps)
if(!undefinedp(divine_data[tmp]))
divine_names+=keys(divine_data[tmp]);
}
}
int save_room()
{
save_object(__DIR__+"divine");
return 1;
}
int cmd_divine(string str)
{
string names;
int n;
object me=this_player();
if(!str || str=="")
return notify_fail(@LONG
divine(線上擲筊大賽)指令說明:
=================================================
divine -pay 付出 1000 影特幣
divine -throw 做出擲筊的動作
參與條件: 等級 60 且身上或銀行存款有 1000 影特幣
只要有付出 1000 影特幣的玩家，都可以馬上開始擲筊
，做出擲筊的動作時會瞬間出現兩個發光的筊自玩家的
手中丟出。
只要出現了聖筊，就可以一直擲，直到出現笑筊為止。
每天都可以 divine -pay 最多 10 次。
活動結束時將選出擲出了最多聖筊的前幾名玩家，給予
獎品。首獎：可以許願的油燈。
=================================================
LONG
);
names=me->query("name");
if(str=="-pay")
{
if(me->query("level")<60)
return notify_fail("divine: 你的等級要達到 60 級才能參加比賽喔.\n");
if(me->query("wealth")<DIVINE_PAY && me->query("balance")<DIVINE_PAY)
return notify_fail("divine: 你身上或銀行裡頭沒有 "+DIVINE_PAY+
" 影特幣喔.\n");
if(!undefinedp(divine_temp[names]))
return notify_fail("divine: 你已經有付過錢囉，可以開始擲筊了.\n");
if((int)divine_times[names]>=DIVINE_TIME)
return notify_fail("divine: 你今天已經付過 "+DIVINE_TIME+" 次錢了喔。\n");
pays++;
if(me->query("wealth")>DIVINE_PAY)
me->add("wealth",-DIVINE_PAY);
else
me->add("balance",-DIVINE_PAY);
divine_temp[names]=0;
if(undefinedp(divine_times[names]))
divine_times[names]=1;
else
divine_times[names]+=1;
if(undefinedp(divine_data[names[0..0]]))
divine_data[names[0..0]]=([]);
save_room();
// 有付錢時 divine_temp[names] 才會有資料
str="你付了 "+DIVINE_PAY+" 影特幣給聖殿擲筊大賽主辦單位。\n"+
"你目前的最佳紀錄是 "+divine_data[names[0..0]][names]+" 次聖筊。\n"+
"而目前的最佳紀錄是 "+max_throw+" 次聖筊。\n"+
"你現在可以開始 divine -throw 了。\n");
return notify_fail(str);
}
else if(str=="-throw")
{
if(undefinedp(divine_temp[names]))
return notify_fail("divine: 你要先 divine -pay 喔.\n");
show(me,me,"$N向著前方做出了擲筊的動作。\n"+
"只見兩個發光的筊瞬間自你的手中飛出，不久後落到了地上。\n");
if(random(2)==random(2))
{
divine_temp[names]+=1;
write(HIR"【擲筊】恭喜！你擲出了聖筊！你可以再繼續擲喔！"NOR"\n");
n=(int)divine_temp[names];
if(n>=3)
shout(CYN"【擲筊】恭喜！"+me->query("short")+NOR+CYN"擲出了 "+n+
" 次聖筊。"NOR"\n");
if(undefinedp(divine_data[names[0..0]][names]))
divine_data[names[0..0]][names]=1;
else if((int)divine_data[names[0..0]][names]<divine_temp[names])
divine_data[names[0..0]][names]=n;
if(n>max_throw)
{
write(HIR"【擲筊】你擲出了破紀錄的 "+n+" 次聖筊了！"NOR"\n");
shout(CYN"【擲筊】恭喜！"+me->query("short")+NOR+CYN"擲出了破紀錄的 "+
n+" 次聖筊！"NOR"\n");
max_throw=n;
}
save_room();
}
else
{
write(NOR+YEL"【擲筊】唉呀！你擲出了笑筊....歡迎下次再來參加喔！"NOR"\n"+
"你目前的擲筊大賽最佳紀錄是: "+divine_data[names[0..0]][names]+
" 次聖筊。\n");
map_delete(divine_temp,names);
}
return notify_fail("");
}
return cmd_divine("");
}
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 210.61.157.53
※ 文章網址: http://webptt.com/m.aspx?n=bbs/mud_sanc/M.1404202090.A.048.html
※ 編輯: laechan (210.61.157.53), 07/01/2014 16:09:37
※ 發信站: 批踢踢實業坊(ptt.cc)
※ 轉錄者: laechan (210.61.157.53), 07/01/2014 16:13:55
※ 編輯: laechan (210.61.157.53), 07/01/2014 16:22:12
1F：→ laechan :這個指令也有放進 tmi2_v3_改 供參考 210.61.157.53 07/01 16:23
※ 編輯: laechan (210.61.157.53), 07/01/2014 16:39:03