Find
You are in an object called wrist-blade
A curved, vicious blade worn on the wrist. You can see dark red stains along the length of the blade.
Created by
omenofdoom
, last updated 03 Jul 2009
Code
if second of hit then dohit;
if target of use then flickit;
##dohit:
set $actor's health to $actor's healthmax;
var $hit1 = (impales,slices,slashes,rips,eviscerates);
var $hit2 = (savagely,viciously,brutally);
print "[$actor] $hit2 $hit1 [$target]!";
##flickit:
runsub whoisit;
##whoisit:
if $init_obj = $actor's host then startit else end;
##startit:
if $actor's name like "wrist-blade" then retract else extend;
##extend:
say 'msg', "[$init_obj] flicks his wrist, and a savage blade flashes into view";
set $actor's name to 'wrist-blade';
set $actor's colour to lightslategray;
set $actor's info to 'A curved, vicious blade worn on the wrist. You can see dark red stains along the length of the blade.';
relook $loc;
##retract:
say 'msg', "[$init_obj] taps a panel on the base of the blade, and it dissappears into [$actor]";
set $actor's name to 'metallic device';
set $actor's colour to lightgray;
$ainfo = "Fastened to the users arm by metal bands";
set $actor's info to $ainfo;
relook $loc;
a viscious gash
a gaping wound
a vorpal slice