求“地图名显示”和“菜单美化”脚本。。。。。。。。...

嘉凉

地图名显示一直没有找到自己想要的，我需要一个左上方一直显示地图名的脚本，不需要图片就能显示的那种，坐标显示也不要。
菜单美化主要是更改对话框和菜单栏之类的透明度，请问这个谁有呢？？0 0

crow2006

1. #==============================================================================
   
2. # ■ Window_MapName 显示地图名称
   
3. #==============================================================================
   
4. 
   
5. class Window_MapName < Window_Base
   
6. #--------------------------------------------------------------------------
   
7. # ● 初始化
   
8. #--------------------------------------------------------------------------
   
9. def initialize
   
10. @map_id = $game_map.map_id
    
11. super(0, 0, 182, 52)
    
12. self.contents.font.size = 20
    
13. self.z = 151
    
14. refresh
    
15. end
    
16. #--------------------------------------------------------------------------
    
17. # ● 刷新
    
18. #--------------------------------------------------------------------------
    
19. def refresh
    
20. self.contents_opacity = 255
    
21. name = $data_mapinfos[@map_id].name
    
22. width = self.contents.text_size(name).width
    
23. height = self.contents.text_size(name).height
    
24. self.width = width + 32
    
25. self.height = height + 32
    
26. self.contents = Bitmap.new(width, height)
    
27. self.contents.font.size = 20
    
28. self.contents.font.color = text_color(0)
    
29. self.x = 0
    
30. self.y = 0
    
31. self.contents.draw_text(0, 0, width, 20, name, 1)
    
32. self.opacity = 255
    
33. end
    
34. #--------------------------------------------------------------------------
    
35. # ● 更新
    
36. #--------------------------------------------------------------------------
    
37. def update
    
38. if $game_map.map_id != @map_id
    
39. @map_id = $game_map.map_id
    
40. refresh
    
41. self.opacity -= 5
    
42. self.contents_opacity = 255
    
43. end
    
44. return if self.opacity == 0
    
45. self.opacity = 0
    
46. self.contents_opacity = 255  
    
47. end
    
48. end
    
49. 
    
50. class Scene_Title < Scene_Base
    
51. #--------------------------------------------------------------------------
    
52. # ● 数据库载入
    
53. #--------------------------------------------------------------------------
    
54. alias old_ld load_database
    
55. def load_database
    
56. old_ld
    
57. $data_mapinfos = load_data("Data/MapInfos.rvdata")
    
58. end
    
59. end
    
60. 
    
61. class Scene_Map < Scene_Base
    
62. #--------------------------------------------------------------------------
    
63. # ● 开始
    
64. #--------------------------------------------------------------------------
    
65. alias old_start start
    
66. def start
    
67. old_start
    
68. @mapname_window = Window_MapName.new
    
69. end
    
70. #--------------------------------------------------------------------------
    
71. # ● 结束
    
72. #--------------------------------------------------------------------------
    
73. alias old_ter terminate
    
74. def terminate
    
75. old_ter
    
76. @mapname_window.dispose
    
77. end
    
78. #--------------------------------------------------------------------------
    
79. # ● 更新
    
80. #--------------------------------------------------------------------------
    
81. alias old_update update
    
82. def update
    
83. old_update
    
84. @mapname_window.update
    
85. end
    
86. end

复制代码

嘉凉

crow2006 发表于 2016-5-21 10:16

诶，背后的边框能不能一直在