文明游戏机制拾遗

Khyron · 发表于 2008-8-5 14:27:19

自从发现文明4的SDK后，我就像一个闯进玩具店的小孩，对每一样玩具都爱不释手。但这个玩具店里的好东西太多了，实在无法一一尝试，我只好选择那些我最感兴趣的。我决定我的一些研究心得，主要是对于文明4里那些我觉得有趣的但零碎的不太重要的东西，集中在一起，都放在这个贴子里。由于我不确定什么东西我最感兴趣，碰到什么特别有趣，鼓捣一番，如果有点心得，就放到这里。所以更新则不能保证定时。

另外，我的C++学了后就没用都快忘光了，只是从研究SDK开始才重新拾起，python则根本没学过为了文明才开始学习，而唯一可以凭藉的就是对"Sid Meier's Civilization"的热爱。因此错误是难免的，我的这些东西，还望大家斧正。

Khyron · 发表于 2008-8-5 14:27:43

1.  宗教圣城的选择
2.  为什么能造工船却不能造军舰？
3.  对野蛮人免费胜利的实质
4.  种子和随机数
5.  科技交易中某些独特的科技
6.  战争胜利指数
7.  AI是如何计算科技的垄断价值的
8.  与时间有关的计数器，电脑的记性和忘性
9.  浅论文明4中的时代
10. 边境冲突和数字8
11. 传教士传教成功率计算公式
12. 士兵数量计算公式
13. 简单分析AI科技研究路线的选择
14. 附带伤害(Collateral Damage)打击目标的选择机制
15. GNP计算公式
16. 组队(Team)和玩家(Player)简介
17. 核武器小考
18. 占领城市能获得多少金钱?
19. Top 5 Cities 评选标准
20. 最坏的敌人(Worst Enemy)全解析

[ 本帖最后由 Khyron 于 2010-3-7 16:40 编辑 ]

Khyron · 发表于 2008-8-5 14:28:04

当你(player)创立一个宗教时，电脑遍历你的所有城市，电脑按下述方法给每一城市一个数值，

(10+城市人口+随机抽取的从0到9的一个整数)/(城市当前拥有的宗教数量+1)
如果这个城市还是首都，那么还要将上述数值除以8。
然后在上面数字和1之间取大，就是最终数值。

最后，上述最终数值最大的城市会会雀屏中选成为圣城。

总结：由于计算上述数值时有一基础值10，那么城市当前拥有的宗教数量在决定圣城时起决定性作用。当不同城市当前拥有的宗教数量都最少时，人口越多机会越大。首都由于要额外除以8，正常游戏里只有有了分城就不可能是圣城了。不过你可以用WB将首都人口该为1000，看看发生了什么？

Khyron · 发表于 2008-8-5 14:29:11

void CvPlayer::foundReligion(ReligionTypes eReligion, ReligionTypes eSlotReligion, bool bAward)
{
CvCity* pLoopCity;
CvCity* pBestCity;
UnitTypes eFreeUnit;
bool bStarting;
int iValue;
int iBestValue;
int iLoop;
if (NO_RELIGION == eReligion)
{
return;
}
if (GC.getGameINLINE().isReligionFounded(eReligion))
{
if (isHuman())
{
CvPopupInfo* pInfo = new CvPopupInfo(BUTTONPOPUP_FOUND_RELIGION, eSlotReligion);
if (NULL != pInfo)
{
gDLL->getInterfaceIFace()->addPopup(pInfo, getID());
}
}
else
{
foundReligion(AI_chooseReligion(), eSlotReligion, bAward);
}
return;
}
GC.getGameINLINE().setReligionSlotTaken(eSlotReligion, true);
bStarting = ((GC.getReligionInfo(eSlotReligion).getTechPrereq() == NO_TECH) || (GC.getTechInfo((TechTypes) GC.getReligionInfo(eSlotReligion).getTechPrereq()).getEra() < GC.getGameINLINE
().getStartEra()));
iBestValue = 0;
pBestCity = NULL;
for (pLoopCity = firstCity(&iLoop); pLoopCity != NULL; pLoopCity = nextCity(&iLoop))
{
if (!bStarting || !(pLoopCity->isHolyCity()))
{
iValue = 10;
iValue += pLoopCity->getPopulation();
iValue += GC.getGameINLINE().getSorenRandNum(GC.getDefineINT("FOUND_RELIGION_CITY_RAND"), "Found Religion");
iValue /= (pLoopCity->getReligionCount() + 1);
if (pLoopCity->isCapital())
{
iValue /= 8;
}
iValue = std::max(1, iValue);
if (iValue > iBestValue)
{
iBestValue = iValue;
pBestCity = pLoopCity;
}
}
}
if (pBestCity != NULL)
{
GC.getGameINLINE().setHolyCity(eReligion, pBestCity, true);
if (bAward)
{
if (GC.getReligionInfo(eSlotReligion).getNumFreeUnits() > 0)
{
eFreeUnit = ((UnitTypes)(GC.getCivilizationInfo(getCivilizationType()).getCivilizationUnits(GC.getReligionInfo(eReligion).getFreeUnitClass())));
if (eFreeUnit != NO_UNIT)
{
for (int i = 0; i < GC.getReligionInfo(eSlotReligion).getNumFreeUnits(); ++i)
{
initUnit(eFreeUnit, pBestCity->getX_INLINE(), pBestCity->getY_INLINE());
}
}
}
}
}
}

复制代码

T

[ 本帖最后由 Khyron 于 2008-8-6 17:37 编辑 ]

Khyron · 发表于 2008-8-5 15:40:23

重新解释

首先说明湖海的区别，对于一片水域，由于LAKE_MAX_AREA_SIZE=9，如果格子数在1和9之间，那它就是淡水湖；如果有10格以上，那她就是海。

一个城市如果它所在的格子靠海，则这个城市临海。

1. 一个城市能建造灯塔这类需要临海(bwater=1)建筑，当且仅当这个城市临海。
2. 一个城市能训练军舰这类海军单位(Domain_Sea), 不但需要这个城市所在的格子靠水，还要这片水域的格子数大于iMinAreaSize。而基本上所有的海军单位的iMinAreaSize=20，所以要训练军舰，不但城市要靠海，还要靠着大海。
3. 对于工船，由于其iMinAreaSize=-1, 则需要的水域甚至可以只是一格淡水湖。但能否训练工船还有一个判定条件，就是其滨临的水域要有资源。正常游戏里只有海里才有资源。

所以当你的某个城市滨临一个只有10-19格的海洋时，且这海里还有资源时，这个城市能造工船却不能造军舰。

[ 本帖最后由 Khyron 于 2008-8-6 14:45 编辑 ]

Khyron · 发表于 2008-8-5 15:42:00

bool CvPlot::canTrain(UnitTypes eUnit, bool bContinue, bool bTestVisible) const
{
CvCity* pCity = getPlotCity();
………………
………………
if (GC.getUnitInfo(eUnit).isPrereqBonuses())
{
if (GC.getUnitInfo(eUnit).getDomainType() == DOMAIN_SEA)
{
bool bValid = false;
for (int iI = 0; iI < NUM_DIRECTION_TYPES; ++iI)
{
CvPlot* pLoopPlot = plotDirection(getX_INLINE(), getY_INLINE(), ((DirectionTypes)iI));
if (pLoopPlot != NULL)
{
if (pLoopPlot->isWater())
{
if (pLoopPlot->area()->getNumTotalBonuses() > 0)
{
bValid = true;
break;
}
}
}
}
if (!bValid)
{
return false;
}
}
else
{
if (area()->getNumTotalBonuses() > 0)
{
return false;
}
}
}
if (isCity())
{
if (GC.getUnitInfo(eUnit).getDomainType() == DOMAIN_SEA)
{
if (!isWater() && !isCoastalLand(GC.getUnitInfo(eUnit).getMinAreaSize()))
{
return false;
}
}
else
{
if (area()->getNumTiles() < GC.getUnitInfo(eUnit).getMinAreaSize())
{
return false;
}
}
}
………………
………………
}

复制代码

T

[ 本帖最后由 Khyron 于 2008-8-6 17:36 编辑 ]

detroy · 发表于 2008-8-5 15:45:24

懂代码的就是好啊……这方面我就是文盲

LZ有兴趣就研究一下这两个源码吧，算是CFC上的SDK mod代表

一个是超大城市范围
http://forums.civfanatics.com/showthread.php?t=241976

一个是Revolution + Dale's Combat Mod
http://forums.civfanatics.com/downloads.php?do=file&id=9984
还有个补丁在这一帖2楼
http://forums.civfanatics.com/showthread.php?t=271390

另外还有位仁兄把把这两个东西合起来的基础上又做了个大型MOD：Overlord 2，目前版本2.17
http://forums.civfanatics.com/showthread.php?t=236605

以上三个东西都附上了源码，可以尽情研究，我这个代码文盲就只能说声算了

ahandac · 发表于 2008-8-6 11:28:07

原帖由 Khyron 于 2008-8-5 15:40 发表
对于军舰，其iMinAreaSize=20，这意味着能造军舰的城市滨临的大海要至少有20格。而工船，这一项却为0，所以对于滨临10-19格的水域的城市，能造工船却不能造军舰。

补充：工船能否造，只取决于城市滨临的水域 ...

所谓的濒临是城市文化滨临还是城市工作范围滨临？我怎么觉得没这个限制，只要靠海都可以造啊，只要城市的格子是coast就可以造ship

ning · 发表于 2008-8-6 13:10:58

所靠的海必须有20格以上的水域,大海,小海不行

fntty · 发表于 2008-8-6 13:14:41

那你学文科的想要搞懂Python干什么？
似乎没有必要把？
人家130ty还会hello world呢

[ 本帖最后由 fntty 于 2008-8-6 13:20 编辑 ]

Khyron · 发表于 2008-8-6 14:14:39

原帖由 ahandac 于 2008-8-6 11:28 发表

所谓的濒临是城市文化滨临还是城市工作范围滨临？我怎么觉得没这个限制，只要靠海都可以造啊，只要城市的格子是coast就可以造ship

这里指的是城市所在格。
我又重新解释了一下，这样就清楚多了。

黑暗巫师 · 发表于 2008-8-6 16:11:52

我感觉FFH中，首发宗教的机制可能不同。

每次混沌之灰烬，都会在我科技最高的科研城市被创立。弄到最后想造大恶魔都没产能，全是大房子，舍不得拆了建工厂。

Khyron · 发表于 2008-8-6 17:35:09

在低难度游戏下，<iFreeWinsVsBarbs>大于零，这是否意味着我们面对野蛮人时前iFreeWinsVsBarbs次战斗必胜呢？答案是否定的。

为了便于讨论，我们称当iFreeWinsVsBarbs>0时，在与野蛮人的战斗为野蛮人修正战斗。如果这时的战斗杀死了野蛮人单位，此数值要减1。

如果一场战斗是野蛮人修正战斗，那么我们在这次战斗中每轮攻防的胜率将强制修正为不低于90%。不要小看这90%，这将极大的提高这次战斗的胜率。假设双方生命值都是100，这个修改能使warrior对knight的胜率到90%以上，如果再加上低难度下对野蛮人力量修正，那胜率更高了，大概warrior对infantry的胜率也会在80%以上。所以将野蛮人修正战斗称之为对野蛮人必胜也不为过。

但是，这是在我方单位满血的前提下。当我方单位的生命值比较低时，战斗的胜率就急剧下降。对于这点要注意。

所以对野蛮人免费胜利的实质是在我们杀死iFreeWinsVsBarbs个野蛮人前，也野蛮人的战斗都是胜率极高的，但不保证为100%。

[ 本帖最后由 Khyron 于 2008-8-9 13:39 编辑 ]

Khyron · 发表于 2008-8-6 17:35:51

if (kDefender.isBarbarian())
{
if (GET_PLAYER(getOwnerINLINE()).getWinsVsBarbs() < GC.getHandicapInfo(GET_PLAYER(getOwnerINLINE()).getHandicapType()).getFreeWinsVsBarbs())
{
iTheirOdds = std::min((10 * GC.getDefineINT("COMBAT_DIE_SIDES")) / 100, iTheirOdds);
}
}
if (isBarbarian())
{
if (GET_PLAYER(kDefender.getOwnerINLINE()).getWinsVsBarbs() < GC.getHandicapInfo(GET_PLAYER(kDefender.getOwnerINLINE()).getHandicapType()).getFreeWinsVsBarbs())
{
iTheirOdds = std::max((90 * GC.getDefineINT("COMBAT_DIE_SIDES")) / 100, iTheirOdds);
}
}

复制代码

T

[ 本帖最后由 Khyron 于 2008-8-6 17:37 编辑 ]

囧囧囧囧囧 · 发表于 2008-8-6 18:05:38

潜力贴，留个名。。。

想了几个课题，楼主不妨研究下：
⑴ AI送科技、送城：可能和ai个性、关系、被送者的科技和发展水平等都有关系；
⑵ 基于3.17的AI宣战机制、性格研究：以前看过孟大和gowang大的ai研究，可资参考；
⑶ AI的科技路线：什么原因制约着ai研究这个、而不研究那个，曾看到有个ai抢首发自由主义，当别的ai首发后，该ai马上把科技研究换成了别的；
⑷ AI的奇迹建设：

[ 本帖最后由囧囧囧囧囧于 2008-8-6 19:46 编辑 ]

Khyron · 发表于 2008-8-7 15:44:40

1. 每调用一次随机数，新种子=(1103515245*旧种子+12345) mod 2^32。
设最新种子是RandSeed，则当前的从0到N(不包括N)的随机整数为
[[RandSeed/2^16]*N/(65535+1)]

2. 如果在游戏设置里选了New RandomSeed on Reload，那么每次读档后将时间设为当前种子。

3. 经初步测试，没发现按此方法生成的随机数有什么明显的不随机的地方。

(1)一部分测试结果参见附图。其中initSeed=初始种子, RandNum=随机数范围, Times=随机数产生次数
(2)initSeed=5555, RandNum=10, Times=1000时，0－9出现的频率分别如下
{99, 111, 100, 86, 112, 96, 101, 102, 96, 97}

总结：试图通过旧随机数来预测新的随机数的行为可以休矣。比如上一次战斗无论是你的坦克被人家的矛兵戳死了还是你的棒棒敲死了敌人的机械化步兵，都不能使你的下一次战斗的随机数变好或变坏。

[ 本帖最后由 Khyron 于 2008-8-8 17:15 编辑 ]

Khyron · 发表于 2008-8-7 15:45:02

附测试结果, 点击放大后会比较清楚

1.initSeed=9999, RandNum=100, Times=50

2.initSeed=5555, RandNum=10, Times=100

3.initSeed=1234567, RandNum=1000, Times=1000

[ 本帖最后由 Khyron 于 2008-8-7 15:51 编辑 ]

Khyron · 发表于 2008-8-7 15:46:40

#define RANDOM_A (1103515245)
#define RANDOM_C (12345)
#define RANDOM_SHIFT (16)
unsigned short CvRandom::get(unsigned short usNum, const TCHAR* pszLog)
{
if (pszLog != NULL)
{
if (GC.getLogging() && GC.getRandLogging())
{
if (GC.getGameINLINE().getTurnSlice() > 0)
{
TCHAR szOut[1024];
sprintf(szOut, "Rand = %d on %d (%s)\n", getSeed(), GC.getGameINLINE().getTurnSlice(), pszLog);
gDLL->messageControlLog(szOut);
}
}
}
m_ulRandomSeed = ((RANDOM_A * m_ulRandomSeed) + RANDOM_C);
unsigned short us = ((unsigned short)((((m_ulRandomSeed >> RANDOM_SHIFT) & MAX_UNSIGNED_SHORT) * ((unsigned long)usNum)) / (MAX_UNSIGNED_SHORT + 1)));
return us;
}

复制代码

if (isOption(GAMEOPTION_NEW_RANDOM_SEED))
{
if (!isNetworkMultiPlayer())
{
m_sorenRand.reseed(timeGetTime());
}
}

复制代码

Khyron · 发表于 2008-8-8 16:47:27

要从一个AI手里换到科技，有重重障碍。其中一项就是AI对科技的保密，当一个科技知道的国家越少，AI就越不肯开放这个科技的交换。大家经常碰到的AI说"We don't want to start trading away this technology just yet"，就是这种情形。
但细心的玩家会发现，有些科技，比如一神君主制，即使它们只被一个AI掌握，那AI也肯交换它们。什么使这些科技与众不同呢？

对于一个科技，AI按以下方法判断是否对某国实行科技垄断。
1. AI根据这个科技和是否准备对此国开战来计算一个垄断价值。
2. 根据此AI领袖性格和游戏难度，进行修正。
3. 再根据已发现此科技的队伍数和此AI碰到的队伍数进行修正，均不包括此AI和想和此AI进行交易的队伍。

公式为：
(1)如果此AI碰到的队伍数>0, 且(已发现此科技的队伍数)/(此AI碰到的队伍数)<垄断价值*难度修正*AI性格修正, 则AI将玩科技垄断。
(2)如果此AI碰到的队伍数=0(比如这世界上就玩家和AI两支队伍), 垄断价值*难度修正*AI性格修正>0，则AI将玩科技垄断。

由此可见，当一个科技是AI的独门科技的时，已发现此科技的队伍数＝0，那么垄断价值*难度修正*AI性格修正不为0，则AI将不肯放出此科技。恰恰有些科技很特别，它们的垄断价值为0。所以有了本文开头所述现象。
大致说一下一个科技的垄断价值，基本上只要它是战斗单位，非宗教建筑，奇迹，工程的前提科技，其垄断价值就要上升。而Monotheism, Monarchy刚好不是这些东东的前提。

附垄断价值为零的科技: Fishing, Agriculture, Mining, Animal Husbandry, Monothesim, Monarchy, Alphabet, Printing Press, Liberalism, Scientific Method。

另外，我们也知道为什么Mansa Musa这么特别，这是因为他是唯一一位AI性格修正为0的领袖。

Khyron · 发表于 2008-8-8 16:48:54

DenialTypes CvTeamAI::AI_techTrade(TechTypes eTech, TeamTypes eTeam) const
{
………………
………………
iKnownCount = 0;
iPossibleKnownCount = 0;
for (iI = 0; iI < MAX_CIV_TEAMS; iI++)
{
if (GET_TEAM((TeamTypes)iI).isAlive())
{
if ((iI != getID()) && (iI != eTeam))
{
if (isHasMet((TeamTypes)iI))
{
if (GET_TEAM((TeamTypes)iI).isHasTech(eTech))
{
iKnownCount++;
}
iPossibleKnownCount++;
}
}
}
}
iTechTradeKnownPercent = AI_techTradeKnownPercent();
iTechTradeKnownPercent *= std::max(0, (GC.getHandicapInfo(GET_TEAM(eTeam).getHandicapType()).getTechTradeKnownModifier() + 100));
iTechTradeKnownPercent /= 100;
iTechTradeKnownPercent *= AI_getTechMonopolyValue(eTech, eTeam);
iTechTradeKnownPercent /= 100;
if ((iPossibleKnownCount > 0) ? (((iKnownCount * 100) / iPossibleKnownCount) < iTechTradeKnownPercent) : (iTechTradeKnownPercent > 0))
{
return DENIAL_TECH_MONOPOLY;
}
………………
………………
}

复制代码

int CvTeamAI::AI_getTechMonopolyValue(TechTypes eTech, TeamTypes eTeam) const
{
int iValue = 0;
int iI;
bool bWarPlan = (getAnyWarPlanCount(eTeam) > 0);
for (iI = 0; iI < GC.getNumUnitClassInfos(); iI++)
{
UnitTypes eLoopUnit = ((UnitTypes)GC.getUnitClassInfo((UnitClassTypes)iI).getDefaultUnitIndex());
if (eLoopUnit != NO_UNIT)
{
if (isTechRequiredForUnit((eTech), eLoopUnit))
{
if (isWorldUnitClass((UnitClassTypes)iI))
{
iValue += 50;
}
if (GC.getUnitInfo(eLoopUnit).getPrereqAndTech() == eTech)
{
int iNavalValue = 0;
int iCombatRatio = (GC.getUnitInfo(eLoopUnit).getCombat() * 100) / std::max(1, GC.getGameINLINE().getBestLandUnitCombat());
if (iCombatRatio > 50)
{
iValue += ((bWarPlan ? 100 : 50) * (iCombatRatio - 40)) / 50;;
}
switch (GC.getUnitInfo(eLoopUnit).getDefaultUnitAIType())
{
case UNITAI_UNKNOWN:
case UNITAI_ANIMAL:
case UNITAI_SETTLE:
case UNITAI_WORKER:
break;
case UNITAI_ATTACK:
case UNITAI_ATTACK_CITY:
case UNITAI_COLLATERAL:
iValue += bWarPlan ? 50 : 20;
break;
case UNITAI_PILLAGE:
case UNITAI_RESERVE:
case UNITAI_COUNTER:
case UNITAI_PARADROP:
case UNITAI_CITY_DEFENSE:
case UNITAI_CITY_COUNTER:
case UNITAI_CITY_SPECIAL:
iValue += bWarPlan ? 40 : 15;
break;
case UNITAI_EXPLORE:
case UNITAI_MISSIONARY:
break;
case UNITAI_PROPHET:
case UNITAI_ARTIST:
case UNITAI_SCIENTIST:
case UNITAI_GENERAL:
case UNITAI_MERCHANT:
case UNITAI_ENGINEER:
break;
case UNITAI_SPY:
break;
case UNITAI_ICBM:
iValue += bWarPlan ? 80 : 40;
break;
case UNITAI_WORKER_SEA:
break;
case UNITAI_ATTACK_SEA:
iNavalValue += 50;
break;
case UNITAI_RESERVE_SEA:
case UNITAI_ESCORT_SEA:
iNavalValue += 30;
break;
case UNITAI_EXPLORE_SEA:
iValue += GC.getGame().circumnavigationAvailable() ? 100 : 0;
break;
case UNITAI_ASSAULT_SEA:
iNavalValue += 60;
break;
case UNITAI_SETTLER_SEA:
case UNITAI_MISSIONARY_SEA:
case UNITAI_SPY_SEA:
break;
case UNITAI_CARRIER_SEA:
case UNITAI_MISSILE_CARRIER_SEA:
iNavalValue += 40;
break;
case UNITAI_PIRATE_SEA:
iNavalValue += 20;
break;
case UNITAI_ATTACK_AIR:
case UNITAI_DEFENSE_AIR:
iValue += bWarPlan ? 60 : 30;
break;
case UNITAI_CARRIER_AIR:
iNavalValue += 40;
break;
case UNITAI_MISSILE_AIR:
iValue += bWarPlan ? 40 : 20;
break;
default:
FAssert(false);
break;
}
if (iNavalValue > 0)
{
if (AI_isAnyCapitalAreaAlone())
{
iValue += iNavalValue / 2;
}
if (bWarPlan && !AI_isLandTarget(eTeam))
{
iValue += iNavalValue / 2;
}
}
}
}
}
}
for (iI = 0; iI < GC.getNumBuildingInfos(); iI++)
{
if (isTechRequiredForBuilding(eTech, ((BuildingTypes)iI)))
{
CvBuildingInfo& kLoopBuilding = GC.getBuildingInfo((BuildingTypes)iI);
if (kLoopBuilding.getReligionType() == NO_RELIGION)
{
iValue += 30;
}
if (isWorldWonderClass((BuildingClassTypes)kLoopBuilding.getBuildingClassType()))
{
if (!(GC.getGameINLINE().isBuildingClassMaxedOut((BuildingClassTypes)kLoopBuilding.getBuildingClassType())))
{
iValue += 50;
}
}
}
}
for (iI = 0; iI < GC.getNumProjectInfos(); iI++)
{
if (GC.getProjectInfo((ProjectTypes)iI).getTechPrereq() == eTech)
{
if (isWorldProject((ProjectTypes)iI))
{
if (!(GC.getGameINLINE().isProjectMaxedOut((ProjectTypes)iI)))
{
iValue += 100;
}
}
else
{
iValue += 50;
}
}
}
return iValue;
}

复制代码

T

		自动登录	找回密码
密码			注册

[原创] 文明游戏机制拾遗

传送门

宗教圣城的选择(BTS3.17)

宗教圣城的选择(BTS3.17)

为什么能造工船却不能造军舰？(BTS3.17)

为什么能造工船却不能造军舰？(BTS3.17)

回复 #19 ahandac 的帖子

回复 #13 vesley1987 的帖子

对野蛮人免费胜利的实质(BTS3.17)

对野蛮人免费胜利的实质(BTS3.17)

种子和随机数(BTS3.17)

评分

种子和随机数(BTS3.17)

本帖子中包含更多资源

种子和随机数(BTS3.17)

科技交易中某些独特的科技(BTS3.17)

科技交易中某些独特的科技(BTS3.17)