[悬赏]请人帮我编写个菜单

越前リョーマ · 发表于 2007-8-1 16:49:35

越弄越出错……

弄到最后干什么都会有错……

越前リョーマ · 发表于 2007-8-1 16:52:02

你的脚本倒好……

进入菜单按空格没用的……
退也退不出……

而且后面空白是为了显示地图啦……

kaze · 发表于 2007-8-1 16:52:38

以下引用越前リョーマ于2007-8-1 8:43:07的发言：

什么脚本啊……

什么操作都不能用……

翻了个好白的错误{/gg}

class Menu_Window < Window_Base
def initialize(battler)
super(20,20,600,440)
self.contents = Bitmap.new(width - 32, height - 32)
@battler = battler
refresh
end
def refresh
self.contents.clear
# head = RPG::Cache.battler(@battler.battler_name,@battler.battler_hue)
# self.contents.blt(20,20,head,Rect.new(0,0,head.width,head.height))
y = 80#+head.height
self.contents.draw_text(20,y,100,32,"体力:".to_s,0)
self.contents.draw_text(20 + 64,y,100,32,$game_variables[1].to_s,0)
self.contents.draw_text(20 + 96,y,100,32,"/".to_s,0)
self.contents.draw_text(20 + 128,y,100,32,$game_variables[1].to_s,0)
self.contents.draw_text(20 ,y + 32,100,32,"疲劳:".to_s,0)
self.contents.draw_text(20 + 64,y + 32,100,32,$game_variables[3].to_s,0)
self.contents.draw_text(20 + 96,y + 32,100,32,"/".to_s,0)
self.contents.draw_text(20 + 128,y + 32,100,32,$game_variables[3].to_s,0)
self.contents.draw_text(20 ,y + 64,100,32,"金钱:".to_s,0)
self.contents.draw_text(20 + 64,y + 64,100,32,$game_party.gold.to_s,0)
self.contents.draw_text(20 ,y + 96,100,32,"赌博币:".to_s,0)
self.contents.draw_text(20 + 96,y + 96,100,32,$game_variables[4].to_s,0)
self.contents.draw_text(20 ,y + 128,100,32,"步数:".to_s,0)
self.contents.draw_text(20 + 64,y + 128,100,32,$game_variables[5].to_s,0)
end
end
class Window_Time < Window_Base
def initialize
super(640-160-10,10,160,64)
self.contents = Bitmap.new(width - 32, height - 32)
refresh
end
def refresh
self.contents.clear
self.contents.draw_text(0,0,100,32,"时间".to_s,0)
end
end
class Scene_NewMenu
def main
@menu_window = Menu_Window.new($game_party.actors[0])
@menu_window.back_opacity = 160
@cmd = Window_Command.new(160,["物品","装备","写日记","离开游戏"])
@cmd.back_opacity = 160
@cmd.opacity = 255
@cmd.x = 250
@cmd.y = 64
@time_window = Window_Time.new
@time_window.back_opacity = 160
# 执行过渡
Graphics.transition
# 主循环
# loop do
# end
# 刷新游戏画面
kaze = Sprite.new
kaze.bitmap = Bitmap.new("Graphics/Pictures/kaze")
kaze.x = 80
kaze.y = 20
loop do
Input.update
Graphics.update
# 刷新输入信息
# 刷新画面
update
# 如果切换画面就中断循环
if $scene != self
break
end
# end
end
# 准备过渡
Graphics.freeze
@menu_window.dispose
@cmd.dispose
@time_window.dispose
end
def update
@time_window.update
@menu_window.update
@cmd.update
if Input.trigger?(Input::C)
$game_system.se_play($data_system.decision_se)
case @cmd.index
when 0
$scene=Scene_Item.new
when 1
$scene=Scene_Equip.new
when 2
$scene=Scene_Save.new
when 3
$scene=Scene_Title.new
end
end
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
$scene=Scene_Map.new
end
end
end

复制代码

现在好了

kaze · 发表于 2007-8-1 16:58:23

以下引用再生的kaze于2007-7-31 18:04:25的发言：
找到$scene=Scene_Menu.new
全部改成$scene=Scene_NewMenu.new
即可

再补充一点
即使是$scene=Scene_Menu.new(*)
也只要修改成
$scene=Scene_NewMenu.new
就好不要再多加数字了

越前リョーマ · 发表于 2009-6-12 08:00:00

又一个错误……

进如菜单里面的一些选项后，
退出来会有脚本错误……

kaze · 发表于 2007-8-1 17:01:31

以下引用越前リョーマ于2007-8-1 8:59:00的发言：

又一个错误……

进如菜单里面的一些选项后，
退出来会有脚本错误……

你把$scene=Scene_NewMenu.new
写成$scene=Scene_NewMenu.new(*)了吧
刚有说啦

越前リョーマ · 发表于 2007-8-1 17:09:23

每次都是我回复的前一秒你回复的说……

越前リョーマ · 发表于 2007-8-1 17:12:36

MS头像显示出来在对话框之下……

这样就没效果了……
MS不显示头像好点还……

PS。我自己改成显示行走图算了……

越前リョーマ · 发表于 2007-8-1 17:15:00

MS上限显示跟数值一个数的……

算了，
我来改好了。

越前リョーマ · 发表于 2007-8-1 17:26:18

显示时间的那两个变量呢……

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

[悬赏]请人帮我编写个菜单

开拓者

贵宾

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

第5届短篇游戏比赛亚军