设为首页收藏本站同能贴吧 切换语言 繁体中文
开启辅助访问 切换到窄版
扫描二维码关注官方公众号
返回列表
+ 发新帖
查看: 112|回复: 0

[转载发布] YCA-BattleFog

[复制链接]
累计送礼:
0 个
累计收礼:
1 个
  • TA的每日心情
    开心
    2026-7-12 04:10
  • 签到天数: 209 天

    连续签到: 2 天

    [LV.7]常住居民III

    9071

    主题

    864

    回帖

    6万

    积分

    管理员

    Rank: 9Rank: 9Rank: 9

    VIP
    7
    卡币
    58883
    OK点
    16
    推广点
    0
    同能卷
    50
    积分
    68848

    灌水之王

    发表于 2026-8-2 09:31:34 | 显示全部楼层 |阅读模式
    Hello people,i'm here posting a script i made today,that allows you tom use Fogs inside battle.

    Terms:

    Use as you want, just stick "Yangfly Jitter" in the credits.

    #==============================================================================## ◘ YangFly Coding Ace - Ace Battle Fog(or whatever you wanna call this) # -- Last Updated: 2015.03.02# -- Level: Easy# -- Requires: n/a# -- Compatibility: Highly# -- Lag Created: Aulmost Nothing#==============================================================================$imported = {} if $imported.nil?$imported["YCA-BattleFog"] = true#==============================================================================# ◘ Updates# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=#  2015.03.02 => Started Script and Finished#==============================================================================# ◘ Introduction# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=#  If a Switch is on, the fog will be enabled.#  You can set the X speed and Y speed by 2 variables.#  The Fog can be changed in-game by calling: changebfog("x")#  Where x = The name of the Fog in the "Fogs" folder inside the "Graphics"#  folder.(You need to create Dat Folder...)#==============================================================================# ◘ Instructions# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=#  Ya knows how to do this already, right?#  But it won't hurt to tell again, Place this below everything and above#  main and blablabla...#==============================================================================# ◘ Compatibility# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=#  This Scripts Overwrites Nothing so, it's Highly compatible.#==============================================================================module YCA  module Battle_fog     Default_Z = 2  # Z value of Dat Fog     FogSwitch = 58 # Switch to turn on Fog     XSpeedVar = 61 # Variable of the X speed     YSpeedVar = 62 # Variable of the Y speed  endend#--------------------------------------------------------------------------# Edits should stop here unless ya know what u doing.# But don't worry it won't cause computer damage, incontinence, # explosion of user's head, coma, death, and/or halitosis. ;3#--------------------------------------------------------------------------module Cache  #--------------------------------------------------------------------------  # New Method: self.fogs  #--------------------------------------------------------------------------    def self.fogs(filename)    load_bitmap("Graphics/Fogs/", filename)  endendclass Game_System  #--------------------------------------------------------------------------  # New Public instance Variable: @battlefog  #--------------------------------------------------------------------------  attr_accessor :battlefog  #--------------------------------------------------------------------------  # Alias: initialize  #--------------------------------------------------------------------------  alias yca_bfog_gamesystem_intialize initialize  def initialize    yca_bfog_gamesystem_intialize    @battlefog = ""  end  endclass Scene_Battle < Scene_Base  #--------------------------------------------------------------------------  # Alias: start  #--------------------------------------------------------------------------  alias yca_bfog_start start  def start    yca_bfog_start    if $game_switches[YCA::Battle_fog::FogSwitch]      create_bfog    end  end   #--------------------------------------------------------------------------  # New Method: create_bfog  #--------------------------------------------------------------------------    def create_bfog    @bfog = Plane.new    @bfog.bitmap = Cache.fogs($game_system.battlefog)    @bfog.z = YCA::Battle_fog:
    efault_Z  end  #--------------------------------------------------------------------------  # New Method: move_bfog  #--------------------------------------------------------------------------    def move_bfog    @bfog.ox += $game_variables[YCA::Battle_fog::XSpeedVar]    @bfog.oy += $game_variables[YCA::Battle_fog::YSpeedVar]  end  #--------------------------------------------------------------------------  # New Method: dispose_bfog  #--------------------------------------------------------------------------    def dispose_bfog    @bfog.bitmap.dispose    @bfog.dispose  end  #--------------------------------------------------------------------------  # Alias: update_basic  #--------------------------------------------------------------------------  alias yca_bfog_updatebasic update_basic  def update_basic    yca_bfog_updatebasic    if $game_switches[YCA::Battle_fog::FogSwitch]      move_bfog    end  end    #--------------------------------------------------------------------------  # Alias: terminate  #--------------------------------------------------------------------------   alias yca_bfog_terminate terminate  def terminate    yca_bfog_terminate    if $game_switches[YCA::Battle_fog::FogSwitch]      dispose_bfog    end  end    endclass Game_Interpreter  def changebfog(name)    $game_system.battlefog = name  endendIf you wants any features, just lemme know.

    See ya later.


    本贴来自国际rpgmaker官方论坛作者:JioInzagi处,因国际论坛即将永久关站,为了存档多年珍贵资料,署名转载到本论坛存档,由于官方帖子为英文原帖,需要中文翻译请点击论坛顶部切换语言为中文就可以将帖子翻译成中文浏览,方便大家随时查看,原文地址:https://forums.rpgmakerweb.com/threads/yca-battlefog.37405/

    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有账号?立即注册

    x
    天天去同能,天天有童年!
    回复 送礼论坛版权

    使用道具 举报

    文明发言,和谐互动
    文明发言,和谐互动
    高级模式
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    简体中文
    繁體中文
    English(英语)
    日本語(日语)
    Deutsch(德语)
    Русский язык(俄语)
    بالعربية(阿拉伯语)
    Türkçe(土耳其语)
    Português(葡萄牙语)
    ภาษาไทย(泰国语)
    한어(朝鲜语/韩语)
    Français(法语)
    关闭

    幸运抽奖

    社区每日抽奖来袭,快来试试你是欧皇还是非酋~

    立即查看

    聊天机器人
    Loading...

    QQ|Archiver|手机版|小黑屋|同能RPG制作大师 ( 沪ICP备12027754号-3 )

    GMT+8, 2026-8-17 12:39 , Processed in 0.113869 second(s), 56 queries .

    Powered by Discuz! X3.4

    Copyright © 2001-2020, Tencent Cloud.

    快速回复 返回顶部 返回列表