| … | |
… | |
| 2573 | $color &= cf::NDI_COLOR_MASK; |
2573 | $color &= cf::NDI_COLOR_MASK; |
| 2574 | |
2574 | |
| 2575 | utf8::encode $msg; |
2575 | utf8::encode $msg; |
| 2576 | |
2576 | |
| 2577 | if (0 && $msg =~ /\[/) { |
2577 | if (0 && $msg =~ /\[/) { |
|
|
2578 | # COMMAND/INFO |
| 2578 | $self->send_packet ("drawextinfo $color 4 0 $msg") |
2579 | $self->send_packet ("drawextinfo $color 10 8 $msg") |
| 2579 | } else { |
2580 | } else { |
| 2580 | $msg =~ s/\[\/?(?:b|i|u|fixed|color)[^\]]*\]//g; |
2581 | $msg =~ s/\[\/?(?:b|i|u|fixed|color)[^\]]*\]//g; |
| 2581 | $self->send_packet ("drawinfo $color $msg") |
2582 | $self->send_packet ("drawinfo $color $msg") |
| 2582 | } |
2583 | } |
| 2583 | } |
2584 | } |
| … | |
… | |
| 2744 | |
2745 | |
| 2745 | The following functions and methods are available within a safe environment: |
2746 | The following functions and methods are available within a safe environment: |
| 2746 | |
2747 | |
| 2747 | cf::object |
2748 | cf::object |
| 2748 | contr pay_amount pay_player map x y force_find force_add |
2749 | contr pay_amount pay_player map x y force_find force_add |
| 2749 | insert remove |
2750 | insert remove name archname title slaying race |
| 2750 | |
2751 | |
| 2751 | cf::object::player |
2752 | cf::object::player |
| 2752 | player |
2753 | player |
| 2753 | |
2754 | |
| 2754 | cf::player |
2755 | cf::player |
| … | |
… | |
| 2759 | |
2760 | |
| 2760 | =cut |
2761 | =cut |
| 2761 | |
2762 | |
| 2762 | for ( |
2763 | for ( |
| 2763 | ["cf::object" => qw(contr pay_amount pay_player map force_find force_add x y |
2764 | ["cf::object" => qw(contr pay_amount pay_player map force_find force_add x y |
| 2764 | insert remove inv)], |
2765 | insert remove inv name archname title slaying race)], |
| 2765 | ["cf::object::player" => qw(player)], |
2766 | ["cf::object::player" => qw(player)], |
| 2766 | ["cf::player" => qw(peaceful)], |
2767 | ["cf::player" => qw(peaceful)], |
| 2767 | ["cf::map" => qw(trigger)], |
2768 | ["cf::map" => qw(trigger)], |
| 2768 | ) { |
2769 | ) { |
| 2769 | no strict 'refs'; |
2770 | no strict 'refs'; |
