Wanted: A script for giving money to object finder.

I received a request from Starax (the sculptor) for a script that would be used in a "find an object" game that would automatically pay the finder of the object a certain amount of money.


Here's my primitive 5 minute untested version of such a thing:

integer paid = FALSE;
integer amount = 1 ;

default
{
    state_entry()
    {
        //llSay(0, "Hello, Avatar!");
        paid = FALSE;
        
    }

    touch_start(integer total_number)
    {
        //llSay(0, "Touched.");
        if (paid = FALSE)
        { llGiveMoney( llDetectedKey(0), amount);
          paid = TRUE ;
        } 
        
    }
}

Any help will greatly appreciated.

Almost works. Just add in

if(!llGetPermissions() & PERMISSION_DEBIT) llRequestPermissions(llGetOwner(), PERMISSION_DEBIT);

To state_entry.

-Adam

if (paid = FALSE)

should be

if (paid == FALSE)

err.. you need PERMISSION_DEBIT to use llGiveMoney. So, llRequestPermissions(llGetOwner(),PERMISSION_DEBIT);
and use llGiveMoney in the run_time_permissions event.

I found the "=" instead of "==" error myself, and stuck in
Adam's code in state entry.

It was not asking me for permission to debit, but was instead giving the "Script trying to debit L$ from owner but PERMISSION_DEBIT permission not set!"

Adams's line needed parenthesis around llGetPermissions()&PERMISSION_DEBIT added like so:

        if(! ( llGetPermissions() & PERMISSION_DEBIT) )
        { llRequestPermissions(llGetOwner(), PERMISSION_DEBIT) ;
        }

This compiled and asked for permission and paid me upon touching it.

Am I overlooking something that would allow the payment to be be catastrophically repeated?

Is the touch event a logical place to put it?

I've never found anything in a hunt game here, I don't know if the found item should attach itself to the finders hand or what the normal finding a thing behavior should be at all.

The revised code looks like this now:

integer paid = FALSE;
integer amount = 1 ;

default
{
    state_entry()
    {
        //llSay(0, "Hello, Avatar!");
        paid = FALSE;
        
        if(! ( llGetPermissions() & PERMISSION_DEBIT) )
        { llRequestPermissions(llGetOwner(),  PERMISSION_DEBIT) ;
        }

        
    }

    touch_start(integer total_number)
    {
        //llSay(0, "Touched.");
        if (paid == FALSE)
        { llGiveMoney( llDetectedKey(0), amount);
          paid = TRUE ;
        } 
        
    }
}

As I posted previously, you should use the run_time_permissions event after requesting permissions.
http://www.badgeometry.com/wiki/llRequestPermissions
http://www.badgeometry.com/wiki/run_time_permissions

Hmm Adam, are you sure that works?
From the wiki:

Question: According to the official Linden scripting docs, llRequestPermissions should return an integer. What is returned? Is it the permissions granted, all of the now-available permissions, etc.? Is this integer passed to run_time_permissions?
Answer: No, this is an error in the official guide. It doesn't return an integer. Trying to capture it results in a compile error. My guess is that the help text is right and this function doesn't return anything.

Of course, the wiki may need a little updating.

WARNING: Boolean operator applied to bitfield integer. Logic-check paused.

Correct syntax:
if ((~llGetPermissions & PERMISSION_DEBIT) == PERMISSION_DEBIT)
(assuming ~ is higher in the order-of-operators list in C then &)

Alternative syntax:
if (!((llGetPermissions() & PERMISSION_DEBIT) == PERMISSION_DEBIT))

Logic check exited with code -1.
$/home/omega:

Eggy, is the integer returned from llRequestPermissions relevant in that code snippet? I dont see Adam using it anywhere.

Must have been a brain fart. It's late
EDIT: BTW, where the hell are you, why cant you get in-world?

Many reasons, RL is hectic atm

Yeah should have been ~ rather than !. Not thinking straight that early in the mornin.

-Adam

The line labeled "Correct Syntax" in Chris's latest post is missing the parentheses following llGetPermission.


Perhaps one could use

if  (    ( llGetPermissions() & PERMISSION_DEBIT ) == 0 )
{ llRequestPermission( llGetOwner(), PERMISSION_DEBIT );
}

You might also put a check in the touch event to ignore the owner, who will probably be clicking the object(s) by accident when placing them. No sense paying yourself and updating the "paid" var.

touch(integer num)
{
  if (llDetectedKey(0) != llGetOwner() && !paid)
  {
    // then pay up/update vars and such
    paid = TRUE;
    llGiveMoney(llDetectedKey(0), amount);
  }
}

Boso