SRL Archive - Research & Development Lounge

Well, I got bored and wrote some silly stuff, including this:

program HelloWorld;
{.include SRL/SRL.scar}
procedure Trigger;
begin
  repeat
    Mouse(0, 0, 1000, 1000, True);
    Wait(25);
    Writeln('Hello world!');
    Wait(25);
  until false
end;

procedure ScriptTerminate;
begin
  Trigger;
end;

procedure ScriptPause;
begin
  Trigger;
end;

begin
  SetupSRL;
  Trigger;
end.

It turned out quite annoying to exit :f:

well, if you want annoying script that will piss off the user,

begin
  repeat
    Movemouse(0+random(1400),0+random(1200)); // Do not press run unless you know how to shut this down. (ctr + f4)
  until(false)
end.

Well, yours can be stopped by using lets say Ctrl+Alt+S :p
Mine can't ;)

CTRL + ALT + DELETE.

Processes :

Scar.exe (all with the keyboard) + DELETE = Script ended.

Make it click and then it'll be REALLY hard to stop.

Then change the script to..

begin
  repeat
    Clickmouse(0+random(1400),0+random(1200),true); // Do not press run. Or ur screwed.
  until(false)
end.

or

begin
  repeat
    Clickmouse(3000,2400,true); // Do not press run. Or ur screwed x 2.
  until(false)
end.

From: Dr D. Dervish
CTRL + ALT + DELETE.

Processes :

Scar.exe (all with the keyboard) + DELETE = Script ended.

Make it click and then it'll be REALLY hard to stop.

Mouse(x, y, ranx, rany, TRUE) clicks ;)
It took me good 5 minutes to stop it :D

From: mrpickle
Then change the script to..

begin
  repeat
    Clickmouse(0+random(1400),0+random(1200),true); // Do not press run. Or ur screwed.
  until(false)
end.

or

begin
  repeat
    Clickmouse(3000,2400,true); // Do not press run. Or ur screwed x 2.
  until(false)
end.

But one can still stop these by pressing CTRL+ALT+S ;)

From: bugger0001
Mouse(x, y, ranx, rany, TRUE) clicks ;)
It took me good 5 minutes to stop it :D

Soooo slow compared to clickmouse :D.

Here's the bomb :

program New;

Procedure GetYouMad;
Begin
  SetDesktopAsBackground;
  GetClientDimensions;
  Repeat
    ClickMouse(0+random(1500),0+random(1500),true);
    Wait(1);
    Writeln('noob');
  Until(false);
End;

Procedure ScriptTerminate;
Begin
  GetYouMad;
End;

begin
  GetYouMad;
end.

Nobody run that…

program HelloWorld;
{.include SRL/SRL.scar}
procedure Trigger;
begin
  repeat
    Mouse(0, 0, 1000, 1000, True);
    Wait(25);
    Writeln('Hello world!');
    Wait(25);
  until false
end;

procedure ScriptTerminate;
begin
  Trigger;
end;

procedure ScriptPause;
begin
  Trigger;
end;

begin
  SetupSRL;
  Trigger;
end.

Easily stopped. Its all about patience. Press CTRL+ALT+DEL, and it clicks along the taskbar. Every time it clicks Task Manager, move up and eventually get to scar.exe, delete, enter. Owned.

As of ClickMouse: I was fooling around with SRL stuff :p

The taskmanager stopping method is hard to execute as it clicks on different processes. If you start getting close to scar.exe it could click a process pretty far from it ;)

I found it easy to stop. I hit the windows key, then L, then L again.

Well, in that case let's make trigger like this:

procedure Trigger;
begin  
  repeat    
    Mouse(0, 0, 1000, 1000, True);    
    Wait(1);    
    TypeSend(abcd);
    Wait(1);
    Writeln('Hello world!');    
    Wait(1);  
  until false
end;

begin
  repeat
    Clickmouse(3000,2400,true); // Do not press run. Or ur screwed x 2.
  until(false)
end.

I dont think ctrl alt s will work. program moving too fast. I'm not gonna run it, but you should try =D.

anyways, next lv of torture.

begin
  repeat
    Clickmouse(3000,2400,true); // Do not press run. Or ur screwed x 2.
    case random(4) of
      1:SendArrowSilent(3);
      2:SendArrowSilent(1);
      3:keydown(VK_BACK);
      4:keyup(VK_BACK);
    end;
  until(false)
end.

lol easiest way to stop it

shut down your computer

From: lightcam999
lol easiest way to stop it

shut down your computer

yeah but that's not very convenient is it? What if you have a big download going on?

Goodbye big download.

if you guys like that, ive got a .bat file you will love

The easiest way to shut that program down in Windows would be in Vista and Windows, CTRL + ALT + DELETE, and when the new pot menu screen comes up, just log out, or would'nt just CTRL + ALT + S do it in SCAR..?



~NS

If you really want to be annoying go buy a random keystroker. :p

http://www.thinkgeek.com/gadgets/electronic/ae83/

Hahaha @ the random keystroker. That would be one fun toy to play with!