456 

   456 

   457     if not CurrentTeam^.ExtDriven then SendIPC('N');

   457     if not CurrentTeam^.ExtDriven then SendIPC('N');

   458 {$IFDEF DEBUGFILE}

   458 {$IFDEF DEBUGFILE}

   459     AddFileLog('Doing SwitchHedgehog: time '+inttostr(GameTicks));

   459     AddFileLog('Doing SwitchHedgehog: time '+inttostr(GameTicks));

   460 {$ENDIF}

   460 {$ENDIF}

   461 end;

   462 end;

   462 

   463 

   463 procedure chSay(var s: shortstring);

   464 procedure chSay(var s: shortstring);

   464 begin

   465 begin

   465 SendIPC('s' + s);

   466 SendIPC('s' + s);