move IT Home Base

Besucherzähler mit E-Mail Benachrichtigung

anonymous@undisclosed.example.com (Anonymous) — Fri, 29 Nov 2019 10:58:38 +0000

Besucherzähler mit E-Mail Benachrichtigung

Damit dieses Script funktionieren kann muss zuerst in der OpenSIM-Konfigurationsdatei opensim.ini die E-Mail Funktion im Abschnitt SMTP eingeschaltet und konfiguriert werden.

// Besucherzähler mit E-Mail Benachrichtung
// von Blub Blinker, www.swiss-sl.ch

float range = 100; // sucht im Radius von 100 Metern nach Besuchern
float rate = 10.0; // Zeitabstand in der erneut gesucht wird, 1,0 = 1 Sekunde

// E-Mail Adresse auf die eigene anpassen
string email_address = "adresse@domain.xyz";

// Name der zu kontrollierenden Region
// Die versandte E-Mail beinhaltet die Koordinaten
string location_name = "OpenSIM-Region";

list single_name_list;
list visitor_list;

integer isNameOnList( string name )
{
list single_name_list;
single_name_list += name;

return (-1 != llListFindList( visitor_list, single_name_list ) );
}

sendEmail()
{
string csv = llList2CSV( visitor_list );
llEmail( email_address, "Visitor List: " + location_name, csv );
}

resetList()
{
single_name_list = llDeleteSubList(single_name_list, 0, llGetListLength(single_name_list));
llSay( 0, "Reset abgeschlossen");
}

// Hilfe Befehle
sayHelp( integer is_owner )
{
if( is_owner )
{
llSay( 0, "Dieses Objekt speichert die Namen von jedem Avatars der" );
llSay( 0, "in den Bereich von "+ (string)((integer)range) + " Metern kommt." );
llSay( 0, "Kommandos die der Besitzer sagen kann:" );
llSay( 0, "'help' - Zeigt diese Anleitung" );
llSay( 0, "'say list' - Zeigt die Namen aller Avatare auf der Liste");
llSay( 0, "'reset list' - Loescht die Namen auf der Liste" );
llSay( 0, "' email list' - Sendet die Namen auf der Liste als E-Mail" );
}
else
{
llSay( 0, "Sorry, nur der Besitzer kann editieren." );
}
}

// Script-Start
default
{
state_entry()
{
llSay(0, "Besucherzaehler wurde gestartet.");
llSay(0, "Der Besitzer kann mit 'help' eine Kurzanleitung anfordern.");
llSensorRepeat( "", "", AGENT, range, TWO_PI, rate );
llListen(0, "", llGetOwner(), "");

// Wechsle hier das Zeitintervall in der die E-Mail Benachrichtigung zugesandt werden soll (Standard ist 60x60 Sekunden)
// = 3600 Sekunden = 1x pro Stunde
llSetTimerEvent( 60 * 60 );
}

// Sendet die E-Mail im oben angegebenem Zeitintervall
timer()
{
sendEmail();
resetList();

}

// Gibt den Hilfe-Befehl aus beim anklicken
touch_start( integer num_detected )
{
integer i;
for( i = 0; i < num_detected; i++ )
{
sayHelp( llDetectedKey(i) == llGetOwner() );
}
}

// Erfasst die Avatare mit Zeitstempel
sensor( integer number_detected )
{
integer i;
for( i = 0; i < number_detected; i++ )
{

// Den Eigentümer nicht mitzählen
if( llDetectedKey( i ) != llGetOwner() )
{
string detected_name = llDetectedName( i );
if( isNameOnList( detected_name ) == FALSE ) // Ja oder Nein, TRUE oder FALSE
{
float seconds = llGetWallclock();
float minutes = seconds / 60.0;
float hours = minutes / 60.0;
integer hours_int = (integer) hours;
integer minutes_int = ((integer)minutes) % 60;
if( minutes_int < 10 )
{
visitor_list += (string) hours_int + ":0" + (string) minutes_int;
}
else
{
visitor_list += (string) hours_int + ":" + (string) minutes_int;
}

visitor_list += detected_name;
}
}
}
}

// Besitzer-Befehle
listen( integer channel, string name, key id, string message )
{
if( id != llGetOwner() )
{
return;
}

if( message == "help" ) // Tippe im Chat /0 help und Du erhälst Hilfe zu den Befehlen
{
sayHelp( TRUE );
}
else
if( message == "say list" ) // Tippe im Chat /0 say list und Du erhälst eine Liste aller Avatare
{
llSay( 0, "Avatar-Liste:" );
integer len = llGetListLength( visitor_list );
integer i;
for( i = 0; i < len; i++ )
{
llSay( 0, llList2String(visitor_list, i) );
}
llSay( 0, "Gesamt = " + (string)len );
}
else
if( message == "email list" )
{
sendEmail();
llSay(0, "E-Mail wird versendet.");

}

else
if( message == "reset list" ) // Tippe im Chat /0 reset list um die Liste zurückzusetzen
{
visitor_list = llDeleteSubList(visitor_list, 0, llGetListLength(visitor_list));
llSay( 0, "Reset erfolgreich.");
}
}
}

E-Mail

anonymous@undisclosed.example.com (Anonymous) — Fri, 29 Nov 2019 10:58:39 +0000

E-Mail

Damit dieses Script funktionieren kann muss zuvor die E-Mail Funktion in der Konfigurationsdatei opensim.ini eingeschaltet und konfiguriert werden.

string email_address = "adresse@domain.xyz"; // who will receive the messages
string hname = "User Name"; // name that will be displayed in hover text as receiver of mail
string date;
string name;
string sim;
default
{
    state_entry() {

        //Send an email to a normal email account
        llSetText("click to send " + hname + " an email",<1,1,1>,1);
        llEmail( email_address, "Initializing Email Module", "[STARTUP COMPLETE]");
    }

    touch_start( integer num_detected ) {
        integer i = 0;
        date = llGetDate();
        name = llDetectedName(i);
        sim = llGetRegionName();

        // Send another email, telling who touched the prim.
        do
            llEmail( email_address, "Prim Touched", "I was touched by: " + llDetectedName(i) + "\nKey: " + (string) llDetectedKey(i) + "\n On the Following Date: " + date);
        while(++i < num_detected);
        llSay(0,"------------------------>");
        llSay(0,"E-Mail sent from " + name + "@" + sim + ".DOMAIN");
        llSay(0,"------------------------>");
        llPlaySound("Boing", 1.0);
    }
}

Briefkasten

anonymous@undisclosed.example.com (Anonymous) — Fri, 29 Nov 2019 10:58:39 +0000

Briefkasten

Per Notecard eine Nachricht hinterlassen die per E-Mail zugestellt wird.

default 
{ 
state_entry() 
{ 
llSetText("Bitte ziehe Deine Nachricht von Deinem Inventar auf den Briefkasten",<1,1,1>,1);
llAllowInventoryDrop(TRUE); 
llSay(0, "Please drag your Notecard from your Inventory to the Mailbox."); 
} 
changed(integer mask) 
{ 
if(mask & (CHANGED_ALLOWED_DROP | CHANGED_INVENTORY)) 
llWhisper(0, "Thank you for submitting your Notecard !
Danke fuer Deine Nachricht !"); 
integer count = llGetInventoryNumber(INVENTORY_NOTECARD);
llInstantMessage(llGetOwner(), "Sie haben "+(string) count +" neue Nachrichten");
llEmail("adresse@domain.xyz", "E-Mail von OpenSim", "Sie haben "+(string) count +" neue Nachrichten");

} 
}

Pacman

anonymous@undisclosed.example.com (Anonymous) — Fri, 29 Nov 2019 10:58:41 +0000

Pacman

Game

// open pacman game server script by kefcom belgium (kefcom@hotmail.com)

string currentplayer;
integer score;
integer maxscore;
integer timesplayed;
integer timecounter;
string playername1;
string playername2;
string playername3;
string playername4;
string playername5;
integer playerscore1;
integer playerscore2;
integer playerscore3;
integer playerscore4;
integer playerscore5;
integer maxtime;

default
{
    state_entry()
    {
 
  //////////////////////////////////////////////////////////////////////////////////////
        maxscore = 137; //change this value to the number of balls you have on the field
        maxtime = 500;
/////////////////////////////////////////////////////////////////////////////////////
 
        playername1 = "nobody";
        playername2 = "nobody";
        playername3 = "nobody";
        playername4 = "nobody";
        playername5 = "nobody";
        playerscore1 = 300;
        playerscore2 = 300;
        playerscore3 = 300;
        playerscore4 = 300;
        playerscore5 = 300;
        timesplayed = 0;
        score = 0;
        llSetText("Game Server", <1,1,1>,1.0);
        llListen(1966, "","","");
    }
   
    listen( integer channel, string name, key id, string msg)
    {
        if(msg=="STOP")
        {
            llSetTimerEvent(0);
            llSay(0, "Game stopped!");
            timecounter = 0;
            score = 0;
            currentplayer = "nobody";
            llSetText("Game Server, click for stats", <1,1,1>,1.0);
        }
        if(msg=="START")
        {
            score = 0;
            llSetText("Score: " + (string) score, <1,1,1>, 1.0);
            currentplayer = name;
            timecounter = 0;
            timesplayed = timesplayed + 1;
            llSetTimerEvent(1);
        }
        if(msg=="POINTS!")
        {
            score = score + 1;
            llSetText("Score: " + (string) score, <1,1,1>, 1.0);
            if(score >= maxscore)
            {
                //GAME OVER!
                llShout(0, "Game over");
                llSetTimerEvent(0);
                llShout(0, "You needed " + (string) timecounter + " Seconds to complete the game!");
                llSetText("Game Server, Click me for stats", <1,1,1>, 1.0);
               
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// CALCULATE PLACE IN TOP 5 ////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////
               
if(timecounter < playerscore5)
{
    if(timecounter < playerscore4)
    {
        if(timecounter < playerscore3)
        {
            if(timecounter < playerscore2)
            {
                if(timecounter < playerscore1)
                {
                    //first place
                    playerscore5 = playerscore4;
                    playerscore4 = playerscore3;
                    playerscore3 = playerscore2;
                    playerscore2 = playerscore1;
                    playerscore1 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = playername3;
                    playername3 = playername2;
                    playername2 = playername1;
                    playername1 = currentplayer;
               
                    llSay(0, "You are in first place on the scoreboard!");
                }else{
                    //second place
                    playerscore5 = playerscore4;
                    playerscore4 = playerscore3;
                    playerscore3 = playerscore2;
                    playerscore2 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = playername3;
                    playername3 = playername2;
                    playername2 = currentplayer;
               
                    llSay(0, "You are in second place on the scoreboard!");                                  }
            }else{
                    //third place
                    playerscore5 = playerscore4;
                    playerscore4 = playerscore3;
                    playerscore3 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = playername3;
                    playername3 = currentplayer;
               
                    llSay(0, "You are in third place on the scoreboard!");                 
            }
        }else{
                    //fourth place
                    playerscore5 = playerscore4;
                    playerscore4 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = currentplayer;
               
                    llSay(0, "You are in fourth place on the scoreboard!");                 
        }
    }else{
                    //fifth place
                    playerscore5 = timecounter;
                   
                    playername5 = currentplayer;
               
                    llSay(0, "You are in fifth place on the scoreboard!");                 
    }
}else{
    llSay(0, "You were not fast enough to get on the scoreboard");
}
               
               
               
               
               
               
            }
        }
    }
   
    touch_start(integer numdetected)
    {
        //TYPE SCORE LIST!!!
        llSay(0, "SCORE LIST:");
        llSay(0, "1. " + playername1 + " - " + (string) playerscore1 + " seconds.");
        llSay(0, "2. " + playername2 + " - " + (string) playerscore2 + " seconds.");
        llSay(0, "3. " + playername3 + " - " + (string) playerscore3 + " seconds.");
        llSay(0, "4. " + playername4 + " - " + (string) playerscore4 + " seconds.");
        llSay(0, "5. " + playername5 + " - " + (string) playerscore5 + " seconds.");
        llSay(0, "Game has been played " + (string) timesplayed + " times since reset");
    }
   
    timer()
    {
        timecounter = timecounter + 1;
        if(timecounter >= maxtime)
        {
            llShout(1966, "STOP");
            llSay (0, "Game over due to timeout...");
            llSetTimerEvent(0);
            llSetText("Game Server, Touch for stats", <1,1,1>, 1.0);
        }
    }
   
}

Yellow Balls

// open pacman game server script by kefcom belgium (kefcom@hotmail.com)

string currentplayer;
integer score;
integer maxscore;
integer timesplayed;
integer timecounter;
string playername1;
string playername2;
string playername3;
string playername4;
string playername5;
integer playerscore1;
integer playerscore2;
integer playerscore3;
integer playerscore4;
integer playerscore5;
integer maxtime;

default
{
    state_entry()
    {
 
  //////////////////////////////////////////////////////////////////////////////////////
        maxscore = 137; //change this value to the number of balls you have on the field
        maxtime = 500;
/////////////////////////////////////////////////////////////////////////////////////
 
        playername1 = "nobody";
        playername2 = "nobody";
        playername3 = "nobody";
        playername4 = "nobody";
        playername5 = "nobody";
        playerscore1 = 300;
        playerscore2 = 300;
        playerscore3 = 300;
        playerscore4 = 300;
        playerscore5 = 300;
        timesplayed = 0;
        score = 0;
        llSetText("Game Server", <1,1,1>,1.0);
        llListen(1966, "","","");
    }
   
    listen( integer channel, string name, key id, string msg)
    {
        if(msg=="STOP")
        {
            llSetTimerEvent(0);
            llSay(0, "Game stopped!");
            timecounter = 0;
            score = 0;
            currentplayer = "nobody";
            llSetText("Game Server, click for stats", <1,1,1>,1.0);
        }
        if(msg=="START")
        {
            score = 0;
            llSetText("Score: " + (string) score, <1,1,1>, 1.0);
            currentplayer = name;
            timecounter = 0;
            timesplayed = timesplayed + 1;
            llSetTimerEvent(1);
        }
        if(msg=="POINTS!")
        {
            score = score + 1;
            llSetText("Score: " + (string) score, <1,1,1>, 1.0);
            if(score >= maxscore)
            {
                //GAME OVER!
                llShout(0, "Game over");
                llSetTimerEvent(0);
                llShout(0, "You needed " + (string) timecounter + " Seconds to complete the game!");
                llSetText("Game Server, Click me for stats", <1,1,1>, 1.0);
               
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// CALCULATE PLACE IN TOP 5 ////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////////////
               
if(timecounter < playerscore5)
{
    if(timecounter < playerscore4)
    {
        if(timecounter < playerscore3)
        {
            if(timecounter < playerscore2)
            {
                if(timecounter < playerscore1)
                {
                    //first place
                    playerscore5 = playerscore4;
                    playerscore4 = playerscore3;
                    playerscore3 = playerscore2;
                    playerscore2 = playerscore1;
                    playerscore1 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = playername3;
                    playername3 = playername2;
                    playername2 = playername1;
                    playername1 = currentplayer;
               
                    llSay(0, "You are in first place on the scoreboard!");
                }else{
                    //second place
                    playerscore5 = playerscore4;
                    playerscore4 = playerscore3;
                    playerscore3 = playerscore2;
                    playerscore2 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = playername3;
                    playername3 = playername2;
                    playername2 = currentplayer;
               
                    llSay(0, "You are in second place on the scoreboard!");                                  }
            }else{
                    //third place
                    playerscore5 = playerscore4;
                    playerscore4 = playerscore3;
                    playerscore3 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = playername3;
                    playername3 = currentplayer;
               
                    llSay(0, "You are in third place on the scoreboard!");                 
            }
        }else{
                    //fourth place
                    playerscore5 = playerscore4;
                    playerscore4 = timecounter;
                   
                    playername5 = playername4;
                    playername4 = currentplayer;
               
                    llSay(0, "You are in fourth place on the scoreboard!");                 
        }
    }else{
                    //fifth place
                    playerscore5 = timecounter;
                   
                    playername5 = currentplayer;
               
                    llSay(0, "You are in fifth place on the scoreboard!");                 
    }
}else{
    llSay(0, "You were not fast enough to get on the scoreboard");
}
               
               
               
               
               
               
            }
        }
    }
   
    touch_start(integer numdetected)
    {
        //TYPE SCORE LIST!!!
        llSay(0, "SCORE LIST:");
        llSay(0, "1. " + playername1 + " - " + (string) playerscore1 + " seconds.");
        llSay(0, "2. " + playername2 + " - " + (string) playerscore2 + " seconds.");
        llSay(0, "3. " + playername3 + " - " + (string) playerscore3 + " seconds.");
        llSay(0, "4. " + playername4 + " - " + (string) playerscore4 + " seconds.");
        llSay(0, "5. " + playername5 + " - " + (string) playerscore5 + " seconds.");
        llSay(0, "Game has been played " + (string) timesplayed + " times since reset");
    }
   
    timer()
    {
        timecounter = timecounter + 1;
        if(timecounter >= maxtime)
        {
            llShout(1966, "STOP");
            llSay (0, "Game over due to timeout...");
            llSetTimerEvent(0);
            llSetText("Game Server, Touch for stats", <1,1,1>, 1.0);
        }
    }
   
}

Start Button

// open pacman game by kefcom belgium (kefcom@hotmail.com)

default
{
    state_entry()
    {
        llSetText("Klick me to play", <1,1,1>,1.0);
    }
    touch_start(integer num_detected)
    {
        llDialog(llDetectedKey(0), "Press Start to play", ["START", "STOP"],1966);
    }
}