海岛大亨4资源上限修改方法 - 第6页 - 《海岛大亨4》 - 3DMGAME论坛

aaroncolor 发表于 2013-1-30 17:54

請問有可以取消工作性別的方式嗎跪求><

要玩就WQ 发表于 2013-3-26 11:06

我只想知道原版农场和畜牧场的代码…:dizzy:

waskyxiaorui 发表于 2013-5-22 21:05

谢谢了~~~

sototo 发表于 2013-7-16 20:38

好久没玩这游戏了，现在又能用在典藏版中，不错不错{:3_121:}

◕5神◕ 发表于 2013-9-11 12:55

本帖最后由 53243336 于 2013-9-11 14:46 编辑

其实这个游戏里面非有必要改的就是：人口（2500最合适）矿场变电站范围太阳能供电值TTG电信覆盖范围教堂的接待人数购物中心的接待人数这些在游戏里都是最缺的其他的真的别去改尤其是住房，你房子改成住几百人你建造几个房子就可以住几千人了那你还能建造大城市吗？因为那时空闲的房子太多了。房子就是要人数少然后多多发展房子后期才有大城市的感觉

local GameEntityCount = 200000
local MaxPopulation = 2000（人数2000够了）

-- Original mod code
function NoLimitsMod()
-- Sets the entity count
config.MaxGameObjectExCount = GameEntityCount
config.MaxGameObjectCount = GameEntityCount

-- Remove the road construction limitations
road_construction.ReachedLimit =function(x)
   return false
end

-- Sets the population
MigrationMaxCitizens = MaxPopulation

ImmigrationRandomize = function(y)
   return MulDivRound(y, MaxPopulation - CitizenCount, 60)
end
太阳能电力
   SolarPlant["upgrades"]["param1"] = 500
   SolarPlant["upgrades"]["param1"] = 600
   SolarPlant["upgrades"]["param1"] = 700
TTG电信覆盖范围
   TelecomHQ["upgrades"]["param1"] = 400
   TelecomHQ["upgrades"]["param1"] = 500
   TelecomHQ["upgrades"]["param1"] = 600
   TelecomHQ["modes"]["param1"] = 35
水处理厂
   g_Classes.WaterTreatment.num_workers = 10
   g_Classes.WaterTreatment.job_quality = 85
   g_Classes.WaterTreatment.clamp_radius = 6000
小教堂
   g_Classes.Church.num_people_serviced = 50
   g_Classes.Church.num_workers = 5
   g_Classes.Church.job_quality = 85
大教堂
   g_Classes.CrystalCathedral.num_people_serviced = 100
   g_Classes.CrystalCathedral.num_workers = 10
   g_Classes.CrystalCathedral.base_service_quality = 240

end

-- Only fire once
local FiredOnce = false

-- UA Set Mode
OnMsg.UASetMode = function(actions,mode)

-- Fire until fired once
if not FiredOnce then
   -- If we boot, trip it ...
   if(mode == "Boot") then
         FiredOnce = true

         -- Run the thread to bypass it
         CreateRealTimeThread(function()

            -- Do mod loading code here.
            NoLimitsMod()

            -- Reconfigure/force the settings every map load.
            OnMsg.MapPermanentObjectsLoaded = function()
               NoLimitsMod()
            end
         end)
   end
end
end

-- Legacy load (what the original mod used)
OnMsg.ClassesPreprocess = function()
NoLimitsMod()
end

其他的根本不需要修改很合理的改了干什么呢？

解压后直接把Game放到游戏根目录下即可！跑到2160年了都没问题将近跑了150年了呵呵

壞壞尒{孑亥} 发表于 2013-9-27 23:15

求沙盘怎么改资源！！！！

s81511 发表于 2013-10-14 03:05

挑戰模式下

原油蘊藏量

g_Classes.SmallOilMarker.Amount =999990000
g_Classes.LargeOilMarker.Amount =999990000

煉油廠出口儲存容量
OilRefinery["upgrades"]["param1"] = 500000

太無聊的可以玩玩

chadi 发表于 2013-12-9 08:34

非常感谢楼主的分享!支持

入围城的小熊 发表于 2014-10-2 09:12

这贴就是座金矿

Wolf学长 发表于 2014-11-23 03:39

感谢LZ分享！！！

Zp007 发表于 2015-3-15 17:50

local GameEntityCount = 200000
local MaxPopulation = 2000（人数2000够了）

-- Original mod code
function NoLimitsMod()
-- Sets the entity count
config.MaxGameObjectExCount = GameEntityCount
config.MaxGameObjectCount = GameEntityCount

-- Remove the road construction limitations
road_construction.ReachedLimit =function(x)
   return false
end

-- Sets the population
MigrationMaxCitizens = MaxPopulation

ImmigrationRandomize = function(y)
   return MulDivRound(y, MaxPopulation - CitizenCount, 60)
end
太阳能电力
   SolarPlant["upgrades"]["param1"] = 500
   SolarPlant["upgrades"]["param1"] = 600
   SolarPlant["upgrades"]["param1"] = 700
TTG电信覆盖范围
   TelecomHQ["upgrades"]["param1"] = 400
   TelecomHQ["upgrades"]["param1"] = 500
   TelecomHQ["upgrades"]["param1"] = 600
   TelecomHQ["modes"]["param1"] = 35
水处理厂
   g_Classes.WaterTreatment.num_workers = 10
   g_Classes.WaterTreatment.job_quality = 85
   g_Classes.WaterTreatment.clamp_radius = 6000
小教堂
   g_Classes.Church.num_people_serviced = 50
   g_Classes.Church.num_workers = 5
   g_Classes.Church.job_quality = 85
大教堂
   g_Classes.CrystalCathedral.num_people_serviced = 100
   g_Classes.CrystalCathedral.num_workers = 10
   g_Classes.CrystalCathedral.base_service_quality = 240

end

-- Only fire once
local FiredOnce = false

-- UA Set Mode
OnMsg.UASetMode = function(actions,mode)

-- Fire until fired once
if not FiredOnce then
   -- If we boot, trip it ...
   if(mode == "Boot") then
         FiredOnce = true

         -- Run the thread to bypass it
         CreateRealTimeThread(function()

            -- Do mod loading code here.
            NoLimitsMod()

            -- Reconfigure/force the settings every map load.
            OnMsg.MapPermanentObjectsLoaded = function()
               NoLimitsMod()
            end
         end)
   end
end
end

-- Legacy load (what the original mod used)
OnMsg.ClassesPreprocess = function()
NoLimitsMod()
end

挑戰模式下

原油蘊藏量

g_Classes.SmallOilMarker.Amount =999990000
g_Classes.LargeOilMarker.Amount =999990000

煉油廠出口儲存容量
OilRefinery["upgrades"]["param1"] = 500000

ououzhanhong 发表于 2015-7-21 21:31

叔叔婶婶三生三世生生死死生生死死琐琐碎碎sssss

oo1234567890oo 发表于 2016-3-4 19:13

好像过期了，能再发一遍吗

单曲循环11 发表于 2016-4-14 22:06

弄完了重新进游戏怎么没有声音了？

lx1661392008 发表于 2016-5-11 09:18

支持一下

叫我奶爸王 发表于 2019-12-25 17:11

文件失效了

3dm_14922566 发表于 2020-2-21 20:00

oo1234567890oo 发表于 2016-3-4 19:13
好像过期了，能再发一遍吗

好像第4 5页的那个有效，你去试试看。

页: 1 2 3 4 5 [6]

3DMGAME论坛's Archiver