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

[转载发布] Random Common Event Occurence

[复制链接]
累计送礼:
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 18:39:46 | 显示全部楼层 |阅读模式
    Random Common Event Occurence v1.0
    Drykul


    Introduction
    Basically this acts similar to random battle events only it calls a specified Common Event instead of a battle.

    Features
    - Process common events at random intervals depending on Region ID.
    - Can adjust the % chance per event as well as minimum # of steps required before the event will proc.
    - Disable/Enable any particular event by either setting to true/false, a $game_switch, or any other boolean.

    Screenshots
    No screenshots needed.

    How to Use
    Simply set up your events in the "Configuration Section", set up your common event in the database, and paint your terrain with the Region ID you specify.

    Demo
    No Demo Included (I will post one if requested but it's pretty easy to set up and use.)

    Script

    Spoiler                Code:       
    1. =begin  ---------------------------------------------  Random Common Event Occurance v1.0 by Drykul  ---------------------------------------------    Basically this acts similar to random battle events only it calls a specified  Common Event instead of a battle. Simply set up your events below in the  "Configuration Section", set up your common event in the database, and paint  your terrain with the Region ID you specify below.   *Special thanks to Adorna for writing the initial script and giving me the  inspiration for this!   --------------  Compatibility  --------------    The update method in Scene_Map is aliased. Other than that you shouldn't have  any issues with compatibility!   --------------------------------                            ToS  --------------------------------    Completely free to use for commercial and non-commercial with no restrictions.  Just a heads up to me that you're using it would be nice.    --------------  Contacting me  --------------    You can email me at drykul@cloud9studios.net, find me on the  /r/RPGMaker subreddit, I'm shaynec1981 at www.rpgmakerweb.com=end################################################################################class Random_Event_Occuranceattr_reader :reo_region_idattr_accessor :random_eventsattr_accessor :steps_counting  def reo_setup    @random_events =    {######################################################################################## DO NOT EDIT ABOVE THIS LINE UNLESS YOU KNOW WHAT YOU ARE DOING ################################# Configuration Section ################################            # :event_name => [ region id,  #                                  % chance of occurance,  #                                  enabled/disabled,  #                                  common event to run,  #                                  minimum number of steps taken to process ],    :test1 => [ 1,                            50,                            true,                            4,                            10 ],        :test2 => [ 2,                            20,                            true,                            5,                            40 ],                                                    ######################################################################################### DO NOT EDIT BELOW THIS LINE UNLESS YOU KNOW WHAT YOU ARE DOING #######################################################################################    }  end  def initialize    @regionid = nil    @steps_counting = nil    @numbers_to_proc = []    @steps = 0    reo_setup  end   def encounter_chance(region_id)    for i in @random_events          if i[1][0] == region_id && i[1][2] == true            @steps += 1            chance = rand(101)            while @numbers_to_proc.size < i[1][1]                  new_num = rand(101)                  if !@numbers_to_proc.include?(new_num)                    @numbers_to_proc[@numbers_to_proc.size] = new_num                  end                               end            if @numbers_to_proc.include?(chance) && @steps >= i[1][4]                  $game_temp.reserve_common_event(i[1][3])                  @steps = 0            end          end    end  end   def update    reo_setup    if @regionid != $game_map.region_id($game_player.x, $game_player.y)          @regionid = $game_map.region_id($game_player.x, $game_player.y)          @steps = 0    end    encounter_chance(@regionid)    @numbers_to_proc.clear  end end################# UPDATED SCENE_MAP ############################################class Scene_Map < Scene_Base   alias random_event_occurance_map_update update  def update    random_event_occurance_map_update    for i in $reo.random_events          if $game_map.region_id($game_player.x, $game_player.y) == i[1][0]            if $reo.steps_counting != $game_party.steps                  $reo.steps_counting = $game_party.steps                  $reo.update            end          end    end  endend################# UPDATED DATAMANAGER###########################################module DataManager  class << self        unless self.method_defined?(:reo_GameObj_Alias)          alias_method(:reo_GameObj_Alias, :create_game_objects)    end    unless self.method_defined?(:reo_MakeSaveAlias)          alias_method(:reo_MakeSaveAlias, :make_save_contents)    end    unless self.method_defined?(:reo_ExtractSaveAlias)          alias_method(:reo_ExtractSaveAlias, :extract_save_contents)    end    def create_game_objects          reo_GameObj_Alias          $reo = Random_Event_Occurance.new    end        def make_save_contents          contents = reo_MakeSaveAlias          contents[:reo] = $reo          contents    end        def extract_save_contents(contents)          reo_ExtractSaveAlias(contents)          $reo = contents[:reo]    end  endend
    复制代码






    FAQ


    Credit and Thanks
    - Drykul
    - Adorna

    Author's Notes
    I'm fairly new to scripting and this is the first one that I thought would be easy enough to clean up and share and to get some feedback! Hopefully it comes in handy for someone.  



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

    本帖子中包含更多资源

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

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

    使用道具 举报

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

    本版积分规则

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

    幸运抽奖

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

    立即查看

    聊天机器人
    Loading...

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

    GMT+8, 2026-8-17 09:26 , Processed in 0.137953 second(s), 52 queries .

    Powered by Discuz! X3.4

    Copyright © 2001-2020, Tencent Cloud.

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