ok... im confused.. and new.. sorry

[italldiestoday]

what does this mean... and how do i fix it... Line 200: [Error] (14601:9): Identifier expected in script:f:

[Smartzkid]

I'd need to see the script to help you.

Look on line 200 and see if there's any blatant errors there. Mainly, look for missed single quotes ( ' ), missed semicolons ( ; ), and typeo's.

Post the script if you can't figure out how to fix it.

[italldiestoday]

{---------------------------------------------------------}
{ ________ }
{ ____ ____ / _____/ }
{ / \ / __ \/ \ ___ }
{ | | \| ___/\ \_\ \ }
{ |___| / \___ >\______ / _ }
{ \/ \/ \/ |_| }
{---------------------------------------------------------}
{---------------------------------------------------------}
{ LONG BOW FLETCHER }
{---------------------------------------------------------}
{
Knife in first inventory slot.
Logs in first bank slot
}
program neGFletcher;
{.include SRL/SRL.scar}
var
LogsDone: Integer;
StartXP, EndXP, TotalXP: Integer;

{---------------------------------------------------------}
{ SETUP }
{---------------------------------------------------------}
const
BankBooth = 7703191; //Bank Booth Colour
RunAwayDir = 'S'; //Direction to run away
LogsToDo = 719; //How many logs to do?


{---------------------------------------------------------}
{ Declare Player }
{---------------------------------------------------------}

procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;

Players[0].Name := '';
Players[0].Pass := '';
Players[0].Nick := '';
Players[0].Active := True;
end;

{---------------------------------------------------------}
{ Code }
{---------------------------------------------------------}

function BankScreenFix: Boolean; //Thanks Fawaki
begin
Result := IsTextAtEx(184, 34, 'The Bank of', 30, upchars, True, False, 0, 0,
-1);
end;

procedure RunAway;
begin
RunAwayDirection(RunAwayDir);
Wait(12000 + random(2000));
RunBack;
end;

procedure Randoms;
begin
FindTalk;
wait(10)
FindNormalRandoms;
if (FindFight) then
RunAway;
end;


procedure Bank;
var
bx, by: Integer;
c: Integer;
begin
Randoms;
repeat
FindObj(bx, by, 'Bank', BankBooth, 10);
Wait(100 + Random(200));
until (IsUpText('Use Bank'));
if (IsUpText('Use Bank')) then
begin
GetMousePos(bx, by);
Mouse(bx, by, 10, 10, false);
wait(100);
if (ClickOption('quickly', 1)) then
begin
repeat
FTWait(2);
c := c + 1
until (BankScreenFix) or (c >= 50);
end
else
begin
Bank;
end;
FixBank;
Deposit(2, 28, 2);
Withdraw(1, 1, 0);
repeat
CloseBank;
FTWait(2);
until (BankScreenFix = False);
end;
end;

procedure Report;
begin
SRLRandomsReport;
WriteLn('>--------------------<>--------------------<')
WriteLn('> neGs Bow Fletcher - Progress Report ')
WriteLn('> ')
WriteLn('> Running Time: ' + (TimeRunning) + '')
WriteLn('> Logs Cut: ' + IntToStr(LogsDone) + '')
WriteLn('> XP Gained: ' + IntToStr(TotalXP) + '')
WriteLn('>--------------------<>--------------------<')
end;

procedure Fletch;
var Number, t: Integer;
begin
begin
Randoms;
UseItem(1);
Wait(100 + Random(800));
UseItem(2);
Randoms;
FTWait(2);
end;
begin
MMouse(244, 407, 10, 10);
if (IsUpText('ake')) then
begin
Mouse(244, 407, 10, 10, false);
ClickOption('ake X', 3);
FTWait(5);
Number := 27 + Random(11);
TypeSend(IntToStr(number));
Wait(100 + Random(250));
TypeSend(Chr(13));
end else
Fletch;
end;
repeat
FTWait(2);
Randoms;
if (FindNpcChatText('continue')) then //Fix to the level-up Bug
begin
begin
Randoms;
UseItem(1);
Wait(100 + Random(800));
UseItem(28);
Wait(random(500));
end;
begin
Mouse(244, 407, 10, 10, false);
FTWait(1);
ClickOption('Make X', 3);
Wait(700 + Random(500));
Number := 27 + Random(11);
TypeSend(IntToStr(number));
FTWait(2);
TypeSend(Chr(13));
end;
end;
Randoms;
until (GetColor(717, 447) = 65536);
if (GetColor(717, 447) = 65536) then
begin
LogsDone := LogsDone + 27;
t := t + 1
end
if (t > 3 + Random(2)) then
begin
EndXP := GetXp('Magic');
wait(10);
TotalXP := (EndXP - StartXP);
wait(10)
Report;
t := 0;
end;
end;

procedure PlayerSetup;
begin
StartXP := GetXp('Fletching');
NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars);
end;

{---------------------------------------------------------}
{ Main Loop }
{---------------------------------------------------------}
begin
SetupSRL;
Newline := Newline;
ActivateClient;
DeclarePlayers;
begin
if (not (LoggedIn)) then
begin
Status('Logging In');
Loginplayer;
HighestAngle;
end;
end;
PlayerSetup;
repeat
Bank;
Fletch;
until (LogsDone >= LogsToDo);
if (LogsDone >= LogsToDo) then
begin
Logout;
TerminateScript;
end;
end.

[italldiestoday]

line 200 being ActivateClient;

[italldiestoday]

nvm ty for having me look at it i figured out the flaw.. wow im slow