Heres a couple from my RM Runner.
SCAR Code:
procedure TypeSomething;
begin
if (SomethingTyped) then
begin
KeyDown(13);
Wait(RandomRange(500, 1500));
KeyUp(13);
SomethingTyped := False;
end else
begin
case Random(3) of
0: i := RandomRange(65, 91);
1: i := RandomRange(48, 58);
2: i := RandomRange(96, 112);
3: i := RandomRange(186, 223);
end;
KeyDown(i);
Wait(RandomRange(500, 3000));
KeyUp(i);
SomethingTyped := True;
end;
end;
and:
SCAR Code:
procedure ExamineInv;
begin
j := Random(28) + 1;
T := ItemCoords(j);
if (ExistsItem(j)) then
begin
Mouse(T.x, T.y, 0, 0, false);
Wait(200 + random(100));
ChooseOption('xamine');
Wait(1000);
end;
end;
The first is supposed to simulate someone accidentally dropping something on the keyboard or leaning on a key. If it has already typed something it might "accidental" press enter next time the same procedure is called.
The second one check to see if an item exists in a random inventory spot and "examines" it if it does.