SRL Archive - OSR Help

How do i make the script select a random world out of a selection of world lets say world 340-360
Thats 20 worlds that the script needs to select one of each time it hops. How do i do this?

Something like this I'd imagine:

program new;
{$include_once srl/srl.simba}
var
  rWorlds: TIntegerArray;
begin
  SetupSRL;
  rWorlds := [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]; // place any number of worlds in here
  ChangeWorld(rWorlds[Random(Length(rWorlds))]);
end.

Make sure that you actually declare players and all that other good stuff for setting up a script properly too
-Lj

[Error] C:\Simba\Includes\SRL/SRL/core/simba.simba(3:10): Duplicate identifier 'VARIANTISINTEGER' at line 2
Compiling failed
still doesn't work. can you pm me your skype by any chance?

From: Sable
[Error] C:\Simba\Includes\SRL/SRL/core/simba.simba(3:10): Duplicate identifier 'VARIANTISINTEGER' at line 2
Compiling failed
still doesn't work. can you pm me your skype by any chance?

If nobody replies to the thread with help, and the #SRL irc channel doesn't help, you can PM me what you have and I'll try to take a look at it and offer advice.

IRC = http://villavu.com/forum/chat_irc.php

Program new;
var
  rWorlds: TIntegerArray;//global variable

Procedure DefWorlds;
var
  i,j,wstart,wend:integer;
begin
  wstart:=??;
  wend:=??;
  j:=0;
  for i := wstart to wend do
  begin
  rWorlds[j]:=i;
  j:=j+1;
  end;
end;
Procedure HopRanWorld;
begin
  ChangeWorld(rWorlds[Random(High(rWorlds))]);
end;
end.

solved :p