|
发表于 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("$_[1]")',{keepexecuting=>1,name=>'hongdou'});
- $::world->trigger('^([1234])\\. (.*?) *$','/hongdou6::getanswer($_[1],"$_[2]")',{name=>'hongdou'});
- $::world->trigger('^[> ]*红豆说道:回答问题太费脑筋了,你还是休息一下吧。','/hongdou6::quest_d',{name=>'hongdou'});
- $::world->trigger('^[> ]*红豆答道:我正在准备出题,请你稍等!','/hongdou6::quest_d',{name=>'hongdou'});
- $::world->trigger('^[> ]*(红豆笑道:哈哈,你回答错了.*)$','/hongdou6::hdlog("$_[1]");/hongdou6::stop',{name=>'hongdou'});
- $::world->trigger('^[> ]*红豆道:你是此中高手,这些都难不倒你了。','/hongdou6::stop',{name=>'hongdou'});
- $::world->trigger('^[> ]*你已经连续答对50道题了,真是大牛啊!','/hongdou6::stop',{name=>'hongdou'});
- $::world->send('ask hongdou about question');
- }
复制代码
这是start函数,看来应该是在名人堂执行,你检查下输入那个指令后,有没有多出这些触发 |
|