1楼我是不敢待的。

首先说明：开这贴的主要目的是与重吧友分享知识，并吸引对制作辐射3MOD有兴趣的朋友，降低门槛MOD的制作门槛，同时欢迎MOD强人、高手批评指正。但绝无宣传作弊用意。言归正传，举例：你一定遇到过这样一种陷阱，机器散弹枪陷阱，用绊马索触发，解除后得到一把战斗散弹枪（快坏了），核子电池（10个），散弹（4发）下面我就分析一下控制这一游戏设定的程序。就报后得到程序脚本TrapShotgunSCRIPTscn TrapShotgunSCRIPT;;This script runs the shotgun trap. If activated by a remote source, it shoud fire indefinitely.;The player can loot some shotgun shells if able to deactivate it.;;VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVshort armedshort buttonshort skillPassedshort initshort doOnceshort rewardXPOnceshort XPForDisarm ;====================================================begin OnLoadsetStage NQlvl 1if init == 0set armed to 1set init to 1endifend;====================================================;====================================================begin onActivateif armed == 1;is the trap already activated/disarmed?if isActionRef player == 1;can the player disarm the trap?if player.getAV Repair >= NQlvl.TRAPShotgunSkillReqShowMessage TrapShotgunDetectMsgset skillPassed to 1else;Message "Your Repair skill is not high enough to disarm this trap."ShowMessage TrapLowSkillRepairMsg NQlvl.TRAPShotgunSkillReqendIfelseif doOnce == 0fireWeapon WeapShotgunCombatset doOnce to 1endifendifendifend;====================================================;====================================================begin gameModeif skillPassed == 1;don't run stuff in game mode unless recently activated set button to getButtonPressed;grab the button state, you don't know when this will be setif button > -1;if a valid response is received start doing stuffif button == 1ShowMessage TrapDisarmMsgset armed to 0;disarm the trapif rewardXPOnce == 0if NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxVeryEasyset XPForDisarm to 0elseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxEasyset XPForDisarm to TrapXPRewardVeryEasyelseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxAverageset XPForDisarm to TrapXPRewardEasyelseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxHardset XPForDisarm to TrapXPRewardAverageelseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxVeryHardset XPForDisarm to TrapXPRewardHardelseset XPForDisarm to TrapXPRewardVeryHardendifset rewardXPOnce to 1rewardXP XPforDisarmendifplaceatme shotgunTrapShell01 1player.additemHealthpercent weapshotgunCombat 1 .14player.additem ammoMicrofusionCell 10player.additem ammoShotgunShell 4disableendifset skillPassed to 0;stop running stuff endifendifend

首先说明：开这贴的主要目的是与重吧友分享知识，并吸引对制作辐射3MOD有兴趣的朋友，降低门槛MOD的制作门槛，同时欢迎MOD强人、高手批评指正。但绝无宣传作弊用意。言归正传，举例：你一定遇到过这样一种陷阱，机器散弹枪陷-阱，用绊-马-索触发，解除后得到一把战斗散弹枪（快坏了），核-子电池（10个），散-弹（4发）下面我就分析一下控制这一游戏设定的程序。解包后得到程序脚本TrapShotgunSCRIPTscn TrapShotgunSCRIPT;;This script runs the shotgun trap. If activated by a remote source, it shoud fire indefinitely.;The player can loot some shotgun shells if able to deactivate it.;;VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVshort armedshort buttonshort skillPassedshort initshort doOnceshort rewardXPOnceshort XPForDisarm ;====================================================begin OnLoadsetStage NQlvl 1if init == 0set armed to 1set init to 1endifend;====================================================;====================================================begin onActivateif armed == 1;is the trap already activated/disarmed?if isActionRef player == 1;can the player disarm the trap?if player.getAV Repair >= NQlvl.TRAPShotgunSkillReqShowMessage TrapShotgunDetectMsgset skillPassed to 1else;Message "Your Repair skill is not high enough to disarm this trap."ShowMessage TrapLowSkillRepairMsg NQlvl.TRAPShotgunSkillReqendIfelseif doOnce == 0fireWeapon WeapShotgunCombatset doOnce to 1endifendifendifend;====================================================;====================================================begin gameModeif skillPassed == 1;don't run stuff in game mode unless recently activated set button to getButtonPressed;grab the button state, you don't know when this will be setif button > -1;if a valid response is received start doing stuffif button == 1ShowMessage TrapDisarmMsgset armed to 0;disarm the trapif rewardXPOnce == 0if NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxVeryEasyset XPForDisarm to 0elseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxEasyset XPForDisarm to TrapXPRewardVeryEasyelseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxAverageset XPForDisarm to TrapXPRewardEasyelseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxHardset XPForDisarm to TrapXPRewardAverageelseif NQlvl.TRAPShotgunSkillReq< getGS iLockLevelMaxVeryHardset XPForDisarm to TrapXPRewardHardelseset XPForDisarm to TrapXPRewardVeryHardendifset rewardXPOnce to 1rewardXP XPforDisarmendifplaceatme shotgunTrapShell01 1player.additemHealthpercent weapshotgunCombat 1 .14player.additem ammoMicrofusionCell 10player.additem ammoShotgunShell 4disableendifset skillPassed to 0;stop running stuff endifendifend

B社程序员的传统是为每一段程序加脚注，好像就是为了别人解包反汇编时方便理解该端程序的用能，赞一下。我来帮你们解读这一段程序。short armed 定义陷阱的散弹枪是否上堂，赋值后有效。short button 定义触发开关，就是3D场景下的绊锁short skillPassed 定义
看看你的
Repair等级是否符合解除条件short init 初始化变量short doOnce short rewardXPOnce 定义看看是否给了你经验short XPForDisarm 定义该给你多少解除陷阱的经验这一段是定义了该程序的短整型局部变量，可以理解为该程序专有变量。

begin OnLoad setStage NQlvl 1 这个要找中说明！NQlvl是整体参数名对所有辐射3的程序提供调用setStage设置阶段命令，我们以后要经常用到它，自定义任务时更是离不开他。if init == 0 set armed to 1 将上堂状态赋值为1，等于子弹上膛了。set init to 1 总体来看这是该段控制脚本执行开关上来为0执行完为1.endif end

begin onActivate if armed == 1 刚才说过了，这是看看陷阱是否子弹上膛的判断。;is the trap already activated/disarmed? ;B社程序员语录看看脚本是能射击的还是已经被拆除了？if isActionRef player == 1 ;can the player disarm the trap? ;B社程序员语录定义玩家有无资格解除陷阱？if player.getAV Repair >= NQlvl.TRAPShotgunSkillReq 来正格的了判断玩家修理技能是否达标ShowMessage TrapShotgunDetectMsg 显示散弹枪陷阱拆除对话框set skillPassed to 1 将技能过关变量至1else 否则维修及能不能达标;Message "Your Repair skill is not high enough to disarm this trap." 显示信息：你的维修技能对接触这个陷阱来说还不够高！ShowMessage TrapLowSkillRepairMsg NQlvl.TRAPShotgunSkillReq ;开始用NQlvl调出技能数据库，TRAPShotgunSkillReq是辐射3数据库里的一个数值，要说明的是我们在这段程序看不到任何对这个数值的赋值定义，他已经在公用数据库里定义好了，用fomm这个软件能看到和修改辐射3公用数据库里的数据（我另开贴教大家）endIf else 未解除的陷阱如被触发就要开火了！if doOnce == 0 ;判断是否开过火让我无限遐想，这个地方可以定义开多少抢！！！打起来没完也随你，哈哈哈哈，我厚道5枪够了吧？doOnce == 1才停火，建议另外定义一个参数来控制开多少枪以后doOnce才赋值到1.fireWeapon WeapShotgunCombat ;这个参数很关键，是定义陷阱发射什么弹药，不一定是散弹，想想小型--核--弹囧。。。需要想象力的地方。。。set doOnce to 1 endif endif endif end

辐射3的解包器下载地址：https://tieba.baidu.com/f?kz=500190117需要的朋友可去哪里下载。

兄弟你是哪家游戏公司的啊？！无敌了都