помагит олимпиад шпионин скрипт

[Fer123]

if FromServer then begin
 case pck[1] of 
  #$62: if ReadD(2)=1497 then begin 
              buf:=#$49;
              WriteS(ReadS(14)+' has won the game');
              WriteD(9);
              SendToServer;
           end;

It seems like this