SRL Archive - Simba (Testing) Scripts

Need help!

Majnoon

2015-03-05 16:29:58

Hello so i have been trying to make a simple script that will click on the corrupted seren stone, the problem now is it wont…this is my code and below it is what i get in my debug.

thank you.

i know it says examine with the actual clicking, but since the crytals are 110k each i didn't want to waste them so hence i wanted to try with examine first.


program new;
{$DEFINE SMART}
{$I SRL-6/SRL.simba}

procedure clickCorruptedStone();
var
  x, y: integer; //find object heeft dit nodig.
begin
  if mainscreen.findObject(x, y, 10369635, 50, ['orrupted seren stone']) then
  begin
    fastClick(MOUSE_RIGHT);
    chooseOption.select(['xamine']);
    writeLn('We used a crystal!'); // Als het true is, gaat dit worden uitgeschreven.
  end;
end;



begin
  clearDebug();
  setupSRL();
  clickCorruptedStone();
end.                        

-- TRSMainscreen.findObject()
---- Colors found: 562
---- Possible objects found: 10
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
---- isMouseOverText(): False
-- TRSMainscreen.findObject(): False
-- Succesfully freed SMART[6352]
Successfully executed.

fady

2015-03-05 16:38:29

From: Majnoon
Hello so i have been trying to make a simple script that will click on the corrupted seren stone, the problem now is it wont…this is my code and below it is what i get in my debug.

thank you.

i know it says examine with the actual clicking, but since the crytals are 110k each i didn't want to waste them so hence i wanted to try with examine first.


program new;
{$DEFINE SMART}
{$I SRL-6/SRL.simba}

procedure clickCorruptedStone();
var
  x, y: integer; //find object heeft dit nodig.
begin
  if mainscreen.findObject(x, y, 10369635, 50, ['orrupted seren stone']) then
  begin
    fastClick(MOUSE_RIGHT);
    chooseOption.select(['xamine']);
    writeLn('We used a crystal!'); // Als het true is, gaat dit worden uitgeschreven.
  end;
end;



begin
  clearDebug();
  setupSRL();
  clickCorruptedStone();
end.                        

-- TRSMainscreen.findObject()
---- Colors found: 562
---- Possible objects found: 10
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
---- isMouseOverText(): False
-- TRSMainscreen.findObject(): False
-- Succesfully freed SMART[6352]
Successfully executed.


mouseovertext data is case sensitive, make it ['orrupted Seren Stone'] not ['orrupted seren stone']

3Garrett3

2015-03-05 16:39:06

From: Majnoon
Hello so i have been trying to make a simple script that will click on the corrupted seren stone, the problem now is it wont…this is my code and below it is what i get in my debug.

thank you.

i know it says examine with the actual clicking, but since the crytals are 110k each i didn't want to waste them so hence i wanted to try with examine first.


program new;
{$DEFINE SMART}
{$I SRL-6/SRL.simba}

procedure clickCorruptedStone();
var
  x, y: integer; //find object heeft dit nodig.
begin
  if mainscreen.findObject(x, y, 10369635, 50, ['orrupted seren stone']) then
  begin
    fastClick(MOUSE_RIGHT);
    chooseOption.select(['xamine']);
    writeLn('We used a crystal!'); // Als het true is, gaat dit worden uitgeschreven.
  end;
end;



begin
  clearDebug();
  setupSRL();
  clickCorruptedStone();
end.                        

-- TRSMainscreen.findObject()
---- Colors found: 562
---- Possible objects found: 10
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
---- isMouseOverText(): False
---- isMouseOverText()
------ Current mouse-over text: "Cleanse Corrupted Seren Stone"
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
------ Current mouse-over text: ""
---- isMouseOverText(): False
-- TRSMainscreen.findObject(): False
-- Succesfully freed SMART[6352]
Successfully executed.


The problem is that the Uptext is case-sensitive. You've got "orrupted seren stone" and it says it's detecting "orrupted Seren Stone". They aren't the same, because upper/lower case matters.

Edit: -snip-. Old edit was incorrect, disregard.

Majnoon

2015-03-05 16:40:59

yay it works, thanks!

now say if i added a repeat would it keep clicking the stone over and over? if so how can i make it to wait until one stone is done and then use the next one? 1 stone takes 2 minutes and 10 seconds if i add a wait for 122,000 mili seconds would that work?

fady

2015-03-05 17:02:27

From: Majnoon
yay it works, thanks!

now say if i added a repeat would it keep clicking the stone over and over? if so how can i make it to wait until one stone is done and then use the next one? 1 stone takes 2 minutes and 10 seconds if i add a wait for 122,000 mili seconds would that work?


I wish I could help you more, but I only play f2p, so I am unfamiliar with the process you are describing. However, the wait for 2m 10s would be 130,000 mili seconds.

KeepBotting

2015-03-05 17:27:28

From: Majnoon
yay it works, thanks!

now say if i added a repeat would it keep clicking the stone over and over? if so how can i make it to wait until one stone is done and then use the next one? 1 stone takes 2 minutes and 10 seconds if i add a wait for 122,000 mili seconds would that work?

Does the production screen interface pop up when you're interacting with these stones?

If so, you could do 

procedure waitWhileStoning(); //or whatever
var
  t:TTimeMarker;
begin
  t.start();
  
  if (not (productionScreen.isOpen())) then
   begin
     writeLn('Production screen not open, consider opening it first');
     exit(); 
   end;

  repeat
   wait(1000);
   if (not (productionScreen.isOpen())) then
    exit();
  until(t.getTime() > 200000); //Timeout failsafe
end;

Majnoon

2015-03-05 17:32:42

From: KeepBotting
Does the production screen interface pop up when you're interacting with these stones?

If so, you could do 

procedure waitWhileStoning(); //or whatever
var
  t:TTimeMarker;
begin
  t.start();
  
  if (not (productionScreen.isOpen())) then
   begin
     writeLn('Production screen not open, consider opening it first');
     exit(); 
   end;

  repeat
   wait(1000);
   if (not (productionScreen.isOpen())) then
    exit();
  until(t.getTime() > 200000); //Timeout failsafe
end;


there is no progress windows, only a small hp like bar above your head that starts out blue and fills up with orange