Blockland Forums > General Discussion
Help with finding a Mod?
Brian Smithers:
uhm, a little lazy to package, if anyone knows how to package mods
heres the server.cs
--- Code: ---function gameConnection::addEXP(%client,%exp)
{
if(%exp >= mCeil(mSqrt(%client.level) * 3))
{
%client.level += 1;
messageAll('',"<bitmap:base/client/ui/ci/blueRibbon>\c3" @ %client.name @ " \c6has leveled up to level \c3" @ %client.level @ "\c6.");
%client.exp = 0;
}
else
{
%client.exp += %exp;
messageClient(%client,'',"\c6You have obtained \c3" @ %exp @ "\c6 EXP.");
}
}
function serverCmdStats(%client)
{
messageClient(%client,'',"\c3Level\c6: " @ %client.level);
messageClient(%client,'',"\c3EXP\c6: " @ %client.EXP);
}
function gameConnection::saveLevel(%client)
{
%file = new FileObject();
%file.openForWrite("config/server/Levels/" @ %client.bl_id @ ".txt");
%file.writeLine("Level: "@ %client.level);
%file.writeLine("EXP: "@ %client.EXP);
%file.close();
%file.delete();
}
function gameConnection::loadLevel(%client)
{
if(isFile("config/server/Levels/" @ %client.bl_id @ ".txt"))
{
%file = new FileObject();
%file.openForRead("config/server/levels/" @ %client.bl_id @ ".txt");
%client.level = restWords(%file.readLine());
%client.exp = restWords(%file.readLine());
%file.close();
%file.delete();
}
}
package LevelingAndStuff
{
function gameConnection::onClientEnterGame(%client)
{
parent::onClientEnterGame(%client);
if(isFile("config/server/Levels/" @ %client.bl_id @ ".txt"))
%client.loadLevel();
else
{
%client.level = 0;
%client.exp = 0;
}
}
function GameConnection::onDeath(%this, %obj, %sourceObject, %sourceClient, %damageType, %damLoc)
{
parent::::onDeath(%this, %obj, %sourceObject, %sourceClient, %damageType, %damLoc);
if(%this != %soureClient)
{
%this.addEXP(10);
%this.saveLevel();
}
}
function serverCmdMessageSent(%client,%msg)
{
parent::serverCmdMessageSent(%client,%msg);
%client.clanPrefix = "[Level " @ %client.level @ "]";
%client.clanSuffix = "";
}
};activatepackage(LevelingAndStuff);
function saveAllLevel()
{
cancel($saveLevelAll);
for(%i=0;%i<ClientGroup.getCount();%i++)
{
if(%client.level > 0 && %client.exp > 0)
%client.saveLevel();
}
$saveLevelAll = schedule(60000,0,saveAllLevel);
}
saveAllLevel();
--- End code ---
Not tested, someone should debug and release, with credits to me of course.
Eussorus:
--- Quote from: Brian Smithers on January 16, 2012, 02:22:43 AM ---uhm, a little lazy to package, if anyone knows how to package mods
heres the server.cs
-code-
Not tested, someone should debug and release, with credits to me of course.
--- End quote ---
I packaged it.
If I named it wrong, just rename it, I don't give a forget
Brian Smithers:
--- Quote from: Eussorus on January 16, 2012, 02:34:32 AM ---I packaged it.
If I named it wrong, just rename it, I don't give a forget
--- End quote ---
it'll fix, you made it a .rar
it has to be a .zip silly.
Ghost15601:
You can't find it because it is a private mod...
Eussorus:
--- Quote from: Brian Smithers on January 16, 2012, 01:07:25 PM ---it'll fix, you made it a .rar
it has to be a .zip silly.
--- End quote ---
shiiiit