Shave Ice
2007-11-20 21:03:35
It's a pretty simple to use auto typer. Need latest Scar and SRL downloaded. Copy below, insert your phrase, and hit run!! It's that easy.
Hope you like it! ;) Please post any problems or Comments!
program Autotyper;
{.include SRL/SRL.scar}
const
Message1= 'Type Message here!'; // Message goes in here
var
StopScript: Boolean;
a: Integer;
procedure Write;
begin
Wait(900 + random(150))
TypeSend (Message1)
Wait(900 + random(100))
end;
Procedure Stop;
begin
StopScript:= (a = 1);
end;
begin
SetupSRL;
ActivateClient;
repeat
wait(10)
Write;
Stop;
until(false);
end.Hope you like it! ;) Please post any problems or Comments!