SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
born to macro - SRL Member Application Form
born to macro

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?
no


Programming Knowledge
i know php, and html

Other Communitys
yes travdev and sythe

How Long have You Played Runescape
about 2-3 years

Are you affilated in anyway with Jagex LTD?
No Comment
—————————————————–
Please write down a paragraph about Yourself.

well iv been scripting for a while my friend showed me scar and srl and im glad he did . well im now starteing to write my own scripts and i hope to write some verry good scripts. and i might start writeing tuts on how to make ur web sites (verry diffuclut to do i thought) but i managed to make some. i hope to become a member to show that i am a good script writer i waill contuinew to write scripts =] wel thats pertty much i got to say.

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

***********************
*        // MONK KILLER\\       *
*                                      *
*       1. SET COLURS           *
*       2. SET USER AND PASS*
*       3. start at monks        *
*       BY:BORN TO MACRO    *
***********************



program Monkkiller;
{.include SRL/SRL.scar}
{.Includes/SRL/SRL/Core/Antiban.scar}
{.include SRL/SRL/Skill/Fighting.scar}

Set the colours of 3 diffrent monks.

const
Color1=0;//One colour of the Monk
color2=0;//Another colour of the Monk
color3=0;//Last colour of the Monk
FoodColour=0;//Colour of food

Players[0].Name :='';//user
Players[0].Pass :='';//pass
Players[0].Nick := '';// about 3 letters of ur name
Players[0].Active := True;
   

Var;  

function FindFastRandoms: Boolean; //By WT-Fakawi.
var
  i: Integer;
begin
  for i := 1 to 8 do
  begin
    case I of
      1: if FindDead then
          Result := True;
      2: if FindMod then
          Result := True;
      3: if FindMime then
          Result := True;
      4: if FindMaze then
          Result := True;
      5: if FindQuiz then
          Result := True;
      6: if FindDemon then
          Result := True;
      7: begin
          if NoGameTab then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'No GameTab';
            Logout;
            Exit;
          end;
        end;
      7: begin
          if InBlack then
          begin
            Result := True;
            Players[CurrentPlayer].loc := 'InBlack';
            Logout;
            Exit;
          end;
        end;
      8: RC;
    end;
    wait(1);
  end;
end;



procedure AtackMonk;
begin
  Flag;
  for i := 1 to 5 do
  begin
    if (FindColorTolerance(x, y, Color1, MSX1, MSY1, MSX2, MSY2, 5 + i))
      and
      (FindColorTolerance(x, y, Color2, MSX1, MSY1, MSX2, MSY2, 5 + i))
        and
      (FindColorTolerance(x, y, Color3, MSX1, MSY1, MSX2, MSY2, 5 + i))
        then
    begin
      MMouse(x, y, 3, 3);
      Wait(80 + Random(60));
      if (IsUpText('Attack ' + 'Cow')) then //Change the 'cow' to what ever the monsters name is
      begin
        GetMousePos(x, y);
        Mouse(x, y, 0, 0, True);
        Wait(40 + Random(20));
        Flag;
        OutFight; //Waits Until Out Of Fight..
        Exit;
      end;
    end;
  end;
end;


begin
repeat
SetupSRL;
DoAntiRandoms;
AtackMonk;
DoAntiRandoms;
until(false);
end.

——————————————————
<!– END TEMPLATE: formanswers –>

y is my box messed up??

You apparently don't have the syntax of SCAR down. The first part of the script will give you an error because it's not commented out. But anyways the script is way to simple and needs to become better before I will give you a yes.

No.

ok

close this

I didn't look it up but it looks like it was taking from someone's monk fighter then just adjusted. Either way though its way too simple, with very basic mistakes, also a random Var; in there and wrong syntax screams "STOLEN" to me, I'm going to have to vote no sorry.

Read some tuts and hand around the forums for a while and eventually you'll grasp more advanced scripting techniques.

P.S. Make sure you wait 30 days before re - applying.

EDIT: And now he's trying to back peddle -

From: born to macro
close this

No AntiBan
No Multiplayer
Too Simple
Learn More