mirror of
https://github.com/OpenTTD/OpenTTD
synced 2026-01-17 09:22:42 +01:00
- Fix: Original train and rv acceleration did no longer respect bridge speed limits [FS#5523] (r25167) - Fix: [Win32] Do not statically link to SHGetFolderPath as it may not exist, and improve its emulation [FS#5522] (r25155, r25153) - Fix: [Win32] Do not store invalid paths in the search path list (r25154) - Fix: Remove stray reservation from savegames affected by FS#5510 et al. upon loading [FS#5520] (r25152) - Fix: [Script] XXBase::Chance function did not work for large values (>65535) [FS#5517] (r25148)
54 lines
1.8 KiB
C++
54 lines
1.8 KiB
C++
/* $Id$ */
|
|
|
|
/*
|
|
* This file is part of OpenTTD.
|
|
* OpenTTD is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2.
|
|
* OpenTTD is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
* See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with OpenTTD. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/** @file script_base.cpp Implementation of ScriptBase. */
|
|
|
|
#include "../../stdafx.h"
|
|
#include "script_base.hpp"
|
|
#include "script_error.hpp"
|
|
#include "../../network/network.h"
|
|
#include "../../core/random_func.hpp"
|
|
|
|
/* static */ uint32 ScriptBase::Rand()
|
|
{
|
|
/* We pick RandomRange if we are in SP (so when saved, we do the same over and over)
|
|
* but we pick InteractiveRandomRange if we are a network_server or network-client. */
|
|
if (_networking) return ::InteractiveRandom();
|
|
return ::Random();
|
|
}
|
|
|
|
/* static */ uint32 ScriptBase::RandItem(int unused_param)
|
|
{
|
|
return ScriptBase::Rand();
|
|
}
|
|
|
|
/* static */ uint ScriptBase::RandRange(uint max)
|
|
{
|
|
/* We pick RandomRange if we are in SP (so when saved, we do the same over and over)
|
|
* but we pick InteractiveRandomRange if we are a network_server or network-client. */
|
|
if (_networking) return ::InteractiveRandomRange(max);
|
|
return ::RandomRange(max);
|
|
}
|
|
|
|
/* static */ uint32 ScriptBase::RandRangeItem(int unused_param, uint max)
|
|
{
|
|
return ScriptBase::RandRange(max);
|
|
}
|
|
|
|
/* static */ bool ScriptBase::Chance(uint out, uint max)
|
|
{
|
|
EnforcePrecondition(false, out <= max);
|
|
return ScriptBase::RandRange(max) < out;
|
|
}
|
|
|
|
/* static */ bool ScriptBase::ChanceItem(int unused_param, uint out, uint max)
|
|
{
|
|
return ScriptBase::Chance(out, max);
|
|
}
|