All pastes #912495 Raw Edit

Anonymous

public text v1 · immutable
·published 2008-02-21 12:44 UTC
rendered paste body
// script creation

  if BattleState.Status = Hosting then
  begin
    Script.AddOrChangeKeyValue('GAME/HostIP','localhost');
    if BattleState.Battle.NATType = 1 then
      Script.AddOrChangeKeyValue('GAME/HostPort',IntToStr(NATTraversal.MyPrivateUDPSourcePort))
    else
      Script.AddOrChangeKeyValue('GAME/HostPort',IntToStr(BattleState.Battle.Port));
    if LockGameSpeedCheckBox.Checked then
    begin
      Script.AddOrChangeKeyValue('GAME/MinSpeed','1');
    end;
  end