loginlogout
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

loginlogout

Started by plop, 28 February, 2005, 17:46:33

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

plop

function OpConnected(curUser)
    if curUser.iProfile == 0 then
	SendToAll(frmHub:GetHubSecAliasName(), "Master "..curUser.sName.." login.")
    elseif curUser.iProfile == 1 then
	SendToAll(frmHub:GetHubSecAliasName(), "Op "..curUser.sName.." login.")
    end
end

function OpDisconnected(curUser)
    if curUser.iProfile == 0 then
	SendToAll(frmHub:GetHubSecAliasName(), "Master "..curUser.sName.." logout.")
    elseif curUser.iProfile == 1 then
	SendToAll(frmHub:GetHubSecAliasName(), "Op "..curUser.sName.." logout.")
    end
end

plop
http://www.plop.nl lua scripts/howto\'s.
http://www.thegoldenangel.net
http://www.vikingshub.com
http://www.lua.org

>>----> he who fights hatred with hatred, drives the spreading of hatred <----<<

blackwings

Added VIP =
function OpConnected(curUser)
    if curUser.iProfile == 0 then
	SendToAll(frmHub:GetHubSecAliasName(), "Master "..curUser.sName.." login.")
    elseif curUser.iProfile == 1 then
	SendToAll(frmHub:GetHubSecAliasName(), "Op "..curUser.sName.." login.")
    elseif curUser.iProfile == 2 then
	SendToAll(frmHub:GetHubSecAliasName(), "VIP "..curUser.sName.." login.")
    end
end

function OpDisconnected(curUser)
    if curUser.iProfile == 0 then
	SendToAll(frmHub:GetHubSecAliasName(), "Master "..curUser.sName.." logout.")
    elseif curUser.iProfile == 1 then
	SendToAll(frmHub:GetHubSecAliasName(), "Op "..curUser.sName.." logout.")
    elseif curUser.iProfile == 2 then
	SendToAll(frmHub:GetHubSecAliasName(), "VIP "..curUser.sName.." logout.")
    end
end

OpConnected=NewUserConnected
OpDisconnected=UserDisconnected


the_pest

or for exact nicks
-- made on Earth

TableIn = { 
["nick"]="Message on login.",
["Rm."]="Attention, battybwoy in the hub.", --example
}

TableOut = { 
["nick"]="Message on logout.",
["Rm."]="OK air is clean again.", --example
}

function NewUserConnected(curUser)
	if TableIn[curUser.sName] then 
		Sub = string.gsub(TableIn[curUser.sName],"curUser",curUser.sName)
		SendToAll(frmHub:GetHubBotName(), Sub)
	end
end

function UserDisconnected(curUser)
	if TableOut[curUser.sName] then 
		Sub = string.gsub(TableOut[curUser.sName],"curUser",curUser.sName)
		SendToAll(frmHub:GetHubBotName(), Sub)
	end
end

OpConnected=NewUserConnected
OpDisconnected=UserDisconnected
use

DorianG

#3
or random mode  :D

Bot = "EnterMessage"

message = {
	" Hi!! [USER]. ",
	" [USER] is entered in the hub.",
}

function Main()
	frmHub:RegBot(Bot)
end

function NewUserConnected(user)
		mex = string.gsub(message[math.random(1, table.getn(message))], "%b[]", user.sName)
	SendToAll(Bot, mex)
end

OpConnected = NewUserConnected

[_XStaTiC_]

#4
DorianG
or random mode :D

for i,v in message do

What does this do ?!?!

Herodes

QuoteOriginally posted by [_XStaTiC_]
for i,v in message do

What does this do ?!?!

It is on of the way to traverse ( go through ) the indexes (i) and values (v) of a table ( message ) in lua...
If you look closer you'll find that there is a table named 'messages' in the script above ...

so I hope the following general example now makes sense :
for index, value in aTable do
-- whatever you wanna do ... example : 
	if index*2 == value then
		SendToAll("Its double alright")
	else
		SendToAll("Not double this time ...")
	end
end

DorianG

Thanks Herodes for your attenction.

[_XStaTiC_]

Thanks

Works fine :)

SMF spam blocked by CleanTalk