this is the procedure that i have the problem in:
Line 90: [Error] (14941:11): colon (':') expected in script
SCAR Code:
procedure TehRespond;
begin
if InChat('hey') or InChat('hi') or InChat('whats up?') then
begin
case Random(10) of
0 : TypeSend('hi');
1 : TypeSend('hello');
2 : TypeSend('hey');
3 : TypeSend('sup');
4 : TypeSend('hola');
5 : TypeSend('yo');
6 : TypeSend('dont feel like talking now, sorry');
7 : TypeSend('sup');
8 : TypeSend('not now');
9 : TypeSend('please leave me alone');
Responded := Responded + 1; //this line
end;
end;
if InChat('woodcutting lvl') or InChat('wc lev') or InChat('wc lv') then
begin
case Random(8) of
0 : TypeSend(IntToStr(TheLevel);
1 : TypeSend(IntToStr(TheLevel + (', you?');
2 : TypeSend(IntToStr(TheLevel + (' lol');
3 : TypeSend('currently ') +IntToStr(TheLevel);
4 : TypeSend('right now ' +IntToStr(TheLevel));
5 : TypeSend('soon ' +IntToStr(TheLevel));
6 : TypeSend('almost ' +IntToStr(TheLevel));
7 : TypeSend(IntToStr(TheLevel));
Responded := Responded + 1;
end;
end;
end;