… | |
… | |
37 | my ($reply, @kw) = $dialog->tell ($msg); |
37 | my ($reply, @kw) = $dialog->tell ($msg); |
38 | |
38 | |
39 | $reply = "..." unless defined $reply; |
39 | $reply = "..." unless defined $reply; |
40 | return if $reply eq ""; # NPC doesn't want to say, or wants to say something later |
40 | return if $reply eq ""; # NPC doesn't want to say, or wants to say something later |
41 | |
41 | |
42 | $pl->ext_reply ($id => msgtype => "reply", msg => $reply, add_topics => \@kw); |
42 | $pl->ext_reply ($id => msgtype => "reply", msg => $pl->expand_cfpod ($reply), add_topics => \@kw); |
43 | } |
43 | } |
44 | |
44 | |
45 | =item ... = extcmd lookat { dx => $dx, dy => $dy } |
45 | =item ... = extcmd lookat { dx => $dx, dy => $dy } |
46 | |
46 | |
47 | "Looks at" the mapspace displaced (dx|dy) relative to the player |
47 | "Looks at" the mapspace displaced (dx|dy) relative to the player |