Difference between revisions of "User:Kristy Fanshaw/Shorter Vendor System Script"
Jump to navigation
Jump to search
| Line 304: | Line 304: | ||
# when rezzed, it will tell you it's email address. | # when rezzed, it will tell you it's email address. | ||
# 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. | # 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. | ||
# whne touched, it says totalsold | |||
<lsl>//////////////////////////////////////////////////////////////////////////////////////////////// | <lsl>//////////////////////////////////////////////////////////////////////////////////////////////// | ||
// Copyright (c) 2008 by Kristy Fanshaw // | // Copyright (c) 2008 by Kristy Fanshaw // | ||
| Line 329: | Line 330: | ||
changed(integer change) | changed(integer change) | ||
{ | { | ||
if(change & CHANGED_OWNER) | if(change && CHANGED_OWNER) | ||
{ | { | ||
llSetObjectDesc("0"); | |||
llResetScript(); | llResetScript(); | ||
} | } | ||
| Line 341: | Line 343: | ||
} | } | ||
state_entry() | state_entry() | ||
{ | { | ||
llSetObjectName(llGetInventoryName(INVENTORY_OBJECT,0)); | llSetObjectName(llGetInventoryName(INVENTORY_OBJECT,0)); | ||
llSetText(llGetObjectName() | llSetText(llGetObjectName(),<1,1,1>,1); | ||
totalsold = (integer)llGetObjectDesc(); | |||
llOwnerSay("new email is: " + (string)llGetKey() + "@lsl.secondlife.com"); | llOwnerSay("new email is: " + (string)llGetKey() + "@lsl.secondlife.com"); | ||
llEmail(my_address,llGetObjectName() , "my 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"); | llOwnerSay("message with new address is sent to your email"); | ||
llSetTimerEvent(5.0); | llSetTimerEvent(5.0); | ||
} | } | ||
timer() | timer() | ||
| Line 366: | Line 369: | ||
mailer = 1; | mailer = 1; | ||
} | } | ||
totalsold = totalsold + 1; | |||
llGetNextEmail("", ""); | llGetNextEmail("", ""); | ||
} | |||
touch_start(integer total_number) | |||
{ | |||
if (llDetectedOwner(0) == llGetOwner()) | |||
{ | |||
llOwnerSay((string)totalsold +" units have been sold since server update. "); | |||
} | |||
else | |||
{ | |||
llInstantMessage(llDetectedKey(0), "please don't touch"); | |||
} | |||
} | } | ||
}</lsl> | }</lsl> | ||
| Line 401: | Line 416: | ||
{ | { | ||
llEmail(msg,"delivered", (string)num); | llEmail(msg,"delivered", (string)num); | ||
} | } | ||
} | } | ||
}</lsl>}} | }</lsl>}} | ||
Revision as of 03:37, 13 January 2009
| LSL Portal | Functions | Events | Types | Operators | Constants | Flow Control | Script Library | Categorized Library | Tutorials |
- Click Here To see my main page for more scripts, if i'll make any :))
- Vendor System Script :: Same script with HTTP check
Copying Permission
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/>.