1445
« on: June 11, 2012, 06:16:18 PM »
Why won't this work?
package ChatBotGreet
{
function newChatHud_addLine(%text)
{
Parent::newChatHud_addLine(%text);
if(%text $="connected.")
{
if($ChatBot::On)
{
%num = getrandom(1,5);
commandtoserver('messagesent', "ChatBot: @ %num);
}
}
}
};
activatepackage (ChatBotGreet);
Full Script:
package ChatBot
{
function clientCmdChatMessage(%a, %b, %c, %fmsg, %cp, %name, %cs, %msg)
{
Parent::clientCmdChatMessage(%a,%b,%c,%fmsg,%cp,%name,%cs,%msg);
if($ChatBot::On)
{
switch$(%msg)
{
case "Hey":
commandToServer('messagesent', "ChatBot: Hey");
}
}
}
};
package ChatBotRegister
{
function clientCmdChatMessage(%a, %b, %c, %fmsg, %cp, %name, %cs, %msg)
{
Parent::clientCmdChatMessage(%a,%b,%c,%fmsg,%cp,%name,%cs,%msg);
if(%name $= "¥ola")
{
switch$(%msg)
{
case "ChatBot On":
$ChatBot::On = true;
case "ChatBot Off":
$ChatBot::On = false;
}
}
}
};
activatepackage (ChatBotRegister);
package ChatBotGreet
{
function newChatHud_addLine(%text)
{
Parent::newChatHud_addLine(%text);
if(%text $="connected.")
{
if($ChatBot::On)
{
%num = getrandom(1,5);
commandtoserver('messagesent', "ChatBot: @ %num);
}
}
}
};
activatepackage (ChatBotGreet);