SRL Archive - Help

So i started using functions in my scripts more to improve them but I was wondering if i could write a function without having to use a Boolean. I currently use:

function WriteDebug(): boolean;
begin
  ClearDebug;
  Writeln('*****************************');
  Writeln('Status:' + Status + '');
  Writeln('Spice steals:' + IntToStr(Stole_Spice) + '');
  Writeln('Ruby steals:' + IntToStr(Stole_Ruby) + '');
  Writeln('Runs:' + IntToStr(Runs) + '');
  WriteLn('Goal:' + '[' + How_Steal + ']'
  + '|' + IntToStr(StrToInt(How_Steal) - Steals)
  + ' Left to steal| ['
  + IntToStr(Round(Steals * 1.0 / StrToInt(How_Steal) * 100)) + '%]');
  Writeln('*****************************');
end;

but I am tired of getting:

[Hint] C:\Simba\Scripts\silabtheiv.simba(32:10): Variable 'Result' never used at line 31

It spams up my debug box everytime I compile.

Any tips?

Function Somthing:Integer/String/TPoint;?

Your 'function' does not make use of the result, hence the declared result becomes an 'unused' variable, hence the hint.
Simply rename 'function' to procedure instead and remove the result declaration.
i.e.

procedure WriteDebug();

Maybe I'm missing something, but why would you want to use a function for this instead of a procedure? The reason you get that result not used thing is because a function returns something. A boolean function retuns a true/false. That message means that you don't use what it returns, so you may as well use a procedure :/

From: BMWxi
Maybe I'm missing something, but why would you want to use a function for this instead of a procedure? The reason you get that result not used thing is because a function returns something. A boolean function retuns a true/false. That message means that you don't use what it returns, so you may as well use a procedure :/

Then it has to skip to the procedure doesent it?

From: rjj95
Then it has to skip to the procedure doesent it?

you want it to write the progressreport if it done something?

Then why not try smthing like:

if DoingSomething = True then progressreport;

EDIT: OFFTOPIC

Look at this post lol

Shame on you!

From: Sjoekeloe
you want it to write the progressreport if it done something?

Then why not try smthing like:

if DoingSomething = True then progressreport;

EDIT: OFFTOPIC

Look at this post lol

Shame on you!

why would you gravedig something I already confessed to from 2 years ago?

Didn't see your confession sorry ;)
Cause It was funny when I saw that post.

Quick and dirty: Functions are procedures that will return a result. Procedures are just blocks of code that do whatever you want them to, no results are returned. So if you're doing a progress report and all it does it call "writeln" a few times then it's better just to declare it as a procedure, not a function.

Here's an example:

Function TeleportToBank: Boolean;   //True or False will be returned from this
begin
  if not LodestoneTeleport('Lunar Isle') then
    Exit;

  Result := WaitFunc(@NearBank, 10, 14000);
  {
   Or...
   if WaitFunc(@NearBank, 10, 14000) then
      Result := True
   else
      Result := False;
  }
end;

Procedure TeleportToBank;        //Nothing is returned
begin
  if not LodestoneTeleport('Lunar Isle') then
    Exit;

  WaitFunc(@NearBank, 10, 14000);
end;

Main loop:

if InvFull then
    if TeleportToBank then  //If this function returned true, then...
      Writeln('We are at the bank!')
    else
      Writeln('Wtf happened man?  I quit...');

//Or, for a procedure...

if InvFull then
   TeleportToBank;

Understand? ;)

From: rjj95
Then it has to skip to the procedure doesent it?

What do you mean by skip to the procedure?

From: Flight
Quick and dirty: Functions are procedures that will return a result. Procedures are just blocks of code that do whatever you want them to, no results are returned. So if you're doing a progress report and all it does it call "writeln" a few times then it's better just to declare it as a procedure, not a function.

Here's an example:

Function TeleportToBank: Boolean;   //True or False will be returned from this
begin
  if not LodestoneTeleport('Lunar Isle') then
    Exit;

  Result := WaitFunc(@NearBank, 10, 14000);
  {
   Or...
   if WaitFunc(@NearBank, 10, 14000) then
      Result := True
   else
      Result := False;
  }
end;

Procedure TeleportToBank;        //Nothing is returned
begin
  if not LodestoneTeleport('Lunar Isle') then
    Exit;

  WaitFunc(@NearBank, 10, 14000);
end;

Main loop:

if InvFull then
    if TeleportToBank then  //If this function returned true, then...
      Writeln('We are at the bank!')
    else
      Writeln('Wtf happened man?  I quit...');

//Or, for a procedure...

if InvFull then
   TeleportToBank;

Understand? ;)

Yes :)

Just make it function WriteDebug(); inetead of function WriteDebug(): boolean;

From: KeepBotting
Just make it function WriteDebug(); inetead of function WriteDebug(): boolean;

Like multiple people already told rjj95, there is no reason to have this as a function if he doesn't need it to return anything.

From: KeepBotting
Just make it function WriteDebug(); inetead of function WriteDebug(): boolean;

Would result in a error.

From: rjj95
Would result in a error.

Make it a procedure then so it doesn't have to return anything? It's what I do with my progress reports.

From: KeepBotting
Make it a procedure then so it doesn't have to return anything? It's what I do with my progress reports.

I did.

From: rjj95
I did.

Oh okay. Lol.

I'm also having the same problem as the TS. Some of the tips helped me. thanks!

From: KeepBotting
Just make it function WriteDebug(); inetead of function WriteDebug(): boolean;

instead*