This is not part of a script i made. I found it while web surfing. it works all fine and dandy but when it goes to this procedure in the script it gets all laggy i was wondering if theres anything that should b changed?
Procedure CheckNPC;
begin
Wait(2000);
Check := 0;
if FindNpcChatText('ions') or FindNpcChatText('dation') or FindNpcChatText('oins') then
begin
Wins := Wins + 1;
WriteLn('- Game: WON!');
WriteLn('');
ClickToContinue;
exit;
end;
if FindNpcChatText('illed') then
begin
loses := loses + 1;
WriteLn('- Game: Lose =[');
WriteLn('');
ClickToContinue;
exit;
end;
if FindNpcChatText('ticed') then
begin
NotEnough := NotEnough + 1;
WriteLn('- Game: Won, but not enough points! so you lose!');
WriteLn('');
ClickToContinue;
exit;
end;
NoSt := NoSt + 1
WriteLn('- No game status found');
WriteLn('');
end;


Reply With Quote







