jogebean
2008-01-26 23:07:12
2008-01-26 23:07:12
2008-01-26 23:10:16
program script;
{.include srl/srl.scar}
const
Message1='Hello world!'; {type message here}
Waitspeed=1000;//In Millseconds
procedure Hello;
begin
ActivateClient
wait(WaitSpeed)
TypeSend(Message1);
end;
begin
repeat
hello;
until(false)
end.