261 procedure chNextTurn(var s: shortstring);

   261 procedure chNextTurn(var s: shortstring);

   262 begin

   262 begin

   263 if AllInactive then

   263 if AllInactive then

   264    begin

   264    begin

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

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

   266    {$IFDEF DEBUGFILE}AddFileLog('Doing SwitchHedgehog: time '+inttostr(GameTicks));{$ENDIF}

   267    {$IFDEF DEBUGFILE}AddFileLog('Doing SwitchHedgehog: time '+inttostr(GameTicks));{$ENDIF}

   267    SwitchHedgehog;

   268    SwitchHedgehog;

   268    end

   269    end

   269 end;

   270 end;

   270 

   271 

   463 begin

   464 begin

   464 cTagsMask:= map[cTagsMask]

   465 cTagsMask:= map[cTagsMask]

   465 end;

   466 end;

   466 

   467 

   467 procedure chAddTrigger(var s: shortstring);

   468 procedure chAddTrigger(var s: shortstring);

   469 begin

   470 begin

   470 val(s, t);

   471 val(s, t);