|
发表于 2011-12-13 16:16:44
|
显示全部楼层
跳楼有时候会卡,所有不能进去,所有简单修正了一下;Linux 不能上传附件,所以贴代码了; 粗体是新增了一行;
sub start{
my $ret=$::world->triggerenabled('tiaolou');
if( defined($ret) ){
$::world->deltrigger('tiaolou');
}
::hp1::start;
$::world->trigger('^鼓楼七层$','eat liang;drink jiudai;/tl1::tiaolou',{name=>"tiaolou"});
$::world->trigger('你已稳稳地站在地上。','/$world->timer({interval=>2,count =>1,temporary=>1,action=>"hp;enter;do 6 u"})',{name=>'tiaolou'});
$::world->trigger('^[ >]*你的动作还没有完成,不能移动.*$','/$world->timer({interval=>2,count =>1,temporary=>1,action=>"hp;enter;do 6 u"})',{name=>'tiaolou'});
$::world->trigger('基本轻功[^0-9]+([0-9]+)[^0-9]+[0-9]+','/tl1::getlevel( $_[1] )',{name=>"tiaolou"});
$::world->trigger('^[ >]*你的「.*」进步了!.*$','skills',{keepexecuting=>1,name=>"tiaolou"});
$::world->send("skills");
} |
|