body #110
Aliases: body
7 verbs · 15 properties · 11 children
Verbs
| Verb | Spec | Flags | Definer | Lines |
|---|---|---|---|---|
take_damage | this none this | rxd | #110 | 3 |
jizz_msg | this none this | rxd | #110 | 1 |
tree_tag | this none this | rxd | #110 | 5 |
add_to | this none this | rxd | #110 | 21 |
lick_msg | this none this | rxd | #110 | 17 |
bite_msg | this none this | rxd | #110 | 17 |
modify_nude | this none this | rxd | #110 | 2 |
Properties
| Property | Definer | Flags | Owner | Value |
|---|---|---|---|---|
size | #110 | rc | #361 | 20 |
max_damage | #110 | rc | #361 | 1.0 |
critical | #110 | rc | #361 | 0 |
severable | #110 | rc | #361 | 0 |
exclusive_to | #110 | rc | #361 | #-1 |
aliases | #1 | rc | #361 | {"body"} |
description | #1 | rc | #361 | "A ghostly apparition of a disembodied, er, body part." |
object_size | #1 | r | #29 | {6247, 1298433815} |
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): #1 root
Children: #217 hand, #234 ass, #242 face, #262 back, #280 leg, #286 abdomen, #315 foot, #344 groin, #348 head, #351 chest, #368 arm
Call graph
Source
take_damage
Referenced by
none
Source
1":take_damage(OBJ victim, INT amount, OBJ type)"; 2"Do anything special for this bodypart when we take damage."; 3return min(args[2], toint(tofloat(args[1].health_max) * this.max_damage));
jizz_msg
Referenced by
none
Source
1return this.(verb);
tree_tag
Referenced by
none
Source
1r = tostr("max ", this.max_damage, " siz ", this.size); 2if (is_a(this.exclusive_to, $bodypart)) 3r = tostr(r, " excl ", this.exclusive_to.name); 4endif 5return r;
add_to
Referenced by
none
Source
1who = args[1]; 2if (!is_a(who, $creature)) 3return 0; 4elseif (this == $bodypart) 5return 0; 6elseif (index(this.name, "generic")) 7return 0; 8endif 9exclusive_to = is_a(this.exclusive_to, $bodypart) ? this.exclusive_to | this; 10parts = who.body_parts; 11if (this in parts) 12return 1; 13endif 14for part in (parts) 15if (is_a(part, exclusive_to)) 16parts = setremove(parts, part); 17endif 18endfor 19parts = setadd(parts, this); 20who.body_parts = parts; 21return 1;
lick_msg
Referenced by
none
Source
1if (args) 2if (this.lick_clothed_msg) 3if (garment = args[1]:wearing_on(this)) 4covering = #-1; 5for x in (garment) 6if ((!`x.fondle_through ! ANY') && (!valid(covering))) 7covering = x; 8endif 9endfor 10if (valid(covering)) 11m = strsub($su:msg(this.lick_clothed_msg), "%garment", covering.name); 12return m; 13endif 14endif 15endif 16endif 17return $su:msg(this.lick_msg);
bite_msg
Referenced by
none
Source
1if (args) 2if (this.bite_clothed_msg) 3if (garment = args[1]:wearing_on(this)) 4covering = #-1; 5for x in (garment) 6if ((!`x.fondle_through ! ANY') && (!valid(covering))) 7covering = x; 8endif 9endfor 10if (valid(covering)) 11m = strsub($su:msg(this.bite_clothed_msg), "%garment", covering.name); 12return m; 13endif 14endif 15endif 16endif 17return $su:msg(this.bite_msg);
modify_nude
Referenced by
none
Source
1n = args[1]; 2return n;