| … | |
… | |
| 218 | }, |
218 | }, |
| 219 | }, |
219 | }, |
| 220 | kiss => { |
220 | kiss => { |
| 221 | noparams => { |
221 | noparams => { |
| 222 | other => "<self> makes a weird facial contortion", |
222 | other => "<self> makes a weird facial contortion", |
| 223 | self => "All the lonely people..", |
223 | self => "All the lonely people...", |
| 224 | }, |
224 | }, |
| 225 | params => { |
225 | params => { |
| 226 | target => "<self> kisses you.", |
226 | target => "<self> kisses you.", |
| 227 | other => "<self> kisses <other>.", |
227 | other => "<self> kisses <other>.", |
| 228 | self => "You kiss <other>.", |
228 | self => "You kiss <other>.", |
| 229 | }, |
229 | }, |
| 230 | self => { |
230 | self => { |
| 231 | }, |
231 | }, |
| 232 | }, |
232 | }, |
|
|
233 | hug => { |
|
|
234 | noparams => { |
|
|
235 | other => "<self> makes weird body movements.", |
|
|
236 | self => "All the lonely people...", |
|
|
237 | }, |
|
|
238 | params => { |
|
|
239 | target => "<self> suddenly grabs and hugs you.", |
|
|
240 | other => "<self> hugs <other>.", |
|
|
241 | self => "You hug <other>.", |
|
|
242 | }, |
|
|
243 | self => { |
|
|
244 | other => "<self> tries to hug G<himself|herself>, but stumbles and now feels stupid.", |
|
|
245 | self => "You try and fail to hug yourself.", |
|
|
246 | }, |
|
|
247 | }, |
| 233 | smother => { |
248 | smother => { |
| 234 | noparams => { |
249 | noparams => { |
| 235 | other => "<self> makes weird facial contortions", |
250 | other => "<self> makes weird facial contortions", |
| 236 | self => "All the lonely people..", |
251 | self => "All the lonely people...", |
| 237 | }, |
252 | }, |
| 238 | params => { |
253 | params => { |
| 239 | target => "<self> smothers you with kisses.", |
254 | target => "<self> smothers you with kisses.", |
| 240 | other => "<self> smothers <other> with kisses.", |
255 | other => "<self> smothers <other> with kisses.", |
| 241 | self => "You smother <other> with kisses.", |
256 | self => "You smother <other> with kisses.", |
| … | |
… | |
| 828 | if ($msg) { |
843 | if ($msg) { |
| 829 | my $name = $ob->name; |
844 | my $name = $ob->name; |
| 830 | my $NOW = time; |
845 | my $NOW = time; |
| 831 | |
846 | |
| 832 | cf::LOG cf::llevDebug, sprintf "QBERT %s\n", $msg; |
847 | cf::LOG cf::llevDebug, sprintf "QBERT %s\n", $msg; |
| 833 | send_irc ($msg); |
848 | send_irc ("%s", $msg); |
| 834 | |
849 | |
| 835 | send_msg $_, $cf::CHAT_CHANNEL => $msg, cf::NDI_BLUE | cf::NDI_DEF | ($_ == $pl ? cf::NDI_REPLY : 0), "msg_chat" |
850 | send_msg $_, $cf::CHAT_CHANNEL => $msg, cf::NDI_BLUE | cf::NDI_DEF | ($_ == $pl ? cf::NDI_REPLY : 0), "msg_chat" |
| 836 | for grep { $_->ob->{ext_ignore_shout}{$name} < $NOW } cf::player::list; |
851 | for grep { $_->ob->{ext_ignore_shout}{$name} < $NOW } cf::player::list; |
| 837 | |
852 | |
| 838 | } else { |
853 | } else { |
