SRL Archive - SRL Suggestions

function multipleinc(number: integer; var x: integer) : integer;
begin
  x := x + number;
  result := x;
end;

pretty simple itll help with proggies and stuff like that and idk if its already in scar but i could find it so i made it

It's called IncEx in Scar ;)

IncEx(var X; N: LongInt);

oh lol iread that wrong in the manual i thought it inc two variables

also, it could just be

result:= x + number;

e: never mind lol, x is a var :o

Also, you could shorten to this:

function MultipleInc(N, var X: Integer) : Integer;
begin
  Result := X + N;
end;

You should group the same types.

Edit: :duh: Didn't realise that. Don't group.

that wont work lol look at the post above yours

closed, this has been resolved. No need to keep posting :)

Also, should just do

procedure IncEx(var X: Integer, N: Integer);
begin
  X := X + N;
end;