PtokaX forum

Archive => Archived 5.0 boards => Finished Scripts => Topic started by: Jaakko on 27 February, 2005, 15:17:45

Title:
Post by: Jaakko on 27 February, 2005, 15:17:45
Shouldn't"[USERNAME] Arrives Yelling And Screaming Like A Maniac.",    }
    outrosO = {
            "[USERNAME] Arrives Ranting And Raving About Aliens Or Some Such Rot.",
be "[USERNAME] Arrives Yelling And Screaming Like A Maniac.",    }
    introsO = {
            "[USERNAME] Arrives Ranting And Raving About Aliens Or Some Such Rot.",
Title:
Post by: UwV on 27 February, 2005, 15:22:54
absoluteley right ..
and now corrected ..

-----------------------
done :0)
who wants coffee ?
----------------------------





Title: even better like this..
Post by: UwV on 02 March, 2005, 01:02:26
--// Random Intros and Outros
--// By Chaggydawg
--// Does it work?? Who knows these things??
--// Revision 0.2
--//  
--// revision x.1 by Uwv .. now seperated levels for intro's.. & converted to lua5 for ptokax
--// Rev. x.02 typ-o fixed
--// Rev. x.03 optimized and bugs fixed .. enjoy :0)

Botname = frmHub:GetHubBotName()

------------------------- dis/en-able  by level (change 2 anything but yes will stop)

-- intro's --
Aintro = yes     -- Admins
Ointro = yes     -- Op's
Vintro = yes     -- Vip's
Rintro = yes      -- Reg's

-- outro's --
Aoutro = yes     -- Admins
Ooutro = yes     -- Op's
Voutro = yes     -- Vip's
Routro = yes      -- Reg's


--------------------------intro's

introsA = {
        "In A Fiery Explosion [USERNAME] Appears.",
        "Sir [USERNAME] Of The East Lunatic Fringe Has Arrived.",
        "[USERNAME] Arrives Yelling And Screaming Like A Maniac.",
        }

introsO = {
        "[USERNAME] Arrives Ranting And Raving About Aliens Or Some Such Rot.",
        "The Demented [USERNAME] Has Arrived.",
        "[USERNAME] Arrives And Immediately Heads For The Light Like A Moth.",
        }

introsV = {
        "Brandishing What Looks Like A Hairbrush [USERNAME] Arrives.",
        "[USERNAME] Arrives An ElfGirl Under Each Arm",
        "[USERNAME] Appears Out Of Thin Air Scaring The Hell Out Of Janine.",
        }

introsR = {
        "[USERNAME] Runs In, Stubs Their Toe On A Couch And Falls Over A Table Landing On Janine.",
        "[USERNAME] Crashes Through The East Wall Arriving In The Hub.",
        "[USERNAME]  is here, How about a round of elfgirls for everyone?",
        }

--------------------------- outro's

outrosA = {
        "Jumping Through A Plate-Glass Window [USERNAME] Leaves The Hub.",
        "Aliens Rocks Abduct [USERNAME], And They Are Gone.",
        "[USERNAME] Begins Shrinking, And Eventually Disappears From The Hub.",
        }

outrosO = {
        "Janine Takes [USERNAME] By The Arm And Leads Them To Her Room Closing The Door.",
        "With Cat Like Reflexes [USERNAME] Leaps Out The Window And Is Gone.",
        "The Lights Momentarily Dim, And When They Come Back On [USERNAME] Is Gone.",
        }

outrosV = {
        "Three Giant Men In White Coats March In And Haul Away [USERNAME] Kicking and Screaming.",
        "[USERNAME] Leaves Through The Basement Door",
        "[USERNAME] Accidentally Walks Into Janines Room, Muffled Screams Are Heard For A Few Seconds But [USERNAME] Is Gone.",
        }

outrosR = {
        "Suddenly [USERNAME] Leaps Up And Bolts For The Door.",
        "[USERNAME] Tosses A Ten On Janine Dresser And Walks Out The Door.",
        "[USERNAME] Runs Around The Room Screaming And Then Leaps Out The Window.",
        }

---------------------------------------------------------------------

--// This function is fired when an operator enters the hub (change the NetWorkFounder, Master, Admin & Moderator as in your profiles.dat)

function OpConnected(curUser)
        local MsgLvl = GetProfileName(curUser.iProfile)
        if MsgLvl == "Operator" and Ointro == yes then
                local intro, x = string.gsub(introsO[math.random(1,table.getn(introsO))], "%b[]", curUser.sName)
                SendToAll(Botname, intro)
        elseif Aintro == yes and MsgLvl == "NetWorkFounder" or MsgLvl == "Master" or MsgLvl == "Admin" or  MsgLvl == "Moderator" then
                local intro, x = string.gsub(introsA[math.random(1,table.getn(introsA))], "%b[]", curUser.sName)
                SendToAll(Botname, intro)
        else
        end
end
       
--// This function is fired when an operator disconnects (change the NetWorkFounder, Master, Admin & Moderator as in your profiles.dat)

function OpDisconnected(curUser)
        local MsgLvl = GetProfileName(curUser.iProfile)
        if MsgLvl == "Operator" and Ooutro == yes then
                local outro, x = string.gsub(outrosO[math.random(1,table.getn(outrosO))], "%b[]", curUser.sName)
                SendToAll(Botname, outro)
        elseif Aoutro == yes and MsgLvl == "NetWorkFounder" or MsgLvl == "Master" or MsgLvl == "Admin" or  MsgLvl == "Moderator" then
                local outro, x = string.gsub(outrosA[math.random(1,table.getn(outrosA))], "%b[]", curUser.sName)
                SendToAll(Botname, outro)
        else
        end
end

--// This function is fired when a new user finishes the login  (change the Reg, & VIP as in your profiles.dat)

function NewUserConnected(curUser)
        local MsgLvl = GetProfileName(curUser.iProfile)
        if Rintro == yes and MsgLvl == "Reg" then      
                local intro, x = string.gsub(introsR[math.random(1,table.getn(introsR))], "%b[]", curUser.sName)
                SendToAll(Botname, intro)
        elseif MsgLvl == "VIP" and Vintro == yes then
                local intro, x = string.gsub(introsV[math.random(1,table.getn(introsV))], "%b[]", curUser.sName)
                SendToAll(Botname, intro)
        else
        end
end

--// This function is fired when an user disconnects  (change the Reg, & VIP as in your profiles.dat)

function UserDisconnected(curUser)
        local MsgLvl = GetProfileName(curUser.iProfile)
        if MsgLvl == "Reg" and Routro == yes then
                local outro, x = string.gsub(outrosR[math.random(1,table.getn(outrosR))], "%b[]", curUser.sName)
                SendToAll(Botname, outro)        
        elseif MsgLvl == "VIP" and Voutro == yes then
                local outro, x = string.gsub(outrosV[math.random(1,table.getn(outrosV))], "%b[]", curUser.sName)
                SendToAll(Botname, outro)
        else
        end
end