SRL Archive - First Scripts

Not Rs Related but my first script iin Scar

tabernacle

2009-10-17 21:29:14

program New;
var
  W, H: Integer;
  x, y: Integer;

begin
 GetClientDimensions(W, H);
 movemouse(238, 283);
 clickmouse(238, 283, true);
 repeat
  FindColor(x, y, 16777215, 3, 159, W - 1, H - 1);
  MoveMouse(x, y);
  clickmouse(x, y, true);
  until(iskeydown('s'));
end.

JPHamlett

2009-10-17 23:22:09

good start but if you wann amake a rs script use mouse and mmouse ir else youll get banned