Jump to content

Rory Huntsman

Resident
 View Profile  See their activity

  • Posts

    17

  • Joined

  • Last visited

 Content Type 

Posts posted by Rory Huntsman

    Job Opportunity - Executive Assistant / General Manager

    in Inworld Employment

    Posted

    Hi,

    I'm looking for someone who can assist me with my general business activities.  At present I own and run two seperate regions and also a mainland land/rental business.

    Ideally I'd love to work with someone who has been in SL for some time and can help with ideas and putting in place, marketing and general management of recruitment.  At the moment it is quite a general postion but with the right person I think we could work together to build a great business relationship.  The person must be very open to all genders and sexualities - well, open to all people generally -  I would hope that would go without saying!

    I'm thinking in the region of 10K L / week 

    Please get in touch either my mail here by preferably by notecard to Rory Huntsman

    Thanks

    Rory :)

     

    • Like 1

    Right Click Pay Options - I'm so confused

    in LSL Scripting

    Posted

    Hey,

    I am not a creator or anything and have tried looking through the forums but can't seem to find the answer for the script I have in a sploder.

    I want to change the pay options from 1, 5, 10, 20 to 20, 40, 60, 80 and suggested 100 (if that's possible).  It might have been a long week but I can't see where to change it.... would someone mind giving a hand please?

    Thank you in advance

    Rory

    list entrantsKey = [];
    integer pot = 0;
    float ownersCut = 10;
    integer amountLimit = 5;
    float TimeLimit = 300;
    integer entrantsCount = 0;
    integer flag = 0;
    integer i;
    integer result = 0;
    string Text = "";
    key chave;
    integer amount;
    integer min_pay = 0; //minimum amount to pay ppl. Exemple, if you change this value to 2, everyone will receive at least 2 L$

    string gName = "*Config";
    integer gLine = 0;        // current line number
    key gQueryID; // id used to identify dataserver queries
    string teste = "";

    integer RandInt(integer lower, integer higher) {
        integer Range = higher - lower;
        integer Result = llFloor(llFrand(Range + 1)) + lower;
        return Result;
    }


    MakeParticles()//This is the function that actually starts the particle system.
    {     
        llParticleSystem([                                                         //KPSv1.0  
            PSYS_PART_FLAGS , 0 //Comment out any of the following masks to deactivate them
        | PSYS_PART_INTERP_COLOR_MASK       //Colors fade from start to end
        | PSYS_PART_INTERP_SCALE_MASK       //Scale fades from beginning to end
        | PSYS_PART_FOLLOW_VELOCITY_MASK    //Particles are created at the velocity of the emitter
        | PSYS_PART_EMISSIVE_MASK           //Particles are self-lit (glow)
        
        ,PSYS_SRC_PATTERN   
        ,PSYS_SRC_PATTERN_EXPLODE
        ,PSYS_SRC_TARGET_KEY,        llGetOwner()
        ,PSYS_SRC_TEXTURE,           "f61e64f1-3608-07d4-9304-84f8761afa42"     //UUID of the desired particle texture  
        ,PSYS_PART_MAX_AGE,          10.5                //Lifetime, in seconds, that a particle lasts
        ,PSYS_SRC_BURST_RATE,        .5            //How long, in seconds, between each emission
        ,PSYS_SRC_BURST_PART_COUNT,  40       //Number of particles per emission
        ,PSYS_SRC_BURST_RADIUS,      3.0                //Radius of emission
        ,PSYS_SRC_ACCEL,             <1.0,1.0,0.0>      //Acceleration of particles each second
        ,PSYS_PART_START_ALPHA,      1.0       //Starting transparency, 1 is opaque, 0 is transparent.
        ,PSYS_PART_END_ALPHA,        0.0                //Ending transparency
        ,PSYS_PART_START_SCALE,      <.200,.200,.200>      //Starting particle size
        ,PSYS_PART_END_SCALE,        <0.400,0.400,0.400>      //Ending particle size, if INTERP_SCALE_MASK is on
        ,PSYS_SRC_OMEGA,             <1.0,0.0,0.0>       //Rotation of ANGLE patterns, similar to llTargetOmega()
                ]);
    }


    start()
    {
        llSetTimerEvent(0);
        entrantsKey = [];
        result = 0;
        entrantsCount = 0;
        flag = 0;
        llParticleSystem([]);
        Text = "Pay the sploder to begin the countdown! (minimun L$ "+ (string)amountLimit +")";
        llSetText(Text, <0, 1.0, 0>,  1); 
    }

    default
    {
        
        on_rez(integer num)
        {
            llResetScript();
        }
        
        state_entry()
        {
            gQueryID = llGetNotecardLine(gName, gLine);
            //start();
            llListen(7, "", llGetOwner(), "");
            llRequestPermissions(llGetOwner(),PERMISSION_DEBIT);
        }
        

        dataserver(key query_id, string data) 
        {      
            if (query_id == gQueryID) 
            {
                if (data != EOF) 
                {    // not at the end of the notecard 
                    
                    if (teste == "ownercut")
                    ownersCut = (integer)data;
                    if (teste == "minimumpay")
                    amountLimit = (integer)data;
                    if (teste == "timelimit")
                    TimeLimit = (float)data;             
                       
                    if (llToLower(data) == "[ownercut]")  
                    {
                        ++gLine;
                        gQueryID = llGetNotecardLine(gName, gLine);    // request next line
                        teste = "ownercut";   
                    }
                    else if (llToLower(data)== "[minimumpay]") 
                    {
                        ++gLine;
                        gQueryID = llGetNotecardLine(gName, gLine);    // request next line 
                        teste = "minimumpay";   
                    } 
                    else if (llToLower(data) == "[timelimit]") 
                    {
                        ++gLine;
                        gQueryID = llGetNotecardLine(gName, gLine);    // request next line 
                        teste = "timelimit";   
                    }                              
                    else 
                    {
                        ++gLine;                // increase line count
                        gQueryID = llGetNotecardLine(gName, gLine);    // request next line
                        teste = "";
                    }
                }
                else start();
            }
        }  
        
        
        
        money(key giver, integer amount) 
        {
            if (amount < amountLimit)
            {
                llSay(0, "The minimum amount is L$"+ (string)amountLimit+".");
                llGiveMoney(giver,amount);
            }
            else
            {        
                if (llListFindList(entrantsKey, [giver]) == -1)        
                    entrantsKey += giver;
                entrantsCount = llGetListLength(entrantsKey);
                pot += amount; 
                
                llSay(0, llKey2Name(giver) + " adds L$" + (string)amount + " to the SPLODER. Current pot is L$"+ (string)pot +".");
                

                
                if (entrantsCount >= 5)
                {
                    llSetText("Ready to explode!!! Current pot is L$ "+ (string)pot, <0, 1.0, 0>,  1);
                    if (flag == 0)
                    {
                        llSay(0, "SPLODER'S COUNTDOWN BEGINS!");
                        llSay(0, (string)(llRound(TimeLimit)) + " seconds before it explodes!!!");
                        llSetText("Ready to explode!!! Current pot is L$ "+ (string)pot, <0, 1.0, 0>,  1);
                        llSetTimerEvent(TimeLimit);
                        flag = 1;
                    }
                        
                }
                else
                {
                string message = ((string)(5 - entrantsCount)) +" more participants needed to begin countdown!"; 
                llSay(0, message);
                llSetText(Text + "\n" + message, <0, 1.0, 0>,  1);
                }
            }        
            
        }
        
        timer()
        {            
            for (i=9; i > 0; i--)
            {
                llSay(0, "Exploding in "+ (string)i);
                llSleep(1.0);
            }

            list payment = [];
            integer cut_pot = 0;
            float cut = 0;        
            cut = ownersCut/100;
            cut = cut * pot;   
            cut_pot = pot - (integer)cut;            

            
            for (i=0; i< entrantsCount; i++) 
            {
                payment += min_pay;
                cut_pot -= min_pay;                                                       
            }
                
            integer j=0;
            integer value = 0;
            
            while (cut_pot > 0)
            {            
                j = RandInt(0, (entrantsCount - 1));
                integer rand;
                rand = RandInt(1, cut_pot);
                value = ((integer)llList2String(payment, j));
                value += rand;            
                //llOwnerSay("value: " + (string)value + "  j:" + (string)j); //just for debugging
                payment = llListReplaceList(payment, [value], j, j);            
                cut_pot -= rand;                               
            }
                
            //pot = cut_pot;        
            pot = 0;

            
            MakeParticles(); 
            
            for (i=0; i< entrantsCount; i++) 
            {             
                llSleep(0.5);
                result = (integer)llList2String(payment, i);    
                llSay(0, llKey2Name((key)llList2String(entrantsKey, i)) + " just won L$" + (string)result +" from the sploder!"); 
                llGiveMoney((key)llList2String(entrantsKey, i), result);                                 
            } 
            
            llSleep(3.0);
            start();   
        }
        
        
        no_sensor()
        {
            pot += result;
            llSay(0, llKey2Name((key)llList2String(entrantsKey, i)) + " won nothing for being out of range!");        
        }    
        
        listen( integer channel, string name, key id, string message )
        {
            if (channel == 7)
            {
                if (llToLower(message) == "reset")
                {
                    llResetScript();
                    //gQueryID = llGetNotecardLine(gName, gLine);
                    //start();                    
                }    
            }    
        }    
    }

    New Region with only exclusive 12 Large Waterside Parcels

    in Private Island

    Posted

    Hi,

    I've got a region called The Woodlands which I've kept simple with only 12 large waterside plots.  I'm currently working on the middle to include community space / wooded areas.

    Corner parcels are LS$ 1500 / Week - 1500 prims

    8 slightly smaller but still waterside are LS$ 1000 / week with 1200 prims

    Rental boxes are discreet lamp posts and will not display text once rented

    Come and have a look when you can :)

    http://maps.secondlife.com/secondlife/The Woodlands/126/127/23

     

    Woodlands corner.jpg

    woodlands middle.jpg

    SALE! Mainland Skyboxes for Rent - 250 - 300 Prims - LS$ 200 / Week

    in Mainland

    Posted

    Hey :)

    I'm busy working on new waterfront properties and thought as I'm a new business here I'd have a sale on 10 of the skyboxes/platforms - each range from 250 to 340 Prims and all at LS$ 200 / Week

    Each is in it's own parcel so you have complete privacy.

    I do not sub let - I own the land that I rent.

    Here's the Rental office - come and have a look when you're inworld.

    http://maps.secondlife.com/secondlife/Dunbeath/19/81/34

    Thanks

    Rory

    200L Sale.jpg

    Stunning 2048m Oceanside Island - 300 Prims - LS$ 500 / Week

    in Mainland

    Posted

    Hey All,

    I've just set up this beautiful little island for rent - it's ready to go with beautiful decor and landscaping with 300 prims on top.  Come and have a look!

    http://maps.secondlife.com/secondlife/Wemyss/136/237/27

    I've got another 25+ properties available from Sky Platforms at just LS$ 300 /week to waterside properties - here's the rental office:

    http://maps.secondlife.com/secondlife/Dunbeath/19/81/34

    Have a great week ahead and give me a shout inworld :)

    Rory

    Snapshot_037_edited.jpg

    Snapshot_011_edited.jpg

    Own Parcel Mainland Skyboxes for Rent - 340 Prims - LS$ 300 / Week

    in Mainland

    Posted

    Hey,

    Sorry to post again, I've added some skyboxes in their own parcels as I know that being able to add your own buildings etc is important - here's the LMs for them plus the rental office and the other properties I have available at the moment!

    Rental Office - http://maps.secondlife.com/secondlife/Dunbeath/15/86/34

    340 Prims - LS$ 300 / Week - http://maps.secondlife.com/secondlife/Nipigon/253/188/2701

    340 Prims - LS$ 300 / Week - http://maps.secondlife.com/secondlife/Agamok/208/47/2201

    Properties available:

    https://www.casperpanel.com/rentals/iNmz2w9OdPpLLtpC/available

    Give me a shout inworld too!

    Thanks!

    Rory :)

    Snapshot_032.jpg

    Snapshot_026.jpg

    Snapshot_014_edited.jpg

    Mainland Skyboxes for Rent - 250 Prims - LS$ 300 / Week

    in Mainland

    Posted · Edited by Rory Huntsman
    forgot to add a link :O

    Hey,

    I've got around 10 unfurnished skyboxes to rent - each on it's own 1024m parcel.

    Also some waterfront properties from LS 700 with 500 prims.

    Here's the rental office and give me a shout inworld if you like... Thanks :) Rory

    http://maps.secondlife.com/secondlife/Dunbeath/16/81/34

    Current available property:

    https://www.casperpanel.com/rentals/iNmz2w9OdPpLLtpC/available

     

     

     

    SBADVERT_edited.jpg

    Snapshot_025_edited.jpg

×
×
  • Create New...