removed useless _ folders

SL_Email_Terminal/SL_Email_Terminal.sol

@@ -0,0 +1,3 @@
+<Solution name="SL_Email_Terminal">
+<Project name="SL_Email_Terminal" path="SL_Email_Terminal\SL_Email_Terminal.prj" active="true"/>
+</Solution>

SL_Email_Terminal/SL_Email_Terminal/Object/SL_Email_Terminal_1.lsl

@@ -0,0 +1,294 @@
+// :CATEGORY:Email
+// :NAME:SL_Email_Terminal
+// :AUTHOR:Doc Nerd
+// :CREATED:2010-01-10 05:20:56.000
+// :EDITED:2013-09-18 15:39:03
+// :ID:784
+// :NUM:1072
+// :REV:1.0
+// :WORLD:Second Life
+// :DESCRIPTION:
+// Instructions
+// 
+//     * Open your inventory
+//     * Choose New Script and rename it email script
+//     * Copy the script below, doubleclick the email script in SL and paste
+//     * Click Build on the bottom bar and the Create in the menu
+//     * Use your magic wand to place an object on the ground
+//     * Right click the object and choose Edit
+//     * Rename the object My Emailer
+//     * Drag your email script into the object
+//     * Right click the object and choose Take
+//     * Just drag the My Emailer object out and touch it to send emails 
+// :CODE:
+//...........One Way Email Terminal..........
+
+//.......Originally written by Doc Nerd......
+
+// This Script is distributed under the terms 
+
+// of the modified BSD license, reproduced at 
+
+// the end of the script. The license and
+
+// acknowledgments listed must be included if
+
+// this script is redistributed in a 
+
+// non-readable or non-modifiable form.
+
+
+
+
+
+//..........Variable Block..........
+
+key senderKey;
+
+string senderName;
+
+string eMail;
+
+string subject;
+
+string bodyText;
+
+list sendButtons = ["Yes", "No"];
+
+list writeButtons;
+
+string removeButton;
+
+integer i;
+
+
+
+
+
+//..........Modules Block..........
+
+
+
+//..........Modules for writing each part of email..........
+
+writeAddress()
+
+{
+
+    llListen(0, "", senderKey, ""); //Listen to what the user says.
+
+    llSay(0, "Please say the address of whom you are sending your email."); //Tell them what to say.
+
+    llSetTimerEvent(30); //Give them 30 seconds to say it.
+
+}
+
+
+
+writeSubject()
+
+{
+
+    llListen(0, "", senderKey, ""); //Listen to what the user says.
+
+    llSay(0, "Please say the subject of your email."); //Tell them what to say.
+
+    llSetTimerEvent(30); //Give them 30 seconds to say it.
+
+}
+
+
+
+writeBody()
+
+{
+
+    llListen(0, "", senderKey, ""); //Listen to what the user says.
+
+    llSay(0, "Please say the message you would like to send."); //Tell them what to say.
+
+    llSetTimerEvent(120); //Give them 120 seconds (2 minutes) to say it.
+
+}
+
+
+
+
+
+//..........Modules to remove buttons already used in llDialog menu..........
+
+removeAddress()
+
+{
+
+    i = llListFindList(writeButtons, ["Address"]); //Find "Address" button in list.
+
+    writeButtons = llDeleteSubList(writeButtons, i, i); //Remove it where it's found.
+
+}
+
+
+
+removeSubject()
+
+{
+
+    i = llListFindList(writeButtons, ["Subject"]); //Find "Subject" button in list.
+
+    writeButtons = llDeleteSubList(writeButtons, i, i); //Remove it where it's found.
+
+
+
+}
+
+
+
+removeMessage()
+
+{
+
+    i = llListFindList(writeButtons, ["Message"]); //Find "Message" button in list.
+
+    writeButtons = llDeleteSubList(writeButtons, i, i); //Remove it where it's found.
+
+}
+
+
+
+
+
+//..........Running script block..........
+
+default
+
+{
+
+    state_entry()
+
+    {
+
+        llSetObjectName("Nerd Gadgets & Scripting Emailer 100"); //Makes sure the object is called the Nerd Gadgets Emailer 100.
+
+        writeButtons = ["Address", "Subject", "Message"]; //Sets the llDialog buttons.
+
+        llListen(67895, "", senderKey, "Yes"); //Activate listeners.
+
+        llListen(67895, "", senderKey, "No");
+
+    }
+
+
+
+    touch_start(integer total_number)
+
+    {
+
+        senderKey = llDetectedKey(0); //Detects who's touching it, to get a raw key.
+
+        senderName = llKey2Name(llDetectedKey(0)); //Detects who's touching it, to get a name.
+
+        llDialog(senderKey, "Greetings " + senderName + ", would you like to send an email?", sendButtons, 67895); //Do you like me? Y/N
+
+    }
+
+    
+
+    listen(integer channel, string name, key id, string message)
+
+    {
+
+        if(message == "Yes") //Starts email writing process.
+
+        {
+
+            llSay(0, "Currently being used by " + senderName + "."); //Tells area who's using terminal.
+
+            state emailer;
+
+        }
+
+        if(message == "No") //Thank you, come again.
+
+        {
+
+            llSay(0, "Thank you " + senderName + ", for using the " + llGetObjectName());
+
+        }
+
+    }
+
+}
+
+
+
+state emailer
+
+{
+
+    state_entry()
+
+    {
+
+        if(writeButtons == []) //Check to see if there's anything left to write in the email.
+
+        {
+
+            state sendMail; //If not, move to sending module.
+
+        }
+
+        llListen(67895, "", senderKey, "Address"); //Activate listeners.
+
+        llListen(67895, "", senderKey, "Subject");
+
+        llListen(67895, "", senderKey, "Message");
+
+        llSetTimerEvent(30); //Gives user 30 seconds to choose a part to write...
+
+        llSay(0, "You have 30 seconds to choose."); //Informs user they have 30 seconds to choose.
+
+        llSetText("In use, please wait.", <255,0,0>, .1); //Gives visual cue to others that no one else can use it right now.
+
+        llDialog(senderKey, "What part of your message would you like to write?", writeButtons, 67895); //Selection button GUI.
+
+    }
+
+    
+
+    listen(integer channgel, string name, key id, string message)
+
+    {
+
+        if(message == "Address") //Select "Address" button.
+
+        {
+
+            state addressWrite; //Enter address writing state.
+
+        }
+
+        else if(message == "Subject") //Select "Subject" button.
+
+        {
+
+            state subjectWrite; //Enter subject writing state.
+
+        }
+
+        else if(message == "Message") //Select "Message" button.
+
+        {
+
+            state messageWrite; //SEnter message writing state.
+
+        }
+
+    }
+
+    
+
+    timer() //After 30 seconds are up, time out, and return to default state.
+
+    {
+
+        llSetTimerEvent(0);

SL_Email_Terminal/SL_Email_Terminal/SL_Email_Terminal.prj

@@ -0,0 +1,6 @@
+<Project name="SL_Email_Terminal" guid="D6B27315-6C00-1014-B904-200204C60A89">
+	<Object name="Object" guid="D6B273EE-6C00-1014-B904-200204C60A89">
+		<Script name="SL_Email_Terminal_1.lsl" guid="D6B2DABC-6C00-1014-B904-200204C60A89">
+		</Script>
+	</Object>
+</Project>