diff --git a/Give_All_NoteCards_To_Owner/Give_All_NoteCards_To_Owner.sol b/Give_All_NoteCards_To_Owner/Give_All_NoteCards_To_Owner.sol new file mode 100644 index 00000000..8a49279d --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_NoteCards_To_Owner.sol @@ -0,0 +1,3 @@ + + + diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Give_All_Notecards_To_Owner.prj b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Give_All_Notecards_To_Owner.prj new file mode 100644 index 00000000..eb046d9c --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Give_All_Notecards_To_Owner.prj @@ -0,0 +1,14 @@ + + + + + + + + + + + + diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Frederix b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Frederix new file mode 100644 index 00000000..677357f3 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Frederix @@ -0,0 +1 @@ +notecard \ No newline at end of file diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Frederix1 b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Frederix1 new file mode 100644 index 00000000..677357f3 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Frederix1 @@ -0,0 +1 @@ +notecard \ No newline at end of file diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Resident b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Resident new file mode 100644 index 00000000..02bbc812 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Resident @@ -0,0 +1,15 @@ +// :SHOW: +// :CATEGORY:Mailer +// :NAME:Give_All_NoteCards_To_Owner +// :AUTHOR:Ferd Frederix +// :KEYWORDS: +// :CREATED:2016-06-01 10:23:30 +// :EDITED:2016-06-01 09:23:30 +// :ID:1107 +// :NUM:1897 +// :REV:1 +// :WORLD:Second Life +// :DESCRIPTION: +// Sample Noatecard +// :CODE: +notecard diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Resident1 b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Resident1 new file mode 100644 index 00000000..ae773c2f --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Ferd Resident1 @@ -0,0 +1,15 @@ +// :SHOW: +// :CATEGORY:Mailer +// :NAME:Give_All_NoteCards_To_Owner +// :AUTHOR:Ferd Frederix +// :KEYWORDS: +// :CREATED:2016-06-01 10:23:41 +// :EDITED:2016-06-01 09:23:41 +// :ID:1107 +// :NUM:1898 +// :REV:1 +// :WORLD:Second Life +// :DESCRIPTION: +// Sample Notecard +// :CODE: +notecard diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Give_To_Individuals.lsl b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Give_To_Individuals.lsl new file mode 100644 index 00000000..8e45d929 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Give_To_Individuals.lsl @@ -0,0 +1,53 @@ +// :SHOW:1 +// :CATEGORY:Mailbox +// :NAME:Give_All_NoteCards_To_Owner +// :AUTHOR:Ferd Frederix +// :KEYWORDS: +// :CREATED:2016-06-01 10:19:38 +// :EDITED:2016-06-01 09:23:07 +// :ID:1107 +// :NUM:1895 +// :REV:1 +// :WORLD:Second Life +// :DESCRIPTION: +// Gives one or more notcards to whoever touches it, by name. Notecards have to be in Legacy name format such as 'Ferd Frederix', or 'Ferd Frederix1', 'Ferd Frederix2'. Not the 'Ferd.Frederix' style. +// :CODE: + +// give notecard by Legacy name +// i.e. "John Doe" or if lastname Resident "John Resident" + +integer debug = FALSE; + +default +{ + touch_start(integer N) + { + integer count = llGetInventoryNumber(INVENTORY_NOTECARD); // 1 or more? + + while (count > 0) + { + // notecard indexes start at number 0, not 1, so we subtract 1 + string notecardname = llGetInventoryName(INVENTORY_NOTECARD,count-1); + + // name is the legacy name, i.e. "John Doe" or if lastname Resident "John Resident" + string avatarName= llDetectedName(0); + + if (debug) + avatarName = "Ferd Resident"; + + // Returns an integer that is the index of the first instance of pattern in source. + // Function: integer llSubStringIndex( string source, string pattern ); + // src (or notecard) = Ferd.Fredrix03, pattern = Ferd.Frederix, if it matches == 0 + if (llSubStringIndex(notecardname, avatarName) == 0) + { + if (debug) llSay(0,"Giving " + notecardname); + llGiveInventory(llDetectedKey(0), notecardname); + if (!debug) + llRemoveInventory(notecardname); + } + + + count--; // count dowb to zero + } + } +} diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Give_to_Owner_Only.lsl b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Give_to_Owner_Only.lsl new file mode 100644 index 00000000..bb104855 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Give_to_Owner_Only.lsl @@ -0,0 +1,63 @@ +// :SHOW:1 +// :CATEGORY:Maibox +// :NAME:Give_All_NoteCards_To_Owner +// :AUTHOR:Ferd Frederix +// :KEYWORDS: +// :CREATED:2016-06-01 10:19:39 +// :EDITED:2016-06-01 09:23:07 +// :ID:1107 +// :NUM:1896 +// :REV:1 +// :WORLD:Second Life, Opensim +// :DESCRIPTION: +Gives one or more notcards to the owner when they touch it in a folder with todays date. Anyone can drop a notecard or other object into the prim by holding ctrl and dragging an item onto it. +// Added scripts will not run. +// :CODE: + +list names; // a list of items we wish to give to owner + +default +{ + + state_entry() + { + llAllowInventoryDrop(TRUE); + } + + touch_start(integer N) + { + // give only to owner + if (llDetectedKey(0)== llGetOwner()) + { + integer count = llGetInventoryNumber(INVENTORY_ALL); // 1 or more? + + while (count > 0) + { + // notecard indexes start at number 0, not 1, so we subtract 1 + string notecardname = llGetInventoryName(INVENTORY_ALL,count-1); + if (notecardname != llGetScriptName()) + { + names += [notecardname]; + } + count --; + } + + string folder = llGetDate(); + llGiveInventoryList(llDetectedKey(0),folder, names); + + count = llGetInventoryNumber(INVENTORY_ALL); // 1 or more? + + while (count > 0) + { + // notecard indexes start at number 0, not 1, so we subtract 1 + string notecardname = llGetInventoryName(INVENTORY_ALL,count-1); + if (notecardname != llGetScriptName()) + { + llSay(0,"Del " + notecardname); + lRemoveInventory(notecardname); + } + count--; + } + } + } +} diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Notecard.txt b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Notecard.txt new file mode 100644 index 00000000..677357f3 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Notecard.txt @@ -0,0 +1 @@ +notecard \ No newline at end of file diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Notecard2.txt b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Notecard2.txt new file mode 100644 index 00000000..677357f3 --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Notecard2.txt @@ -0,0 +1 @@ +notecard \ No newline at end of file diff --git a/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Somebody Else b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Somebody Else new file mode 100644 index 00000000..1dea706b --- /dev/null +++ b/Give_All_NoteCards_To_Owner/Give_All_Notecards_To_Owner/Object/Somebody Else @@ -0,0 +1,15 @@ +// :SHOW: +// :CATEGORY:Mailer +// :NAME:Give_All_NoteCards_To_Owner +// :AUTHOR:Ferd Frederix +// :KEYWORDS: +// :CREATED:2016-06-01 10:23:53 +// :EDITED:2016-06-01 09:23:53 +// :ID:1107 +// :NUM:1899 +// :REV:1 +// :WORLD:Second Life +// :DESCRIPTION: +// Sample Notecard +// :CODE: +notecard