作者laechan (小太保)
看板mud_sanc
标题[程式] deus 你要的
时间Sat Oct 6 22:35:20 2007
void init()
{
add_action("check_my_data","cdata");
}
int check_my_data(string str)
{
mixed keys_data;
object ppl=this_player();
string tmp;
int i;
keys_data=keys((mapping)ppl->query_ob_data());
if(!str || str=="")
{
str="资料列表: \n";
foreach(tmp in keys_data)
{
i++;
str+=sprintf("%3d %O\n",i,tmp);
}
ppl->more(explode(str,"\n"),1,1);
return notify_fail("");
}
i=atoi(str);
if(i<1 || i>sizeof(keys_data))
return notify_fail("你身上没有第 "+i+" 项资料喔.\n");
write("你的第 "+i+" 项资料: \n\t"+
keys_data[i-1]+" : "+identify(ppl->query(keys_data[i-1]))+"\n"+
"你确定要删除这笔资料吗(Y/N) : ");
input_to("yes_or_no",1,ppl,keys_data[i-1],str);
return 1;
}
int yes_or_no(string str,object ppl,string k)
{
if(str=="Y" || str=="y")
{
ppl->delete(k);
write("删除完毕.\n");
return 1;
}
write("好的, 不删除.\n");
return 1;
}
--
※ 发信站: 批踢踢实业坊(ptt.cc)
※ 编辑: laechan 来自: 125.231.233.150 (10/06 22:44)