Tome of Enchantment #149

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

Aliases: Tome of Enchantment, enchantmenttome

2 verbs · 19 properties · 0 children

Verbs

VerbSpecFlagsDefinerLines
titlethis none thisrxd#1491
ca*stthis on top of/on/onto/upon anyrxd#14954

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#22300.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 Enchantment", "enchantmenttome"}
description#1rc#2"[green]You see a large tome bound in heavy leather containing thousands of pages of magical text.[normal] [Spell: Enchantment]"
object_size#1r#36{0, 0}

Ancestry

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

Children: none

Call graph

calls n149_1 #149:ca*st n6_18 #6:tell n149_1->n6_18 n149_0 #149:title n149_1->n149_0 n20_19 #20:match_object n149_1->n20_19 n52_0 #52:has_property n149_1->n52_0 n102_4 #102:title n149_1->n102_4

Source

title

Spec this none thisFlags rxdOwner #2Definer #149

Referenced by

Source

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

ca*st

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

Referenced by

none

Source

1if ((this in player.contents) && (player.stats_current[2][3] >= 11.0))
2player:tell("You prepare to cast from the ", this:title(), "[normal]...");
3elseif (player.stats_current[2][3] < 11.0)
4player:tell("You do not have a high enough INT ability! This spell requires at least 11.0.");
5return;
6else
7player:tell("You are not carrying that.");
8return;
9endif
10target = $string_utils:match_object(iobjstr, player.location);
11if (((iobjstr == "me") || (iobjstr == "self")) || (iobjstr == "myself"))
12player:tell("The target must be armor or a weapon, and you must be carrying it.");
13return;
14endif
15if ($object_utils:has_property(target, "enchant_level"))
16if ((target.enchant_level + 1) > toint(player.stats_current[2][3]))
17player:tell("You cannot enchant ", target.name, " beyond your INT ability.");
18return;
19endif
20endif
21if ((target in player.contents) && $object_utils:has_property(target, "armor"))
22target.armor = target.armor + 1.0;
23target.enchant_level = target.enchant_level + 1;
24target.value_base = target.value_base + 20.0;
25player:tell("You cast [yellow]Enchantment[normal] on ", target.name, "!");
26player.location:announce(player:title(), " casts [yellow]Enchantment[normal] on ", target.name, "!");
27player:tell("Your ", target.name, " gets +1.0 to Armor!");
28player.location:announce(player:title(), " enchants ", player.pp, " ", target.name, "!");
29return;
30elseif (((target in player.contents) && $object_utils:has_property(target, "weapon")) && target.shoots)
31target.projectile_dam = target.projectile_dam + 1.0;
32target.enchant_level = target.enchant_level + 1;
33target.value_base = target.value_base + 20.0;
34player:tell("You cast [yellow]Enchantment[normal] on ", target:title(), "!");
35player.location:announce(player:title(), " casts [yellow]Enchantment[normal] on ", target:title(), "!");
36player:tell("Your ", target:title(), " gets +1.0 to Projectile Damage!");
37player.location:announce(player:title(), " enchants ", player.pp, " ", target:title(), "!");
38elseif (((target in player.contents) && $object_utils:has_property(target, "weapon")) && (!target.shoots))
39target.damage_base = target.damage_base + 1.0;
40target.enchant_level = target.enchant_level + 1;
41target.value_base = target.value_base + 20.0;
42player:tell("You cast [yellow]Enchantment[normal] on ", target:title(), "!");
43player.location:announce(player:title(), " casts [yellow]Enchantment[normal] on ", target:title(), "!");
44player:tell("Your ", target:title(), " gets +1.0 to Damage!");
45player.location:announce(player:title(), " enchants ", player.pp, " ", target:title(), "!");
46elseif (!valid(target))
47player:tell("The target is invalid.");
48player:tell("The target must be armor or a weapon, and you must be carrying it.");
49return;
50else
51player:tell("No effect.");
52player:tell("The target must be armor or a weapon, and you must be carrying it.");
53return;
54endif