| … | |
… | |
| 18 | my ($tr, $ob) = @_; |
18 | my ($tr, $ob) = @_; |
| 19 | |
19 | |
| 20 | return unless $ob->type == cf::PLAYER; |
20 | return unless $ob->type == cf::PLAYER; |
| 21 | |
21 | |
| 22 | if ($ob->contr->attached ("transport_player_steer")) { |
22 | if ($ob->contr->attached ("transport_player_steer")) { |
| 23 | $ob->message ("You stop steering the " . $tr->name . "."); |
23 | $ob->message ("You stop steering the " . $tr->name . ".", cf::NDI_ORANGE | cf::NDI_REPLY); |
| 24 | $ob->contr->detach ("transport_player_steer"); |
24 | $ob->contr->detach ("transport_player_steer"); |
| 25 | } else { |
25 | } else { |
| 26 | $ob->message ("You now steer the " . $tr->name . "."); |
26 | $ob->message ("You now steer the " . $tr->name . ".", cf::NDI_ORANGE | cf::NDI_REPLY); |
| 27 | $ob->contr->attach ("transport_player_steer"); |
27 | $ob->contr->attach ("transport_player_steer"); |
| 28 | } |
28 | } |
| 29 | |
29 | |
| 30 | cf::override; |
30 | cf::override; |
| 31 | }, |
31 | }, |
