SRL Archive - Research & Development Lounge

Hi, let me introduce to you Easy Click Recorder. That utility just record all mouseleft click points in selected window and export that as Simba TPointArray.

As example - my test kvirk window:
Absolute mode:

TPA:=[Point(221,314),Point(235,645),Point(409,909),Point(749,812),Point(770,785),Point(924,785),Point(1166,522),Point(1258,466)];
WaitTimes:=[655,1419,656,546,546,764,1201,765];
PointColors:=[16750899,16185078,4294967295,15921135,13400576,14592089,16777215,15921135,15921135];
for i := 0 to high (TPA) do
  begin
    Mouse(TPA[i].x, TPA[i].y, 2, 2, true);
     wait(WaitTimes[i]+(((WaitTimes[i]+Random(20))-WaitTimes[i])*Random(5)));
  end;

Written in Delphi XE, source aviable here and on GIT.

https://github.com/CynicRus/mrec

Thanks for you advice.

Is this supposed to be a scripting aid, or what? I can definitely see if being useful for gathering points.

Advice? Record the wait times between clicks and turn it into an easy to use macro program.

Have it return something like this:

TPA := [Point(), Point(), Point()]
WaitTimes := [500, 204, 300];
for i := 0 to high (TPA) do
begin
  Mouse(TPA[i].x, TPA[i].y, 2, 2, true);
  wait(WaitTimes[i]);
end;

get what I'm saying?

Exclusively in support for scripting in the Simba. Of course i can record time between click. If that needed.

No it's not needed it was just advice. It could be turned into a simple macro program with a few extra things. If you did that you could put it in the utilities section for noobs to "make their own scripts".

You should add it though… the wait times idea seems quite useful

I like this, this makes things smooth! Before I would create a line and return a tpa of that color line to get my points.. now this is much easier! :> ty + nice work CynicRus

Exe updated, Nebula advice is completed:)

TPA:=[Point(50,198),Point(199,319),Point(469,484),Point(851,688)];
WaitTimes:=[655,656,655,2621];
for i := 0 to high (TPA) do
  begin
    Mouse(TPA[i].x, TPA[i].y, 2, 2, true);
     wait(WaitTimes[i]);
  end;

its good that you can make program in delphi

That's really handy CynicRus, great job. :) I would second Nebula's suggestion about adding waiting (or random waiting) periods in an integer array along with your point array. Not really required but it would sure save time.

What do you mean as random waiting period in an integer array? Randomize waiting time?

I think he means randomizing the waiting a bit.

Like instead of this: Wait(500);

This: Wait(RandomRange(500 - (500 / 10), 500 + (500 / 10)));

So, ok. I do it:)

Add waiting time randomizing.

TPA:=[Point(638,246),Point(768,542),Point(930,674)];
WaitTimes:=[546,546,1201];
for i := 0 to high (TPA) do
  begin
    Mouse(TPA[i].x, TPA[i].y, 2, 2, true);
     wait(WaitTimes[i]+(((WaitTimes[i]+Random(20))-WaitTimes[i])*Random(5)));
  end;

PS: Hotkey added. Record stop, when you press space.

Lot of a bug fixed, color picking when click added.

Brings me back to the old days when I used to use mouse recorders. This would be handy dandy tool for some crafting or superheating scripts.

Can you use this to record points while walking in runsecape to create a walking path with?

I do not think that's possible with this program.

What do you think, is it worth to add a feature listed to play clicks? And to turn the program into a full clicker?