move #359
Aliases: walk
3 verbs · 19 properties · 0 children
Verbs
| Verb | Spec | Flags | Definer | Lines |
|---|---|---|---|---|
_start | this none this | rxd | #359 | 30 |
_finish | this none this | rxd | #359 | 11 |
doing_msg | this none this | rxd | #359 | 6 |
Properties
| Property | Definer | Flags | Owner | Value |
|---|---|---|---|---|
help_msg | #93 | rc | #361 | <clear> |
duration | #93 | rc | #361 | <clear> |
preemptible | #93 | rc | #361 | <clear> |
unstoppable | #93 | rc | #361 | <clear> |
dodge_mod | #93 | rc | #361 | <clear> |
doing_msg | #93 | rc | #361 | "moving" |
doing_to_msg | #93 | rc | #361 | "moving to %dl" |
oabort_msg | #93 | rc | #361 | <clear> |
can_parry | #93 | rc | #361 | <clear> |
aliases | #1 | rc | #361 | {"walk"} |
description | #1 | rc | #361 | <clear> |
object_size | #1 | r | #29 | {0, 0} |
hidden_verbs | #1 | rc | #361 | <clear> |
phelp_msg | #1 | rc | #361 | <clear> |
weight | #1 | rc | #361 | <clear> |
owner_verbs | #1 | rc | #361 | <clear> |
plural_name | #1 | rc | #361 | <clear> |
client_image | #1 | rc | #361 | <clear> |
listening | #1 | rc | #361 | <clear> |
Ancestry
Ancestors (nearest first): #93 Generic Action → #1 root
Children: none
Source
_start
Referenced by
none
Source
1who = args[1]; 2exit = args[2][1]; 3penalty = 0; 4if (typeof(exitstr = exit) == STR) 5exit = who.location:match_exit(exitstr); 6if (!valid(exit)) 7who:tell("You can't go '", exitstr, "' from here."); 8who:clear_queue(); 9return 0; 10else 11who:prequeue_action(this, {exit}, 1, "", 1); 12return E_NONE; 13endif 14endif 15if (!valid(exit)) 16return 0; 17endif 18player = who; 19if ((e = (random(100) < 50) ? who:tell_encumbrance() | who:encumbrance()) < -3) 20who:tell("You're too weighted down to go anywhere."); 21return E_NONE; 22endif 23exit_try = exit:try_me(who); 24if (exit_try) 25time = `exit:speed(who) + ((e < -2) ? 1.0 | 0.0) ! ANY => 0.0'; 26who.location:broadcast_event(1, this, @args); 27return {time, 1}; 28else 29return E_NONE; 30endif
_finish
Referenced by
none
Source
1who = args[1]; 2exit = args[2][1]; 3if (typeof(exitstr = exit) == STR) 4exit = who.location:match_exit(exitstr); 5if (!is_a(exit, $exit)) 6return 0; 7endif 8endif 9if (exit:try_me(who, 1)) 10return exit:move(who); 11endif
doing_msg
Referenced by
none
Source
1who = args[1]; 2if ((args[2] && (typeof(args[2][1]) == OBJ)) && gamevalid(args[2][1])) 3return "moving to " + args[2][1]:dname(); 4else 5return "moving"; 6endif