Difference between revisions of "Basic Notecard Reader"

From Second Life Wiki
Jump to navigation Jump to search
m (dupl. tag)
 
(3 intermediate revisions by 3 users not shown)
Line 8: Line 8:
==The Script==
==The Script==


<lsl>
<source lang="lsl2">
// ********************************************************************
string     NOTECARD = "notecard";
//
// Base Notecard reader
//
// by SimonT Quinnell
//
//  NOTE.  This treats lines starting with '#' in the notecard as a comment
//
// ********************************************************************
 
// ********************************************************************
// CONSTANTS
// ********************************************************************
 
string NOTECARD = "notecard";
 
 
// ********************************************************************
// Variables
// ********************************************************************
 
 
// internals for reading notecards
string      strNotecard;
integer    intLine1;
integer    intLine1;
key        keyConfigQueryhandle;                  
key        keyConfigQueryhandle;
key        keyConfigUUID;
key        keyConfigUUID;


default
default
{          
{
     state_entry()
     state_entry()
     {
     {
Line 49: Line 23:
             state main;
             state main;
         }
         }
         else
         keyConfigQueryhandle = llGetNotecardLine(NOTECARD, intLine1);
        {
        keyConfigUUID = llGetInventoryKey(NOTECARD);
            keyConfigQueryhandle = llGetNotecardLine(NOTECARD, intLine1 = 0);
            keyConfigUUID = llGetInventoryKey(NOTECARD);
        }
     }
     }
   
 
     dataserver(key keyQueryId, string strData)
     dataserver(key keyQueryId, string strData)
     {
     {
         if (keyQueryId == keyConfigQueryhandle)
         if (keyQueryId == keyConfigQueryhandle)
         {
         {
             if (strData != EOF)
             if (strData == EOF)
             {             
                state main;
                string strToken;
 
                strData = llStringTrim(strData, STRING_TRIM_HEAD);      // Trim Whitespace
             keyConfigQueryhandle = llGetNotecardLine(NOTECARD, ++intLine1);
                if (llGetSubString (strData, 0, 0) != "#")              // is it a comment?
 
                {
            strData = llStringTrim(strData, STRING_TRIM_HEAD);      // Trim Whitespace; (not mandatory; if you use a space as marker you must erase this line
                    // OK .. now we do somthing in here with our notecard
            if (llGetSubString (strData, 0, 0) != "#")              // is it a comment?
                }
                keyConfigQueryhandle = llGetNotecardLine(strNotecard, ++intLine1);
            }
            else
             {
             {
                 // Finished reasding the notecard
                 // OK .. now we do somthing in here with our notecard
                state main;
             }
             }
         }          
         }
     }
     }
}
}


state main
state main
Line 84: Line 49:
     state_entry()
     state_entry()
     {
     {
         //
         // rest of script execution here
     }
     }
   
     changed(integer intChange)
     changed(integer intChange)        
     {
     {
         if (intChange & CHANGED_INVENTORY)
         if (intChange & CHANGED_INVENTORY)
         {  // If the notecard has changed, then reload the notecard
         {  // If the notecard has changed, then reload the notecard
             if (keyConfigUUID != llGetInventoryKey(NOTECARD))
             if (keyConfigUUID != llGetInventoryKey(NOTECARD))
            {
                 llResetScript();
                 state default;
            }
         }
         }
     }
     }
}
}
</lsl>
</source>


==See also==
==See also==
*[[ Script_Library | Script Library ]]
*[[ Script_Library | Script Library ]]

Latest revision as of 13:24, 24 March 2016

Basic Notecard Reader

Introduction

Quite often i read in configuration settings from a notecard. I thought i should stick up the core part of my notecard reading script. It's not exactly rocket science but hoepfully it's useful.

The Script

string      NOTECARD = "notecard";
integer     intLine1;
key         keyConfigQueryhandle;
key         keyConfigUUID;

default
{
    state_entry()
    {
        if (llGetInventoryType(NOTECARD) == INVENTORY_NONE)
        {
            llSay(DEBUG_CHANNEL, "The notecard '"+NOTECARD+"'  is missing!");
            state main;
        }
        keyConfigQueryhandle = llGetNotecardLine(NOTECARD, intLine1);
        keyConfigUUID = llGetInventoryKey(NOTECARD);
    }

    dataserver(key keyQueryId, string strData)
    {
        if (keyQueryId == keyConfigQueryhandle)
        {
            if (strData == EOF)
                state main;

            keyConfigQueryhandle = llGetNotecardLine(NOTECARD, ++intLine1);

            strData = llStringTrim(strData, STRING_TRIM_HEAD);      // Trim Whitespace; (not mandatory; if you use a space as marker you must erase this line
            if (llGetSubString (strData, 0, 0) != "#")              // is it a comment?
            {
                // OK .. now we do somthing in here with our notecard
            }
        }
    }
}

state main
{
    state_entry()
    {
        // rest of script execution here
    }
    changed(integer intChange)
    {
        if (intChange & CHANGED_INVENTORY)
        {   // If the notecard has changed, then reload the notecard
            if (keyConfigUUID != llGetInventoryKey(NOTECARD))
                llResetScript();
        }
    }
}

See also