Switch to edit mode.
Name(s): do_throw1: "Copied from the generic duckable-throwable pie (#3127):do_throw by manta (#7165)Oct 18 18:33:35 1999"
2: "Copied from Generic Throwable-Pie (#4990):throw by DA (#4341) Aug 7 23:19:51 1995"
3: "Hacked by manta(#7165) Aug 7 23:19:51 1995"
4: if ((victim = args[1]) == player)
5: return player:tell("Now that wouldn't be very smart, now would it?")
6: endif
7: $msg:mtell("throw", player:title(), victim:title())
8: prevloc = this.location
9: this:moveto(victim.location)
10: victim in this.safe ? victim:tell("Quack!!! Engaging autoduck system! !!!kcauQ") | victim:tell(">>>>> 'duck " + tostr(this) + "' fast! <<<<<")
11: if (victim in this.gonna_get_pied)
12: $msg:mtell("throw_failed", victim:title())
13: else
14: delay = this.flight_time / 2 + (random(this.flight_time / 4) - this.flight_time / 2)
15: this.gonna_get_pied = setadd(this.gonna_get_pied, victim)
16: suspend(this.flight_time / 2)
17: victim in this.safe && this:duck(victim)
18: suspend(delay)
19: if (victim in this.gonna_get_pied)
20: $msg:mtell(victim, "hit", victim:title())
21: this.gonna_get_pied = setremove(this.gonna_get_pied, victim)
22: endif
23: endif
24: this:moveto(prevloc)
25: "Last modified by Dax (#789) on Thu Dec 13 20:39:48 2001 MST."