Zugg Software :: View topic - Modifying DB records from within a script

Newbie Joined: 21 Jan 2002 Posts: 7 Location: Canada

My problem concerns modifying records stored in the database from within a script. The particular MUD I play has certain pieces of equipment that can have varying stat modifiers. What I want to do is capture the output from an identify spell, and if the object being identified has better stat modifiers than the one currently in the database, update the database. The problem is that when I try to modify a field in a record, the field is set to zero.

Here's an example of what I mean:

Object 1 and 2 are the same name, but have different modifers.

Object 1:

quote:

...
Affects strength by -1.
Affects hitroll by 4.
Affects dexterity by 3.

Object 2:

quote:

...
Affects strength by -3.
Affects hitroll by 4.
Affects dexterity by 1.

The following trigger captures the modifiers:
#TRIGGER {^Affects (%w) by (*).$} {#addkey Item {%proper( %1)=%2};#additem TweakList {%proper( %1)}}

@NegativeStats contains a list of modifiers that are better the lower they are (eg. AC, Svspell)

quote:

@CurrentRecord = %find( %db( @Item, Name))
#if (%null( @CurrentRecord)) {
#NOOP Item doesn't exist, so add it.
#NEW All @Item
} {
#DBGET @CurrentRecord
#FORALL @TweakList {
@CurrentTweak = %db( %rec, %i)
#if (%ismember( %i, @NegativeStats)) {#if (@CurrentTweak > %db( @Item, %i)) {
#NOOP Lower means better here, so change it.
#ADDKEY %rec {%i=%db( @Item, %i)}
}} {#if (@CurrentTweak < %db( @Item, %i)) {
#NOOP Higher number (and better in this case), so change it.
#ADDKEY %rec {%i=%db( @Item, %i)}
}}
}
}
@TweakList = ""
@Item = ""

I think the problem is in "#ADDKEY %rec {%i=%db( @Item, %i)}". Is this a valid way to update a record? If not, can someone suggest another way to do it?

Sorry for the long post, but I didn't want to leave anything out. Thanks in advance. :)

Magician Joined: 25 Oct 2000 Posts: 461 Location: USA

I've just begun to explore the DB, but have you tried looking at #DBPUT?

Newbie Joined: 21 Jan 2002 Posts: 7 Location: Canada

Yup... that does it. Thanks