Well, I havn't tested the script if it worked ingame, but here is the fixed script:
SCAR Code:
program Auto_Responder;
{.include srl/srl.scar}
var text,ghostly018:string;
procedure Respond;
begin
text :=(GetTextAtEx(18, 415, 7, SmallChars, False, False, 0, 0, 0, 50, False, tr_allChars));
if(text=ghostly018)then
begin
if (InChat('Hi'))then
typeSend('ahsdhdfd');
end;
end;
begin;
SetupSRL;
repeat
Respond;
until(false);
end.
Your problems:
You didn't make a procedure, you forgot a end, you forgot a begin in the main loop, you didn't put SetupSRL; in the right place.