SRL Archive - RS3 Outdated / Broken Scripts

Current Status

Unknown

Making rings of dueling:
Time: 3 Hours, 59 Minutes and 28 Seconds
Items Total: 2842
XP: 161170
Items/h: 712
XP/h: 40385

Cannonball:
Time: 5 Hours, 34 Minutes and 50 Seconds
Items Total: 10864
XP: 69300
Items/h: 1946
XP/h: 12418
^^6 hours past.






Use AIO Instead. Performs much better and some bugs are fixed. Includes full proggy.
http://villavu.com/forum/showthread.php?t=79406

punkd, i can't even download the link lol.

THIS SCRIPT IS PLAGIARISED!
GO TO http://villavu.com/forum/showthread.php?p=967630#post967630 TO SEE THE PROOF

Sin's Fail Crafter Inspired you?

Inspired? More like his crafter IS the script -_- difference finder ftw…
Cheers.
Anubis

Reported post for plagiarism, 95% of the code is MINE.

Sin I wasn't insulting your script it worked. But I want to add gems. And by inspire I meant your work got me to do this.

Wth? None of the code is yours except the proggy. I gave you credit. And like I said some of the code I got the idea from your script but everything is unique in it's purpose.

Don't say inspired if you took snippits or more from another script, you cant claim it as your own. If anything please give credit to the original scripter(s) and say you modified their script…

Edit: ONLY if the script writer gives you permission (it's their virtual property)

double post*

From: sckwarrior
Edit: sorry ONLY if the original script writer gives you permission (It's their virtual property)

This.
http://en.wikipedia.org/wiki/Digital_Millennium_Copyright_Act

Under DMCA I own my code, and I explicitly did NOT allow you did I?

Like I said I used your script as an example and the only thing I took and modified from you was the proggy system. Other than that the functions were used from the SRL library and tutorials. You obviously dont own the SRL library n I can take down your proggy If u want.

Taking down "fail" in the middle of Sin's Crafter would be a nice start, just saying.

From: TheAnubis
Taking down "fail" in the middle of Sin's Crafter would be a nice start, just saying.

He's done so, like 20 minutes ago… :S

I took it down because he took it the wrong way. The first name I gave was his because it was his crafter that really did get me going about making this.

 Item := 'Ring';   // Bracelet Ring Amulet Necklace (Capitalize the first letter or it wont work [too lazy to add lowercase func])
  WhatJewl := 'Emerald'; // Sapphire Emerald Ruby Diamond (Capitalize the first letter or it wont work [too lazy to add lowercase func])
  Make := 5000; // Amount to make before script stops.

 Item := 'Bracelet'; //Ring, Bracelet, Amulet, Necklace
  WhatType := 'Emerald'; //Gold,Sapphire,Ruby,Emerald,Diamond
Amount := 1000;

//================================DO NOT TOUCH BEYOND THIS POINT================================
procedure SetDTM;
//Originally set with DTM's but pixels would often change so it would occationally fail. Set to Tpoint instead.
begin
Sapphire := DTMFromString('mbQAAAHicY2VgYJjKxMAwCYjnAvEsIJ4IxI+A4m+B+DkQ34fSzc3TGQRFqhnY2HUZuHj8wHx+oDg6ZsSCwQAAgcUMQw==');
Emerald := DTMFromString('mbQAAAHicY2VgYMhhYmAoBuJMIC4A4jQgZmdkYOACYn4gZoGydfdKMbAZczDwFwuB2SDMD9SPjhmxYDAAAMTVBpI=');
Ruby := DTMFromString('mbQAAAHicY2VgYNjPxMBwFIh3AfERID4IxByMDAxcQCwIxKxAzAfEa5MTGIIFuBlSRHjhbH6gfnTMiAWDAQCDzgif');
Diamond := DTMFromString('mWAAAAHicY2FgYMhlYmAoBuJ0IM4AYi1GBgZ9IDYGYh0gXjpvLoOrkxPD5J4ehk0bVjPwA/UgY0Y0DAIA2LsJGQ==');
Bar := DTMFromString('mbQAAAHicY2VgYOBlgAAZIBaF8jmBmAeI2YBYAIjFgHhpiwSQZELBIgyYgBELBgMAiAgB9A==');
end;   //Yours;

//Gems
Emerald := DTMFromString('mrAAAAHic42BgYBBmZGDgBmIOIBYCYkkgloLSPEA8C6hmERDPgNJzgXgKEPcD8UQg5ksWAJJMOLEIA37ASADDAADoKwYT');
Diamond := DTMFromString('mrAAAAHic42BgYBBmZGDgBmIOIBYCYkkgloLSPEA8C6hmERDPgNJzgXgKEPcD8UQg5ksWAJJMOLEIA37ASADDAADoKwYT');
Sapphire := DTMFromString('mlwAAAHicY2dgYMhiZGBIB+IEIC4B4gIgzgXiJCCeAZRfBMRzgXg2EPcD8QIgngLE/EKZQJIJKxZhwA0Y8WAoAACKlQfZ');
Ruby := DTMFromString('mrAAAAHichcqxCoAgAEXRZ5ODk/hp/ZWFgyUJItKXdpfG7MJ507OSipF2nGjoiEiouPgM3Og40JCxYfWOXT4FzTM/3h5X3QoZ');
//Mine

procedure Typeofjewlery;
begin

//Gold
if WhatJewl = 'Gold' then
begin
  items := 28;
    Jewl := Bar;
  end;
  if WhatJewl = 'Gold' then
  begin
  if Item = 'Bracelet' then
    begin
      MPoint := Point(130, 290);
    end else
  if Item = 'Ring' then
    begin
      MPoint := Point(117, 106);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(136, 167);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(130, 230);
      end;
     items := 28;
    end else

//Sapphire
if WhatJewl = 'Sapphire' then
  begin
  items := 14;
    Jewl := Sapphire;
  end;
  if WhatJewl = 'Sapphire' then
  begin
  if Item = 'Bracelet' then
    begin
      MPoint := Point(182, 287);
    end else
  if Item = 'Ring' then
    begin
      MPoint := Point(166, 102);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(181, 166);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(182, 226);
    end;

    end else


    //Emerald
if WhatJewl = 'Emerald' then
  begin
  items := 14;
    Jewl := Emerald;
  end;
  if WhatJewl = 'Emerald' then
  begin
  if Item = 'Bracelet' then
    begin
    MPoint := Point(232, 287);
    end;
  if Item = 'Ring' then
    begin
     MPoint := Point(205, 101);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(231, 164);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(232, 226);
    end;
    items := 14;
    end else

    //Ruby
if WhatJewl = 'Ruby' then
  begin
  items := 14;
    Jewl := Ruby
  end;
  if WhatJewl = 'Ruby' then
  begin
  if Item = 'Bracelet' then
    begin
      MPoint := Point(282, 288);
    end else
  if Item = 'Ring' then
    begin
      MPoint := Point(256, 102);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(281, 166);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(280, 226);
    end else
    items := 14;
    end else

    //Diamond
if WhatJewl = 'Diamond' then
  begin
  items := 14;
    Jewl := Diamond;
  end;
  if WhatJewl = 'Diamond' then
  Begin
  if Item = 'Bracelet' then
    begin
      MPoint := Point(332, 288);
    end else
  if Item = 'Ring' then
    begin
      MPoint := Point(300, 102);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(333, 166);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(332, 226);
    end;
    items := 14;
    end else
    end;
    

procedure Path;
begin
if WhatType = 'Gold' then
  begin
  if Item = 'Bracelet' then
    begin
      Obj := Bracelet;
    end;
  if Item = 'Ring' then
    begin
      Obj := Ring;
    end;
  if Item = 'Necklace' then
    begin
      Obj := Necklace;
    end;
  if Item = 'Amulet' then
    begin
      Obj := Amulet;
    end;
    Inc1 := 28;
  end else
  Inc1 := 14;
end;   

procedure Itemwithdrawal;
var
  x,y,x2,y2:Integer;
  Inv1,Inv2,Inv3:Integer;
  begin
  //if CraftMenu then
    //exit;
    if not bankscreen then
    exit;
  if bankscreen then
      begin
        wait(1000);
        DepositAll;
        Inv1 := InvCount;
          begin

            if whatjewl = 'Gold' then
            begin
            if FindDTM(bar,x,y,MBX1,MBy1,MBX2,MBY2) then
              begin
                repeat
                humanmmouse(x,y,1,1);
                clickmouse2(false);
                WaitOptionMulti(['Withdraw-all', 'w-A'], 300)
                wait(1500);
                  if (invcount > 28) then
                    begin
                    depositall;
                    itemwithdrawal;
                    exit;
                    end;
                until(invcount = 28);
                  inv2 := Invcount;
                end;
            end else
              if FindDTM(bar,x,y,MBX1,MBy1,MBX2,MBY2) then
                begin
                  humanmmouse(x,y,1,1);
                  clickmouse2(false);
                  WaitOptionMulti(['Withdraw-14'], 300)
                  wait(1500);
                    if (invcount > 14) then
                      begin
                        depositall;
                        itemwithdrawal;
                        exit;
                       end;
                  inv2 := Invcount;
                if invcount = 14 then
                  begin
                    FindDTM(jewl,x2,y2,MBX1,MBy1,MBX2,MBY2);
                    humanmmouse(x2,y2,1,1);
                    clickmouse2(false);
                    WaitOptionMulti(['Withdraw-14'], 300)
                    wait(1000);
                    Inv3 := InvCount;
                    WaitFunc(@InvFull, 1500, 6000);
                  end;
                end;
        end;
        if not invfull then
          Itemwithdrawal;
          if invfull then
            begin
              closebank;
            end;
      end;
end;  

procedure Bank;
var
  x,y,t:Integer;
  Inv1,Inv2:Integer;
begin
//if FindChest(x,y) then  //TPA's are buggy
if FindObjCustom(x,y,['Use', 'ank', 'Chest'],[2117995,7368821],2) then
  begin
    GetMousePos(x,y);
    Mouse(x,y,1,1,True);
    if DidRedClick then
      begin
      MarkTime(t);
      repeat
        wait(100);
        if TimeFromMark(t) > 7000 then
          begin
            Bank;
            exit;
          end;
      until(PinScreen or BankScreen);
      end;
    if PinScreen then
    begin
      InPin(Players[CurrentPlayer].Pin);
    end;
    if BankScreen then
      begin
        wait(1000);
        DepositAll;
        Inv1 := InvCount;
        if WhatType = 'Gold' then
          begin
            if FindDTM(Bar,x,y,MBX1,MBy1,MBX2,MBY2) then
              begin
                Mouse(x,y,1,1,False);
                ChooseOption('All');
                repeat
                  wait(100);
                  Inv2 := InvCount;
                until(Inv2 > Inv1);
              end;
          end;
        if WhatType = 'Ruby' then
          begin
            if FindDTM(Ruby,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
            if FindDTM(Bar,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
          end;
        if WhatType = 'Emerald' then
          begin
            if FindDTM(Emerald,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
            if FindDTM(Bar,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
          end;
        if WhatType = 'Diamond' then
          begin
            if FindDTM(Diamond,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
            if FindDTM(Bar,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
          end;
        if WhatType = 'Sapphire' then
          begin
            if FindDTM(Sapphire,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
            if FindDTM(Bar,x,y,MBX1,MBY1,MBX2,MBY2) then
              begin
                Mouse(x,y,2,2,False);
                ChooseOption('14');
              end;
          end;
      CloseBank;
      end;
  end;
SPS_WalkToPos(Point(1219, 1393));
wait(1000 + random(200));
repeat
  wait(500);
until(Not IsMoving);
end;   

Please, I can go on if you'd like.

Ahh I appologize Toxin, didn't see that ;P btw love your work.
Anyways
Like I said, difference finder ftw :)
Anubis

According to Sin's post…@OP, I believe you've royally screwed yourself here…

Sin, did you even look at what you just posted. None of it even compares. You used dtms I used tpoint. You used findobj I used tpas. And ur dtms are for items mine are gems. Wth

Edited it, I posted the wrong DTMs, check again thief.

Sin, first of all calm your self down, second, Your dtms still arnt the same!!! and even if they did compare I dont have access to your full script so I wouldnt be able to get the dtms for the gems, what are you even saying.

I've loaded the DTMs from my Lite..

your lite doesnt have gem dtms…. and theyre not even the same…. I said in my first post, that it was your script that got me to write this. You might find it similar but the only thing I used was proggy and Like I said Ill take that out in a sec.

In my opinion it doesn't look like he copied your script Sin. Sure there's a few similarities, but that's to be expected in two scripts that do the same thing.

Thank you Nebula, I Specifically said, His script was what inspired me. And he assumes I copied him when I only used the proggy which I am taking out as we speak

Explain the variables, the DTMs, the procedures.
Nebula, I assume you can read code.
Download my crafter and check the similarities.
Look at my procedure of 'Path' and look at his of 'whtjewel' or whatever.
They ARE the same.

There are HUGE differences between his and Sins script. There's a few similarities, but most of it isn't copied.

Sin, What youve posted is from your full script. How would I even have access to that. The DTM's are no match, Variables are X,Y. The procedures are completely different in that mine use a different procedure to walk, to find the furnace, to check if there are bars in the inv. I'm not trying to put you down Sin, and giving me negative rep is just a stupid reaction because There is nothing I took from you. At least not in a few mins.

Read my edit, you have plagiarised my Path procedure, I'll argue my caseater, I'm off to bed.
Night Thief.

@Kyle, he obviously removed some of the unnecessary stuff that I had in my AIO crafter Lite which I didn't deign to remove from my full.

Sin, kyle is comparing to your full version. Not to your lite. I didnt steal your path procedure. Our scripts do the same thing, theyre going to be similar regardless. If I was to steal from you, Id have changed the entirety of your script in a matter that would never compare.

Actually, he has completely different methods and logic in his. Like I said, there's similarities, but it's not completely ripped.

I'm comparing his Lite version, as you can see in the title of the document.

He's comparing to my Lite……..

From: punkd
Sin, kyle is comparing to your full version. Not to your lite. I didnt steal your path procedure. Our scripts do the same thing, theyre going to be similar regardless. If I was to steal from you, Id have changed the entirety of your script in a matter that would never compare.

Which is pretty much did just change things to make it not compare

if it possible to craft gold bar into gold bracelet?? And whats the setting?

Gucci, I'm already getting annoyed. Its a script that does the same thing as what his full version does and he's just getting mad because mine is public.

And @Siuman101, yeah Change the Item to Bracelet and the Jewl to gold

your script is really sucks, won't work… i am sorry for telling the truth.

What exactly won't work.

i will show you in youtube, the link: http://youtu.be/ou7E2KEDQY0
it don't even start smith.

lol, Suiman, U have to capitilize the first letter of Gold and First letter of Bracelet. It says that. And I said it in my post that I have not added a Lowercase Function yet

I actually tend to agree with Kyle. I also ran the two scripts on another diff tool and the results show they're quite different. Yes some variables they really used the same names, but I think many people do that too.

Btw, is that the compare plugin on NPP? I need to get myself one of those as well.

The script is a bit time-wasting. When reached the furnace, the bot should immediate click on the gold bar and smelt it. Instead, the bot will hover the mouse to the furnace then to the bar, these kind of action wasted a lot of time. The truth is that your bot still have many improvement to make
Here is some suggestion about your future version.
link: http://youtu.be/88K3FRnXpYs
This version must give you at least 35k+exp/hour with just using gold bar, Set this as a target, i am sure your bot will be the best one among others.

From: Er1k
I actually tend to agree with Kyle. I also ran the two scripts on another diff tool and the results show they're quite different. Yes some variables they really used the same names, but I think many people do that too.

Btw, is that the compare plugin on NPP? I need to get myself one of those as well.

Nah, it's WinMerge :D I love that program.

Erik, thanks for the reply, Can we just move on from that. Let him rant all he wants, I gave him credit for the proggy and now I took it out so he has nothing to complain about. And let my -rep be a punishment for even replying to him.

Siuman, If I speed up my script any more, it will be a ban waiting to happen. Account safety is number one.
You can use your own version if you don't like mine. I'm really not in the mood to argue.
Sorry

From: siuman101
The script is a bit time-wasting. When reached the furnace, the bot should immediate click on the gold bar and smelt it. Instead, the bot will hover the mouse to the furnace then to the bar, these kind of action wasted a lot of time. The truth is that your bot still have many improvement to make
Here is some suggestion about your future version.
link: http://youtu.be/88K3FRnXpYs
This version must give you at least 35k+exp/hour with just using gold bar, Set this as a target, i am sure your bot will be the best one among others.

I never knew you could smelt like that. That's ingenious.

But I guess you can phrase your words better. I'll be quite happy in general if the script works and runs for long hours. You shouldn't really care if it's maybe 10-25% less efficient than legit, because we are botting anyway and we probably dont care about the few k more or less xp per hour.

From: Er1k
I never knew you could smelt like that. That's ingenious.

But I guess you can phrase your words better. I'll be quite happy in general if the script works and runs for long hours. You shouldn't really care if it's maybe 10-25% less efficient than legit, because we are botting anyway and we probably dont care about the few k more or less xp per hour.

The point of my script is to keep the botting going for the 6 hours strait without getting someone banned. So you can use it for whatever duration you please. Trying to add a break system atm. Reading tuts. And Er1k, If you want I can send you a copy of the script with Cannonball maker. ;)

From: Er1k
I never knew you could smelt like that. That's ingenious.

But I guess you can phrase your words better. I'll be quite happy in general if the script works and runs for long hours. You shouldn't really care if it's maybe 10-25% less efficient than legit, because we are botting anyway and we probably dont care about the few k more or less xp per hour.

Your script did work, but with a really slow speed. I am not blaming you, is that all bot needs update, the update can improve the script a lot. And also, i am sure your script is stable, but the main problem is the progress is slow. I just want to have fruit within a short time. If we can do things within 1 hour, why give it 2 hours time??
The unpalatable truth is that i can only craft 520 Emerald bracelet in 1 hour with using your script. But you know that you can actually make 1300 Emerald bracelet per hour. That is why i keep urging you to give a updated version, cause it is too slow.

Suiman, I understand what your saying, But the risk of being banned is much more. My script does it like a human. I'm crafting well over 900 pieces/h with gold Jewlery. But it is stable, reliable. The chances of your script users getting ban is almost 3 times higher. I could update my script no doubt, I can even do it to be faster than yours. But I stay on the safe side. I dont want to be blamed for banned accounts. You understand?

From: punkd
Suiman, I understand what your saying, But the risk of being banned is much more. My script does it like a human. I'm crafting well over 900 pieces/h with gold Jewlery. But it is stable, reliable. The chances of your script users getting ban is almost 3 times higher. I could update my script no doubt, I can even do it to be faster than yours. But I stay on the safe side. I dont want to be blamed for banned accounts. You understand?

I would like to use your fastest version, can you make it for me :P i don't care about being ban. :P

From: siuman101
Your script did work, but with a really slow speed. I am not blaming you, is that all bot needs update, the update can improve the script a lot. And also, i am sure your script is stable, but the main problem is the progress is slow. I just want to have fruit within a short time. If we can do things within 1 hour, why give it 2 hours time??
The unpalatable truth is that i can only craft 520 Emerald bracelet in 1 hour with using your script. But you know that you can actually make 1300 Emerald bracelet per hour. That is why i keep urging you to give a updated version, cause it is too slow.

You need to learn to read. Try using "you" to talk to the correct person. Be happy someone made you a script. *It's not me by the way.*

Your interesting attitude made me review your posts. Yes, you can give feedback about a script being not very nice, but I just think that you can phrase your words more politely such that you don't appear to be whining.

Also I made it clear that if efficiency is down by 10-25% it doesn't matter. I didn't use the script and I never knew that it's the numbers you claimed to get, so don't get me wrong.

I admit I am a bit agitated because of your use of word "time-wasting". I don't like quoting this all the time, but if you don't like it, you can ask the dev to fix it (nicely), fix it yourself, or don't use it altogether. But I am sure people will appreciate it more if you could use better words instead of *time-wasting*. Botting is time-wasting too, don't you think?

We try to blend in here, doing it how a legit would, not rush through everything as fast as possible. That's what the Java clients did, and you could easily tell they were autoing.

Besides, you're not even at the computer, why does it matter how fast it is? You will surpass the legits because when they sleep, you're still going ;)

From: Er1k
You need to learn to read. Try using "you" to talk to the correct person. Be happy someone made you a script. *It's not me by the way.*

Your interesting attitude made me review your posts. Yes, you can give feedback about a script being not very nice, but I just think that you can phrase your words more politely such that you don't appear to be whining.

Also I made it clear that if efficiency is down by 10-25% it doesn't matter. I didn't use the script and I never knew that it's the numbers you claimed to get, so don't get me wrong.

I admit I am a bit agitated because of your use of word "time-wasting". I don't like quoting this all the time, but if you don't like it, you can ask the dev to fix it (nicely), fix it yourself, or don't use it altogether. But I am sure people will appreciate it more if you could use better words instead of *time-wasting*. Botting is time-wasting too, don't you think?

Haha, thanks for your remind, i will try to use more polite way to express my feeling:P Forgive me.:)

@Suiman101. I'm not going to modify a script completely for you. I have a large to-do list. Sorry. But it looks like u already have a script like that. So why do u need mine.

From: punkd
@Suiman101. I'm not going to modify a script completely for you. I have a large to-do list. Sorry. But it looks like u already have a script like that. So why do u need mine.

You are very smart, but the script i commonly use is right now inactive cause of the bot-nuke day. :( Anyway, nice script though :p i will poss my progress later on.

The script will constantly be updated. And I hope you understand that the reason I do it the way I do, is for the safety of the user.

two problem exist in your bot.
1st: http://youtu.be/vNtR1FYBfNU
it happens sometimes.
2rd: http://youtu.be/2hzHDp4srhY
it happens sometimes.
Hope you can fix it.

Siuman101, Those problems are unfortunately misclicks due to the client. The problem fixes itself after a few sec but I'll take care of it in the update.

thx

procedure Path;
begin
if WhatType = 'Gold' then
  begin
  if Item = 'Bracelet' then
    begin
      Obj := Bracelet;
    end;
  if Item = 'Ring' then
    begin
      Obj := Ring;
    end;
  if Item = 'Necklace' then
    begin
      Obj := Necklace;
    end;
  if Item = 'Amulet' then
    begin
      Obj := Amulet;
    end;
    Inc1 := 28;
  end else
Inc1 := 14;
end; 

Mine^

Yours v

procedure Typeofjewlery;
begin

//Gold
if WhatJewl = 'Gold' then
begin
  items := 28;
    Jewl := Bar;
  end;
  if WhatJewl = 'Gold' then
  begin
  if Item = 'Bracelet' then
    begin
      MPoint := Point(130, 290);
    end else
  if Item = 'Ring' then
    begin
      MPoint := Point(117, 106);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(136, 167);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(130, 230);
      end;
     items := 28;
    end else
           

Oh, you thought of that yourself did you?

if BankScreen then
  begin
    wait(1000);
    DepositAll;
    Inv1 := InvCount;
    if WhatType = 'Gold' then
    begin
      if FindDTM(Bar,x,y,MBX1,MBy1,MBX2,MBY2) then
      begin
        Mouse(x,y,1,1,False);
        ChooseOption('All');
        repeat
          wait(100);
          Inv2 := InvCount;
        until(Inv2 > Inv1); 
//MINE]

if bankscreen then
      begin
        wait(1000);
        DepositAll;
        Inv1 := InvCount;
          begin

            if whatjewl = 'Gold' then
            begin
            if FindDTM(bar,x,y,MBX1,MBy1,MBX2,MBY2) then
              begin
                repeat
                humanmmouse(x,y,1,1);
                clickmouse2(false);
                WaitOptionMulti(['Withdraw-all', 'w-A'], 300)
                wait(1500);
                  if (invcount > 28) then
                    begin
                    depositall;
                    itemwithdrawal;
                    exit;
                    end;
                until(invcount = 28);
                  inv2 := Invcount;    

//Yours

Lmfao, nerd you forgot to delete the inv2 when you copied it, you call it but dont even use it. Seems familiar? But wait!

  StartTime:=GetSystemTime;
  if LoggedIn then
    ClickNorth(SRL_ANGLE_HIGH);

  if (Players[CurrentPlayer].Integers[1] = 0) then
  begin
    if not IsXPBarOpen then ToggleXPBar(true);
    Players[CurrentPlayer].Integers[0] := GetXPBarTotal;
    Players[CurrentPlayer].Integers[1] := (Players[CurrentPlayer].Integers[1] + 1);
  end;  

//Mine

StartTime:=GetSystemTime;
  if LoggedIn then
    ClickNorth(SRL_ANGLE_HIGH);

  if (Players[CurrentPlayer].Integers[1] = 0) then
  begin
    if not IsXPBarOpen then ToggleXPBar(true);
    Players[CurrentPlayer].Integers[0] := GetXPBarTotal;
    Players[CurrentPlayer].Integers[1] := (Players[CurrentPlayer].Integers[1] + 1);
  end;  
//Yours

Same variables, same way of calling start time, Seems legit.

egin
    GetMousePos(x8,y8);
    Mouse(x8,y8,1,1,false);
    WaitOptionMulti(['Bank Banker'], 300)
    if DidRedClick then
      begin
      MarkTime(t);
      repeat
        wait(100);
        if TimeFromMark(t) > 7000 then
          begin
            Bank;
            exit;
          end;
      until(PinScreen or BankScreen);
      end;      

Yours^

//if FindChest(x,y) then  //TPA's are buggy
  if FindObjCustom(x,y,['Use', 'ank', 'Chest'],[2117995,7368821],2) then
  begin
    GetMousePos(x,y);
    Mouse(x,y,1,1,True);
    if DidRedClick then
    begin
      MarkTime(t);
      repeat
        wait(100);
        if TimeFromMark(t) > 7000 then
        begin
          Bank;
          exit;
        end;
      until(PinScreen or BankScreen);
    end;   

Mine^
Wow, doesn't that seem similar??

if  FindDTM(Bar, x4, y4, MIX1, MIY1, MIX2, MIY2)then
      begin
        MouseItem(RandomRange(1,14),mouse_move);
        ClickMouse2(True);
        Mouse(x7,y7,10,10,False);
        waitoptionmulti(['-> Furnace'], 300);
          if DidRedClick then
            begin
              if WaitColor(56,164,15724794,7,4000) then
                begin                  

Rofl, that won't even work.
Nice copy and paste.

if FindObjCustom(x,y,['Smelt'],[7372162,8030093], 2) then
  begin
    GetMousePos(x,y);
    MouseItem(RandomRange(25,28),0);
    WaitOption('Use',4000);
    Mouse(x,y,1,1,False);
    ChooseOption('-> Clay');
    if DidRedClick then
    begin
      if WaitColor(56,164,15724794,7,4000) then
        begin
          wait(1000);
        end;          

Wowzer, same wait time, same coordinates and same Tolerance in WaitColor?


What you basically did was change the SPS to support for Al Kharid and that's it…
Seriously, I can't wait till you apply for members.

Mine v

if FindDTM(Obj,x2,y2,MSX1,MSY1,MSX2,MSY2) then
                begin
                  Mouse(x2,y2,1,1,False);
                  ChooseOption('All');
                    repeat
                      wait(1000);
                      case random(300) of
                      0..10: HoverSkill(SKILL_CRAFTING,False);
                      20..30: BoredHuman;
                      60..65: RandomMovement;
                      end;
                    until(TimeFromMark(t) > 52000);  

Yours v

if whatjewl = 'Gold' then
                     begin
                      repeat
                        wait(1000);
                        case random(300) of
                        0..10: HoverSkill(SKILL_CRAFTING,False);
                        20..30: BoredHuman;
                      end;
                    until(TimeFromMark(t) > 52000);  

Oh joy, you removed an Antiban line! You're a l33t coder bro.

nv1 := InvCount;
                    if invcount < 15 then
                    begin
                      Made := Made + Items
                      exit;
                    end else      

Yours
Again calling Inv1 without using it.. Made seems familiar no?

until(InvCount = 14);
                  end;
              end;
          end;
      end;
   end;
GameTab(25);
Made := Made + Inc1;              

Mine.
Seriously? I can go on if you'd liek..

Hey Sin,

Your claims are invalid. You're making your self look like a whiny 'female dog'.

If he did in anyway copy your script get over it. In the real world everyone gets left with other people's code and they have to make edits to it to make it better. I'm doing it all the time in the C++ class I'm taking. So shut the front door already and kindly step back from this.

@OP script looks great, don't listen to Sin he's on that time of the year where kids will rage. (seriously I had respect for Sin till this immature stunt)

They have similarities but they aren't the same. Get over it Sin.
Seriously.

From: Overtime
Hey Sin,

Your claims are invalid. You're making your self look like a whiny 'female dog'.

If he did in anyway copy your script get over it. In the real world everyone gets left with other people's code and they have to make edits to it to make it better. I'm doing it all the time in the C++ class I'm taking. So shut the front door already and kindly step back from this.

@OP script looks great, don't listen to Sin he's on that time of the year where kids will rage. (seriously I had respect for Sin till this immature stunt)

They have similarities but they aren't the same. Get over it Sin.
Seriously.

You are the most THICK HEADED guy i've seen.
I've posted numerous copy and pastes and even Kyle agrees with me.
How about you just leave?
For one, my claims are NOT invalid just because you say so.

From: Kyle Undefined
There are HUGE differences between his and Sins script. There's a few similarities, but most of it isn't copied.

From: Kyle Undefined
Actually, he has completely different methods and logic in his. Like I said, there's similarities, but it's not completely ripped.

I'm comparing his Lite version, as you can see in the title of the document.

Actually he doesn't agree with you.

And your copy and paste's are invalid. They aren't even the same lol.

They have different simalarities and his code is just better.
U mad?
Yea I think you're mad.

Via PM genius, ill post screenshots when I get home.

Sin, the thing is, you think you own the SRL library. Obviously if you want for the bankscreen before you depositall, you put a if this then that to know what your going to withdraw. The last part is only cuz I used your proggy but I took it out. I never claimed to not use it. You don't own the way functions are setup and neither do I. When you make functions like Flight and develop your own library and someone uses it, then you can whine like a girl. Till then get off my thread your really starting to get to me.

procedure Path;
begin
if WhatType = 'Gold' then
  begin
  if Item = 'Bracelet' then
    begin
      Obj := Bracelet;
    end;
  if Item = 'Ring' then
    begin
      Obj := Ring;
    end;
  if Item = 'Necklace' then
    begin
      Obj := Necklace;
    end;
  if Item = 'Amulet' then
    begin
      Obj := Amulet;
    end;
    Inc1 := 28;
  end else
Inc1 := 14;
end; 

Mine^

Yours v

procedure Typeofjewlery;
begin

//Gold
if WhatJewl = 'Gold' then
begin
  items := 28;
    Jewl := Bar;
  end;
  if WhatJewl = 'Gold' then
  begin
  if Item = 'Bracelet' then
    begin
      MPoint := Point(130, 290);
    end else
  if Item = 'Ring' then
    begin
      MPoint := Point(117, 106);
    end else
  if Item = 'Necklace' then
    begin
      MPoint := Point(136, 167);
    end else
  if Item = 'Amulet' then
    begin
      MPoint := Point(130, 230);
      end;
     items := 28;
    end else
           

Sin, you have to think to yourself. Ok these scripts do the same thing, There are only a handful of procedures that can be used. You can own the 'IF' Func. When you do, Let me know I promise I'll delete it.

if BankScreen then
  begin
    wait(1000);
    DepositAll;
    Inv1 := InvCount;
    if WhatType = 'Gold' then
    begin
      if FindDTM(Bar,x,y,MBX1,MBy1,MBX2,MBY2) then
      begin
        Mouse(x,y,1,1,False);
        ChooseOption('All');
        repeat
          wait(100);
          Inv2 := InvCount;
        until(Inv2 > Inv1); 
//MINE]

if bankscreen then
      begin
        wait(1000);
        DepositAll;
        Inv1 := InvCount;
          begin

            if whatjewl = 'Gold' then
            begin
            if FindDTM(bar,x,y,MBX1,MBy1,MBX2,MBY2) then
              begin
                repeat
                humanmmouse(x,y,1,1);
                clickmouse2(false);
                WaitOptionMulti(['Withdraw-all', 'w-A'], 300)
                wait(1500);
                  if (invcount > 28) then
                    begin
                    depositall;
                    itemwithdrawal;
                    exit;
                    end;
                until(invcount = 28);
                  inv2 := Invcount;    

//Yours

I didnt forget anything, I used the invcount for cannonball addition, smelting, and so on.

  StartTime:=GetSystemTime;
  if LoggedIn then
    ClickNorth(SRL_ANGLE_HIGH);

  if (Players[CurrentPlayer].Integers[1] = 0) then
  begin
    if not IsXPBarOpen then ToggleXPBar(true);
    Players[CurrentPlayer].Integers[0] := GetXPBarTotal;
    Players[CurrentPlayer].Integers[1] := (Players[CurrentPlayer].Integers[1] + 1);
  end;  

//Mine

StartTime:=GetSystemTime;
  if LoggedIn then
    ClickNorth(SRL_ANGLE_HIGH);

  if (Players[CurrentPlayer].Integers[1] = 0) then
  begin
    if not IsXPBarOpen then ToggleXPBar(true);
    Players[CurrentPlayer].Integers[0] := GetXPBarTotal;
    Players[CurrentPlayer].Integers[1] := (Players[CurrentPlayer].Integers[1] + 1);
  end;  
//Yours

Like I said before I DID use your proggy, but I removed it. These lines were necessary for it to work. Dnt worry about them anymore

egin
    GetMousePos(x8,y8);
    Mouse(x8,y8,1,1,false);
    WaitOptionMulti(['Bank Banker'], 300)
    if DidRedClick then
      begin
      MarkTime(t);
      repeat
        wait(100);
        if TimeFromMark(t) > 7000 then
          begin
            Bank;
            exit;
          end;
      until(PinScreen or BankScreen);
      end;      

Yours^

//if FindChest(x,y) then  //TPA's are buggy
  if FindObjCustom(x,y,['Use', 'ank', 'Chest'],[2117995,7368821],2) then
  begin
    GetMousePos(x,y);
    Mouse(x,y,1,1,True);
    if DidRedClick then
    begin
      MarkTime(t);
      repeat
        wait(100);
        if TimeFromMark(t) > 7000 then
        begin
          Bank;
          exit;
        end;
      until(PinScreen or BankScreen);
    end;   

Unfortunatly you DONT own The library. The script requires to do the same thing and use a similar procedure.

if  FindDTM(Bar, x4, y4, MIX1, MIY1, MIX2, MIY2)then
      begin
        MouseItem(RandomRange(1,14),mouse_move);
        ClickMouse2(True);
        Mouse(x7,y7,10,10,False);
        waitoptionmulti(['-> Furnace'], 300);
          if DidRedClick then
            begin
              if WaitColor(56,164,15724794,7,4000) then
                begin                  

Trust me IT WORKS. And it works a hell lot better than yours.

if FindObjCustom(x,y,['Smelt'],[7372162,8030093], 2) then
  begin
    GetMousePos(x,y);
    MouseItem(RandomRange(25,28),0);
    WaitOption('Use',4000);
    Mouse(x,y,1,1,False);
    ChooseOption('-> Clay');
    if DidRedClick then
    begin
      if WaitColor(56,164,15724794,7,4000) then
        begin
          wait(1000);
        end;          

My procedure uses Edgeville not Al Kharid. Mine use Tpoints to detect the item, yours uses dtms (which are a fail btw)

Mine v

if FindDTM(Obj,x2,y2,MSX1,MSY1,MSX2,MSY2) then
                begin
                  Mouse(x2,y2,1,1,False);
                  ChooseOption('All');
                    repeat
                      wait(1000);
                      case random(300) of
                      0..10: HoverSkill(SKILL_CRAFTING,False);
                      20..30: BoredHuman;
                      60..65: RandomMovement;
                      end;
                    until(TimeFromMark(t) > 52000);  

Mine uses a completely different function for detecting the item. Antiban's were used from a guide. I can direct you if you'd like.

if whatjewl = 'Gold' then
                     begin
                      repeat
                        wait(1000);
                        case random(300) of
                        0..10: HoverSkill(SKILL_CRAFTING,False);
                        20..30: BoredHuman;
                      end;
                    until(TimeFromMark(t) > 52000);  

Oh joy, you removed an Antiban line! You're a l33t coder bro.

nv1 := InvCount;
                    if invcount < 15 then
                    begin
                      Made := Made + Items
                      exit;
                    end else      

Yours
Again calling Inv1 without using it.. Made seems familiar no?

until(InvCount = 14);
                  end;
              end;
          end;
      end;
   end;
GameTab(25);
Made := Made + Inc1;              

The Invcounts were for the cannonball addition, Which IS complete. SMARTONE

Lol youmad?
I will get off since Kyle told me too and I also will appreciate that you called it flawless.
Since it's my script, thanks for complimenting me.

IMO it just looks like you took Sins code and made some edits to try and improve/expand it. You should not have released it as your own work. BTW I also edited sins script to expand the crafting, but I would never release it, unless I had his permission (you should always ask about these things first). Structurally pretty much every script writer has their own style, since it is so close to Sin's, it makes it look sketch

Ashaman summed it up perfectly lmfao.

he at least tryed, i think ur acting like a kid right now ^^

From: Xenophis
he at least tryed, i think ur acting like a kid right now ^^

Copying other people's scripts isn't ``trying", it's being a dick.

From: Overtime
Hey Sin,

Your claims are invalid. You're making your self look like a whiny 'female dog'.

If he did in anyway copy your script get over it. In the real world everyone gets left with other people's code and they have to make edits to it to make it better. I'm doing it all the time in the C++ class I'm taking. So shut the front door already and kindly step back from this.

@OP script looks great, don't listen to Sin he's on that time of the year where kids will rage. (seriously I had respect for Sin till this immature stunt)

They have similarities but they aren't the same. Get over it Sin.
Seriously.

Chill. You shouldn't speak to 12 year olds like that. You need to treat them like babies.

Lol guys. Relax let sin say whatever he wants. Still doesn't change the fact that he's jelous.

Loljealous of a person who can't script for beans?
Saw what Kyle said? Lululul noob.

Im not judging either way because I wouldnt know, but im just saying that ur comeing off a little harsh sin. Im not saying u dont have the right to or do have it. Im just saying you might get more compliance with different presentation.
ps i love all ur work sin :)

Your arguments are pointless. Your just mad because I made what you couldn't.

1)
Explain my points.

2)
Why would I be jealous?

3)
My script performs its task 100x better than this ripoff lmfao.

Incase you didn't see it -
http://puu.sh/lUDu

Great script!
One thing though: In the bank when its withdrawing either the bars or gems (mostly happens on the bars) it right clicks the item and then just stops doing anything. I have to disable smart give the mouse a flick and then enable smart to get it going again.

It is most likely from a lag after clicking. I'll take care of it.

From: Sin
1)
Explain my points.

2)
Why would I be jealous?

3)
My script performs its task 100x better than this ripoff lmfao.

Still ignoring the points I raised..

From: punkd
It is most likely from a lag after clicking. I'll take care of it.

Thanks :) Another small thing, its not going to happen often, but the colour your using to identify the furnace, I had someone beside me with a similar colour pants on and it got confused for about 30 second.

yeah, its tpas, if theyre closer than the furnace then itll detect them first then move on. Since the color of the furnace changes during every logout I cannot reduce the tolerance. It wont stop the script but It may slow you down a bit but If you notice it change worlds.

From: punkd
yeah, its tpas, if theyre closer than the furnace then itll detect them first then move on. Since the color of the furnace changes during every logout I cannot reduce the tolerance. It wont stop the script but It may slow you down a bit but If you notice it change worlds.

Thanks for the advice :)

Bit silly to see that this community has commenced the trolls/childness, you all got to remmember that most of us are older than 12, exept the kiddies… and do not want to read these petite arguments.

I don't like seeing you two flame each other, s1n is a respected scripter, punkd it does look like you ripped the code a bit, but not enough to be called a thief.

At the end of the day, you two should came down, stay your own ways. We don't want to be reading all this BS between a respected scripter and a "mediocre" scripter.

P.S the script works quite nice.

regards

From: Barnzy

At the end of the day, you two should came down,

punkd has remained calm, it is sin acting like a dickhead…yet again.

Reread his posts, and tell me if he's calm, kay leech?

Guys pls relax. I'm not arguing. I don't want to argue I have goals in this community. Just stop talking about this.

I will try this script out later! It looks lovely!
And how old are S1N, 10? :staycool:

Feh, pls dont start. Use and enjoy the script but this thread is not for flaming. Thank you

Ok, this is getting really annoying.

punkd, thank you for trying to keep everyone calm :) To everyone else, stop attacking, please.

Thanks Kyle. I rather get a rant about the script not working than getting annoying comments.

doesnt work

Dnt leech and it might

Okay, I'm fairly new to using Simba as you will probably be able to tell from my incoming post, but when i try to use the script i set the correct item, jewel, and amount, but when it goes to start working all it does is repeatedly run over the amount of gold bars to withdraw, can you offer any insight as to what I'm doing wrong? I'm sure it's something fairly simple that my inexperience is causing.

hmm. Make sure you capitalized the first letter of Gold Sapphire or whatever jewel your making, and the first letter of the item making, Bracelet Ring etc. Have the client on Minimum detail and in safe mode and make sure your SRL is fully updated

Item := 'Amulet';   // Bracelet Ring Amulet Necklace (Capitalize the first letter or it wont work [too lazy to add lowercase func])
  WhatJewl := 'Gold'; // Sapphire Emerald Ruby Diamond (Capitalize the first letter or it wont work [too lazy to add lowercase func])
  Make := 10000; // Amount to make before script stops. 

That's how it should be right? I have the latest SRL as well. Once again please excuse my ignorance in running scripts on Simba

hmm, that seems right. Just make sure your on low detail. If its lagging too much it might be a problem. If it doesnt see the withdraw menu in time then it resets.

Hey punkd, love the script! :)

Couple of things though, I'm crafting sapphire bracelets, and I've never had any major problems, but sometimes it will grab everything out of the bank, then put it back and and grab it all out again, kinda weird but still runs fine so it's not a big deal.

Also sometimes it will run back to the bank with 1-2 Bracelets still not made, again, not a big deal as it only slows it down a bit, just thought I would let you know

GL with whatever your doing!

EDIT: While watching it run, i saw it do a load, and only craft 4 bracelets before banking lol, also, i don't know if you've thought of this yet, but with this new Squeel of fortune cards while crafting thing, it won't let you bank them, so the bot basically gets stuck trying to bank it everytime you get one. just letting you know,

lol sorry for saying so much…

From: yespippy
Hey punkd, love the script! :)

Couple of things though, I'm crafting sapphire bracelets, and I've never had any major problems, but sometimes it will grab everything out of the bank, then put it back and and grab it all out again, kinda weird but still runs fine so it's not a big deal.

Also sometimes it will run back to the bank with 1-2 Bracelets still not made, again, not a big deal as it only slows it down a bit, just thought I would let you know

GL with whatever your doing!

EDIT: While watching it run, i saw it do a load, and only craft 4 bracelets before banking lol, also, i don't know if you've thought of this yet, but with this new Squeel of fortune cards while crafting thing, it won't let you bank them, so the bot basically gets stuck trying to bank it everytime you get one. just letting you know,

lol sorry for saying so much…

Hey yespippy, I know of the banking problems since it's timed and if it lags it resets. I already fixed that in the upcoming update, But what is the sqeel of fortune card 0.o

From: punkd
Hey yespippy, I know of the banking problems since it's timed and if it lags it resets. I already fixed that in the upcoming update, But what is the sqeel of fortune card 0.o

There's this new update with the squeel of fortune thing, dunno why but they are making it sort of a big deal… like you can buy rolls now for real money and whatnot. but anyway they made it so that monsters can drop free rolls, and that while skilling, anything that would give you a shattered heart piece, gives a free roll, in the form a card thing, and you can't bank them, and they are automatically put into you inventory… kinda messes up bots till it gets fixed… :(

Well, that's kind of something Randoms developers would have to take care of because it's random. I honestly dont know what that is, I havnt played for a few weeks. If you get one, Take a screenshot or if you dont mind, I can take a look and make something to work around it. If there is text, Take a screenie.

whens crafting leather coming out?;)

I've put a break on this script for a little bit because its giving me a nervous breakdown, but soon. I promise

how can i get the full version of scripts?

you must learn to script very well and apply for members.

What is in the full version? Other locations? Ill learn to script after my exams :) Watched a few tutorials, doesnt look too difficult to start off.

Full version includes cannonball maker/al-kharid. And basically full is a aio crafter.

Why bother keeping cannonballs private when theres Narcles smither that can support them?

because, If one day Narcle decides to not update it, then cannonball prices stay high.

He won't update because he CAN'T update it LOL.

who cant update?

Narcles script basically auto updates itself, will only need small tweaks.

No matter, I'm finishing up leather crafting as we speak :D

From: punkd
No matter, I'm finishing up leather crafting as we speak :D

what about flax spinning @ lumby? That'd be AMAZING.

Its all coming very soon, I don't plan on releasing anything till it is fully done. Change my mind if u can =P

punkd, it did another lovely 1.8k emerald bracelet, and stopped straight afer making 1800 so that I wan't standing in edgeville for 10hours today while I was out lol. Also, Im currently superheating 15k gold, and 15k emearlds are in the process of buying. If I can remembere to get a proggy if it can do all 15k without failing, ill try get you that. So that you can place that on the first page or something. AWESOME SCRIPT.

ONLY ONE THING. SOMETIMES, when I start the script, after clicking gold on furnace, it doesnt always make the jewlery. But if i keep restarting teh script it finally makes it possible. I'm not sure why, but if any1 is wodering about this small error that keeps happening to them. Keep stopping andstarting the script untill it is able to do it properly. Should be fine in the first 5 restarts. Apaart from that and the fact the mouse clicks are a bit slow. It's working perfectly. Keep up the good work.

Hey thanks for the feedback. Unfortunately due to the 6 hour maximum client duration you won't be able to exceed 4800 Emerald bracelets. I would wait for my release of the update. I've pretty much fixed every flaw in the script, added Leather crafting, gem cutting and a little surprise for the users :). If you want to exceed 6 hours you may use crashsmart or another software to reset the script but unfortunately it won't save proggies =[