|
|
|
It is currently Sat Jul 05, 2025 8:51 am
|
View unanswered posts | View active topics
 |
 |
 |
|
  |
Users browsing this forum: No registered users and 0 guests |
|
|
 |
|
 |
|
|
|
|
Author |
Message |
|
Joined: Thu Aug 11, 2005 3:28 am
Posts: 1176
|
Posted: Fri Dec 16, 2005 8:49 pm Post subject:
|
|
| |
| Code: | function Client::cancelMenu(%clientId)
{
if(!%clientId.menuLock)
{
%clientId.selClient = "";
%clientId.menuMode = "";
%clientId.menuLock = "";
remoteEval(%clientId, "CancelMenu");
Client::setMenuScoreVis(%clientId, false);
}
}
function Client::buildMenu(%clientId, %menuTitle, %menuCode, %cancellable)
{
Client::setMenuScoreVis(%clientId, true);
%clientId.menuLock = !%cancellable;
%clientId.menuMode = %menuCode;
remoteEval(%clientId, "NewMenu", %menuTitle);
}
function Client::addMenuItem(%clientId, %option, %code)
{
remoteEval(%clientId, "AddMenuItem", %option, %code);
}
function remoteCancelMenu(%server)
{
if(%server != 2048)
return;
if(isObject(CurServerMenu))
deleteObject(CurServerMenu);
}
function remoteNewMenu(%server, %title)
{
if(%server != 2048)
return;
if(isObject(CurServerMenu))
deleteObject(CurServerMenu);
newObject(CurServerMenu, ChatMenu, %title);
setCMMode(PlayChatMenu, 0);
setCMMode(CurServerMenu, 1);
}
function remoteAddMenuItem(%server, %title, %code)
{
if(%server != 2048)
return;
addCMCommand(CurServerMenu, %title, clientMenuSelect, %code);
}
function clientMenuSelect(%code)
{
deleteObject(CurServerMenu);
remoteEval(2048, menuSelect, %code);
}
function remoteMenuSelect(%clientId, %code)
{
%mm = %clientId.menuMode;
if(%mm == "")
return;
if(String::findSubStr(%code, "\"") != -1 ||
String::findSubStr(%code, "\\") != -1) // no quotes or escapes
return;
%evalString = "processMenu" @ %mm @ "(" @ %clientId @ ", \"" @ %code @ "\");";
%clientId.menuMode = "";
%clientId.menuLock = "";
dbecho(2, "MENU: " @ %clientId @ "- " @ %evalString);
eval(%evalString);
if(%clientId.menuMode == "")
{
Client::setMenuScoreVis(%clientId, false);
%clientId.selClient = "";
}
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Author |
Message |
|
Joined: Thu Aug 11, 2005 3:28 am
Posts: 1176
|
Posted: Fri Dec 16, 2005 8:49 pm Post subject:
|
|
| |
| Code: | //----------------------------------------------------------------------------
// MINE DYNAMIC DATA
MineData AntipersonelMine
{
className = "Mine";
description = "Antipersonel Mine";
shapeFile = "mine";
validateShape = false;
validateMaterials = true;
shadowDetailMask = 4;
explosionId = mineExp;
explosionRadius = 10.0;
damageValue = 0.65;
damageType = $MineDamageType;
kickBackStrength = 150;
triggerRadius = 2.5;
maxDamage = 0.5;
shadowDetailMask = 0;
destroyDamage = 1.0;
damageLevel = {1.0, 1.0};
};
function AntipersonelMine::onAdd(%this)
{
%this.damage = 0;
AntipersonelMine::deployCheck(%this);
}
function AntipersonelMine::onCollision(%this,%object)
{
%type = getObjectType(%object);
%data = GameBase::getDataName(%this);
if ((%type == "Player" || %data == AntipersonelMine || %data == Vehicle || %type == "Moveable") &&
GameBase::isActive(%this))
GameBase::setDamageLevel(%this, %data.maxDamage);
}
function AntipersonelMine::deployCheck(%this)
{
if (GameBase::isAtRest(%this)) {
GameBase::playSequence(%this,1,"deploy");
GameBase::setActive(%this,true);
%set = newObject("set",SimSet);
if(1 != containerBoxFillSet(%set,$MineObjectType,GameBase::getPosition(%this),1,1,1,0)) {
%data = GameBase::getDataName(%this);
GameBase::setDamageLevel(%this, %data.maxDamage);
}
deleteObject(%set);
}
else
schedule("AntipersonelMine::deployCheck(" @ %this @ ");", 3, %this);
}
function AntipersonelMine::onDestroyed(%this)
{
$TeamItemCount[GameBase::getTeam(%this) @ "mineammo"]--;
}
function AntipersonelMine::onDamage(%this,%type,%value,%pos,%vec,%mom,%object)
{
if (%type == $MineDamageType)
%value = %value * 0.25;
%data = GameBase::getDataName(%this);
if((%data.maxDamage/1.5) < %this.damage+%value)
GameBase::setDamageLevel(%this, %data.maxDamage);
else
%this.damage += %value;
}
//----------------------------------------------------------------------------
MineData Handgrenade
{
mass = 0.3;
drag = 1.0;
density = 2.0;
elasticity = 0.15;
friction = 1.0;
className = "Handgrenade";
description = "Handgrenade";
shapeFile = "grenade";
shadowDetailMask = 4;
explosionId = grenadeExp;
explosionRadius = 10.0;
damageValue = 0.5;
damageType = $ShrapnelDamageType;
kickBackStrength = 100;
triggerRadius = 0.5;
maxDamage = 2;
};
function Handgrenade::onAdd(%this)
{
%data = GameBase::getDataName(%this);
schedule("Mine::Detonate(" @ %this @ ");",2.0,%this);
}
function Mine::onDamage(%this,%type,%value,%pos,%vec,%mom,%object)
{
if (%type == $MineDamageType)
%value = %value * 0.25;
%damageLevel = GameBase::getDamageLevel(%this);
GameBase::setDamageLevel(%this,%damageLevel + %value);
}
function Mine::Detonate(%this)
{
%data = GameBase::getDataName(%this);
GameBase::setDamageLevel(%this, %data.maxDamage);
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Author |
Message |
|
Joined: Tue Oct 25, 2005 2:25 am
Posts: 297
Location: Finland
|
Posted: Sat Dec 17, 2005 2:26 am Post subject:
|
|
| |
And yes, I wouldn't be a good spammer if I wouldn't spam my spamposts.
BLINK! I know why you have a crappy memory. Wait a moment, I'll just find the file first...
Yees, I found it. Then Copy paste.... Like this!
*-*BLINK! See, theres a hole.*-* #
And then we just add a number on the # place...
*-*BLINK! See, theres a hole.*-* 3371
And then we add the player on the start!
=*TE*=StarSeeker: *-*BLINK! See, theres a hole.*-* 3371
And thats it! Theres the reason for your memory being so crappy nowadays. 
And NOW I am going to give you some more "Spam the 1337 spammers spams spam."
(Here goes another 3 mins...)
Once I saw a spam topic with lots of spam spam in it. I didn't like spam or people spamming my spam or me spamming other spammers spam becouse I hate spam spammers. But anyways I went to read some 1337 spammers spam other spammers spam. The spam after spam looked kinda spammy and I liked the spam like becouse those posts were so n00bspammers spam. So I decided to spam some spam and then spam some more spam of my spam. I spammed "Spamspamspamspam" and the n00bspammers read the spam and spammed back "spam" and I replied "SPAMSPAMSPAM". And they were like "W0W. We have a spam spammer here omg spam. And then they like spamblocked me out of the spamtopic of spamness. So that might be why I hate to spam others spam's spam so much. So you all reading this spampost of my spam, learn to spam others spam real spammylike. There's nothing that can beat someone spamming other spam in a spamtopic full of spampeople spamming others spam and then spamming some more of their own spam.
0 \/\/ |\| 3 |) ! I'll be here to spam your spam's spam.
64 If I counted right.
USELESS.
To make this post useful, I will add something clever to the end.
Hmmhmm...
I have a computer.
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
|
|
|
|
|
|
|  |
FAQ
Search 
Members
Login 
Register
