请问怎么制作养成的日历系统? - Project1

#===============================================================================
# ■ 简易养成时间系统
#-------------------------------------------------------------------------------
# 脚本说明及使用方法
#
#-------------------------------------------------------------------------------
# 更新作者：蕾米莉亚·斯卡雷特
# 许可协议： NCP NAM STS
# 项目版本： 1.0.20110309
# 引用网址：脚本发布帖网址等（用于获取最新的脚本）
#-------------------------------------------------------------------------------
# - 1.0.20110309 By 蕾米莉亚·斯卡雷特
# * 基本脚本组建
#
#===============================================================================
$fscript = {} if $fscript == nil
$fscript["Remilia Time"] = "1.0.20110309"
#-------------------------------------------------------------------------------
# ▼ 通用配置模块
#-------------------------------------------------------------------------------
module FSL
module Remilia_Time
# 事件定义
# 说明:
# 1. 事件使用的是公共事件
# 2. 如果某个点填写的是 0 的话, 就是忽略其设定.
# 比如 [28,02,0] 在将年设定成 0, 就是忽略年这个定义, 只要是 2月28日就会触发公共事件.
TIME_EVENT = {
# [日,月, 年] => [公共事件ID]
[7, 1, 0] => 1,
}
end
end
class Game_System
include FSL::Remilia_Time
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_accessor :time_now
attr_accessor :byz_timer
attr_accessor :run_bool
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
alias :remilia_initialize :initialize
def initialize
@time_now = Time.local(2012, 1, 6, 10, 10, 10);
@byz_timer = []
@run_bool = false # 当天时间启动标志
remilia_initialize
end
#--------------------------------------------------------------------------
# ● 增加时间
#--------------------------------------------------------------------------
def add_time(day)
@time_now += day * 24 * 60 * 60
end
#--------------------------------------------------------------------------
# ● 设定时间计时器
#--------------------------------------------------------------------------
def set_byz_timer(id)
@byz_timer[id] = @time_now
end
#--------------------------------------------------------------------------
# ● 计算时间（秒数）
#--------------------------------------------------------------------------
def after_time(id)
return 0 if @byz_timer[id] == nil
return @time_now - @byz_timer[id]
end
#--------------------------------------------------------------------------
# ● 格式化时间
#--------------------------------------------------------------------------
def sprintf_time
time = [@time_now.mday, @time_now.mon, @time_now.year]
return_time = []
return_time << time
[[0], [1], [2], [0, 1], [0, 2], [1, 2]].each do |a1|
a1.each do |n|
@time_l = time.clone
@time_l[n] = 0
end
return_time << @time_l
end
return_time
end
#--------------------------------------------------------------------------
# ● 启动事件
#--------------------------------------------------------------------------
def event_run
return if @run_bool
array = TIME_EVENT.keys & sprintf_time
if !array.empty?
unless !$scene.is_a?(Scene_Map) or $game_message.visible or $game_temp.in_battle
$game_temp.common_event_id = TIME_EVENT[array[0]]
@run_bool = true
end
end
end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　处理同伴的类。包含金钱以及物品的信息。本类的实例请参考 $game_party。
#==============================================================================
class Game_Party < Game_Unit
alias :remilia_initialize :initialize
def initialize
@birthday = Time.local(1992, 1, 7, 5, 4, 3)
remilia_initialize
end
def age
@age = $game_system.time_now.year - @birthday.year
if $game_system.time_now.mon >= @birthday.mon and $game_system.time_now.mday >= @birthday.mday
@age += 1
end
@age
end
end
#==============================================================================
# ■ Window_Time
#------------------------------------------------------------------------------
# 　处理地图显示时间窗口的类。
#==============================================================================
class Window_Time < Window_Base
def initialize
super(0, 0, 170, 87)
@old_time = $game_system.time_now - 1
refresh
end
def refresh
$game_system.event_run
if @old_time == $game_system.time_now
return;
end
@old_time = $game_system.time_now
self.contents.clear
text = "年龄:" + $game_party.age.to_s
self.contents.draw_text(0, 32, 105, WLH, text, 2)
text = $game_system.time_now.strftime("%Y年%m月%d日")
self.contents.draw_text(0, 0, 170, WLH, text)
$game_system.run_bool = false
end
end
#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
# 　处理地图画面的类。
#==============================================================================
class Scene_Map < Scene_Base
#--------------------------------------------------------------------------
# ● 开始处理
#--------------------------------------------------------------------------
alias :remilia_start :start
alias :remilia_terminate :terminate
alias :remilia_update :update
def start
@remilia_time_window = Window_Time.new
remilia_start
end
def terminate
@remilia_time_window.dispose
remilia_start
end
def update
@remilia_time_window.refresh
remilia_update
end
end

复制代码