Map Randomizer

[Avarax]

Script Name: Map Randomizer
Script Description: Loads a random map from the mapslist.txt and changes to that map at the end of each round.
Original Author(s): Avarax, uses xsplit by KeYDoN
Core Version: 2.6.3
Code:

An extract:

Code: [Select]

function GetRandomMap(forbidden: string): string;
var MapList: TStringArray;
    n,x: byte;
begin
  MapList:=xsplit(ReadFile('mapslist.txt'),chr(13)+chr(10));
  n:=GetArrayLength(MapList);
  If n > 0 then
    while true do begin
      x:=random(0,n-1);
      If MapList[x] <> forbidden then begin
        result:=MapList[x];
        exit;
      end;
    end
  else
    WriteLn('GetRandomMap fails: Empty mapslist.txt');
end;


Admin commands:
/randomize: Dis-/Enables map randomizer (default is enabled)
/randommap: Changes to a random map immediately

~Download~

To install, simply extract into your dedicated server folder and activate scripting.

[DorkeyDear]

Small typo:

true : begin RandomMap:=true; WriteLn('Map randomizer disabled') WriteConsole(0,'Map randomizer disabled',$8FD2C4); end;

should be false

under OnCommand inside the case of

[PKS|Shooter]

wtf U Rox Ava

[Iq Unlimited]

thank you for making this script better then the other crappy one. xD.

[poutch]

You can also use a perl script if you dont  wan t to use the scriptcore ressources :

-----------------------
#!/usr/bin/perl
#randomize all lines of a file
#use ./randommaps.pl mapslist.txt >> newmapslist.txt
@array=<>;
for ($i=$#array;$i>0;$i--) {
  $j=int(rand($i));
  @array[$i,$j]=@array[$j,$i];
}
foreach $line (@array) {
  chomp($line);
  print("$line\n");
------------------------

[Kavukamari]

thank you for making this script better then the other crappy one. xD.

err.. crappy one? do you mean the one I never finished?

(I tried!!!)

[Iq Unlimited]

No, the one someone posted somewhere (Maybe here?) that picks a random map for you when you vote it. It didnt work that well for some reason...

[CaptainHighpants]

Thank you. My server runs over 750 maps. This is perfect.

[ghg]

wtf U Rox Ava

lol teh speekz teh anooyz lawl wtf

(That txt-speak is annoying as hell)

[Miszkol_]

@Avatarus

Can you do this script change <now map> to <random map> if is nextmap change time?? Example:

now map - kz_xXx
next map from maplist - kz_yYy
random map - kz_111

5...
4...
3...
2...
1...
[ * ]nextmap- KZ_111

Can you do it??
reply

[Avarax]

It already has that feature. It will change to a random map when the timer has reached 00:20.

[Miszkol_]

It already has that feature. It will change to a random map when the timer has reached 00:20.

No, because timer has reached 00:20, server load nextmap from maplist ;/