Get SRL Rev Number?

Is there a way to get SRL's revision number from a script? As in

SCAR Code:

if (Rev < 14) then
  begin
    WriteLn('Get Revison 14 please.');
    TerminateScript;
  end;

? :)

Thanks for help with this nubby question
~ Harry

i dont wanna tell anybody how to do their job *cough* devs *cough*but it would be nice if this was added in every rev

SCAR Code:

function ReturnRev: integer;
var
  ThisRev: integer;
begin
  ThisRev := 14;
  Result := ThisRev;
end;

simple but functional

Or in Globals.scar... there is an empty spot, it looks like they removed it or something :o

SCAR Code:

{ const SRLVersionNumber;
  Description: Repository Version Number. }

Would be nice to have var SRLVersionNumber = '4.14'; there :)

This just MIGHT be crazy enough to work.

Mouse(coords of "File" botton in scar);
if findobjcustom(text = ">", color = the pitch black blod text font) then...

The > means when scar says "Update SRL SVN (X -> X)", and the color is different than other fonts, so it might work.

So basicly if it finds that you haven't updated rev, then it will do w/e you want.

idk gl.

so all they *cough* devs *cough* need to do is put

SCAR Code:

const 
  Rev = 4.14;

in teh globals

So any Developers gonna consider this? ;)

SCAR Code:

program New;

function GetRev: Integer;
begin
  Result:= StrToIntDef(Between('Revision ', ': /', GetPage('http://www.srl-forums.com/srl-repos/')), -1);
end;

begin
  writeln(inttostr(GetRev));
end.

;)

Quote:

---

Originally Posted by bullzeye95

SCAR Code:

program New;

function GetRev: Integer;
begin
  Result:= StrToIntDef(Between('Revision ', ': /', GetPage('http://www.srl-forums.com/srl-repos/')), -1);
end;

begin
  writeln(inttostr(GetRev));
end.

;)

---

Yeh.. thats the latest one.. not what the user is using...

Will add it.
Const SRLVersionNumber = 14;