Random Teleporter Network

class RandomTeleporterNetwork extends Info
	placeable;

var() string URLTag;
var() int Fakes;
var array<Teleporter> MyTeleporters;


function PostBeginPlay()
{
	local Teleporter D;
	local int i,j;
	local array<int> iTeleporters;

	foreach AllActors( class 'Teleporter', D )
		if( D.URL == URLTag )
		{
			D.tag = D.Name;
			MyTeleporters[MyTeleporters.length] = D;
		}

	iTeleporters.length = MyTeleporters.length;
	for (i=0; i < MyTeleporters.length; i++)
	{
		iTeleporters[i] = i;
	}

	if ( ((iTeleporters.length - Fakes) % 2) != 0 )
		Fakes ++ ;
	if (iTeleporters.length - Fakes < 2)
	{
		log (Self $ " No pairs");
		return;
	}
	for (i=0; i < Fakes; i++)
	{
		iTeleporters.Remove( rand(iTeleporters.length) , 1 );
	}

	for (i=0; i < iTeleporters.length; i++)
	{
		j = rand(iTeleporters.length - 1) + 1;
		MyTeleporters[iTeleporters[i]].URL = string(MyTeleporters[iTeleporters[j]].tag);
		MyTeleporters[iTeleporters[j]].URL = string(MyTeleporters[iTeleporters[i]].tag);
		iTeleporters.Remove( j , 1 );
		iTeleporters.Remove( i , 1 );
		i -- ;
	}
}