SRL Archive - Archive

How Long have You Played Runescape?
9 Year(s)







Are you affilated in anyway with Jagex LTD?
No. Unless playing the game or botting it is affiliated? :P







Were you Referred to SRL?
Noone







What is your general programming knowledge?
JAVA,Pascal,JS,Delphi,C,HTML,ByteCode Manipulation, and much much more.








Are you a member of any other communities?
PowerBot, im a contrib on there. And a member of basically all other major botting sites, i just like to help out the community on all of them and help people bot.







Tell us about yourself…
I like to code in many languages. I know computers like crazy. My Name is laake. I am going to a uni next year for ME degree, im extremely good at math, a lil bit worse in language arts. I Wakeboard, Wakeboard alot, like every day of the summer then workout at the gym then come home and work on my computer. Im also 18 and graduation in 2 weeks.


And i have ADD, Which means i think outside the box. Can do stuff imensifully good, and when im on my meds i think inside the box perfectly.









Please show us one (or multiple) of your scripts.

Simple, look at combat seciton people love my Ghouler. I havent been around for a lil bit so i havent updated anything to sps 2 or anything else. Gonna look at that this weekend, Had a Private Soul Wars script, Private Castle Wars Script, Private Aviansie Script and Private Quester, im not going to post the Private scripts because i dont have anymore since my laptop hard drive got wrecked and lost all my data when i sent it into the factory. And all of my customers are telling me to bug off because i didnt have anything but my phone to access the internet for 3 weeks when my laptop was gone. So if you really wanna see me do a new script i will make one, but just look at my ghouler. Also after getting my laptop back i started working more with java and such and learning more methods. Created a game, had 373 players then started decreasing because i was getting ddosed so i stopped that. And recently i have been working on injection bots for RSPS's to learn more about bytecode, so far i have made a bot for near reality battle scape soulsplit and torvapkz.



If you want to see something just tell me and ill work on it. Just felt like throwing an application back out after it bieng 4 months or so since last apply. I DO KNOW HOW TO CODE IN ANY OF THE ABOVE SAID LANGUAGES.

Ghouler:

program Ghouler;
{$DEFINE SMART}
{$i SRL/srl.simba}
{$i SRL/SRL/skill/fighting.simba}
{$i sps/sps.simba}
{$i SRL/SRL/misc/paintsmart.simba}

Const
//Change this to no if you dont want paint and are to lazy to disable debug.
  Paint = 'No';

//True for it to pick up charms
//False for it to not pick up charms.
  Charmer = True;

//Yes to pickup Effigies, no to not pick them up
//This still may be buggy.
  Effigy = 'No';

//True to pickup Champion Scroll, False to not pick them up
//This still may be buggy.
  ChampionScroll = False;

  var
  foodnumber,P,T,Z,Exp,Charms,XPH,BMP,Kills,MSpeed,RandAmount:Integer;
  DCols: Array of Integer;
  Drops: Array of String;


procedure DeclarePlayers;
Begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;

  With Players[0] Do
  Begin
    Name        := '';     //Player username.
    Pass        := '';     //Player password.
    Nick        := ''; //Player nickname - 3-4 letters of Player username.
    Active      := True;
  End;

End;

                 //\
                // \\
               //DO \\
              // Not \\
             // Change\\
            // Anymore \\
           //-----------\\
          //_____________\\
         // Made by Laake \\
        //_________________\\
       //###################\\
      //#####################\\
     //#######################\\
    //#########################\\
   //##  Dont Change anymore  ##\\
  //#############################\\
 //###############################\\
//_________________________________\\


Procedure RandomThing;
Begin
   MakeCompass(RandomRange(0,360));
end;

Function UInFight: Boolean;
begin
  Writeln('Checking for fight');
  Wait(100);
  Writeln('Pixel shift of '+IntToStr(averagePixelShift(IntToBox(235, 101, 290, 184), 120, 360)));
  if (averagePixelShift(IntToBox(235, 101, 290, 184), 120, 360) < 150) then RandomThing;
  if (averagePixelShift(IntToBox(235, 101, 290, 184), 120, 360) > 400) then
  Begin
    Result := True;
    Exit;
  end else
  if not InFight then
    Result :=False;
    Exit;
end;

procedure SetupChar;

begin

SetupSRL();
SetAngle(0);
ClickNorth(0);
end;

Procedure ToBank;
Var
  myPath: TPointArray;
begin
  SPS_Setup(RUNESCAPE_SURFACE, ['13_6','14_6']);
  myPath := [Point(5502, 2599), Point(5513, 2597), Point(5523, 2593), Point(5532, 2592), Point(5542, 2591), Point(5550, 2593), Point(5558, 2597), Point(5567, 2600), Point(5576, 2605), Point(5586, 2612), Point(5594, 2622), Point(5603, 2632), Point(5610, 2642), Point(5617, 2652), Point(5626, 2659), Point(5634, 2671), Point(5641, 2684), Point(5647, 2695), Point(5656, 2698), Point(5666, 2700), Point(5672, 2705), Point(5679, 2714), Point(5684, 2730), Point(5695, 2740), Point(5711, 2740), Point(5726, 2740), Point(5739, 2735), Point(5751, 2732), Point(5762, 2730), Point(5772, 2725), Point(5783, 2722), Point(5797, 2717), Point(5811, 2714), Point(5824, 2714), Point(5835, 2713), Point(5846, 2715), Point(5860, 2722), Point(5874, 2727)];
  SPS_WalkPath(myPath);
end;

Procedure ToGhouls;
Var
  myPath: TPointArray;
begin
  SPS_Setup(RUNESCAPE_SURFACE,['14_6','13_6']);
  myPath := [Point(5878, 2728), Point(5870, 2728), Point(5857, 2722), Point(5849, 2720), Point(5840, 2719), Point(5827, 2717), Point(5813, 2716), Point(5798, 2716), Point(5784, 2722), Point(5773, 2732), Point(5757, 2739), Point(5741, 2742), Point(5727, 2745), Point(5712, 2743), Point(5699, 2737), Point(5685, 2728), Point(5678, 2712), Point(5666, 2700), Point(5653, 2689), Point(5642, 2679), Point(5633, 2672), Point(5628, 2666), Point(5618, 2656), Point(5612, 2645), Point(5607, 2631), Point(5595, 2619), Point(5582, 2610), Point(5571, 2604), Point(5559, 2596), Point(5548, 2596), Point(5536, 2597), Point(5524, 2599), Point(5512, 2599)];
  SPS_WalkPath(myPath);
end;

procedure MSI_RandomFKey;
var
  i, randInt, randKey, currTab: Integer;
  keys: array[0..4] of Word;
begin
  currTab := GetCurrentTab();

  keys[0] := VK_F1;
  keys[1] := VK_F2;
  keys[2] := VK_F3;
  keys[3] := VK_F4;
  keys[4] := VK_F5;

  randInt := Random(6);

  case randInt of
    0..4:
      begin
        KeyDown(keys[randInt]);
        wait(35+random(85));
        KeyUp(keys[randInt]);
      end;

    else
      for i := 1 to 3 do
      begin
        randKey := Random(5);
        KeyDown(keys[randKey]);
        wait(35+random(85));
        KeyUp(keys[randKey]);
      end;
  end;
  wait(75+random(100));
  GameTab(currTab);
end;
Function Eat(What: String): Boolean;
  var
    I: Integer;
begin
  Result := False;
    If Not LoggedIn then Exit;
    if (foodnumber=1) then Exit;
    if (HPPercent < 70) then
  If InvEmpty then Logout
  else
    for i := 1 to 28 do
    begin
     if ExistsItem(i) then
      InvMouse(I, 3);
      if IsUpText(What) then
      begin
        ClickMouse2(True);
        Wait(RandomRange(350, 525));
          Result := True;
        Exit;
      end else
    end;
end;


procedure GAntiBan;
begin
  writeln('Choosing random antiban');
  case random(11) of
    0 : begin
        GameTab(27);
        Wait(randomrange(400,800));
        end;
    1 : RandomMovement;
    2 : MSI_RandomFKey;
    3 : RandomRClick;        
    5 : HoverSkill(skill_strength,false);
    6 : begin
        HoverSkill(skill_hitpoints,false);
        Wait(randomrange(300,600));
        end;
    7 : GameTab(23);
    8 : 
        PickUpMouse;
    9 : Wait(randomrange(1000,2000));
    10 : HoverSkill('attack',false);
  end;
Wait(randomrange(500,1000));
end;

Procedure LoadBMP;
begin
 // took the picture bmp out because of how large it is. Just go to the script page and you will see  the graphics.

end;
procedure LoadVars;
begin
  Drops:=['old charm','ffigy', 'rimson charm', 'reen charm', 'lue charm']

end;

Function XP: Integer;
 Begin
  Return := (Kills*266);
 End;

Function XPhour: Integer;
 Begin
  Return := Round((XP * 3600) / (GetTimeRunning / 1000));
 End;

Procedure DoThePainting;
Begin
If Paint = 'Yes' then
  begin
  LoadBMP;
  SMART_DrawBitmap(False, BMP, Point(0, 337));
  SMART_DrawText(130, 395, UpCharsEx, '' +IntToStr(Kills)+  '', clRed);
  SMART_DrawText(130, 420, UpCharsEx, '' +IntToStr(Exp)+ '', clRed);
  SMART_DrawText(130, 445, UpCharsEx, ''+IntToStr(XPhour)+'', clRed);
  SMART_DrawText(325, 395, UpCharsEx,''+TimeRunning+' ', clRed);
  SMART_DrawText(440, 420, UpCharsEx, ''+IntToStr(Charms)+'', clRed);
  FreeBitmap(BMP);
 end;
 end;
     Procedure Proggy;

begin
  ClearDebug;
  XPHour;
  Writeln('********************************************');
  Writeln('*      |*/\GhoulerV4/\*|      *');
  Writeln('********************************************');
  Writeln('*You have killed ' + IntToStr(Kills) + 'Ghouls');
  Writeln('*And have Gained ' + IntToStr(Exp) + 'EXP');
  Writeln('*And have Gained ' + IntToStr(XPH) + 'XP/H');
  Writeln('*And have Picked up ' + IntToStr(Charms) + 'Charms');
  Writeln('* Ran for ' + TimeRunning + '');
  Writeln('********************************************');
  end;

      //Euphamism thanks, through YoHo
procedure SMART_DrawBitmapWithTextMulti(Clear: Boolean; Bitmap: Integer; BmpPlacement: TPoint; TP: TStringArray; Shadow: Boolean; TxtPlacement: TPoint; Font: string; Colour: TColor);
var
  I, B, H, Pic, TPH, Numb: Integer;
  Offset: TPoint;
  TTP: TPointArray;
  Canvas: TCanvas;
begin

  if (not SMART_DebugSetup) then
    SMART_SetupDebug();


  TPH := High(TP);

  Offset := IntToPoint(TxtPlacement.x - BmpPlacement.x, TxtPlacement.y - BmpPlacement.y);

  Pic := CopyBitmap(Bitmap);

  for I := 0 to TPH do
  begin

    TTP := LoadTextTPA(TP[i], SmallChars, H);

    for B := 0 to High(TTP) do
    begin

      Numb := ((I + 1) * 13);

      if Shadow then
        try

          FastSetPixel(Pic, TTP[b].x + 1 + Offset.x , TTP[b].y + Numb + 1 + Offset.y,131072);
        except
        end;

      try

        FastSetPixel(Pic, TTP[b].x + Offset.x, TTP[b].y + Numb + Offset.y, Colour);
      except
      end;
    end;
  end;

  Canvas := TCANVAS.Create;
  Canvas.Handle := SmartGetDebugDC;
  DrawBitmap(Pic, Canvas, BmpPlacement.x, BmpPlacement.y);
  FreeBitmap(Pic);
end;


//credits to Flight for helping with this.
Function FindGhoul(Var X,Y: Integer): Boolean;
  var
    CTS,I,T,J: Integer;
    TPA,T1,T2: TPointArray;
    Box:TBox;
    PBox: TPointArray;
    ATPA:T2DPointArray;

    begin
    MarkTime(J);
  repeat
    Result := False;
    CTS := GetColorToleranceSpeed;
    PBox := TPAFromBox(IntToBox(240, 130, 290, 190));

    ColorToleranceSpeed(2);

    SetColorSpeed2Modifiers(0.20, 1.60);

     FindColorsSpiralTolerance(MSCX, MSCY, T1,(11652298), MSX1, MSY1, MSX2, MSY2, 3);
     FindColorsSpiralTolerance(MSCX, MSCY, T2,(11652298), MSX1, MSY1, MSX2, MSY2, 8);
     ColorToleranceSpeed(CTS);
     TPA := ClearTPAFromTPA(TPA, PBox);
     TPA := CombineTPA(T1,T2);
     ATPA := TPAtoATPAEx(TPA,30,30);
     SortATPAFrom(ATPA,Point(259,153));

For i := 0 to High(ATPA) do
begin
    if (Length(TPA) < 1) then
      Exit;
     Box := GetATPABounds(ATPA);
     MiddleTPAEx(ATPA[i],X,Y);
     MMouse(X,Y,5,5);

    if WaitUpText('ck Gho', 50) then
    begin
      GetMousePos(X, Y);
      ClickMouse2(True);
      Result := True;
      SMART_ClearCanvasArea(Box);
      Exit;
    end else
    Result := False;
    end;
    Until (TimeFromMark(J) > 3500);
    End;
Function FindObjOnScreen(Up,Option:Array of String;Color,Tolerance1,Tolerance2:Integer;MC2:Variant;Hmod,Smod:Extended): Boolean;
  var
  X,Y:Integer;
    CTS,I,T,J: Integer;
    Box:TBox;
    TPA,T1,T2,Pbox: TPointArray;
    ATPA:T2DPointArray;

    begin
    MarkTime(J);
  repeat
    Result := False;
    CTS := GetColorToleranceSpeed;
    PBox := TPAFromBox(IntToBox(245, 135, 280, 185));

    ColorToleranceSpeed(2);

    SetColorSpeed2Modifiers(Hmod,Smod);

     FindColorsSpiralTolerance(MSCX, MSCY, T1,(Color), MSX1, MSY1, MSX2, MSY2, Tolerance1);
     FindColorsSpiralTolerance(MSCX, MSCY, T2,(Color), MSX1, MSY1, MSX2, MSY2, Tolerance2);
     ColorToleranceSpeed(CTS);
     TPA := ClearTPAFromTPA(TPA, PBox);
     TPA := CombineTPA(T1,T2);
     ATPA := TPAtoATPAEx(TPA,20,20);
     SortATPAFrom(ATPA,Point(259,153));

 For i := 0 to High(ATPA) do
begin
    if (Length(TPA) < 1) then
      Exit;
     Box := GetATPABounds(ATPA);
     MiddleTPAEx(ATPA[i],X,Y);
     MMouse(X,Y,5,5);
     if WaitUpTextMulti(Up, 400) then
    begin
      GetMousePos(X, Y);
      ClickMouse2(MC2);
      ChooseOptionMulti(Option);
     SMART_ClearCanvasArea(Box);
      Result := True;
      Exit;
    end;
    end;
    Until (TimeFromMark(J) > 3500);
    End;

Function PickupCharms:Boolean;
Var
  X, Y: Integer;
begin
If Charmer = False then Exit;
If Charmer = True then
begin
  FindNormalRandoms;
  If FindObjOnScreen(['ake', 'Take', 'ke', 'ak'],['harm'],6397359,4,8,False,0.38,0.55) Then
  Begin
  Wait(500);
    writeln('You have found the some Charms!');
    While IsMoving do
    Wait(50);
    FindNormalRandoms;
    Wait(RandomRange(300,400));
    Inc(Charms);
  End;
  end;
  end;

procedure GetOutF;
begin
  case random(2) of
    0 : begin
        KeyDown(VK_Tab);
        wait(35+random(100));

        wait(35+random(100));
        KeyUp(VK_Tab);
        wait(25+random(70));

        wait(35+random(100));
        end;
    1 : begin
        ExamineInv;
        end;
  end;
end;

procedure GMoveMouse;
begin
  case random(4) of
    0 : begin
        mMouse(5,25,10,20);
        end;
    1 : begin
        mMouse(250,150,40,40);
        end;
    2 : begin
        mMouse(505,350,50,50);
        end;
    3 : begin
        mMouse(30,315,20,40);
        end;
  end;
end;
 //laakes
Procedure RAntiBan;
begin
  Wait(randomrange(200,400));
  case random(RandAmount) of
    0 : begin
          writeln('Random Wait AntiBan');
          Wait(randomrange(1100,2500));
        end;
    1 : begin
          GAntiBan;
        end;
    2 : begin
          writeln('pickup mouse / GMoveMouse');
          PickUpMouse;
          Wait(randomrange(25,100));
          GMoveMouse;
          Wait(randomrange(250,300));
        end;
    3 : begin
          writeln('Double GMoveMouse');
          GMoveMouse;
          Wait(randomrange(45,100));
          GMoveMouse;
        end;
  end;
end;
//laake's
Procedure KillGhouls;
var
sX,sY,X,Y,J: Integer;
begin
Repeat
     If FindGhoul(X,Y) then
     Wait(1950);
     Until UInFight or InFight;
     If FindBlackChatMessage('omeone else is fighting') then begin
     RandomThing;
     GetOutF;
     End;
    If UInFight or Infight then
    WriteLn('You are Ghouling this Ghoul!');
    Inc(Kills);
    begin
      repeat
      Proggy;
      DoThePainting;
      FindNormalRandoms;
      Eat('Eat');
      RAntiBan;
      until (not UInFight) or (not OthersInFight) or (not LoggedIn)
    end;
    wait(randomrange(200,300));
  end;

Procedure PickScroll;
Begin
If ChampionScroll = False then Exit;
If ChampionScroll = True then
Begin
  FindObjOnScreen(['ake', 'Take', 'ke', 'ak'],['croll'],9621212,4,9,False,0.02,3.25);
End;
end;
Procedure PickEffigy;
Begin
If Effigy = 'No' then Exit;
If Effigy = 'Yes' then
Begin
  FindObjOnScreen(['ake', 'Take', 'ke', 'ak'],['ffigy'],8290940,1,3,False,1.73,0.01);
End;
end;
procedure Startup;
begin
  Smart_Server := 69;
  Smart_Members:= true;
  Smart_Signed := true;
  Smart_SuperDetail := false;
  SetupSRL;
  RandAmount := 30;
  MSpeed := 200;
  DeclarePlayers;
  LogInPlayer;
  MouseSpeed := MSpeed;
  wait(100+random(100));
end;

begin
  Startup;
  SetupChar;
  LoadVars;
  DoThePainting;
  repeat
  MarkTime(Z);
  Repeat
  Wait(500);
  DoThePainting;
  FindObjOnScreen(['Bank', 'ank', 'ooth'],['ank'],7567226,1,3,True,1.59,0.48);
  Until DidRedClick or (TimeFromMark(Z) > 2500);
  If DidRedClick then
  repeat
  Wait(50);
until BankScreen;
begin
  Proggy;
DepositAll;
wait(50 + Random(250));
  Proggy;
Withdraw(0, 0, 28);
wait(50 + Random(250));
  Proggy;
Deposit(1,1,false);
wait(50 + Random(250));
  Proggy;
CloseBank;
end;
 ToGhouls;
 repeat
 DoThePainting;
 Proggy;
 KillGhouls;
 DothePainting;
  PickupCharms;
  DoThePainting;
  PickEffigy;
  DoThePainting;
  PickScroll;
  DoThePainting;
  until (hppercent<50);
  ToBank;
  DoThePainting;
  Proggy;
  FindNormalRandoms;
  until not LoggedIn
  writeln('stopping script');
  Proggy;
TerminateScript;
end.

And heres some pics of my nr bot client if you wanna check that out! :P






Just tell me what you want to see ect.

Edit: edited my code from what someone said later on.

Just tell me what you want to see ect.


Edit: Woops, clicked quote instead of edit on initial app my bad folks.

NO.

But then again, I'm a liar.

I've seen you very active ,seen some of the help you give, seen scripts. VOting yes :) you might wanna add a script or two anyway…

Script ideas? ill make it after lunch. only ones i have are my ghoul caff killer and crafting guild since there on here. And thanks sin! :) nice to see you again bro.

You're attitude is unique… Gonna think about this one.

From: Yago
You're attitude is unique… Gonna think about this one.

Go ahead and think then! :P



On PowerBot, just showing me as a Contrib on there which is bassically showing that i have knowledge in Java along with
other programming language and have shown excellence to admins and owners.

Without a doubt in my mind, YES.

I have seen you grow from knowing nothing and being a bit rude, to knowing a lot and improving everyday and being VERY helpful to many :)

Thank you Random! :) i appreciate the word of kindness! :P

Laakerules is a dude, always open to helping people and doing group projects. I'm voting yes!

Thanks cause, and i got rid of the thing in post you wanted! :)

Nice to see you back, I love your scripts and although some people don't really like you attitude I've always seen you being helpful and nice to others. Also your ghouler was one of my motivations to start scripting so that's always special ;). Voting yes :D

Thanks Gucci, and ohhhh wow. Got enough scripts there? :O

Hahaha yeah it's getting kinda big, probably a few more addition this week ;)

Ouhhh, i like the Bonefire idea.

From: laakerules
Ouhhh, i like the Bonefire idea.

Yeah I wanted to go for RuneSpan but the amount of people that went for that made me want to go for something that went a little less noticed in the update, even that script has received quite a bit of attention since I released it like last night

LOL Gucci, goml ;)

From: Sin
LOL Gucci, goml ;)

LOL getting close Sin like 6 more to get to 20 :garfield:. How many are public? I'll see if I can tie that ;)

Lol, Script count war! :P

Gucci, the 20 I have are public :p
~31 total

Whos voting no, and why? :O

From: laakerules
Whos voting no, and why? :O

They never post, I think it's because some people just vote for the sake of voting so they just pick one still going in your favor though :D

Ya i guess! :P and this is just my coming back one so ya! :)

Yes, great script. You have been here a long time and you are active.

Thanks mika.

Community
Unlike the others, I have not seen you around the forums, however your longevity and post count are not an issue. Having said that, your activity is way below par and I really think you need to become much more active if you want to become an SRL Member.


Scripting
I'm confused as to why you posted one script in Simba tags and then decided to make us download the other?

I'n not having that, so I'm only looking at the Ghouler when making my analysis of your scripting ability.

Let's start of with the unnecessary begin..ends you have in this script:

    2 : begin // not needed
        MSI_RandomFKey;
        end; // not needed
    3 : begin // not needed
        RandomRClick;
        end; // not needed

That little extract should look like this:

    2 : MSI_RandomFKey;
3 : RandomRClick;
//much simpler, much neater

Another thing, you standards are horrible, I thought mine were bad :confused:
Look at this:

Procedure XPhour;
Begin
XPcalc;
XPH := Round((Exp * 3600) / (GetTimeRunning / 1000));
End;

All I can say is, you ALWAYS indent after begins, it should look like this:

Procedure XPhour;
Begin
  XPcalc; // two lines ahead
  XPH := Round((Exp * 3600) / (GetTimeRunning / 1000)); // two lines ahead
End;

Also, make sure your begin and ends always line up.

In terms of content, it's a very simple script and the only TPA function you have used, was with the help of Flight.

Finally, the script does not even compile. Not a good idea to apply with that now is it?

Didn't looked at the script as it would be a waste of my time. Of course I'm voting yes!

***

From: laakerules
IThere are 3 or 4 tpa functions in there, one is for atpa. The Script doesnt compile cause i removed the massive bmp in there for my paint. My standards may be a lil wierd at sometimes but at least its readable.

For those begin's and ends that you thought were unnecessary, i was planning on adding in some waits with each antiban.


And if your so smart then why didnt you suggest for me to do something like this!

funciton XPhour:Integer;
Begin
  XPHour := Round((Exp * 3600) / (GetTimeRunning / 1000)); 
End;

3rd, if you had actually red my app you would have seen why i havent been around lately.
:duh:

Other than that, thanks for you input and whatever you voted.

There are only two TPA functions in your Ghouler, both of which were made with help from euphenism, Flight and YoHoJo.

Regardless of any adjustments you made, you should make sure a script compiles before applying with it.

How am I supposed to know you plan to add Wait's within the begin and end? All I see is you using one statement within them which means at the moment, they're not needed.

You really shouldn't say I'm not smart when there are multiple things wrong with what you posted:

funciton XPhour:Integer;
Begin
  XPHour := Round((Exp * 3600) / (GetTimeRunning / 1000)); 
End;

You spelt 'function' wrong, if you're so smart why can't you spell? Also, it shouldn't be a function if there is no result, the correct way to do that would have been:

function XPhour:Integer;
Begin
  Result :=  Round((Exp * 3600) / (GetTimeRunning / 1000)); 
End;

On your third point, I apologise for not reading about why you have been inactive lately.

Finally, I have not voted yet.

***

From: laakerules

Wouldnt you get a duplicate variable unless you had it like this?

function XPhour:Integer;
Begin
  Result :=  Round((Exp * 3600) / (GetTimeRunning / 1000)); 
End;

Yes my mistake, you should still however use a Result for a function which you failed to do.

***

From: laakerules
… it slipped my mind since i was just typing while watching tv…

You see, I was also and still am watching football :duh:

***

From: laakerules
so for god damns sake im sorry that i forgot a result…

LOL, I wasn't trying to make a big deal out of it with that comment, in fact, completely the opposite.

I was saying that I was also watching TV when I made the mistake with correcting you, so I understand where you are coming from.

Sorry you took it in the wrong way.

***

Voted no. I don't like the way you handled abu's constructive criticism.

Not taking sides here but it was abu's fault partly.
The script did compile, hence the positive feedback on his thread.

From: Sin
The script did compile, hence the positive feedback on his thread.

Omg have some sense Sin :duh:

Why would I say it didn't compile if it did? I'm not just gonna make that up :L

When he applied with that script - it didn't compile.

It is however, now fixed after I mentioned the issue.

From: Kyle Undefined
Voted no. I don't like the way you handled abu's constructive criticism.

I was about to comment on this, and saw that someone already has. Abu's criticisms are valid and cover everything that I was going to point out and more; however, instead of thanking him for the constructive critique (Which is expected in a member's application) you more or less spit in his face. For these reasons, I am voting no on your application.

From: laakerules
And if your so smart then why didnt you suggest for me to do something like this!

………………..

3rd, if you had actually red my app you would have seen why i havent been around lately.
:duh:

………………..

so for god damns sake im sorry that i forgot a result…

Voting no based purely on this; I'm not even going to bother reading your script. Arguing in your app really doesn't help you out.

Thanks for you pixel words guys. However i did not change a single thing in the code on the main one to make it compile…

Thanks for any future words.

I voted yes
You have helped me in the past and your ghouler is some crazy shiz, never used it but ive read through it
Good luck on SRL Membership

Thanks joe!

From: laakerules
Thanks for you pixel words guys. However i did not change a single thing in the code on the main one to make it compile…

Thanks for any future words.

I was going to vote yes, but I don't like this post, or how you didn't appreciate the criticism .

ps: I didn't even look at the script

Voting no because you have a bad attitude and you edited your posts like an (expletive) because you didn't want everyone to see that you had a bad attitude.

From: Awkwardsaw
ps: I didn't even look at the script

Okay, please inform me of my bad attitude? im just doing the same i always do! :P

And i edited the posts because i wanted to, honestly i didnt care if people saw how me and abu were talking about my stuff, and i wasnt even getting mad in them. Looks like another failed app! :P but thanks for anyone who comments or votes.


Edit: in other notes! :P

From: laakerules
Okay, please inform me of my bad attitude? im just doing the same i always do! :P

And i edited the posts because i wanted to, honestly i didnt care if people saw how me and abu were talking about my stuff, and i wasnt even getting mad in them. Looks like another failed app! :P but thanks for anyone who comments or votes.

Your arguing and being sarcastic. You would have been better off saying "Oh thanks for the input, I'll update it as soon as i can." even if you know your right

From: laakerules
Okay, please inform me of my bad attitude? im just doing the same i always do! :P

So yeah… you haven't changed. You get valid, honest criticism and all you can do is cuss. Really?

From: laakerules

And i edited the posts because i wanted to, honestly i didnt care if people saw how me and abu were talking about my stuff

So you edited them for no reason? Why did you edit them if you didn't care? Where was the desire to edit them then?

From: laakerules
i wasnt even getting mad in them.

Not buying it.

From: laakerules
Looks like another failed app! :P but thanks for anyone who comments or votes.

I'm sorry. Really, I am. But every time you come around here and hate on someone.

From: laakerules
Edit: in other notes! :P

Also, nobody really cares about your java bot. Sorry, but we're a pascal-based program for a reason.

Good too see you dont care! :P thanks for you nice comments anyways though. Where did i cuss? Trying to get rid of all cussing on forums. Please inform me of where.

From: laakerules
Good too see you dont care! :P

We DO care, this way next time you apply you can take our advice to heart, and maybe get it:)

Lol, thanks awkward, i was talking about the java rsps bot but thanks! :P maybe 5th time will be the charm! :P

From: laakerules
Good too see you dont care! :P thanks for you nice comments anyways though.

Just doing my duty :).

From: laakerules
Where did i cuss? Trying to get rid of all cussing on forums. Please inform me of where.

From: laakerules

And if your so smart then why didnt you suggest for me to do something like this!

………………..

3rd, if you had actually red my app you would have seen why i havent been around lately.


………………..

so for god damns sake im sorry that i forgot a result…
And if your so smart then why didnt you suggest for me to do something like this!

………………..

3rd, if you had actually red my app you would have seen why i havent been around lately.


………………..

so for god damns sake im sorry that i forgot a result…

god damns sake

god damn

And, you're honestly kind of whiny. That annoys me.

[05:58:54] <LaakeRules> cut em 2 it nigger

Oh this is just golden.

Yup, i wanna know when damn or GOD became a cussword though! :) i do like irc its fun.

From: laakerules
Yup, i wanna know when damn or GOD became a cussword though! :) i do like irc its fun.

I'm pretty sure that "nigger" is a cuss word. And you said it… not jokingly.

lol, whaaa? :O how was that not jokingly. and the n word aint a cussword. never has never will be, its a racial term used 50+ years ago to adhere the color of a black slave. Word was also orriginated from the spanish word negro.

From: laakerules
lol, whaaa? :O how was that not jokingly. and the n word aint a cussword. never has never will be, its a racial term used 50+ years ago to adhere the color of a black slave. Word was also orriginated from the spanish word negro.

Ok. I'll stop posting on this thread now.

Okay, thanks for your "constructive critiscism" :)

From: laakerules


Okay, thanks for your "constructive critiscism" :)

You're welcome.

Awww thanks!

LOL this is getting very off topic now, although the GIF's are hilarious you should probably take this to PM's or irc

Staff should just close the thread and tell him to apply again in 1 month. Given that something has changed.

Your code is decent, but your attitude is the same as it was before…

Sorry No.

From: P1nky
Your code is decent, but your attitude is the same as it was before…

Sorry No.

Same here. Seeing you on IRC using words like 'niggers' makes me dislike you a bit more

Thanks for your input pinky, and good to see you agian justin! :P

From: laakerules
Thanks for your input pinky, and good to see you agian justin! :P

You too. Was running late when I saw your message and didn't reply.

No worries bro, hey ill pm you.

The phrase "nigger' isn't a bad word. USing it in a derogoratory way and or as slang is racism. It's like the word bitch. It's all fine and dandy until it's used in a bad way. The mainstream society cannot understand this because of the guidelines the media has made them think upon.

So next time you say nigger, dont use it in that context please, some people can be offended.

Also, i think it's gotten to the point where you need to just say sorry and let the thread die. TRy again when you feel ready.

:)

If not for abu's quoting, I didn't know something has actually happened.

Your activity was fine. Script is popular and we're well aware of it. Originally it could have gone very well, but I am sorry. I guess you might need more time to deal with that attitude of yours.

No worries though mate, it's not something unforgivable and I am sure guys here are very happy to welcome you in should you improve in the future. There's no ETA as to when you should get SRL Members. I guess right now what you need to work on has nothing to do with SRL community involvement or scripting at all, it's something personal and I wish you good luck facing your problems.

No, it is an offensive word because of its history. There aren't any non-offensive ways to use it.

im out done with this app like the others feel free to still vote and give me tips on my CODE! And thanks to all previous posts i am sorry for my supposed bad attitude! :)

I held my vote as I saw you app, because I like your script. The part "tell about yourself" is a bit snotty imo, I mean most of the guys here know "computers like crazy".
As I read the thread, I voted no because of your attitude.
Good luck next time :)

I don't know why people are voting against you, I looked through your other scripts and you have quite a good flow going on. Good luck with the vote, though.
I saw your crafting guild urns script- and am now contemplating completing mine…

From: JOEbot
I don't know why people are voting against you, I looked through your other scripts and you have quite a good flow going on. Good luck with the vote, though.
I saw your crafting guild urns script- and am now contemplating completing mine…

SRL Membership isn't all about the script ^.^

From: JOEbot
I don't know why people are voting against you, I looked through your other scripts and you have quite a good flow going on. Good luck with the vote, though.

:duh::duh::duh:

Attitude > Scripting Ability

@laakerules:

You are going to have to realize that you will not get along with everyone on the site. You will have to come to terms and restrain your attitude better in the future if you expect people to like you and thinking positively when voting on future applications. When someone gives you grief over something. Just say thank you for the advice and brush it off or if it is truly good advice think about what they said. Think before you speak.

Voted 'Yes' for no reason.

From: JOEbot
I don't know why people are voting against you, I looked through your other scripts and you have quite a good flow going on. Good luck with the vote, though.
I saw your crafting guild urns script- and am now contemplating completing mine…

Complete yours, doesn't matter if there's already one ;) Also, that's a little outdated.

From: laakerules
And thanks to all previous posts i am sorry for my supposed bad attitude! :)

:duh:

You just won't get it will you?

I haven't taken any offence with what you have said, but other members dislike your attitude.

Stop taking this 'cool and casual' approach towards things and take things a bit more seriously.

People here are trying to give you advice on attitude and you just brush them off as though they don't have a clue what they're saying and they are just making up the fact that you have a ''supposed bad attitude'' because for some bizarre reason they like making these things up!

For God's sake, JUST APOLOGISE!

C'mon guys, let's cut the tension on this one ^.^

Nice new pic sin! :P

From: laakerules
Nice new pic sin! :P

It isn't in your best interest to suck up to people either… you look like an asskisser and thatll stick with you even to your next application.

@ Kyle: Yeah I'll complete mine anyway, the crafting section is looking a little empty anyways…

… sin is a friend of mine, i buy gold from him and he has helped me alot whenever i needed help. On other note if you make your crafting guild, then i guess ill work on updating mine and making it better! :P

From: laakerules
… sin is a friend of mine, i buy gold from him and he has helped me alot whenever i needed help. On other note if you make your crafting guild, then i guess ill work on updating mine and making it better! :P

Damnnn straight ^.^

Nope, and I for one do not appreciate the offtopic nature here, and the racism. Just nope.