maid 发表于 2011-2-7 17:05:38

kildclient的红豆机器人失效?!

我按照:1. 把 hongdou.db 复制到 HOME,也可以自己修改程序中的路径
2. 载入 hongdou.pl
    *必须在第1步之后
3. 输入:/hongdou6::start



做完后,输入:/hongdou6::start,没有任何反应!!


我在客店和名人堂里输入:/hongdou6::start都没有反应!!


求救!

zgbl 发表于 2011-2-7 17:11:37

注意:
1、使用我的程序前必须改以下设置,否则基本上这些程序都会报错,因为默认的命令分割符不是分号[;]。
方法:world->edit->input,把Command separator改成:[;],不要方括号的!
2、默认的编码是utf-8,国内的游戏都是gb,改成gb18030就全部都支持了。
方法:world->edit->advanced,改Charactor Set

这是那个帖子一楼说的,是不是这里的问题?


sub start{
    $::world->deltrigger('hongdou');
    $::world->trigger('^红豆说道:准备好了吗?我开始出题了哦。','/hongdou6::setbegin',{name=>'hongdou'});
    $::world->trigger('^(.+?) *$','/hongdou6::getquestion("$_")',{keepexecuting=>1,name=>'hongdou'});
    $::world->trigger('^()\\. (.*?) *$','/hongdou6::getanswer($_,"$_")',{name=>'hongdou'});
    $::world->trigger('^[> ]*红豆说道:回答问题太费脑筋了,你还是休息一下吧。','/hongdou6::quest_d',{name=>'hongdou'});
    $::world->trigger('^[> ]*红豆答道:我正在准备出题,请你稍等!','/hongdou6::quest_d',{name=>'hongdou'});
    $::world->trigger('^[> ]*(红豆笑道:哈哈,你回答错了.*)$','/hongdou6::hdlog("$_");/hongdou6::stop',{name=>'hongdou'});
    $::world->trigger('^[> ]*红豆道:你是此中高手,这些都难不倒你了。','/hongdou6::stop',{name=>'hongdou'});
    $::world->trigger('^[> ]*你已经连续答对50道题了,真是大牛啊!','/hongdou6::stop',{name=>'hongdou'});
    $::world->send('ask hongdou about question');
}

这是start函数,看来应该是在名人堂执行,你检查下输入那个指令后,有没有多出这些触发

maid 发表于 2011-2-7 17:19:55

没有触发ttk_13

zgbl 发表于 2011-2-7 17:20:47

那就是没执行了,汗,等会用kildclient的人来解答吧

maid 发表于 2011-2-7 17:30:40

解决咯!
原来我的linux没有装sqlite-perl的包
sudo pacman -S perl-dbd-sqlite一下就好了。
页: [1]
查看完整版本: kildclient的红豆机器人失效?!