Push All Scripts
This commit is contained in:
Fred Beckhusen
@@ -0,0 +1,307 @@
|
||||
// :CATEGORY:Vendor
|
||||
// :NAME:Vendor_System_Script
|
||||
// :AUTHOR:Kristy Fanshaw
|
||||
// :CREATED:2011-01-22 12:49:11.923
|
||||
// :EDITED:2013-09-18 15:39:09
|
||||
// :ID:949
|
||||
// :NUM:1367
|
||||
// :REV:1.0
|
||||
// :WORLD:Second Life
|
||||
// :DESCRIPTION:
|
||||
// What it does:
|
||||
//
|
||||
// 1. it asks the owner of the vendor to rezz the update box.
|
||||
// 2. update box will define the URL from where it can aquire the email address of the vendor. (the webpage body should contain only pure address - index.html file should contain no code)
|
||||
// 3. when the URL is set, it asks the owner of the vendor to grant debits. If the owner won't do so, the script resets.
|
||||
// 4. when debits are granted the vendor will be active.
|
||||
// 5. if the owner of the vendor touches vendor in active mode, the vendor will tell how many items have been sold since activation.
|
||||
//
|
||||
// Purchase:
|
||||
//
|
||||
// 1. buyer can pay only the amount of money that is set in "integer gCorrectAmount"
|
||||
// 2. when buyer pays money, the vendor goes to check the email address of the server from given URL. If there will be invalid response, money will be refunded to buyer and vendor shuts down till next update.
|
||||
// 3. vendor sends now email to server prim with buyers ID in subject line and its own email address in message content.
|
||||
// 4. server will give the item to buyer and sends "delivered" notification back to vendor. If the server is not working or there will be some other issues with delivery, then money will be refunded to buyer and vendor shuts down till next update.
|
||||
// 5. when vendor receives email from server with "delivered" note, then creator of the vendor receives the money.
|
||||
//
|
||||
//
|
||||
// Pay Script for Reseller vendor
|
||||
//
|
||||
// Place this script in a Vendor Root prim you've created.
|
||||
//
|
||||
// What it does:
|
||||
//
|
||||
// 1. it asks the owner of the vendor to rezz the update box.
|
||||
// 2. update box will define the URL from where it can aquire the email address of the vendor. (the webpage body should contain only pure address - index.html file should contain no code)
|
||||
// 3. when the URL is set, it asks the owner of the vendor to grant debits. If the owner won't do so, the script resets.
|
||||
// 4. when debits are granted the vendor will be active.
|
||||
// 5. if the owner of the vendor touches vendor in active mode, the vendor will tell how many items have been sold since activation.
|
||||
//
|
||||
// Purchase:
|
||||
//
|
||||
// 1. buyer can pay only the amount of money that is set in "integer gCorrectAmount"
|
||||
// 2. when buyer pays money, the vendor goes to check the email address of the server from given URL. If there will be invalid response, money will be refunded to buyer and vendor shuts down till next update.
|
||||
// 3. vendor sends now email to server prim with buyers ID in subject line and its own email address in message content.
|
||||
// 4. server will give the item to buyer and sends "delivered" notification back to vendor. If the server is not working or there will be some other issues with delivery, then money will be refunded to buyer and vendor shuts down till next update.
|
||||
// 5. when vendor receives email from server with "delivered" note, then creator of the vendor receives the money.
|
||||
//
|
||||
// Copyright © 2008 by Kristy Fanshaw
|
||||
//
|
||||
// This program is free software: you can redistribute it and/or modify
|
||||
// it under the terms of the GNU General Public License as published by
|
||||
// the Free Software Foundation, either version 3 of the License, or
|
||||
// (at your option) any later version.
|
||||
//
|
||||
// This program is distributed in the hope that it will be useful,
|
||||
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
// GNU General Public License for more details.
|
||||
//
|
||||
To get a copy of the GNU General Public License, see <http://www.gnu.org/licenses/>.
|
||||
// :CODE:
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Copyright (c) 2008 by Kristy Fanshaw //
|
||||
|
||||
// This script is part of Vendor System. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Vendor System is free software: you can redistribute it and/or modify //
|
||||
|
||||
// it under the terms of the GNU General Public License as published by //
|
||||
|
||||
// the Free Software Foundation, either version 3 of the License, or //
|
||||
|
||||
// (at your option) any later version. //
|
||||
|
||||
// //
|
||||
|
||||
// Vendor System is distributed in the hope that it will be useful, //
|
||||
|
||||
// but WITHOUT ANY WARRANTY; without even the implied warranty of //
|
||||
|
||||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
|
||||
|
||||
// GNU General Public License for more details. //
|
||||
|
||||
// //
|
||||
|
||||
// To get a copy of the GNU General Public License, see <http://www.gnu.org/licenses/>. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
||||
integer gCorrectAmount = 10; // enter the price for fast pay
|
||||
|
||||
integer my_profit = 50; // how many percent you would like to recieve form the sale
|
||||
|
||||
string update_box = "update box name"; // describe the name of the "update box" object that should be rezzed
|
||||
|
||||
string name = "my vendor name"; // Set the vendor name here
|
||||
|
||||
|
||||
|
||||
integer totalsold = 0;
|
||||
|
||||
integer Ch;
|
||||
|
||||
integer listen_handle;
|
||||
|
||||
integer buyer_paid;
|
||||
|
||||
key OWNER;
|
||||
|
||||
key CREATOR;
|
||||
|
||||
key ID;
|
||||
|
||||
key http_request_id;
|
||||
|
||||
string url;
|
||||
|
||||
string mail;
|
||||
|
||||
|
||||
|
||||
default
|
||||
|
||||
{
|
||||
|
||||
changed(integer change)
|
||||
|
||||
{
|
||||
|
||||
if(change & CHANGED_OWNER)
|
||||
|
||||
{
|
||||
|
||||
llSetObjectDesc("0");
|
||||
|
||||
llResetScript();
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
on_rez(integer start_param)
|
||||
|
||||
{
|
||||
|
||||
llResetScript();
|
||||
|
||||
}
|
||||
|
||||
state_entry()
|
||||
|
||||
{
|
||||
|
||||
OWNER = llGetOwner();
|
||||
|
||||
CREATOR = llGetCreator();
|
||||
|
||||
Ch = ( -1 * (integer)("0x"+llGetSubString((string)CREATOR,-7,-1)) );
|
||||
|
||||
totalsold = (integer)llGetObjectDesc();
|
||||
|
||||
llSetObjectName(name);
|
||||
|
||||
llSetPayPrice(PAY_HIDE, [gCorrectAmount, PAY_HIDE, PAY_HIDE, PAY_HIDE]);
|
||||
|
||||
llSetText("To start vendor, rezz '" + update_box + "'.", <1.0, 1.0, 1.0>, 1.0);
|
||||
|
||||
llSensorRepeat(update_box, NULL_KEY , SCRIPTED, 10 , PI, 10);
|
||||
|
||||
}
|
||||
|
||||
sensor (integer numberDetected)
|
||||
|
||||
{
|
||||
|
||||
state sens;
|
||||
|
||||
}
|
||||
|
||||
no_sensor ()
|
||||
|
||||
{
|
||||
|
||||
llResetScript();
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
state sens1
|
||||
|
||||
{
|
||||
|
||||
state_entry()
|
||||
|
||||
{
|
||||
|
||||
state sens;
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
state sens
|
||||
|
||||
{
|
||||
|
||||
on_rez(integer start_param)
|
||||
|
||||
{
|
||||
|
||||
llResetScript();
|
||||
|
||||
}
|
||||
|
||||
state_entry()
|
||||
|
||||
{
|
||||
|
||||
llSetText("Updating", <1.0, 1.0, 1.0>, 1.0);
|
||||
|
||||
llShout(Ch,"update");
|
||||
|
||||
listen_handle = llListen(Ch,update_box, NULL_KEY, "");
|
||||
|
||||
llSensorRepeat(update_box, NULL_KEY , SCRIPTED, 10 , PI, 5);
|
||||
|
||||
}
|
||||
|
||||
listen( integer channel, string name, key id, string message )
|
||||
|
||||
{
|
||||
|
||||
url = message;
|
||||
|
||||
llOwnerSay("updated");
|
||||
|
||||
llShout(Ch,"updated");
|
||||
|
||||
llListenRemove(listen_handle);
|
||||
|
||||
}
|
||||
|
||||
sensor (integer numberDetected)
|
||||
|
||||
{
|
||||
|
||||
llListenRemove(listen_handle);
|
||||
|
||||
state sens1;
|
||||
|
||||
}
|
||||
|
||||
no_sensor ()
|
||||
|
||||
{
|
||||
|
||||
llSetText("Touch to grant debit permission.", <1.0, 1.0, 1.0>, 1.0);
|
||||
|
||||
}
|
||||
|
||||
touch_start(integer total_number)
|
||||
|
||||
{
|
||||
|
||||
llRequestPermissions(OWNER, PERMISSION_DEBIT);
|
||||
|
||||
}
|
||||
|
||||
run_time_permissions(integer Permission)
|
||||
|
||||
{
|
||||
|
||||
if(Permission == PERMISSION_DEBIT)
|
||||
|
||||
{
|
||||
|
||||
llOwnerSay("Starting vendor.");
|
||||
|
||||
llSetText("", <1.0, 1.0, 1.0>, 1.0);
|
||||
|
||||
state Ready;
|
||||
|
||||
}
|
||||
|
||||
else
|
||||
|
||||
{
|
||||
|
||||
llOwnerSay ( "To share proceeds I must have give money(DEBIT) permissions");
|
||||
|
||||
llOwnerSay ( "Try again");
|
||||
|
||||
llResetScript();
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
@@ -0,0 +1,58 @@
|
||||
// :CATEGORY:Vendor
|
||||
// :NAME:Vendor_System_Script
|
||||
// :AUTHOR:Kristy Fanshaw
|
||||
// :CREATED:2011-01-22 12:49:11.923
|
||||
// :EDITED:2013-09-18 15:39:09
|
||||
// :ID:949
|
||||
// :NUM:1368
|
||||
// :REV:1.0
|
||||
// :WORLD:Second Life
|
||||
// :DESCRIPTION:
|
||||
// Updater Script for Reseller vendor
|
||||
//
|
||||
// Place this script in a box you've created.
|
||||
//
|
||||
// What it does:
|
||||
//
|
||||
// 1. when rezzed next to the vendor, it will try to update the vendors URL string.
|
||||
// 2. when vendor gets the URL, the updater dies. It doesn't die until the vendor is updated.
|
||||
// :CODE:
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Copyright (c) 2008 by Kristy Fanshaw //
|
||||
|
||||
// This script is part of Vendor System. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Vendor System is free software: you can redistribute it and/or modify //
|
||||
|
||||
// it under the terms of the GNU General Public License as published by //
|
||||
|
||||
// the Free Software Foundation, either version 3 of the License, or //
|
||||
|
||||
// (at your option) any later version. //
|
||||
|
||||
// //
|
||||
|
||||
// Vendor System is distributed in the hope that it will be useful, //
|
||||
|
||||
// but WITHOUT ANY WARRANTY; without even the implied warranty of //
|
||||
|
||||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
|
||||
|
||||
// GNU General Public License for more details. //
|
||||
|
||||
// //
|
||||
|
||||
// To get a copy of the GNU General Public License, see <http://www.gnu.org/licenses/>. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
||||
string URL = "http://www.my-web.com/my-secret-webpages/my-sl-stuff/my-vendor-name/"; // Write here the URL of the page where is defined the server email address
|
||||
|
||||
string update_box = "update box name"; // Write here the name you like, but be sure the name here matches with a name in vendor script
|
||||
|
||||
integer Ch;
|
||||
@@ -0,0 +1,97 @@
|
||||
// :CATEGORY:Vendor
|
||||
// :NAME:Vendor_System_Script
|
||||
// :AUTHOR:Kristy Fanshaw
|
||||
// :CREATED:2011-01-22 12:49:11.923
|
||||
// :EDITED:2013-09-18 15:39:09
|
||||
// :ID:949
|
||||
// :NUM:1369
|
||||
// :REV:1.0
|
||||
// :WORLD:Second Life
|
||||
// :DESCRIPTION:
|
||||
// Server Script and Mailer Script for "Server Object"
|
||||
//
|
||||
// Place these scripts into a box you've created as a server prim.
|
||||
// Place the object you'd like to sell into this prim - only one object
|
||||
//
|
||||
// Server Script:
|
||||
//
|
||||
// 1. when rezzed, it will tell you it's email address.
|
||||
// 2. when this scrpt gets an email from the vendor, it gives the inventory item to buyer and asks mailer script to send a note back to vendor that the delivery is done.
|
||||
// 3. when touched by the owner, it says totalsold.
|
||||
// :CODE:
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Copyright (c) 2008 by Kristy Fanshaw //
|
||||
|
||||
// This script is part of Vendor System. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Vendor System is free software: you can redistribute it and/or modify //
|
||||
|
||||
// it under the terms of the GNU General Public License as published by //
|
||||
|
||||
// the Free Software Foundation, either version 3 of the License, or //
|
||||
|
||||
// (at your option) any later version. //
|
||||
|
||||
// //
|
||||
|
||||
// Vendor System is distributed in the hope that it will be useful, //
|
||||
|
||||
// but WITHOUT ANY WARRANTY; without even the implied warranty of //
|
||||
|
||||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
|
||||
|
||||
// GNU General Public License for more details. //
|
||||
|
||||
// //
|
||||
|
||||
// To get a copy of the GNU General Public License, see <http://www.gnu.org/licenses/>. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
||||
string my_address = "my.email@email.com"; // Write here the email, where you want to recieve the message with new server email address.
|
||||
|
||||
integer total_mailers = 5; // How many mailer scripts you have in server prim. 5 mailer scripts are Recomended min. because of llEmail function.
|
||||
|
||||
integer mailer = 1;
|
||||
|
||||
|
||||
|
||||
default
|
||||
|
||||
{
|
||||
|
||||
changed(integer change)
|
||||
|
||||
{
|
||||
|
||||
if(change && CHANGED_OWNER)
|
||||
|
||||
{
|
||||
|
||||
llSetObjectDesc("0");
|
||||
|
||||
llResetScript();
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
on_rez(integer start_parameter)
|
||||
|
||||
{
|
||||
|
||||
llOwnerSay("new email is: " + (string)llGetKey() + "@lsl.secondlife.com");
|
||||
|
||||
llEmail(my_address,llGetObjectName() , "my new email is: " + (string)llGetKey() + "@lsl.secondlife.com");
|
||||
|
||||
llOwnerSay("message with new address is sent to your email");
|
||||
|
||||
}
|
||||
|
||||
state_entry()
|
||||
|
||||
@@ -0,0 +1,42 @@
|
||||
// :CATEGORY:Vendor
|
||||
// :NAME:Vendor_System_Script
|
||||
// :AUTHOR:Kristy Fanshaw
|
||||
// :CREATED:2011-01-22 12:49:11.923
|
||||
// :EDITED:2013-09-18 15:39:09
|
||||
// :ID:949
|
||||
// :NUM:1370
|
||||
// :REV:1.0
|
||||
// :WORLD:Second Life
|
||||
// :DESCRIPTION:
|
||||
// Mailer script.
|
||||
//
|
||||
// 1. Make as many numbers of mailer sciprts you need and place them into server object.
|
||||
// 2. Name them with numbers starting from number "1".
|
||||
// 3. Don't skip any numbers: if you have 5 mailer scripts in you server object then you their names should be 1, 2, 3, 4 and 5.
|
||||
// :CODE:
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Copyright (c) 2008 by Kristy Fanshaw //
|
||||
|
||||
// This script is part of Vendor System. //
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// Vendor System is free software: you can redistribute it and/or modify //
|
||||
|
||||
// it under the terms of the GNU General Public License as published by //
|
||||
|
||||
// the Free Software Foundation, either version 3 of the License, or //
|
||||
|
||||
// (at your option) any later version. //
|
||||
|
||||
// //
|
||||
|
||||
// Vendor System is distributed in the hope that it will be useful, //
|
||||
|
||||
// but WITHOUT ANY WARRANTY; without even the implied warranty of //
|
||||
|
||||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
|
||||
|
||||
// GNU General Public License for more details. //
|
||||
|
||||
@@ -0,0 +1,7 @@
|
||||
vti_encoding:SR|utf8-nl
|
||||
vti_timelastmodified:TR|08 Sep 2013 03:49:09 -0000
|
||||
vti_extenderversion:SR|12.0.0.6211
|
||||
vti_backlinkinfo:VX|
|
||||
vti_author:SR|alien\\fred
|
||||
vti_modifiedby:SR|alien\\fred
|
||||
vti_timecreated:TR|18 Sep 2013 20:39:09 -0000
|
||||
@@ -0,0 +1,7 @@
|
||||
vti_encoding:SR|utf8-nl
|
||||
vti_timelastmodified:TR|08 Sep 2013 03:49:09 -0000
|
||||
vti_extenderversion:SR|12.0.0.6211
|
||||
vti_backlinkinfo:VX|
|
||||
vti_author:SR|alien\\fred
|
||||
vti_modifiedby:SR|alien\\fred
|
||||
vti_timecreated:TR|18 Sep 2013 20:39:09 -0000
|
||||
@@ -0,0 +1,7 @@
|
||||
vti_encoding:SR|utf8-nl
|
||||
vti_timelastmodified:TR|08 Sep 2013 03:49:09 -0000
|
||||
vti_extenderversion:SR|12.0.0.6211
|
||||
vti_backlinkinfo:VX|
|
||||
vti_author:SR|alien\\fred
|
||||
vti_modifiedby:SR|alien\\fred
|
||||
vti_timecreated:TR|18 Sep 2013 20:39:09 -0000
|
||||
@@ -0,0 +1,7 @@
|
||||
vti_encoding:SR|utf8-nl
|
||||
vti_timelastmodified:TR|08 Sep 2013 03:49:09 -0000
|
||||
vti_extenderversion:SR|12.0.0.6211
|
||||
vti_backlinkinfo:VX|
|
||||
vti_author:SR|alien\\fred
|
||||
vti_modifiedby:SR|alien\\fred
|
||||
vti_timecreated:TR|18 Sep 2013 20:39:09 -0000
|
||||
@@ -0,0 +1,12 @@
|
||||
<Project name="Vendor_System_Script" guid="D8A58BB8-6C00-1014-B904-200204C60A89">
|
||||
<Object name="Object" guid="D8A58CA5-6C00-1014-B904-200204C60A89">
|
||||
<Script name="Vendor_System_Script_1.lsl" guid="D8A5ED3F-6C00-1014-B904-200204C60A89">
|
||||
</Script>
|
||||
<Script name="Vendor_System_Script_2.lsl" guid="D8A60CC5-6C00-1014-B904-200204C60A89">
|
||||
</Script>
|
||||
<Script name="Vendor_System_Script_3.lsl" guid="D8A626D4-6C00-1014-B904-200204C60A89">
|
||||
</Script>
|
||||
<Script name="Vendor_System_Script_4.lsl" guid="D8A63338-6C00-1014-B904-200204C60A89">
|
||||
</Script>
|
||||
</Object>
|
||||
</Project>
|
||||
@@ -0,0 +1,6 @@
|
||||
vti_encoding:SR|utf8-nl
|
||||
vti_timelastmodified:TR|17 Aug 2013 23:32:39 -0000
|
||||
vti_extenderversion:SR|12.0.0.0
|
||||
vti_cacheddtm:TX|17 Aug 2013 23:32:39 -0000
|
||||
vti_filesize:IR|588
|
||||
vti_backlinkinfo:VX|
|
||||
Reference in New Issue
Block a user