At the moment I'm trying to create autograph slips that would be sold to bards. Ideally, the bard would be able to sign them and it would transform the object from...
'an unsigned autograph'
to...
'an autograph of (bard)'
Anyways, here's how I figured I'd try the object. The person I'm working with (Faria) hasn't got a place on the test port yet so I haven't tested this out. I did run it through FKCheck and it came out alright, but I'm mostly looking for confirmation that this should do what I want it to do. Thanks in advance for your time!
Code: Select all
>intercept_prog sign~
if objval5($n)==0
if actorhasobjnum(QQ00)
mpecho $N quickly signs the parchment he's carrying.
mposet on $n iQQ00 name $n signed autograph
mposet on $n iQQ00 short an autograph signed by $n
mposet on $n iQQ00 long An autograph signed by $n.
mposet on $n iQQ00 ed addline 'autograph signed $n' This scrap of parchment is signed by $n.
mposet on $n iQQ00 value5 1
endif
else
echoat $n You can't autograph a parchment that's already been signed.
endif
~
|