mirror of
https://github.com/Ragora/T2-BoL.git
synced 2026-01-20 03:24:47 +00:00
83 lines
1.9 KiB
PHP
83 lines
1.9 KiB
PHP
//------------------------------------------------------------------------------
|
|
// Array.cs
|
|
// Array object you can pass around.
|
|
// Copyright (c) 2012 Robert MacGregor
|
|
//==============================================================================
|
|
|
|
function ArrayFactory::create(%this, %name)
|
|
{
|
|
if (isObject(%name))
|
|
%name = "";
|
|
%object = new ScriptObject(%name) { class = "ArrayObject"; };
|
|
%object.elementCount = 0;
|
|
return %object;
|
|
}
|
|
|
|
function ArrayObject::setElement(%this, %index, %object)
|
|
{
|
|
%replaced = false;
|
|
if (%this.Element[%index] != "")
|
|
%replaced = true;
|
|
else
|
|
{
|
|
%this.elementIndex[%index] = %this.elementCount;
|
|
%this.elementIndices[%this.elementCount] = %index;
|
|
%this.elementCount++;
|
|
}
|
|
|
|
%this.Element[%index] = %object;
|
|
return %replaced;
|
|
}
|
|
|
|
function ArrayObject::list(%this)
|
|
{
|
|
%list = Array.create();
|
|
for (%i = 0; %i < %this.elementCount; %i++)
|
|
%list.setElement(%i, %this.Element[%this.elementIndices[%i]]);
|
|
return %list;
|
|
}
|
|
|
|
function ArrayObject::removeElement(%this, %index)
|
|
{
|
|
if (%this.Element[%index] != "")
|
|
{
|
|
%this.Element[%index] = "";
|
|
for (%i = %this.elementIndex[%index]; %i < %this.elementCount; %i++)
|
|
%this.elementIndices[%i] = %this.elementIndices[%i+1];
|
|
%this.elementCount--;
|
|
return true;
|
|
}
|
|
else
|
|
return false;
|
|
return false;
|
|
}
|
|
|
|
function ArrayObject::hasElementValue(%this, %value)
|
|
{
|
|
for (%i = 0; %i < %this.elementCount; %i++)
|
|
if (%this.Element[%i] == %value)
|
|
return true;
|
|
return false;
|
|
}
|
|
|
|
function ArrayObject::isElement(%this, %index)
|
|
{
|
|
if (%this.Element[%index] == "")
|
|
return false;
|
|
else
|
|
return true;
|
|
return false;
|
|
}
|
|
|
|
function ArrayObject::element(%this, %index)
|
|
{
|
|
return %this.Element[%index];
|
|
}
|
|
|
|
function ArrayObject::count(%this)
|
|
{
|
|
return %this.elementCount;
|
|
}
|
|
|
|
if (!IsObject(Array))
|
|
new ScriptObject(Array) { class = "ArrayFactory"; };
|