@verb #1061:"Prod2" any none none rx #1061
@program #1061:"Prod2" any none none
"Copied from Zero-Space (#9057):prod2 Aug 31 15:18:15 2000"
"Copied from Cujo & Lao's Wonder FO (#1920):prod by Cujo (#5975)Aug 31 15:15:45 2000"
"Copied from Lao-Tzu (#8084):prod Mar 14 17:52:56 1997"
dobj = player:my_match_object(dobjstr)
dobj:sub_tell("%N pulls out a 100,000,000 megawatt electrical wizard prod and pokes you with it several times.")
player:sub_tell("You pull out a 100,000,000 megawatt electrical wizard prod and poke %d with it several times.")
player.location:sub_announce_all_but({player, dobj}, "%N pulls out a 100,000,000 megawatt electrical wizard prod and pokes %d with it several times.")
if (dobj.wizard)
  suspend(1)
  dobj:sub_tell("Your body gets a large jolt the first time you're poked, but there is too little electricity in the prod to hurt you the other times.")
  player:sub_tell("%D gets jolted the first time you poke him, but is unaffected the other times because the power ran out on your prod!")
  this.location:sub_announce_all_but({player, dobj}, "%D gets a big jolt the first time %n pokes %1, but the prod has no more electrical charge afterwards.", #43:pronoun(dobj, "po"))
else
  this.location:announce_all("The prod has no effect, other than the actual poking.")
endif
.