易语言

关注公众号 jb51net

关闭
首页 > 软件编程 > 易语言 > 易语言绝地求生一键优化

易语言制作绝地求生视野一键优化的代码

作者:易语言源码贝贝吧

今天小编就为大家分享一篇关于易语言制作绝地求生视野一键优化的代码,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧

绝地求生一键优化的代码

优化后远处树干不显示,地面光滑,更容易看到远处的敌人。

.版本 2
.支持库 shell
.支持库 spec
.支持库 iext
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
路径编辑框.内容 = 取特定目录 (8) + “..\Local\TslGame\Saved\Config\WindowsNoEditor\”
.如果 (文件是否存在 (路径编辑框.内容 + “\一键优化备份\”))
  还原按钮.禁止 = 假
.否则
  还原按钮.禁止 = 真
.如果结束
.子程序 _目录按钮_被单击
执行 (4, 路径编辑框.内容, , , )
.子程序 _普通优化按钮_被单击
.局部变量 是否复制出错, 逻辑型
.如果真 (文件是否存在 (路径编辑框.内容 + “一键优化备份”) = 假)
  创建目录 (路径编辑框.内容 + “一键优化备份”)
  调试输出 (路径编辑框.内容 + “一键优化备份”)
  .如果真 (复制文件 (路径编辑框.内容 + “Engine.ini”, 路径编辑框.内容 + “一键优化备份\Engine.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (复制文件 (路径编辑框.内容 + “GameUserSettings.ini”, 路径编辑框.内容 + “一键优化备份\GameUserSettings.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (复制文件 (路径编辑框.内容 + “Scalability.ini”, 路径编辑框.内容 + “一键优化备份\Scalability.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (是否复制出错)
    信息框 (“备份失败,请以管理员身份运行本程序。”, 0, )
  .如果真结束
.如果真结束
写配置项 (路径编辑框.内容 + “Engine.ini”, “Core.System”, “r.TextureStreaming”, “False”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.ResolutionQuality”, “70.000000”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.ViewDistanceQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.AntiAliasingQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.ShadowQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.PostProcessQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.TextureQuality”, “3”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.EffectsQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.FoliageQuality”, “0”)
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@0”, , ) ' 清空数据
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@3”, “r.Streaming.MipBias”, “16”)
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@3”, “r.MaxAnisotropy”, “8”)
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@3”, “r.Streaming.PoolSize”, “0.01”)
还原按钮.禁止 = 假
优化效果透明标签.标题 = “优化完毕” + #换行符 + “(如果更新后出现不兼容随时可以还原)”
路径透明标签.标题 = “配置文件路径:”
.子程序 _低配优化按钮_被单击
.局部变量 是否复制出错, 逻辑型
.如果真 (文件是否存在 (路径编辑框.内容 + “一键优化备份”) = 假)
  创建目录 (路径编辑框.内容 + “一键优化备份”)
  调试输出 (路径编辑框.内容 + “一键优化备份”)
  .如果真 (复制文件 (路径编辑框.内容 + “Engine.ini”, 路径编辑框.内容 + “一键优化备份\Engine.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (复制文件 (路径编辑框.内容 + “GameUserSettings.ini”, 路径编辑框.内容 + “一键优化备份\GameUserSettings.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (复制文件 (路径编辑框.内容 + “Scalability.ini”, 路径编辑框.内容 + “一键优化备份\Scalability.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (是否复制出错)
    信息框 (“备份失败,请以管理员身份运行本程序。”, 0, )
  .如果真结束
.如果真结束
写配置项 (路径编辑框.内容 + “Engine.ini”, “Core.System”, “r.TextureStreaming”, “False”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.ResolutionQuality”, “70.000000”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.ViewDistanceQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.AntiAliasingQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.ShadowQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.PostProcessQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.TextureQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.EffectsQuality”, “0”)
写配置项 (路径编辑框.内容 + “GameUserSettings.ini”, “ScalabilityGroups”, “sg.FoliageQuality”, “0”)
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@3”, , ) ' 清空数据
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@0”, “r.Streaming.MipBias”, “16”)
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@0”, “r.MaxAnisotropy”, “8”)
写配置项 (路径编辑框.内容 + “Scalability.ini”, “TextureQuality@0”, “r.Streaming.PoolSize”, “0.01”)
还原按钮.禁止 = 假
优化效果透明标签.标题 = “优化完毕” + #换行符 + “(如果更新后出现不兼容随时可以还原)”
路径透明标签.标题 = “配置文件路径:”
.子程序 _还原按钮_被单击
.局部变量 是否复制出错, 逻辑型
.如果真 (文件是否存在 (路径编辑框.内容 + “\一键优化备份\”) = 假)
  创建目录 (路径编辑框.内容 + “一键优化备份”)
  调试输出 (路径编辑框.内容 + “一键优化备份”)
  .如果真 (移动文件 (路径编辑框.内容 + “一键优化备份\Engine.ini”, 路径编辑框.内容 + “Engine.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (移动文件 (路径编辑框.内容 + “一键优化备份\GameUserSettings.ini”, 路径编辑框.内容 + “GameUserSettings.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (移动文件 (路径编辑框.内容 + “一键优化备份\Scalability.ini”, 路径编辑框.内容 + “Scalability.ini”) = 假)
    是否复制出错 = 真
  .如果真结束
  .如果真 (是否复制出错)
    信息框 (“还原失败,请以管理员身份运行本程序。”, 0, )
  .如果真结束
.如果真结束
.如果真 (删除目录 (路径编辑框.内容 + “一键优化备份”) = 假)
  信息框 (“删除备份文件失败,请手动删除。”, 0, )
  执行 (4, 路径编辑框.内容, , , )
.如果真结束
还原按钮.禁止 = 真
优化效果透明标签.标题 = “还原完毕,感谢你的使用。” + #换行符 + “(如有使用问题欢迎反馈)”
路径透明标签.标题 = “配置文件路径:”
.子程序 重置标签
路径透明标签.标题 = “配置文件路径:”
优化效果透明标签.标题 = “优化后远处树干不显示 地面光滑” + #换行符 + “更容易看到远处的敌人”

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对脚本之家的支持。如果你想了解更多相关内容请查看下面相关链接

您可能感兴趣的文章:
阅读全文