Why do you not recognise ?

[souppy]

Hello, I have just created my first script but it will not run.

When I try to run it it comes up that:

Random is an unknown identifier.
TypeSend is an unknown identifier.

Random is referring to my timing.
TypeSend is to auto talk.


Anyone know how I can change this?

[Timer]

did u include SRL?

post the script, letme take a look

[souppy]

Thanks Hy.

[Harry]

[ SCAR] *code [/SCAR ] (Remove the spaces in the []'s ;)

[souppy]

This is it, mind you it is my first script.


//Souppy's first auto talker
program Autotalker;

const
NumberOfMessages= 3; // Number of Messages
Message1= ('...') // Type your 1st message here
;Message2= ('...') // Type your 2nd message here (Only fill in if you need)
;Message3= ('...') // Type your 3rd message here (Only fill in if you need)
;Time1= (1000); // Wait time between each message (in Milliseconds)

//------------------------------------------------------------------------------
//------------------------------------------------------------------------------

procedure Write;
begin
repeat;
Wait (Time1)
TypeSend (Message1)

if (NumberOfMessages=2) then
begin
TypeSend (Message1)
Wait (Time1)
TypeSend (Message2)
Wait (Time1)
end;

if (NumberOfMessages=3) then
begin
TypeSend (Message1)
Wait (Time1)
TypeSend (Message2)
Wait (Time1)
TypeSend (Message3)
Wait (Time1)

end;
until (False);
end;

begin;
Writeln ('Please do remember this is my first script')
end.

[Timer]

//Souppy's first auto talker
program Autotalker;
{.include SRL\SRL.scar}

const
NumberOfMessages = 3; // Number of Messages
Message1 = ('...'); // Type your 1st message here
Message2= ('...') // Type your 2nd message here (Only fill in if you need)
Message3 = ('...'); // Type your 3rd message here (Only fill in if you need)
Time1 = 1000; // Wait time between each message (in Milliseconds)

//------------------------------------------------------------------------------
//------------------------------------------------------------------------------

procedure Write;
begin
repeat
Wait (Time1)
TypeSend(Message1)
if NumberOfMessages = 2 then
begin
TypeSend(Message1)
Wait(Time1)
TypeSend(Message2)
Wait (Time1)
end;
if NumberOfMessages = 3 then
begin
TypeSend(Message1)
Wait(Time1)
TypeSend(Message2)
Wait(Time1)
TypeSend(Message3)
Wait(Time1)
end;
until (False)
end;

begin;
SetupSRL;
ActiavteClient;
Writeln ('Please do remember this is my first script')
Write;
end.

[souppy]

I have removed random by the way. It should be in the (Time1)

[Timer]

Hmm....

Wait(Time1 + Random(500)); don't that work..?

[souppy]

Sorry about the wait, Internet went down.

I'm not sure why, but what you provided doesn't work.