Text Bar

じ☆ve冰风

Text Bar

​

Author: Death10

​

Introduction

​

Running text

​

Script

​

*Call script:

​

-On: $game_system.ads_option = 1

​

-Off: $game_system.ads_option = 2

​

-Change:

​

+Text: $game_system.ads_x = "Text"

​

+Background: $game_system.ads_back = "Back.png"

​

Spoiler                Code:       

1. #==============================================================================
2. # ** Text Bar
3. #==============================================================================
4. # Author: Death10
5. # http://gamesvts.com
6. # http://taotrochoi.com
7. #==============================================================================
8. # *Call script:
9. # -On: $game_system.ads_option = 1
10. # -Off: $game_system.ads_option = 2
11. # -Change:
12. # +Text: $game_system.ads_x = "Text"
13. # +Background: $game_system.ads_back = "Back.png"
14. #==============================================================================
16. $game_system = Game_System.new #DataManager.load_normal_database
18. module Cache
19. def self.load_bitmap2(file, hue = 0)
20.         @cache ||= {}
21.         if file.empty?
22.          empty_bitmap
23.         elsif hue == 0
24.          normal_bitmap(file)
25.         else
26.          hue_changed_bitmap(file, hue)
27.         end
28. end
29. end
31. class Game_System
32. attr_accessor :ads
33. attr_accessor :ads_on
34. attr_accessor :ads_x
35. attr_accessor :ads_option
36. attr_accessor :ads_back
37. alias initialize_ads initialize
38. def initialize
39.         initialize_ads
40.         @ads = "Text Bar"
41.         @ads_back = "Graphics/Titles1/#{$data_system.title1_name}"
42.         @ads_option = 1
43.         @ads_on = 1
44.         @ads_x = 0
45. end
46. end
47. class TB < Window_Base
48. def initialize
49.         super(0, 0, 544, 64)
50.         self.opacity = 0
51.         #$game_system = Game_System.new
52.         check
53.         refresh
54. end
55. def check
56.         case $game_system.ads_option
57.         when 1
58.         $game_system.ads_on = 1
59.         $game_system.ads_x = -contents.text_size($game_system.ads).width
60.         $game_system.ads_option = 0
61.         when 2
62.         $game_system.ads_on = 0
63.         $game_system.ads_option = 0
64. end
65. end
66. def refresh
67.         check
68.         contents.clear
69.         cx = contents.text_size($game_system.ads).width
70.         if $game_system.ads_x == -cx
71.         $game_system.ads_x = 544
72.         else
73.         $game_system.ads_x -= 0.5
74.         end
75.         if $game_system.ads_on == 1
76.         contents.blt(0, 0, Cache.load_bitmap2($game_system.ads_back), Rect.new(0, 0, 544, 32), 160)
77.         contents.draw_text($game_system.ads_x, 0, cx, 32, $game_system.ads, 2)
78.         end
79. end
80. def open
81.         super
82.         refresh
83. end
84. end
86. class Scene_Map < Scene_Base
87. alias caw create_all_windows
88. def create_all_windows
89.         caw
90.         @ads = TB.new
91. end
92. alias update_ads update
93. def update
94.         update_ads
95.         @ads.open
96. end
97. alias utp update_transfer_player
98. def update_transfer_player
99.         utp
100.         case $game_system.ads_on
101.         when 0
102.         @map_name_window.y = 0
103.         when 1
104.         @map_name_window.y = 44
105.         end
106. end
107. end

复制代码

Screenshot

​

Spoiler

本贴来自国际rpgmaker官方论坛作者:Death10处,因国际论坛即将永久关站,为了存档多年珍贵资料,署名转载到本论坛存档,由于官方帖子为英文原帖，需要中文翻译请点击论坛顶部切换语言为中文就可以将帖子翻译成中文浏览,方便大家随时查看,原文地址：https://forums.rpgmakerweb.com/threads/text-bar.3321/