求人写时间昼夜天气系统。

越前止まる殇 · 发表于 2009-1-20 02:28:19

提示: 作者被禁止或删除内容自动屏蔽

越前止まる殇 · 发表于 2009-1-20 04:19:25

提示: 作者被禁止或删除内容自动屏蔽

雪流星 · 发表于 2009-1-20 06:48:33

我接了，不过不同时段的色调你能自己算好了给我吗？

ONEWateR · 发表于 2009-1-20 18:38:37

以下引用snstar2006于2009-1-19 22:48:33的发言：

我接了，不过不同时段的色调你能自己算好了给我吗？

噗——偶又迟了。
其实那色调给个常量好了。
好让小殇自己调整到自己所需的色调。

越前止まる殇 · 发表于 2009-1-20 18:39:42

提示: 作者被禁止或删除内容自动屏蔽

雪流星 · 发表于 2009-1-20 20:21:06

时间需要显示出来吗？（就是在地图上显示个窗口）

越前止まる殇 · 发表于 2009-1-20 20:28:34

提示: 作者被禁止或删除内容自动屏蔽

越前リョーマ · 发表于 2009-1-20 20:52:54

唯一的好处就是不用并行变量不容易卡…… = =

雪流星 · 发表于 2009-1-20 21:12:53

交货
还有什麽要求或修改写出来
我明天起来再修改

class Scene_Map < Scene_Base
alias time_system_start start
alias time_system_terminate terminate
alias time_system_update update
def start
time_system_start
@time_window = Window_Base.new(0, 0, 292, 56)
update_time
end
def terminate
time_system_terminate
@time_window.dispose
end
def update
@time_window.update
time_system_update
# 每分钟刷新一次时间计算
update_time if Graphics.frame_count%18 == 0
end
def update_time
@min ||= @hour ||= @day ||= @month ||= @year ||= 1
@min += 1 if Graphics.frame_count%18 == 0
@hour += 1 if @min%60 == 0
if @hour%24 == 0
@day += 1
@change_weather = true
end
@month += 1 if @day%31 == 0
@year += 1 if @month%12 == 0
# 计算时段与色调
case (@hour%24)
when 3...7 # 清晨
@phase = 0
tone = Tone.new(-48, -48, -48)
when 7...13 # 早上
@phase = 1
tone = Tone.new(0, 0, 0)
when 13...19 # 傍晚
@phase = 2
tone = Tone.new(-32, -96, -96)
else # 晚上
@phase = 3
tone = Tone.new(-128, -128, -32)
end
@weather_type = 0
case (@month%12)
when 2..4 # 春
@season = 0
if rand(10) < 5 and @change_weather
@weather_type = 1
@change_weather = false
end
when 5..7 # 夏
@season = 1
if rand(10) < 3 and @change_weather
@weather_type = 1
@change_weather = false
end
when 8..10 # 秋
@season = 2
if rand(10) < 4 and @change_weather
@weather_type = 2
@change_weather = false
end
else # 冬
@season = 3
if rand(10) < 7 and @change_weather
@weather_type = 3
@change_weather = false
end
end
power = rand(2)+ rand(4) + rand(5) # 乱数生成强度
# 开关控制色调、天气不显示
if $game_switches[1] == false
$game_map.screen.start_tone_change(tone, 120)
$game_map.screen.weather(@weather_type, power, 120)
end
$game_variables[1] = @min%60 # 分
$game_variables[2] = @hour%24 # 时
$game_variables[3] = @phase # 时段
$game_variables[4] = @day%31 # 日
$game_variables[5] = @weather # 天气
$game_variables[6] = @month%12 # 月
$game_variables[7] = @season # 季节
$game_variables[8] = @year # 年
update_time_window
end
def update_time_window
@time_window.contents.clear
ssn_string = ["春", "夏", "秋", "冬"][@season]
wea_string = ["晴", "雨", "风", "雪"][@weather_type]
time_string = sprintf("%02d年%02d月%02d日 %02d:%02d ", @year, @month%12, @day%31, @hour%24, @min%60)
time_string += "#{ssn_string} #{wea_string}"
@time_window.contents.draw_text(0, 0, 260, 24, time_string)
end
end

复制代码

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

木葬枫 · 发表于 2009-1-20 21:17:29

一直有个疑惑…小殇和小柯是不是同一个人==

帐号		自动登录	找回密码
密码			注册会员

求人写时间昼夜天气系统。

贵宾

开拓者

第3届短篇游戏大赛主流游戏组亚军

第5届短篇游戏比赛亚军