$SpawnPack::Count = 0;
function SpawnPack(%Special)
{
%PackContents = "";
%Name = $PCFG::Name[$PCFG::CurrentPlayer] $+ $SpawnPack::Count;
%ADD[1] = "COINS " @ foor((getRandom() * 5000));
%ADD[2] = "LCK " @ floor(getRandom() * 3));
%ADD[3] = "EXP " @ floor(getRandom() * 1000));
%ADD[4] = "SP " @ floor(getRandom() * 10));
echo("* * * * * * * * * * * * * * *");
echo("Pack Name: " @ %Name);
for(%i=1; %i <= 4; %i++)
{
if(getWord(%ADD[%i], 1) != 0)
{
echo(%ADD[%i]);
%PackContents = %PackContents @ " " @ %Add[%i];
}
}
if(%Special != "")
{
echo(%Special);
%PackContents = %PackContents @ " " @ Special;
}
echo("* * * * * * * * * * * * * * *");
say(0, "#spawnpack "@%Name@" | * * " @ %PackContents);
$SpawnPack::Count++;
}
bindCommand(keyboard0, make, "1", TO, "SpawnPack();");
// Use:
// SpawnPack(); spawns basic pack with random coins, exp, lck, and sp (this is bound to the key)
// SpawnPack("LongSword 1"); will spawn basic pack + 1 Long Sword
// SpawnPack(" KeldrinArmor 2 Claymore 10"); will spawn basic pack + 2 Keldrin Armor's and 10 Claymores.
// Etc.
something like that maybe? i dunno, just my 2 cents, threw it together in about 5 minutes...