Tome of Fear #165

Parent #5Owner #2Flags read, fertileSource QuestCore.db

Aliases: Tome of Fear, feartome

2 verbs · 19 properties · 0 children

Verbs

VerbSpecFlagsDefinerLines
titlethis none thisrxd#1651
ca*stthis on top of/on/onto/upon anyrxd#16550

Properties

PropertyDefinerFlagsOwnerValue
drop_failed_msg#5rc#2<clear>
drop_succeeded_msg#5rc#2<clear>
odrop_failed_msg#5rc#2<clear>
odrop_succeeded_msg#5rc#2<clear>
otake_succeeded_msg#5rc#2<clear>
otake_failed_msg#5rc#2<clear>
take_succeeded_msg#5rc#2<clear>
take_failed_msg#5rc#2<clear>
value_base#102r#26500.0
damage_base#102r#2<clear>
x_loc#102r#36<clear>
y_loc#102r#36<clear>
ansi_title#102r#36<clear>
obvious#102r#36<clear>
build_help#102rc#2<clear>
key#1c#20
aliases#1rc#2{"Tome of Fear", "feartome"}
description#1rc#2"[green]You see a large tome bound in heavy leather containing thousands of pages of magical text.[normal] [Spell: Fear]"
object_size#1r#36{0, 0}

Ancestry

Ancestors (nearest first): #5 generic thing → #102 subthing → #1 Root Class

Children: none

Call graph

calls n165_1 #165:ca*st n6_18 #6:tell n165_1->n6_18 n165_0 #165:title n165_1->n165_0 n20_19 #20:match_object n165_1->n20_19 n52_0 #52:has_property n165_1->n52_0 n102_4 #102:title n165_1->n102_4

Source

title

Spec this none thisFlags rxdOwner #2Definer #165

Referenced by

Source

1return tostr("[yellow]", this.name, "[normal]");

ca*st

Spec this on top of/on/onto/upon anyFlags rxdOwner #2Definer #165

Referenced by

none

Source

1if ((this in player.contents) && (player.stats_current[2][3] >= 12.0))
2player:tell("You prepare to cast ", this:title(), "[normal]...");
3elseif (player.stats_current[2][3] < 12.0)
4player:tell("You do not have a high enough INT ability! This spell requires at least 12.0.");
5return;
6else
7player:tell("You are not carrying that.");
8return;
9endif
10target = $string_utils:match_object(iobjstr, player.location);
11if (!valid(target))
12player:tell("The target is invalid.");
13return;
14endif
15if ((((iobjstr == "me") || (iobjstr == "self")) || (iobjstr == "myself")) || (target == player))
16player:tell("You cannot cast this spell on yourself!");
17return;
18endif
19if (target in players())
20player:tell(target:title(), " is a player and cannot be the target of this spell!");
21return;
22endif
23if ($object_utils:has_property(target, "magic_immunity"))
24if (target.magic_immunity)
25player:tell(target:title(), " is immune to magic!");
26return;
27endif
28endif
29if (((target in player.location.contents) && $object_utils:has_property(target, "alive")) && $object_utils:has_property(target, "alert"))
30r = {};
31c = target.location;
32for x in (c.exits)
33if (!x.dest.bot_locked)
34r = setadd(r, x.aliases[$]);
35endif
36endfor
37if (r == {})
38return player:tell(target:title(), " cannot move anywhere!");
39endif
40d = random(length(r));
41player:tell("You cast [yellow]Fear[normal] on ", target:title(), "!");
42player.location:announce(player:title(), " casts [yellow]Fear[normal] on ", target:title(), "!");
43player:tell(target:title(), " panics!");
44suspend(3);
45force_input(target, tostr(r[d]));
46suspend(2);
47target.location:announce(this:title(), " runs in from ", c.name, "!");
48else
49return player:tell("The target is invalid.");
50endif