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

越前リョーマ

构想图：


（本来想悬赏2VIP的，但是税的缘故……）


………………

（到目前为止，除了这次就悬赏过一次……）

　　　　　　　　　　　　　　[本贴由 K’ 于 2007-7-31 17:50:30 进行了编辑]

越前リョーマ

构想图：


（本来想悬赏2VIP的，但是税的缘故……）


………………

（到目前为止，除了这次就悬赏过一次……）

　　　　　　　　　　　　　　[本贴由 K’ 于 2007-7-31 17:50:30 进行了编辑]

越前リョーマ

就是存档和读档，

只是调用窗口而已。

越前リョーマ

对了，

体力和疲劳上限也需要变量控制。

越前リョーマ

期待有人制作出来……

Flyingpww

1. 
   
2. class Menu_Window < Window_Base
   
3.   def initialize(battler)
   
4.     super(20,20,600,440)
   
5.     self.contents = Bitmap.new(width - 32, height - 32)
   
6.     @battler = battler
   
7.     refresh
   
8.   end
   
9.   def refresh
   
10.     self.contents.clear
    
11.     head = RPG::Cache.battler(@battler.battler_name,@battler.battler_hue)
    
12.     self.contents.blt(20,20,head,Rect.new(0,0,head.width,head.height))
    
13.     y = 20+head.height
    
14.     self.contents.draw_text(20,y,100,32,"体力:".to_s,0)
    
15.     self.contents.draw_text(20 +  64,y,100,32,$game_variables[1].to_s,0)
    
16.     self.contents.draw_text(20 +  96,y,100,32,"/".to_s,0)
    
17.     self.contents.draw_text(20 + 128,y,100,32,$game_variables[1].to_s,0)
    
18.      
    
19.     self.contents.draw_text(20      ,y + 32,100,32,"疲劳:".to_s,0)
    
20.     self.contents.draw_text(20 +  64,y + 32,100,32,$game_variables[3].to_s,0)
    
21.     self.contents.draw_text(20 +  96,y + 32,100,32,"/".to_s,0)
    
22.     self.contents.draw_text(20 + 128,y + 32,100,32,$game_variables[3].to_s,0)
    
23.    
    
24.     self.contents.draw_text(20     ,y + 64,100,32,"金钱:".to_s,0)
    
25.     self.contents.draw_text(20 + 64,y + 64,100,32,$game_party.gold.to_s,0)
    
26.    
    
27.     self.contents.draw_text(20     ,y + 96,100,32,"赌博币:".to_s,0)
    
28.     self.contents.draw_text(20 + 96,y + 96,100,32,$game_variables[4].to_s,0)
    
29.    
    
30.     self.contents.draw_text(20     ,y + 128,100,32,"步数:".to_s,0)
    
31.     self.contents.draw_text(20 + 64,y + 128,100,32,$game_variables[5].to_s,0)
    
32.    end  
    
33. end
    
34. 
    
35. class Window_Time < Window_Base
    
36.   def initialize
    
37.     super(640-160-10,10,160,64)
    
38.     self.contents = Bitmap.new(width - 32, height - 32)
    
39.     refresh
    
40.   end
    
41.   def refresh
    
42.     self.contents.clear
    
43.     self.contents.draw_text(0,0,100,32,"时间".to_s,0)
    
44.   end
    
45. end
    
46. 
    
47. class Scene_NewMenu
    
48.   def main
    
49.     @menu_window = Menu_Window.new($game_party.actors[0])
    
50.     @menu_window.back_opacity = 160
    
51.     @cmd = Window_Command.new(160,["物品","装备","写日记","离开游戏"])
    
52.     @cmd.back_opacity = 160
    
53.     @cmd.opacity = 255
    
54.     @cmd.x = 250
    
55.     @cmd.y = 64
    
56.     @time_window = Window_Time.new
    
57.     @time_window.back_opacity = 160
    
58.     # 执行过渡
    
59.     Graphics.transition
    
60.     # 主循环
    
61.     loop do
    
62.       # 刷新游戏画面
    
63.       Graphics.update
    
64.       # 刷新输入信息
    
65.       Input.update
    
66.       # 刷新画面
    
67.       update
    
68.       # 如果切换画面就中断循环
    
69.       if $scene != self
    
70.         break
    
71.       end
    
72.     end
    
73.     # 准备过渡
    
74.     Graphics.freeze
    
75.     @menu_window.dispose
    
76.     @cmd.dispose
    
77.     @time_window.dispose
    
78.   end
    
79.   
    
80.   def update
    
81.     @time_window.update
    
82.     @menu_window.update
    
83.     @cmd.update
    
84.     if Input.trigger?(Input::C)
    
85.       $game_system.se_play($data_system.decision_se)
    
86.       case @cmd.index
    
87.       when 0
    
88.         $scene=Scene_Item.new
    
89.       when 1
    
90.         $scene=Scene_Equip.new
    
91.       when 2
    
92.         $scene=Scene_Save.new
    
93.       when 3
    
94.         $scene=Scene_Title.new
    
95.       end
    
96.     end
    
97.     if Input.trigger?(Input::B)
    
98.       $game_system.se_play($data_system.cancel_se)
    
99.       $scene=Scene_Map.new
    
100.     end  
     
101.   end
     
102. end
     

复制代码

# 调用   $scene=Scene_NewMenu.new

---

系统信息：本贴获得楼主认可，66RPG感谢您的热情解答～

kaze

MS我慢了{/fd}

越前リョーマ

需要调用……？

没关系……
我做成公共事件好了。

看看效果先。

越前リョーマ

走了很多步怎么还是0步啊……

虽然变量可以控制，
但是自己也要会增加……