求助！关于Theo - 终极防止卡顿脚本使用时报错问题

宝开君

如图，本人在使用Theo防卡顿脚本时点击开始游戏后报错。为排除脚本冲突原因，特开了一个新建项目，只放了核心脚本与该脚本，结果还是报错。。。求助各位大佬帮忙指点一下QAQ
核心脚本：

1. # =============================================================================
   
2. # TheoAllen - 基础模块
   
3. # 版本 : 1.5d
   
4. # 联系方式 : www.rpgmakerid.com (or) http://theolized.blogspot.com
   
5. # 作者 : TheoAllen (初始编写者)
   
6. # 汉化：Nil2018(○┰○)、MireniamuYuki
   
7. # =============================================================================
   
8. $imported = {} if $imported.nil?
   
9. # =============================================================================
   
10. # 本脚本是我个人的模块，用于脚本/系统的开发.无论是小实验还是大系统都便于我编写
    
11. # 脚本.
    
12. #
    
13. # 然而，我的脚本并不是全部都需要基础模块，大部分不需要，其他的则需要。
    
14. # -----------------------------------------------------------------------------
    
15. # 模块包括 :
    
16. # =============================================================================
    
17. $imported[:Theo_BasicFuntions] = true  # 基础功能
    
18. $imported[:Theo_BitmapAddons]  = true  # 位图额外插件
    
19. $imported[:Theo_CoreDamage]    = true  # 核心伤害处理
    
20. $imported[:Theo_CoreResult]    = true  # 核心伤害结果
    
21. $imported[:Theo_Movement]      = true  # 对象核心移动
    
22. $imported[:Theo_CoreFade]      = true  # 对象核心淡入淡出
    
23. $imported[:Theo_Circular]      = true  # 对象循环移动
    
24. $imported[:Theo_CloneImage]    = true  # 克隆图像. 残影的基础
    
25. $imported[:Theo_RotateImage]   = true  # 转动精灵
    
26. $imported[:Theo_SmoothMove]    = true  # 对象平滑移动
    
27. # =============================================================================
    
28. # 写给使用者:
    
29. # -----------------------------------------------------------------------------
    
30. # 本脚本作为基础脚本，意味着需要将本脚本放在其他自定义脚本之上.
    
31. #
    
32. # 我知道基础模块可能会与其他脚本不兼容,其实我的脚本并不是都需要基础模块.
    
33. # 只要是需要基础模块的脚本我都会给予提示，为了提供更多的兼容性，你可以将需要禁
    
34. # 用的功能设定为false.
    
35. #
    
36. # =============================================================================
    
37. # 写给脚本师 :
    
38. # -----------------------------------------------------------------------------
    
39. # 下面就是脚本的各个部件.
    
40. #
    
41. # 如果你想要改善基础模块，可以任意编辑此脚本，请告诉我你编辑了哪些地方.
    
42. # 我很乐意见到脚本师为基础模块做出改良.
    
43. #
    
44. # 如果你改良了基础模块，你可以在作者中署名。但请记住，基础模块不应该对默认脚本
    
45. # 造成任何影响.仅为其他脚本提供可能需要的基础功能.
    
46. # =============================================================================
    
47. # 已知不兼容 :
    
48. # >> Modern Algebra - Bitmap Addons (需要关闭"位图额外插件")
    
49. # >> Tsukihime - Core Damage (需要关闭"核心伤害处理")
    
50. # >> YEA - Lunatic Damage 疯狂的伤害 (需要关闭"核心伤害处理")
    
51. # >> Enu - Tankentai (我只是听说的，还没真正试过)
    
52. # =============================================================================
    
53. # ChangeLogs :
    
54. # =============================================================================
    
55. # Version 1.0   : - Initial Release
    
56. # Version 1.2   : - Add Bitmap Entire Fill
    
57. #                 - Add Bitmap Border Fill
    
58. #                 - Add To Center window position
    
59. #                 - Add more description
    
60. # Version 1.3   : - Added Clone Sprite function and afterimagebase
    
61. # Version 1.3b  : - Added TSBS basic function
    
62. #                 - Greatly reduced lag for afterimage effect
    
63. # Version 1.4   : - Added rotate image basic module
    
64. #                 - Fixed bug at Object Core Fade
    
65. # Version 1.5   : - Added Smooth movement
    
66. #                 - Fixed bug on circle movement
    
67. #                 - Fixed bug on movement module where float may causes endless
    
68. #                   moving
    
69. #                 - Fixed wrong parameter in drawing eclipse / circle
    
70. #                 - Fixed color parameter on drawing arrow
    
71. #                 - Added Plane_Mask on basic functions
    
72. #                 - Added step parameter on draw circle
    
73. #                 - Fixed wrong target opacity in object core fade for Window
    
74. #                 - Dispose afterimages from Sprite_Base
    
75. # Version 1.5b    - Afterimage now followed by flashing sprite
    
76. # Version 1.5c    - Fixed bug on object core fade.
    
77. #                 - Remove core fade from window since it's absurb :v
    
78. #                 - Compatibility with nickle's core
    
79. # Version 1.5d    - Allow you to jump in same place
    
80. # =============================================================================
    
81. # RGSS3 ~ Bug Fixes (Taken from RMWeb.com)
    
82. # forums.rpgmakerweb.com/index.php?/topic/1131-rgss3-unofficial-bugfix-snippets
    
83. # =============================================================================
    
84. # Screen shake bugfix
    
85. # -----------------------------------------------------------------------------
    
86. class Game_Interpreter
    
87.   
    
88.   def command_225
    
89.     screen.start_shake(@params[0], @params[1], @params[2])
    
90.     wait(@params[2]) if @params[3]
    
91.   end
    
92.   
    
93. end
    
94. # -----------------------------------------------------------------------------
    
95. # Enemy targeting bugfix
    
96. # -----------------------------------------------------------------------------
    
97. class Game_Action
    
98.   def targets_for_friends
    
99.     if item.for_user?
    
100.       [subject]
     
101.     elsif item.for_dead_friend?
     
102.       if item.for_one?
     
103.         [friends_unit.smooth_dead_target(@target_index)]
     
104.       else
     
105.         friends_unit.dead_members
     
106.       end
     
107.     elsif item.for_friend?
     
108.       if item.for_one?
     
109.         if @target_index < 0
     
110.           [friends_unit.random_target]
     
111.         else
     
112.           [friends_unit.smooth_target(@target_index)]
     
113.         end
     
114.       else
     
115.         friends_unit.alive_members
     
116.       end
     
117.     end
     
118.   end
     
119. end
     
120. # -----------------------------------------------------------------------------
     
121. # process normal char bugfix
     
122. # -----------------------------------------------------------------------------
     
123. class Window_Base < Window
     
124.   alias :process_normal_character_theolized :process_normal_character
     
125.   def process_normal_character(c, pos)
     
126.     return unless c >= ' '
     
127.     process_normal_character_theolized(c, pos)
     
128.   end
     
129. end
     
130. # -----------------------------------------------------------------------------
     
131. # Disable Japanese input name
     
132. # -----------------------------------------------------------------------------
     
133. class Game_System
     
134.   def japanese?
     
135.     false
     
136.   end
     
137. end
     
138. #==============================================================================
     
139. # ** Basic Functions ~
     
140. #------------------------------------------------------------------------------
     
141. #  These are just basic functions. It will not do anything in script mechanics.
     
142. # I only provide these functions to be used later in upcoming script or just
     
143. # simply for experimental.
     
144. #------------------------------------------------------------------------------
     
145. if $imported[:Theo_BasicFuntions] # Activation flag
     
146. #==============================================================================
     
147. module Math
     
148.   
     
149.   # Convert degree to radian
     
150.   def self.radian(degree)
     
151.     return (degree.to_f/180) * Math::PI
     
152.   end
     
153.   
     
154.   # Convert radian to degree
     
155.   def self.degree(radian)
     
156.     return (radian.to_f/Math::PI) * 180
     
157.   end
     
158.   
     
159. end
     
160. 
     
161. class Object
     
162.   
     
163.   # Generate number with range from minimum to maximum
     
164.   unless method_defined?(:rand_range)
     
165.     def rand_range(min,max,float = false)
     
166.       range = max - min
     
167.       return float ? (min + (rand*range)) : min + rand(range)
     
168.     end
     
169.   end
     
170. 
     
171.   # ---------------------------------------------------------------------------
     
172.   # Iterate instance variables one by one.
     
173.   #
     
174.   # Example usage :
     
175.   # each_var do |ivar|
     
176.   #   ivar.update if ivar.is_a?(Sprite)
     
177.   # end
     
178.   # ---------------------------------------------------------------------------
     
179.   def each_var
     
180.     instance_variables.each do |varsymb|
     
181.       yield instance_variable_get(varsymb)
     
182.     end
     
183.   end
     
184.   
     
185. end
     
186. #==============================================================================
     
187. # ** Sprite_Screen
     
188. #------------------------------------------------------------------------------
     
189. #  Sprite that same size as the screen. It can be used to draw anything on
     
190. # screen. I believe sometime you need it
     
191. #
     
192. # Example usage :
     
193. # - http://goo.gl/E88ufV  ( Event Pointer )
     
194. #==============================================================================
     
195. 
     
196. class Sprite_Screen < Sprite
     
197.   
     
198.   def initialize(viewport = nil)
     
199.     super(viewport)
     
200.     self.bitmap = Bitmap.new(Graphics.width,Graphics.height)
     
201.   end
     
202.   
     
203.   def dispose
     
204.     self.bitmap.dispose
     
205.     super
     
206.   end
     
207.   
     
208. end
     
209. 
     
210. #==============================================================================
     
211. # ** Plane_Mask
     
212. #------------------------------------------------------------------------------
     
213. #  Sprite that same size as the map size. It's also scrolled alongside the map
     
214. # if it's updated. It can be used to draw anything on map. Can be used as base
     
215. # class of parallax lock actually
     
216. #==============================================================================
     
217. 
     
218. class Plane_Mask < Plane
     
219.   
     
220.   def initialize(vport)
     
221.     super(vport)
     
222.     @width = 1
     
223.     @height = 1
     
224.   end
     
225.   
     
226.   def update
     
227.     if $game_map
     
228.       if @width != $game_map.width || @height != $game_map.height
     
229.         @width = $game_map.width
     
230.         @height = $game_map.height
     
231.         update_bitmap
     
232.       end
     
233.       self.ox = $game_map.display_x * 32
     
234.       self.oy = $game_map.display_y * 32
     
235.     end
     
236.   end
     
237.   
     
238.   def update_bitmap
     
239.     bmp = Bitmap.new(@width * 32, @height * 32)
     
240.     self.bitmap = bmp
     
241.   end
     
242.   
     
243. end
     
244. 
     
245. #==============================================================================
     
246. # ** Window_Confirmation
     
247. #------------------------------------------------------------------------------
     
248. #  Window command class that holds yes and no command. Used to make
     
249. # confirmation function. If you want some alteration of this class, just make
     
250. # inheritance.
     
251. #
     
252. #  This is for my personal development. I mean, if there is a simple script
     
253. # that display window yes/no confirmation, it will not require this basic
     
254. # module. I prefer to duplicate this class to my script instead. You know,
     
255. # most people hates Core Script / Basic Modules
     
256. #==============================================================================
     
257. class Window_Confirmation < Window_Command
     
258.   def window_width
     
259.     return 100
     
260.   end
     
261.   
     
262.   def make_command_list
     
263.     add_command(ok_vocab, :ok, ok_condition)
     
264.     add_command(cancel_vocab, :cancel, cancel_condition)
     
265.   end
     
266.   
     
267.   # Vocab yes
     
268.   def ok_vocab
     
269.     return "确认"
     
270.   end
     
271.   
     
272.   # Vocab cancel
     
273.   def cancel_vocab
     
274.     return "取消"
     
275.   end
     
276.   
     
277.   # Overwrite this method in child class
     
278.   def ok_condition
     
279.     return true
     
280.   end
     
281.   
     
282.   # Overwrite this method in child class
     
283.   def cancel_condition
     
284.     return true
     
285.   end
     
286.   
     
287.   def alignment
     
288.     return 1
     
289.   end
     
290.   
     
291. end
     
292. #==============================================================================
     
293. # ** Coordinate
     
294. #------------------------------------------------------------------------------
     
295. #  Coordinate class that holds x dan y point. Can be used to calculate point
     
296. # operation such as vector
     
297. #
     
298. # Example usage :
     
299. # - http://goo.gl/E88ufV  ( Event Pointer )
     
300. #==============================================================================
     
301. class Coordinate
     
302.   attr_accessor :x,:y
     
303.   
     
304.   def initialize(x,y)
     
305.     @x = x
     
306.     @y = y
     
307.   end
     
308.   
     
309.   def + (other)
     
310.     other = other.to_c unless other.is_a?(Coordinate)
     
311.     Coordinate.new(self.x + other.x, self.y + other.y)
     
312.   end
     
313.   
     
314.   def - (other)
     
315.     other = other.to_c unless other.is_a?(Coordinate)
     
316.     Coordinate.new(self.x - other.x, self.y - other.y)
     
317.   end
     
318.   
     
319.   def == (other)
     
320.     other = other.to_c unless other.is_a?(Coordinate)
     
321.     return self.x == other.x && self.y == other.y
     
322.   end
     
323.   
     
324.   # To String function
     
325.   def to_s
     
326.     return "(#{self.x},#{self.y})"
     
327.   end
     
328.   
     
329. end
     
330. #==============================================================================
     
331. # ** Vector
     
332. #------------------------------------------------------------------------------
     
333. #  Vector class that handles all vector functions. Note that some of these
     
334. # methods and variable terms are named in Indonesian terms. Because I don't
     
335. # really know what is in English terms
     
336. #
     
337. # Example usage :
     
338. # - http://goo.gl/E88ufV  ( Event Pointer )
     
339. #==============================================================================
     
340. class Vector
     
341.   attr_accessor :pangkal  # Starting point
     
342.   attr_accessor :ujung    # End point
     
343.   
     
344.   def initialize(pangkal,ujung,radius = 0)
     
345.     @pangkal = pangkal.is_a?(Coordinate) ? pangkal : pangkal.to_c
     
346.     if ujung.is_a?(Numeric)
     
347.       x_pos = @pangkal.x + (Math.cos(Math.radian(ujung)) * radius)
     
348.       y_pos = @pangkal.y + (Math.sin(Math.radian(ujung)) * radius)
     
349.       @ujung = Coordinate.new(x_pos,y_pos)
     
350.       return
     
351.     end
     
352.     @ujung = ujung.is_a?(Coordinate) ? ujung : ujung.to_c
     
353.   end
     
354.   
     
355.   # Get scalar value
     
356.   def skalar
     
357.     Math.sqrt(jarak_x**2 + jarak_y**2)
     
358.   end
     
359.   
     
360.   def + (other)
     
361.     if other.is_a?(Coordinate)
     
362.       return Vector.new(pangkal + other, ujung + other)
     
363.     end
     
364.     Vector.new(pangkal, ujung + other.satuan)
     
365.   end
     
366.   
     
367.   def - (other)
     
368.     if other.is_a?(Coordinate)
     
369.       return Vector.new(pangkal - other, ujung - other)
     
370.     end
     
371.     Vector.new(pangkal, ujung - other.satuan)
     
372.   end
     
373.   
     
374.   # Get degree upon two different point
     
375.   def degree
     
376.     Math.degree(Math.atan2(jarak_y,jarak_x)) rescue 0
     
377.   end
     
378.   
     
379.   # Get distance X
     
380.   def jarak_y
     
381.     ujung.y - pangkal.y
     
382.   end
     
383.   
     
384.   # Get distance Y
     
385.   def jarak_x
     
386.     ujung.x - pangkal.x
     
387.   end
     
388.   
     
389.   # Convert vector to coordinate
     
390.   def satuan
     
391.     Coordinate.new(jarak_x, jarak_y)
     
392.   end
     
393.   
     
394.   # To string format
     
395.   def to_s
     
396.     return @pangkal.to_s + " ---> " + @ujung.to_s
     
397.   end
     
398.   
     
399. end
     
400. #==============================================================================
     
401. # ** VectorObject
     
402. #------------------------------------------------------------------------------
     
403. # This class handles two objects that their vector is later will be used.
     
404. #
     
405. # Example usage :
     
406. # - http://goo.gl/E88ufV  ( Event Pointer )
     
407. #==============================================================================
     
408. class VectorObject
     
409.   attr_accessor :pangkal  # Starting object
     
410.   attr_accessor :ujung    # End object
     
411.   attr_accessor :color    # Color value (to draw lines)
     
412.   attr_accessor :offset_x # Offset value X
     
413.   attr_accessor :offset_y # Offset value Y
     
414.   
     
415.   # Basically, offset value is a increment value upon a new vector that created
     
416.   # using to_v vector. I don't really know if 'offset' is the right word. I'm
     
417.   # suck at english afterall
     
418.   
     
419.   def initialize(pangkal,ujung,color = Color.new(255,255,255))
     
420.     @pangkal = pangkal
     
421.     @ujung = ujung
     
422.     @color = color
     
423.     @offset_x = 0
     
424.     @offset_y = 0
     
425.   end
     
426.   
     
427.   # Two object converted into vector
     
428.   def to_v
     
429.     a = @pangkal.to_c
     
430.     b = @ujung.to_c
     
431.     a.x += @offset_x
     
432.     b.x += @offset_x
     
433.     a.y += @offset_y
     
434.     b.y += @offset_y
     
435.     Vector.new(a,b)
     
436.   end
     
437.   
     
438. end
     
439. #==============================================================================
     
440. # ** Bitmap
     
441. #------------------------------------------------------------------------------
     
442. # Built in class that handles bitmap
     
443. #==============================================================================
     
444. class Bitmap
     
445.   
     
446.   # Fill entire bitmap with color
     
447.   def entire_fill(color = Color.new(0,0,0,150))
     
448.     fill_rect(self.rect,color)
     
449.   end
     
450.   
     
451.   # Fill bitmap edge only
     
452.   def border_fill(color = Color.new(255,255,255))
     
453.     fill_rect(0,0,width,1,color)
     
454.     fill_rect(0,0,1,height,color)
     
455.     fill_rect(width-1,0,1,height,color)
     
456.     fill_rect(0,height-1,width,1,color)
     
457.   end
     
458.   
     
459. end
     
460. #==============================================================================
     
461. # ** Window_Base
     
462. #------------------------------------------------------------------------------
     
463. # This is a super class of all windows within the game.
     
464. #==============================================================================
     
465. class Window_Base < Window
     
466.   
     
467.   # Same as bitmap entire fill
     
468.   def entire_fill(color = Color.new(0,0,0,150))
     
469.     contents.entire_fill(color)
     
470.   end
     
471.   
     
472.   # Set window to center position of the screen
     
473.   def to_center
     
474.     self.x = Graphics.width/2 - self.width/2
     
475.     self.y = Graphics.height/2 - self.height/2
     
476.   end
     
477.   
     
478. end
     
479. #==============================================================================
     
480. # ** Color
     
481. #------------------------------------------------------------------------------
     
482. # Built in class that handles color
     
483. #==============================================================================
     
484. class Color
     
485.   
     
486.   # Is color same as other?
     
487.   def same?(*args)
     
488.     args = args.select {|color| color.is_a?(Color)}
     
489.     return false if args.empty?
     
490.     return args.any?{|color| self.red == color.red &&
     
491.       self.green == color.green && self.blue == color.blue &&
     
492.       self.alpha == color.alpha}
     
493.   end
     
494.   
     
495.   # Is color empty?
     
496.   def empty?
     
497.     return self.alpha <= 0
     
498.   end
     
499.   
     
500. end
     
501. # -----------------------------------------------------------------------------
     
502. # New Method : To Coordinate Conversion
     
503. # -----------------------------------------------------------------------------
     
504. class Object
     
505.   
     
506.   def to_c
     
507.     return Coordinate.new(0,0)
     
508.   end
     
509. 
     
510. end
     
511. 
     
512. class Numeric
     
513.   
     
514.   def to_c
     
515.     return Coordinate.new(self,self)
     
516.   end
     
517.   
     
518. end
     
519. 
     
520. class Sprite
     
521.   
     
522.   def to_c
     
523.     return Coordinate.new(self.x,self,y)
     
524.   end
     
525.   
     
526. end
     
527. 
     
528. class Window
     
529.   
     
530.   def to_c
     
531.     return Coordinate.new(self.x,self,y)
     
532.   end
     
533.   
     
534. end
     
535. 
     
536. class Game_Enemy < Game_Battler
     
537.   
     
538.   def to_c
     
539.     return Coordinate.new(self.screen_x,self,screen_y)
     
540.   end
     
541.   
     
542. end
     
543. 
     
544. class Game_CharacterBase
     
545.   
     
546.   def to_c(map = false)
     
547.     if map
     
548.       return Coordinate.new(self.real_x,self.real_y)
     
549.     end
     
550.     return Coordinate.new(self.screen_x,self.screen_y)
     
551.   end
     
552.   
     
553. end
     
554. # -----------------------------------------------------------------------------
     
555. # Added TSBS basic function. To calculate sprite anim cell
     
556. # -----------------------------------------------------------------------------
     
557. module TSBS
     
558.   def self.cell(row, col)
     
559.     result = (MaxCol * (row - 1)) + (col - 1)
     
560.     return result
     
561.   end
     
562. end
     
563. end
     
564. #==============================================================================
     
565. # ** Bitmap Extra addons v2.1
     
566. #------------------------------------------------------------------------------
     
567. #  This bitmap extra addons provide basic function of drawing shapes. It could
     
568. # be drawing polygon, line, arrow, elipse or such.
     
569. #
     
570. # The code may look messy. Even myself forget how it works. To be note that
     
571. # even this current version is 2.1, the draw filled polygon is imperfect. Do
     
572. # not use at this moment.
     
573. #
     
574. # Some functions may need my Basic Functions to be activated. So I suggest you
     
575. # to also activate it
     
576. #
     
577. # Example usage :
     
578. # - http://goo.gl/E88ufV ( Event Pointer )
     
579. # - http://goo.gl/DlrPuR ( Simple Polygon Status )
     
580. #------------------------------------------------------------------------------
     
581. if $imported[:Theo_BitmapAddons]  # Activation flag
     
582. # =============================================================================
     
583. class Bitmap
     
584.   attr_accessor :start_degree
     
585.   
     
586.   # ------------------------------------------------------------------------
     
587.   # Static Members
     
588.   # ------------------------------------------------------------------------
     
589.   @@default_color = Color.new(255,255,255)
     
590.   @@arrow_degree = 30
     
591.   
     
592.   def self.default_color=(color)
     
593.     @@default_color = color
     
594.   end
     
595.   
     
596.   def self.arrow_degree=(degree)
     
597.     @@arrow_degree = degree
     
598.   end
     
599.   
     
600.   def self.default_color
     
601.     @@default_color
     
602.   end
     
603.   
     
604.   def self.arrow_degree
     
605.     @@arrow_degree
     
606.   end
     
607.   
     
608.   alias theo_bitmap_init initialize
     
609.   def initialize(*args)
     
610.     theo_bitmap_init(*args)
     
611.     @start_degree = 270
     
612.   end
     
613.   # ------------------------------------------------------------------------
     
614.   # Bitmap draw line. The avalaible arguments to put are
     
615.   # - draw_line(x1,x2,y1,y2,[color])
     
616.   # - draw_line(coordinate1, coordinate2, [color])
     
617.   # - draw_line(vector, [color])
     
618.   #
     
619.   # coordinate must be Coordinate object from this basic module.
     
620.   # So do the vector
     
621.   # ------------------------------------------------------------------------
     
622.   def draw_line(x1, y1=0, x2=0, y2=0, color=@@default_color.dup,
     
623.       color_set_skip = false)
     
624.     # ----------------------------------------------------------------------
     
625.     # If the argument is a vector
     
626.     # ----------------------------------------------------------------------
     
627.     if x1.is_a?(Vector)
     
628.       new_color = (y1.is_a?(Color) ? y1 : color)
     
629.       draw_line(x1.pangkal,x1.ujung,new_color) # Recursive
     
630.       return # Exit
     
631.     # ----------------------------------------------------------------------
     
632.     # If two arguments are coordinates
     
633.     # ----------------------------------------------------------------------
     
634.     elsif x1.is_a?(Coordinate) && y1.is_a?(Coordinate)
     
635.       pangkal = x1
     
636.       ujung = y1
     
637.       new_color = (x2.is_a?(Color) ? x2 : color)
     
638.       draw_line(pangkal.x,pangkal.y,ujung.x,ujung.y,new_color) # Recursive
     
639.       return # Exit
     
640.     end
     
641.     # ----------------------------------------------------------------------
     
642.     # If two coordinate is same
     
643.     # ----------------------------------------------------------------------
     
644.     if x1 == x2 && y1 == y2
     
645.       set_pixel(x1,y1,color)
     
646.       yield [x1,x2] if block_given?
     
647.       return # Exit
     
648.     end
     
649.     # ----------------------------------------------------------------------
     
650.     # Calculate distance X dan Y
     
651.     # ----------------------------------------------------------------------
     
652.     jarak_x = (x2-x1)
     
653.     jarak_y = (y2-y1)
     
654.     # ----------------------------------------------------------------------
     
655.     # If line is horz line or vert line
     
656.     # ----------------------------------------------------------------------
     
657.     if jarak_y == 0 || jarak_x == 0
     
658.       
     
659.       # Horizontal
     
660.       if jarak_y == 0
     
661.         draw_horz(x1,y1,jarak_x,color)
     
662.         for j in 0..jarak_x
     
663.           yield [x1,y1]
     
664.           x1 += 1
     
665.         end if block_given?
     
666.         
     
667.       # Vertikal
     
668.       elsif jarak_x == 0
     
669.         draw_vert(x1,y1,jarak_y,color)
     
670.         for k in 0..jarak_y
     
671.           yield [x1,y1]
     
672.           y1 += 1
     
673.         end if block_given?
     
674.       end
     
675.       return # Exit
     
676.       
     
677.     end
     
678.     # ----------------------------------------------------------------------
     
679.     # If line is diagonal
     
680.     # ----------------------------------------------------------------------
     
681.     maximum = [jarak_x.abs,jarak_y.abs].max
     
682.     rasio_x = jarak_x / maximum.to_f
     
683.     rasio_y = jarak_y / maximum.to_f
     
684.     real_x = x1.to_f
     
685.     real_y = y1.to_f
     
686.     for i in 0..maximum
     
687.       set_pixel(x1,y1,color) unless get_pixel(x1,y1).same?(color) ||
     
688.         color_set_skip ? !get_pixel(x1,y1).empty? : false
     
689.       real_x += rasio_x
     
690.       real_y += rasio_y
     
691.       yield [x1,y1] if block_given?
     
692.       x1 = real_x.round
     
693.       y1 = real_y.round
     
694.     end
     
695.   end
     
696.   # ------------------------------------------------------------------------
     
697.   # Gradient line
     
698.   # ------------------------------------------------------------------------
     
699.   def gradient_line(x1,y1=0,x2=0,y2=0,color1=@@default_color.dup,
     
700.       color2 = color1)
     
701.     if x1.is_a?(Vector)
     
702.       warna_pangkal = (y1.is_a?(Color) ? y1 : color1)
     
703.       warna_ujung = (x2.is_a?(Color) ? x2 : color2)
     
704.       gradient_line(x1.pangkal, x1.ujung, warna_pangkal, warna_ujung)
     
705.       return
     
706.     elsif x1.is_a?(Coordinate) && y1.is_a?(Coordinate)
     
707.       pangkal = x1
     
708.       ujung = y1
     
709.       warna_pangkal = (x2.is_a?(Color) ? x2 : color1)
     
710.       warna_ujung = (y2.is_a?(Color) ? y2 : color2)
     
711.       gradient_line(pangkal.x,pangkal.y,ujung.x,ujung.y,warna_pangkal,
     
712.         warna_ujung)
     
713.       return
     
714.     end
     
715.     jarak_x = (x2-x1)
     
716.     jarak_y = (y2-y1)
     
717.     radius = Math.sqrt((jarak_x**2) + (jarak_y**2))
     
718.     red_diff = (color2.red - color1.red) / radius
     
719.     green_diff = (color2.green - color1.green) / radius
     
720.     blue_diff = (color2.blue - color1.blue) / radius
     
721.     alpha_diff = (color2.alpha - color1.alpha) / radius
     
722.     red = color1.red
     
723.     green = color1.green
     
724.     blue = color1.blue
     
725.     alpha = color1.alpha
     
726.     if jarak_y.abs == 0 || jarak_x.abs == 0
     
727.       gradient_fill_rect(x1,y1,1,jarak_y,color1,color2,true) if jarak_y.abs == 0
     
728.       gradient_fill_rect(x1,y1,jarak_x,1,color1,color2) if jarak_x.abs == 0
     
729.       return
     
730.     end
     
731.     maximum = [jarak_x.abs,jarak_y.abs].max
     
732.     rasio_x = jarak_x / maximum.to_f
     
733.     rasio_y = jarak_y / maximum.to_f
     
734.     real_x = x1.to_f
     
735.     real_y = y1.to_f
     
736.     for i in 0..maximum
     
737.       new_color = Color.new(red,green,blue,alpha)
     
738.       set_pixel(x1,y1,new_color) unless get_pixel(x1,y1).same?(new_color)
     
739.       real_x += rasio_x
     
740.       real_y += rasio_y
     
741.       x1 = real_x.round
     
742.       y1 = real_y.round
     
743.       red += red_diff
     
744.       blue += blue_diff
     
745.       green += green_diff
     
746.       alpha += alpha_diff
     
747.     end
     
748.   end
     
749.   
     
750.   # Draw horizontal line
     
751.   def draw_horz(x,y,width,color = Color.new(255,255,255))
     
752.     if width < 0
     
753.       fill_rect(x+width+1,y,width.abs,1,color)
     
754.       return
     
755.     end
     
756.     fill_rect(x,y,width,1,color)
     
757.   end
     
758.   
     
759.   # Draw vertical line
     
760.   def draw_vert(x,y,height,color = Color.new(255,255,255))
     
761.     if height < 0
     
762.       fill_rect(x,y+height+1,1,height.abs,color)
     
763.       return
     
764.     end
     
765.     fill_rect(x,y,1,height,color)
     
766.   end
     
767.   
     
768.   # --------------------------------------------------------------------------
     
769.   # Drawing ellipse.
     
770.   #
     
771.   # The parameters are :
     
772.   # - x     >> Center coordinate X
     
773.   # - y     >> Center coordinate Y
     
774.   # - horz  >> Horizontal Radius value
     
775.   # - vert  >> Vertical Radius value
     
776.   # - color >> Line color
     
777.   # - thick >> Thickness of line
     
778.   # - step  >> Dot step. Greater number may causes ellipse being drawn
     
779.   #            imperfect. But may perform better
     
780.   # --------------------------------------------------------------------------
     
781.   def draw_ellipse(x,y=0,horz=1,vert=1,color=Color.new(255,255,255),thick=1,
     
782.       step=0.1)
     
783.     return if thick < 1
     
784.     ori_x = x
     
785.     ori_y = y
     
786.     x += horz
     
787.     degree = 0.0
     
788.     while degree <= 360
     
789.       yield [x,y] if block_given?
     
790.       set_pixel(x,y,color) unless get_pixel(x,y).same?(color)
     
791.       x = Math.cos(Math.radian(degree)) * horz + ori_x
     
792.       y = Math.sin(Math.radian(degree)) * vert + ori_y
     
793.       degree = [degree+step,361].min
     
794.     end
     
795.     if thick > 1
     
796.       draw_ellipse(ori_x+1,ori_y+1,horz,vert,color,thick-1,step)
     
797.       draw_ellipse(ori_x-1,ori_y-1,horz,vert,color,thick-1,step)
     
798.       draw_ellipse(ori_x+1,ori_y-1,horz,vert,color,thick-1,step)
     
799.       draw_ellipse(ori_x-1,ori_y+1,horz,vert,color,thick-1,step)
     
800.     end
     
801.   end
     
802.   # --------------------------------------------------------------------------
     
803.   # Draw circle. Similar of drawing ellipse. But only have one radius parameter
     
804.   # --------------------------------------------------------------------------
     
805.   def draw_circle(x,y,radius,color=Color.new(255,255,255),step=0.1,thick=1)
     
806.     draw_ellipse(x,y,radius,radius,color,thick,step) {|coordinate|
     
807.       yield coordinate if block_given?
     
808.     }
     
809.   end
     
810.   
     
811.   # Do not use ~ !
     
812.   def fill_circle(x,y,radius,color1,color2=color1,step=0.1)
     
813.     fill_ellipse(x,y,radius,radius,color1,color2,step)
     
814.   end
     
815.   
     
816.   # Do not use ~ !
     
817.   def fill_ellipse(x,y,horz,vert,color1,color2=color1,step=0.1)
     
818.     draw_ellipse(x,y,horz,vert,1,color1,0.5) {|cor|
     
819.       draw_line(x,y,cor[0],cor[1],color2,true)
     
820.     }
     
821.     for i in 0..1
     
822.       for baris in 0..horz*2
     
823.         for kolom in 0..vert*2
     
824.           pos_x = baris-horz+x
     
825.           pos_y = kolom-vert+y
     
826.           syarat = (get_pixel(pos_x+1,pos_y).same?(color1,color2) &&
     
827.           get_pixel(pos_x-1,pos_y).same?(color1,color2)) ||
     
828.           (get_pixel(pos_x,pos_y-1).same?(color1,color2) &&
     
829.           get_pixel(pos_x,pos_y+1).same?(color1,color2)) ||
     
830.           (get_pixel(pos_x+1,pos_y+1).same?(color1,color2) &&
     
831.           get_pixel(pos_x-1,pos_y-1).same?(color1,color2)) ||
     
832.           (get_pixel(pos_x-1,pos_y+1).same?(color1,color2) &&
     
833.           get_pixel(pos_x+1,pos_y-1).same?(color1,color2))
     
834.           if syarat && !get_pixel(pos_x,pos_y).same?(color1,color2)
     
835.             set_pixel(pos_x,pos_y,color2)
     
836.           end
     
837.         end
     
838.       end
     
839.     end
     
840.   end
     
841.   # ---------------------------------------------------------------------------
     
842.   # Drawing polygon
     
843.   #
     
844.   # The parameters are :
     
845.   # - x       >> Center coordinate X
     
846.   # - y       >> Center coordinate Y
     
847.   # - corner  >> Number of corner. The mininmal value is 3 (Triangle)
     
848.   # - length  >> Radius range from center
     
849.   # - color1  >> Edge line color
     
850.   # - bone    >> Drawing bone? (true/false)
     
851.   # - color2  >> Bone Color
     
852.   # ---------------------------------------------------------------------------
     
853.   def draw_polygon(x,y,corner,length,color1,bone=true,color2=color1)
     
854.     return unless corner.is_a?(Numeric)
     
855.     draw_shape(x,y,Array.new(corner){1},length,color1,bone,false,color2)
     
856.   end
     
857.   
     
858.   # Do not use ~ !
     
859.   def fill_polygon(x,y,corner,length,color1,color2=color1)
     
860.     return unless corner.is_a?(Numeric)
     
861.     draw_shape(x,y,Array.new(corner),length,color1,false,true,color2)
     
862.   end
     
863.   
     
864.   # Draw polygon parameter
     
865.   def draw_shape_params(x,y,params,length,color1,bone=true,color2=color1)
     
866.     draw_shape(x,y,params,length,color1,bone,false,color2)
     
867.   end
     
868.   
     
869.   # Do not use ~ !
     
870.   def fill_shape_params(x,y,params,length,color1,color2=color1)
     
871.     draw_shape(x,y,params,length,color1,false,true,color2)
     
872.   end
     
873.   
     
874.   # Core function of drawing shape
     
875.   def draw_shape(x,y,params,length,color1 = Color.new(255,255,255),
     
876.       include_bone = true ,fill=false,color2 = color1)
     
877.     return unless params.is_a?(Array) # Corner lenght should be array
     
878.     return unless params.size >= 3    # At the size should have min 3
     
879.     degree_plus = 360 / params.size
     
880.     degree = @start_degree
     
881.     coordinate = []
     
882.     edge = []
     
883.     params.each do |i|
     
884.       x_des = x + Math.cos(Math.radian(degree)) * (length*(i.to_f/params.max))
     
885.       y_des = y + Math.sin(Math.radian(degree)) * (length*(i.to_f/params.max))
     
886.       draw_line(x,y,x_des,y_des,color2) if include_bone
     
887.       degree += degree_plus
     
888.       coordinate.push(Coordinate.new(x_des,y_des))
     
889.     end
     
890.     for i in -1..coordinate.size-2
     
891.       c = coordinate
     
892.       draw_line(c[i].x,c[i].y,c[i+1].x,c[i+1].y,color1) {|cor| edge.push(cor)}
     
893.     end
     
894.     return unless fill
     
895.     # -------------------------------------------------------------------------
     
896.     # Yes, it should return. Because the code below this point is sooo much
     
897.     # messy.
     
898.     # -------------------------------------------------------------------------
     
899.     edge.each do |line|
     
900.       draw_line(x,y,line[0],line[1],color2,true)
     
901.     end
     
902.     for i in 0..1
     
903.       for baris in 0..length*2
     
904.         for kolom in 0..length*2
     
905.           pos_x = baris-length+x
     
906.           pos_y = kolom-length+y
     
907.           syarat = (get_pixel(pos_x+1,pos_y).same?(color1,color2) &&
     
908.           get_pixel(pos_x-1,pos_y).same?(color1,color2)) ||
     
909.           (get_pixel(pos_x,pos_y-1).same?(color1,color2) &&
     
910.           get_pixel(pos_x,pos_y+1).same?(color1,color2)) ||
     
911.           (get_pixel(pos_x+1,pos_y+1).same?(color1,color2) &&
     
912.           get_pixel(pos_x-1,pos_y-1).same?(color1,color2)) ||
     
913.           (get_pixel(pos_x-1,pos_y+1).same?(color1,color2) &&
     
914.           get_pixel(pos_x+1,pos_y-1).same?(color1,color2))
     
915.           if syarat && !get_pixel(pos_x,pos_y).same?(color1,color2)
     
916.             set_pixel(pos_x,pos_y,color2)
     
917.           end
     
918.         end
     
919.       end
     
920.     end
     
921.   end
     
922.   
     
923.   # ---------------------------------------------------------------------------
     
924.   # Bitmap drawing arrows. It's similar as draw line actually
     
925.   # - draw_arrow(x1,x2,y1,y2,[color])
     
926.   # - draw_arrow(coordinate1, coordinate2, [color])
     
927.   # - draw_arrow(vector, [color])
     
928.   #
     
929.   # coordinate must be Coordinate object from this basic module.
     
930.   # So do the vector
     
931.   # ---------------------------------------------------------------------------
     
932.   def draw_arrow(x1,y1=0,x2=0,y2=0,color=@@default_color.dup)
     
933.     if x1.is_a?(Vector)
     
934.       new_color = (y1.is_a?(Color) ? y1 : color)
     
935.       
     
936.       # Recursive call. Split a vector to two coordinate.
     
937.       draw_arrow(x1.pangkal,x1.ujung,new_color)
     
938.       # Return
     
939.       return
     
940.     elsif x1.is_a?(Coordinate) && y1.is_a?(Coordinate)
     
941.       pangkal = x1
     
942.       ujung = y1
     
943.       new_color = (x2.is_a?(Color) ? x2 : color)
     
944.       
     
945.       # Recursive call. Split each coordinate into two primitive x,y value
     
946.       draw_arrow(pangkal.x,pangkal.y,ujung.x,ujung.y,new_color)
     
947.       # Return
     
948.       return
     
949.     end
     
950.     # Draw basic line
     
951.     draw_line(x1,y1,x2,y2,color)
     
952.     # Get reversed degree
     
953.     degree = Vector.new(Coordinate.new(x1,y1),Coordinate.new(x2,y2)).degree-180
     
954.     # Draw arrow
     
955.     draw_line(Vector.new(Coordinate.new(x2,y2),degree + @@arrow_degree,10),
     
956.       color)
     
957.     draw_line(Vector.new(Coordinate.new(x2,y2),degree - @@arrow_degree,10),
     
958.       color)
     
959.   end
     
960.   
     
961. end
     
962. # -----------------------------------------------------------------------------
     
963. # Draw Polygon status
     
964. # -----------------------------------------------------------------------------
     
965. class Game_Battler < Game_BattlerBase
     
966.   
     
967.   def params_array
     
968.     return [self.atk,self.def,self.mat,self.mdf,self.agi,self.luk]
     
969.   end
     
970.   
     
971. end
     
972. 
     
973. class Window_Base < Window
     
974.   
     
975.   def draw_polygon_params(x,y,actor,inner,outer,color1,color2)
     
976.     contents.draw_shape_params(x,y,actor.params_array,inner,color1)
     
977.     contents.draw_polygon(x,y,actor.params_array.size,outer,color2)
     
978.   end
     
979.   
     
980. end
     
981. end
     
982. #==============================================================================
     
983. # ** Core Damage Processing
     
984. # -----------------------------------------------------------------------------
     
985. # I altered the way how damage calculation to provide more flexibility. Any
     
986. # scripts that also overwrite make_damage_value will highly incompatible.
     
987. #
     
988. # However, I don't have any script implements this module right now. So you
     
989. # may disable it
     
990. # -----------------------------------------------------------------------------
     
991. if $imported[:Theo_CoreDamage]  # Activation flag
     
992. #==============================================================================
     
993. class Game_Battler < Game_BattlerBase
     
994.   # ---------------------------------------------------------------------------
     
995.   # *) Overwrite make damage value
     
996.   # ---------------------------------------------------------------------------
     
997.   def make_damage_value(user, item)
     
998.     value = base_damage(user, item)
     
999.     value = apply_element_rate(user, item, value)
     
1000.     value = process_damage_rate(user, item, value)
      
1001.     value = apply_damage_modifiers(user, item, value)
      
1002.     @result.make_damage(value.to_i, item)
      
1003.   end
      
1004.   # ---------------------------------------------------------------------------
      
1005.   # *) Make base damage. Evaling damage formula
      
1006.   # ---------------------------------------------------------------------------
      
1007.   def base_damage(user, item)
      
1008.     value = item.damage.eval(user, self, $game_variables)
      
1009.     value
      
1010.   end
      
1011.   # ---------------------------------------------------------------------------
      
1012.   # *) Apply element rate
      
1013.   # ---------------------------------------------------------------------------
      
1014.   def apply_element_rate(user, item, value)
      
1015.     value *= item_element_rate(user, item)
      
1016.     value
      
1017.   end
      
1018.   # ---------------------------------------------------------------------------
      
1019.   # *) Apply damage rate. Such as physical, magical, recovery
      
1020.   # ---------------------------------------------------------------------------
      
1021.   def process_damage_rate(user, item, value)
      
1022.     value *= pdr if item.physical?
      
1023.     value *= mdr if item.magical?
      
1024.     value *= rec if item.damage.recover?
      
1025.     value
      
1026.   end
      
1027.   # ---------------------------------------------------------------------------
      
1028.   # *) Apply damage modifier. Such as guard, critical, variance
      
1029.   # ---------------------------------------------------------------------------
      
1030.   def apply_damage_modifiers(user, item, value)
      
1031.     value = apply_critical(value, user) if @result.critical
      
1032.     value = apply_variance(value, item.damage.variance)
      
1033.     value = apply_guard(value)
      
1034.     value
      
1035.   end
      
1036.   # ---------------------------------------------------------------------------
      
1037.   # *) Applying critical
      
1038.   # ---------------------------------------------------------------------------
      
1039.   def apply_critical(damage, user)
      
1040.     damage * 3
      
1041.   end
      
1042.   
      
1043. end
      
1044. end
      
1045. #=============================================================================
      
1046. # ** Core Damage Result ~
      
1047. #-----------------------------------------------------------------------------
      
1048. # I altered how action result is being handled. It's used within my sideview
      
1049. # battle system.
      
1050. #-----------------------------------------------------------------------------
      
1051. if $imported[:Theo_CoreResult]  # Activation flag
      
1052. #=============================================================================
      
1053. class Game_Battler < Game_BattlerBase
      
1054.   
      
1055.   def item_apply(user, item)
      
1056.     make_base_result(user, item)
      
1057.     apply_hit(user, item) if @result.hit?
      
1058.   end
      
1059.   
      
1060.   def make_base_result(user, item)
      
1061.     @result.clear
      
1062.     @result.used = item_test(user, item)
      
1063.     @result.missed = (@result.used && rand >= item_hit(user, item))
      
1064.     @result.evaded = ([email protected] && rand < item_eva(user, item))
      
1065.   end
      
1066.   
      
1067.   def apply_hit(user, item)  
      
1068.     unless item.damage.none?
      
1069.       determine_critical(user, item)
      
1070.       make_damage_value(user, item)
      
1071.       execute_damage(user)
      
1072.     end
      
1073.     apply_item_effects(user, item)
      
1074.   end
      
1075.   
      
1076.   def determine_critical(user, item)
      
1077.     @result.critical = (rand < item_cri(user, item))
      
1078.   end
      
1079.   
      
1080.   def apply_item_effects(user, item)
      
1081.     item.effects.each {|effect| item_effect_apply(user, item, effect) }
      
1082.     item_user_effect(user, item)
      
1083.   end
      
1084.   
      
1085. end
      
1086. end
      
1087. #==============================================================================
      
1088. # ** Object Core Movement
      
1089. #------------------------------------------------------------------------------
      
1090. #  This basic module allow you to move objects like Window or Sprite to a
      
1091. # certain position in a given time duration. The object must be updated in each
      
1092. # frame. It could also applied to any classes that contains x,y and allow it to
      
1093. # be modified
      
1094. #
      
1095. # Avalaible methods :
      
1096. # - goto(x, y, duration, [jump])
      
1097. #   Tells the object to move to specified x,y coordinate in a given time
      
1098. #   duration in frame. By default, the jump value is zero.
      
1099. #   
      
1100. # - slide(x, y, duration, jump)
      
1101. #   Tells the object to slide in x,y coordinate from original position in a
      
1102. #   given time duration in frame. By default, the jump value is zero.
      
1103. #
      
1104. # I use this module within my sideview battle system movement sequences
      
1105. #------------------------------------------------------------------------------
      
1106. if $imported[:Theo_Movement]  # Activation flag
      
1107. #==============================================================================
      
1108. module THEO
      
1109.   module Movement
      
1110.     # =========================================================================
      
1111.     # Exclusive class move object. To prevent adding to many instance variable
      
1112.     # in object that implements this module
      
1113.     # -------------------------------------------------------------------------
      
1114.     class Move_Object
      
1115.       attr_reader :obj # Reference object
      
1116.       # -----------------------------------------------------------------------
      
1117.       # *) Initialize
      
1118.       # -----------------------------------------------------------------------
      
1119.       def initialize(obj)
      
1120.         @obj = obj
      
1121.         clear_move_info
      
1122.       end
      
1123.       # -----------------------------------------------------------------------
      
1124.       # *) Clear move info
      
1125.       # -----------------------------------------------------------------------
      
1126.       def clear_move_info
      
1127.         @to_x = -1
      
1128.         @to_y = -1
      
1129.         @real_x = 0.0
      
1130.         @real_y = 0.0
      
1131.         @x_speed = 0.0
      
1132.         @y_speed = 0.0
      
1133.         @jump = 0.0
      
1134.         @jump_interval = 0.0
      
1135.         @offset = 0
      
1136.         @duration = 0
      
1137.       end
      
1138.       # -----------------------------------------------------------------------
      
1139.       # *) Tells the object to move
      
1140.       # -----------------------------------------------------------------------
      
1141.       def move_to(x,y=0,jump=0,duration=0)
      
1142.         # You can also put the coordinate
      
1143.         if x.is_a?(Coordinate)
      
1144.           target = x
      
1145.           move_to(target.x, target.y, y, jump)
      
1146.           return
      
1147.         end
      
1148.         @to_x = x.to_i
      
1149.         @to_y = y.to_i
      
1150.         @real_x = @obj.x.to_f
      
1151.         @real_y = @obj.y.to_f
      
1152.         determine_speed(duration,jump)
      
1153.       end
      
1154.       # -----------------------------------------------------------------------
      
1155.       # *) Determine traveling speed
      
1156.       # -----------------------------------------------------------------------
      
1157.       def determine_speed(duration,jump)
      
1158.         @x_speed = (@to_x - @obj.x) / duration.to_f
      
1159.         @y_speed = (@to_y - @obj.y) / duration.to_f
      
1160.         @jump = jump.to_f
      
1161.         @jump_interval = @jump/(duration/2.0)
      
1162.         @duration = duration
      
1163.       end
      
1164.       # -----------------------------------------------------------------------
      
1165.       # *) Is object currently moving?
      
1166.       # -----------------------------------------------------------------------
      
1167.       def moving?
      
1168.         return false if @to_x == -1 && @to_y == -1
      
1169.         result = @obj.x != @to_x || @obj.y != @to_y
      
1170.         return result || @duration > 0
      
1171.       end
      
1172.       # -----------------------------------------------------------------------
      
1173.       # *) Update movement
      
1174.       # -----------------------------------------------------------------------
      
1175.       def update_move
      
1176.         @duration -= 1
      
1177.         @real_x += @x_speed
      
1178.         @real_y += @y_speed
      
1179.         @obj.x = @real_x.round
      
1180.         @obj.y = @real_y.round + @offset.round
      
1181.         @jump -= @jump_interval
      
1182.         @offset -= @jump
      
1183.         clear_move_info unless moving?
      
1184.       end
      
1185.     end
      
1186.     #==========================================================================
      
1187.     # -------------------------------------------------------------------------
      
1188.     # *) Set the movement object
      
1189.     # -------------------------------------------------------------------------
      
1190.     def set_obj(obj)
      
1191.       # I just added only one instance variable
      
1192.       @move_obj = Move_Object.new(obj)
      
1193.     end
      
1194.     # -------------------------------------------------------------------------
      
1195.     # *) Tells the object to move
      
1196.     # -------------------------------------------------------------------------
      
1197.     def goto(x,y,duration = Graphics.frame_rate,jump = 0.0)
      
1198.       @move_obj.move_to(x,y,jump,duration)
      
1199.     end
      
1200.     # -------------------------------------------------------------------------
      
1201.     # *) Tells the object to slide
      
1202.     # -------------------------------------------------------------------------
      
1203.     def slide(x,y,duration = Graphics.frame_rate,jump = 0.0)
      
1204.       slide_x = 0
      
1205.       slide_y = 0
      
1206.       if x.is_a?(Coordinate)
      
1207.         target  = x
      
1208.         slide_x = @move_obj.obj.x + target.x
      
1209.         slide_y = @move_obj.obj.y + target.y
      
1210.       else
      
1211.         slide_x = @move_obj.obj.x + x
      
1212.         slide_y = @move_obj.obj.y + y
      
1213.       end
      
1214.       goto(slide_x,slide_y,duration,jump) unless moving?
      
1215.     end
      
1216.     # -------------------------------------------------------------------------
      
1217.     # *) Update movement
      
1218.     # -------------------------------------------------------------------------
      
1219.     def update_move
      
1220.       @move_obj.update_move if moving?
      
1221.     end
      
1222.     # -------------------------------------------------------------------------
      
1223.     # *) Is object moving?
      
1224.     # -------------------------------------------------------------------------
      
1225.     def moving?
      
1226.       @move_obj.moving?
      
1227.     end
      
1228.     # -------------------------------------------------------------------------
      
1229.     # *) Slide up
      
1230.     # -------------------------------------------------------------------------
      
1231.     def up(range,duration = Graphics.frame_rate,jump = 0.0)
      
1232.       slide(0,-range,duration,jump)
      
1233.     end
      
1234.     # -------------------------------------------------------------------------
      
1235.     # *) Slide down
      
1236.     # -------------------------------------------------------------------------
      
1237.     def down(range,duration = Graphics.frame_rate,jump = 0.0)
      
1238.       slide(0,range,duration,jump)
      
1239.     end
      
1240.     # -------------------------------------------------------------------------
      
1241.     # *) Slide to right
      
1242.     # -------------------------------------------------------------------------
      
1243.     def right(range,duration = Graphics.frame_rate,jump = 0.0)
      
1244.       slide(range,0,duration,jump)
      
1245.     end
      
1246.     # -------------------------------------------------------------------------
      
1247.     # *) Slide to left
      
1248.     # -------------------------------------------------------------------------
      
1249.     def left(range,duration = Graphics.frame_rate,jump = 0.0)
      
1250.       slide(-range,0,duration,jump)
      
1251.     end
      
1252.     # -------------------------------------------------------------------------
      
1253.     # *) Slide to upright
      
1254.     # -------------------------------------------------------------------------
      
1255.     def upright(range,duration = Graphics.frame_rate,jump = 0.0)
      
1256.       slide(range,-range,duration,jump)
      
1257.     end
      
1258.     # -------------------------------------------------------------------------
      
1259.     # *) Slide to upleft
      
1260.     # -------------------------------------------------------------------------
      
1261.     def upleft(range,duration = Graphics.frame_rate,jump = 0.0)
      
1262.       slide(-range,-range,duration,jump)
      
1263.     end
      
1264.     # -------------------------------------------------------------------------
      
1265.     # *) Slide to downright
      
1266.     # -------------------------------------------------------------------------
      
1267.     def downright(range,duration = Graphics.frame_rate,jump = 0.0)
      
1268.       slide(range,-range,duration,jump)
      
1269.     end
      
1270.     # -------------------------------------------------------------------------
      
1271.     # *) Slide to downleft
      
1272.     # -------------------------------------------------------------------------
      
1273.     def downleft(range,duration = Graphics.frame_rate,jump = 0.0)
      
1274.       slide(-range,range,duration,jump)
      
1275.     end   
      
1276.   end
      
1277. end
      
1278. # -----------------------------------------------------------------------------
      
1279. # Implemented to Sprite
      
1280. # -----------------------------------------------------------------------------
      
1281. class Sprite
      
1282.   include THEO::Movement
      
1283.   
      
1284.   alias theolized_sprite_init initialize
      
1285.   def initialize(*args)
      
1286.     theolized_sprite_init(*args)
      
1287.     set_obj(self)
      
1288.   end
      
1289.   
      
1290.   alias theolized_move_update update
      
1291.   def update
      
1292.     theolized_move_update
      
1293.     update_move
      
1294.   end
      
1295. end
      
1296. # -----------------------------------------------------------------------------
      
1297. # Implemented to Window
      
1298. # -----------------------------------------------------------------------------
      
1299. class Window
      
1300.   include THEO::Movement
      
1301.   
      
1302.   alias theolized_move_window_init initialize
      
1303.   def initialize(x, y, width, height)
      
1304.     theolized_move_window_init(x, y, width, height)
      
1305.     set_obj(self)
      
1306.   end
      
1307.   
      
1308.   alias theolized_move_update update
      
1309.   def update
      
1310.     theolized_move_update
      
1311.     update_move
      
1312.   end
      
1313.   
      
1314. end
      
1315. end
      
1316. #==============================================================================
      
1317. # ** Object Core Fade
      
1318. #------------------------------------------------------------------------------
      
1319. #  Same as core movement. But this one is dealing with opacity. It can be
      
1320. # implemented to any object that has opacity value. Such as Window or Sprite
      
1321. #
      
1322. # Avalaible methods :
      
1323. # - fade(target_opacity, duration)
      
1324. # - fadeout(duration)
      
1325. # - fadein(duration)
      
1326. #
      
1327. # I use this module within my sideview battle system
      
1328. #------------------------------------------------------------------------------
      
1329. if $imported[:Theo_CoreFade]  # Activation flag
      
1330. #==============================================================================
      
1331. module THEO
      
1332.   module FADE
      
1333.     # Default duration of fading
      
1334.     DEFAULT_DURATION = 60
      
1335.     # -------------------------------------------------------------------------
      
1336.     # *) Init core fade instance variables
      
1337.     # -------------------------------------------------------------------------
      
1338.     def init_fade_members
      
1339.       @obj = nil
      
1340.       @target_opacity = -1
      
1341.       @fade_speed = 0.0
      
1342.       @pseudo_opacity = 0
      
1343.     end
      
1344.     # -------------------------------------------------------------------------
      
1345.     # *) Set object
      
1346.     # -------------------------------------------------------------------------
      
1347.     def setfade_obj(obj)
      
1348.       @obj = obj
      
1349.       @pseudo_opacity = @obj.opacity
      
1350.     end
      
1351.     # -------------------------------------------------------------------------
      
1352.     # *) Fade function
      
1353.     # -------------------------------------------------------------------------
      
1354.     def fade(opacity, duration = DEFAULT_DURATION)
      
1355.       @target_opacity = opacity
      
1356.       make_fade_speed(duration)
      
1357.     end
      
1358.     # -------------------------------------------------------------------------
      
1359.     # *) Determine fade speed
      
1360.     # -------------------------------------------------------------------------
      
1361.     def make_fade_speed(duration)
      
1362.       @fade_speed = (@target_opacity - @obj.opacity)/duration.to_f
      
1363.       @pseudo_opacity = @obj.opacity.to_f
      
1364.     end
      
1365.     # -------------------------------------------------------------------------
      
1366.     # *) Fadeout function
      
1367.     # -------------------------------------------------------------------------
      
1368.     def fadeout(duration = DEFAULT_DURATION)
      
1369.       fade(0, duration)
      
1370.     end
      
1371.     # -------------------------------------------------------------------------
      
1372.     # *) Fadein function
      
1373.     # -------------------------------------------------------------------------
      
1374.     def fadein(duration = DEFAULT_DURATION)
      
1375.       fade(255, duration)
      
1376.     end
      
1377.     # -------------------------------------------------------------------------
      
1378.     # *) Update fade
      
1379.     # -------------------------------------------------------------------------
      
1380.     def update_fade
      
1381.       if fade?
      
1382.         @pseudo_opacity += @fade_speed
      
1383.         @obj.opacity = @pseudo_opacity
      
1384.       else
      
1385.         @target_opacity = -1
      
1386.       end
      
1387.     end
      
1388.     # -------------------------------------------------------------------------
      
1389.     # *) Is performing fade?
      
1390.     # -------------------------------------------------------------------------
      
1391.     def fade?
      
1392.       return false if @target_opacity == -1
      
1393.       @target_opacity != @pseudo_opacity.round
      
1394.     end
      
1395.    
      
1396.   end
      
1397. end
      
1398. # -----------------------------------------------------------------------------
      
1399. # Implements to Sprite
      
1400. # -----------------------------------------------------------------------------
      
1401. class Sprite
      
1402.   
      
1403.   include THEO::FADE
      
1404.   
      
1405.   alias pre_fade_init initialize
      
1406.   def initialize(*args)
      
1407.     pre_fade_init(*args)
      
1408.     init_fade_members
      
1409.     setfade_obj(self)
      
1410.   end
      
1411.   
      
1412.   alias pre_fade_update update
      
1413.   def update
      
1414.     pre_fade_update
      
1415.     update_fade
      
1416.   end
      
1417.   
      
1418. end
      
1419. end
      
1420. #==============================================================================
      
1421. # ** Object Circular Movement
      
1422. #------------------------------------------------------------------------------
      
1423. #   This is the most troublesome basic module I have ever made. I wrote this
      
1424. # documentation after I made this modules months ago. So I little bit forgot
      
1425. # how it works, why I did this, why I did that.
      
1426. #
      
1427. #   Well, this basic module is deal with circular movement of object. Like our
      
1428. # Moon and Earth. You can set which coordinate/object that will be the center
      
1429. # rotation. Then tells the object to surround. I'm aware this module is far
      
1430. # from perfect. I'm open mind if anyone want to edit to make it better
      
1431. #
      
1432. # Avalaible Methods :
      
1433. # - circle_move(degree, duration)
      
1434. # - center_coordinate(x,y)
      
1435. # - center_object(obj)
      
1436. # - endless_circle(speed)
      
1437. #------------------------------------------------------------------------------
      
1438. if $imported[:Theo_Circular]  # Activation flag
      
1439. #==============================================================================
      
1440. module THEO
      
1441.   module Circular
      
1442.     class Circular_Obj
      
1443.       attr_reader :ox           # Center coordinate X
      
1444.       attr_reader :oy           # Center coordinate Y
      
1445.       attr_reader :center_obj   # Center object
      
1446.       attr_reader :obj          # Object
      
1447.       # -----------------------------------------------------------------------
      
1448.       # *) Initialize
      
1449.       # -----------------------------------------------------------------------
      
1450.       def initialize(obj,ox,oy,center_obj)
      
1451.         @obj = obj
      
1452.         @center_obj = center_obj if can_move?(center_obj)
      
1453.         @ox = ox
      
1454.         @oy = oy
      
1455.         @speed = 0
      
1456.         @endless = false
      
1457.         @freeze = false
      
1458.         refresh_info
      
1459.       end
      
1460.       # -----------------------------------------------------------------------
      
1461.       # *) Refresh information
      
1462.       # -----------------------------------------------------------------------
      
1463.       def refresh_info
      
1464.         @radius = radius
      
1465.         @degree_dest = @current_degree = get_degree
      
1466.       end
      
1467.       # -----------------------------------------------------------------------
      
1468.       # *) Set center object
      
1469.       # -----------------------------------------------------------------------
      
1470.       def center_obj=(center)
      
1471.         return unless can_move?(center)
      
1472.         @center_obj = center
      
1473.         refresh_info
      
1474.       end
      
1475.       # -----------------------------------------------------------------------
      
1476.       # *) Set center coordinate X
      
1477.       # -----------------------------------------------------------------------
      
1478.       def ox=(ox)
      
1479.         @ox = ox
      
1480.         refresh_info
      
1481.       end
      
1482.       # -----------------------------------------------------------------------
      
1483.       # *) Set center coordinate Y
      
1484.       # -----------------------------------------------------------------------
      
1485.       def oy=(oy)
      
1486.         @oy = oy
      
1487.         refresh_info
      
1488.       end
      
1489.       # -----------------------------------------------------------------------
      
1490.       # *) Is object can move?
      
1491.       # -----------------------------------------------------------------------
      
1492.       def can_move?(obj)
      
1493.         obj.respond_to?("x") && obj.respond_to?("y")
      
1494.       end
      
1495.       # -----------------------------------------------------------------------
      
1496.       # *) Circle move
      
1497.       # -----------------------------------------------------------------------
      
1498.       def circle_move(degree,duration)
      
1499.         return if endless?
      
1500.         @degree_dest = (@current_degree + degree)
      
1501.         @speed = (@degree_dest - @current_degree) / duration.to_f
      
1502.       end
      
1503.       # -----------------------------------------------------------------------
      
1504.       # *) Go to specified degree
      
1505.       # -----------------------------------------------------------------------
      
1506.       def circle_goto(degree,duration)
      
1507.         return if endless?
      
1508.         @degree_dest = degree
      
1509.         @speed = (@degree_dest - @current_degree) / duration.to_f
      
1510.       end
      
1511.       # -----------------------------------------------------------------------
      
1512.       # *) Endless circle movement
      
1513.       # -----------------------------------------------------------------------
      
1514.       def endless_circle(speed)
      
1515.         @speed = speed
      
1516.         @endless = true
      
1517.       end
      
1518.       # -----------------------------------------------------------------------
      
1519.       # *) Get current degree from center point
      
1520.       # -----------------------------------------------------------------------
      
1521.       def get_degree
      
1522.         Math.degree(Math.atan2(range_y,range_x)) rescue 0
      
1523.       end
      
1524.       # -----------------------------------------------------------------------
      
1525.       # *) Get distance X from center point
      
1526.       # -----------------------------------------------------------------------
      
1527.       def range_x
      
1528.         @obj.x - center_x
      
1529.       end
      
1530.       # -----------------------------------------------------------------------
      
1531.       # *) Get distance Y from center point
      
1532.       # -----------------------------------------------------------------------
      
1533.       def range_y
      
1534.         @obj.y - center_y
      
1535.       end
      
1536.       # -----------------------------------------------------------------------
      
1537.       # *) Get coordinate X from center point
      
1538.       # -----------------------------------------------------------------------
      
1539.       def center_x
      
1540.         @center_obj.nil? ? @ox : @center_obj.x
      
1541.       end
      
1542.       # -----------------------------------------------------------------------
      
1543.       # *) Get coordinate Y from center point
      
1544.       # -----------------------------------------------------------------------
      
1545.       def center_y
      
1546.         @center_obj.nil? ? @oy : @center_obj.y
      
1547.       end
      
1548.       # -----------------------------------------------------------------------
      
1549.       # *) Get radius value from center point
      
1550.       # -----------------------------------------------------------------------
      
1551.       def radius
      
1552.         Math.sqrt((range_x**2) + (range_y**2))
      
1553.       end
      
1554.       # -----------------------------------------------------------------------
      
1555.       # *) Update circle movement
      
1556.       # -----------------------------------------------------------------------
      
1557.       def update_circle
      
1558.         return if circle_frozen?
      
1559.         return unless rotate? || @endless
      
1560.         @current_degree += @speed
      
1561.         update_x
      
1562.         update_y
      
1563.         @degree_dest = @current_degree if @endless
      
1564.       end
      
1565.       # -----------------------------------------------------------------------
      
1566.       # *) Object is moving?
      
1567.       # -----------------------------------------------------------------------
      
1568.       def rotate?
      
1569.         return @current_degree.round != @degree_dest.round
      
1570.       end
      
1571.       # -----------------------------------------------------------------------
      
1572.       # *) Update X position
      
1573.       # -----------------------------------------------------------------------
      
1574.       def update_x
      
1575.         @obj.x = center_x + (@radius *
      
1576.           Math.cos(Math.radian(@current_degree))).round
      
1577.       end
      
1578.       # -----------------------------------------------------------------------
      
1579.       # *) Update Y position
      
1580.       # -----------------------------------------------------------------------
      
1581.       def update_y
      
1582.         @obj.y = center_y + (@radius *
      
1583.           Math.sin(Math.radian(@current_degree))).round
      
1584.       end
      
1585.       # -----------------------------------------------------------------------
      
1586.       # *) Freeze circle
      
1587.       # -----------------------------------------------------------------------
      
1588.       def circle_freeze
      
1589.         @freeze = true
      
1590.       end
      
1591.       # -----------------------------------------------------------------------
      
1592.       # *) Unfreeze circle
      
1593.       # -----------------------------------------------------------------------
      
1594.       def circle_unfreeze
      
1595.         @freeze = false
      
1596.       end
      
1597.       # -----------------------------------------------------------------------
      
1598.       # *) Is frozen?
      
1599.       # -----------------------------------------------------------------------
      
1600.       def circle_frozen?
      
1601.         @freeze
      
1602.       end
      
1603.       # -----------------------------------------------------------------------
      
1604.       # *) Stop circling
      
1605.       # -----------------------------------------------------------------------
      
1606.       def stop
      
1607.         @endless = false
      
1608.       end
      
1609.       # -----------------------------------------------------------------------
      
1610.       # *) Continue circling
      
1611.       # -----------------------------------------------------------------------
      
1612.       def continue
      
1613.         @endless = true
      
1614.       end
      
1615.       # -----------------------------------------------------------------------
      
1616.       # *) Endless circle?
      
1617.       # -----------------------------------------------------------------------
      
1618.       def endless?
      
1619.         @endless
      
1620.       end
      
1621.     end
      
1622.     # =========================================================================
      
1623.     # These methods below aren't necessary to comment
      
1624.     # -------------------------------------------------------------------------
      
1625.     def set_circle(obj,ox = 0,oy = 0,center_obj = nil)
      
1626.       @circle = Circular_Obj.new(obj,ox,oy,center_obj)
      
1627.     end
      
1628.    
      
1629.     def stop
      
1630.       @circle.stop
      
1631.     end
      
1632.    
      
1633.     def continue
      
1634.       @circle.continue
      
1635.     end
      
1636.    
      
1637.     def endless?
      
1638.       @circle.endless?
      
1639.     end
      
1640.    
      
1641.     def circle_move(degree, dur = Graphics.frame_rate)
      
1642.       @circle.circle_move(degree,dur)
      
1643.     end
      
1644.    
      
1645.     def endless_circle(speed)
      
1646.       @circle.endless_circle(speed)
      
1647.     end
      
1648.    
      
1649.     def circle_freeze
      
1650.       @circle.circle_freeze
      
1651.     end
      
1652.    
      
1653.     def circle_unfreeze
      
1654.       @circle.circle_unfreeze
      
1655.     end
      
1656.    
      
1657.     def circle_frozed?
      
1658.       @circle.circle_frozen?
      
1659.     end
      
1660.    
      
1661.     def update_circle
      
1662.       @circle.update_circle
      
1663.     end
      
1664.    
      
1665.     def rotating?
      
1666.       @circle.rotate?
      
1667.     end
      
1668.    
      
1669.     def center_coordinate(ox,oy)
      
1670.       @circle.ox = ox
      
1671.       @circle.oy = oy
      
1672.     end
      
1673.    
      
1674.     def center_distance(ox,oy)
      
1675.       @circle.ox = @circle.obj.x + ox
      
1676.       @circle.oy = @circle.obj.y + oy
      
1677.     end
      
1678.    
      
1679.     def center_obj(obj)
      
1680.       @circle.center_obj = obj
      
1681.     end
      
1682.    
      
1683.     def refresh_info
      
1684.       @circle.refresh_info
      
1685.     end
      
1686.    
      
1687.   end
      
1688. end
      
1689. # -----------------------------------------------------------------------------
      
1690. # Implements to window
      
1691. # -----------------------------------------------------------------------------
      
1692. class Window
      
1693.   
      
1694.   include THEO::Circular
      
1695.   
      
1696.   alias theolized_circle_window_init initialize
      
1697.   def initialize(*args)
      
1698.     theolized_circle_window_init(*args)
      
1699.     set_circle(self,x,y)
      
1700.   end
      
1701.   
      
1702.   alias window_circle_update update
      
1703.   def update
      
1704.     window_circle_update
      
1705.     update_circle
      
1706.   end
      
1707.   
      
1708. end
      
1709. # -----------------------------------------------------------------------------
      
1710. # Implements to sprite
      
1711. # -----------------------------------------------------------------------------
      
1712. class Sprite
      
1713.   
      
1714.   include THEO::Circular
      
1715.   
      
1716.   alias theolized_circle_init initialize
      
1717.   def initialize(*args)
      
1718.     theolized_circle_init(*args)
      
1719.     set_circle(self,x,y)
      
1720.   end
      
1721.   
      
1722.   alias sprite_circle_update update
      
1723.   def update
      
1724.     sprite_circle_update
      
1725.     update_circle
      
1726.   end
      
1727.   
      
1728. end
      
1729. end
      
1730. #==============================================================================
      
1731. # ** Clone Image / Afterimage Base
      
1732. #------------------------------------------------------------------------------
      
1733. #  This basic modules is purposely to make sprite can be cloned / duplicated.
      
1734. # In more complex concept, it could be used as base of afterimage. It's used
      
1735. # within my sideview battle system
      
1736. #------------------------------------------------------------------------------
      
1737. if $imported[:Theo_CloneImage]  # Activation flag
      
1738. #==============================================================================
      
1739. class Sprite
      
1740.   attr_reader :clone_bitmap
      
1741.   # ---------------------------------------------------------------------------
      
1742.   # *) Aliased Initialize
      
1743.   # ---------------------------------------------------------------------------
      
1744.   alias theo_clonesprites_init initialize
      
1745.   def initialize(*args)
      
1746.     @cloned_sprites = []
      
1747.     @color_flash = Color.new(0,0,0,0)
      
1748.     @alpha_val = 0.0
      
1749.     @alpha_ease = 0.0
      
1750.     @dur_flash = 0
      
1751.     theo_clonesprites_init(*args)
      
1752.   end
      
1753.   # ---------------------------------------------------------------------------
      
1754.   # *) Base function to clone sprite
      
1755.   # ---------------------------------------------------------------------------
      
1756.   def clone(z_pos = 0, clone_bitmap = false)
      
1757.     @cloned_sprites.delete_if {|spr| spr.disposed? }
      
1758.     cloned = clone_class.new(viewport)
      
1759.     cloned.x = x
      
1760.     cloned.y = y
      
1761.     cloned.bitmap = bitmap
      
1762.     cloned.bitmap = bitmap.clone if clone_bitmap
      
1763.     if z_pos != 0
      
1764.       cloned.z = z + z_pos
      
1765.     else
      
1766.       @cloned_sprites.each do |spr|
      
1767.         spr.z -= 1
      
1768.       end
      
1769.       cloned.z = z - 1
      
1770.     end
      
1771.     cloned.src_rect.set(src_rect)
      
1772.     cloned.zoom_x = zoom_x
      
1773.     cloned.zoom_y = zoom_y
      
1774.     cloned.angle = angle
      
1775.     cloned.mirror = mirror
      
1776.     cloned.opacity = opacity
      
1777.     cloned.blend_type = blend_type
      
1778.     cloned.color.set(color)
      
1779.     cloned.tone.set(tone)
      
1780.     cloned.visible = visible
      
1781.     cloned.bush_depth = bush_depth
      
1782.     cloned.bush_opacity = bush_opacity
      
1783.     cloned.ox = ox
      
1784.     cloned.oy = oy
      
1785.     on_after_cloning(cloned)
      
1786.     @cloned_sprites.push(cloned)
      
1787.     cloned
      
1788.   end
      
1789.    
      
1790.   def on_after_cloning(cloned)
      
1791.     cloned.theo_clonesprites_flash(@color_flash, @dur_flash)
      
1792.     # Abstract method. Overwrite it as you want
      
1793.   end
      
1794.   
      
1795.   # Sprite class for cloned sprite
      
1796.   def clone_class
      
1797.     Sprite
      
1798.   end
      
1799.   
      
1800.   alias theo_clonesprites_flash flash
      
1801.   def flash(color, duration)
      
1802.     theo_clonesprites_flash(color, duration)
      
1803.     @dur_flash = duration
      
1804.     @color_flash = color.clone
      
1805.     @alpha_val = color.alpha.to_f
      
1806.     @alpha_ease = @alpha_val / duration
      
1807.   end
      
1808.   
      
1809.   alias theo_clonesprites_update update
      
1810.   def update
      
1811.     theo_clonesprites_update
      
1812.     @dur_flash = [@dur_flash - 1,0].max
      
1813.     @alpha_val = [@alpha_val - @alpha_ease,0.0].max
      
1814.     @color_flash.alpha = @alpha_val
      
1815.   end
      
1816.   
      
1817. end
      
1818. 
      
1819. # =============================================================================
      
1820. # Afterimages basic module for all sprite base instance object. Any classes
      
1821. # that inherited from Sprite_Base will highly possible to make afterimage
      
1822. # effect.
      
1823. #
      
1824. # How to setup :
      
1825. # - Make sure "def afterimage" should return to true
      
1826. # - Set rate and opacity easing
      
1827. # - Higher rate means the higher delay between displayed afterimage
      
1828. # - Higher opac means the faster afterimage will fadeout
      
1829. # =============================================================================
      
1830. 
      
1831. class Sprite_Base < Sprite
      
1832.   attr_accessor :afterimage       # Afterimage flag
      
1833.   attr_accessor :afterimage_opac  # Afterimage opacity easing
      
1834.   attr_accessor :afterimage_rate  # Afterimage thick rate
      
1835.   # ---------------------------------------------------------------------------
      
1836.   # *) Aliased initialize
      
1837.   # ---------------------------------------------------------------------------
      
1838.   alias theo_afterimagebase_init initialize
      
1839.   def initialize(*args)
      
1840.     init_afterimage_base
      
1841.     theo_afterimagebase_init(*args)
      
1842.   end
      
1843.   # ---------------------------------------------------------------------------
      
1844.   # *) Initialize afterimage variables
      
1845.   # ---------------------------------------------------------------------------
      
1846.   def init_afterimage_base
      
1847.     @afterimage = false
      
1848.     @afterimage_count = 0
      
1849.     @afterimage_rate = 3
      
1850.     @afterimage_opac = 5
      
1851.     @afterimages = []
      
1852.   end
      
1853.   # ---------------------------------------------------------------------------
      
1854.   # *) Aliased update method
      
1855.   # ---------------------------------------------------------------------------
      
1856.   alias theo_afterimagebase_update update
      
1857.   def update
      
1858.     theo_afterimagebase_update
      
1859.     update_afterimage_effect
      
1860.   end
      
1861.   # ---------------------------------------------------------------------------
      
1862.   # *) Update afterimage
      
1863.   # ---------------------------------------------------------------------------
      
1864.   def update_afterimage_effect
      
1865.     # Update and delete afterimage once its opacity has reached zero
      
1866.     @afterimages.delete_if do |image|
      
1867.       image.opacity -= afterimage_opac
      
1868.       image.update if updating_afterimages?
      
1869.       if image.opacity == 0
      
1870.         image.dispose
      
1871.       end
      
1872.       image.disposed?
      
1873.     end
      
1874.     return unless afterimage
      
1875.     @afterimage_count += 1
      
1876.     if @afterimage_count % afterimage_rate == 0
      
1877.       @afterimages.push(clone)
      
1878.     end
      
1879.   end
      
1880.   # ---------------------------------------------------------------------------
      
1881.   # *) Is afterimages are need to be updated?
      
1882.   # ---------------------------------------------------------------------------
      
1883.   def updating_afterimages?
      
1884.     return false
      
1885.   end
      
1886.   # ---------------------------------------------------------------------------
      
1887.   # *) Disposes sprite alongside the afterimage to prevent RGSS3 crash
      
1888.   # ---------------------------------------------------------------------------
      
1889.   alias theo_afterimagebase_dispose dispose
      
1890.   def dispose
      
1891.     theo_afterimagebase_dispose
      
1892.     @afterimages.each do |afimg|
      
1893.       afimg.dispose
      
1894.     end
      
1895.   end
      
1896.   
      
1897. end
      
1898. end
      
1899. #==============================================================================
      
1900. # ** Sprite Rotate Basic module
      
1901. #------------------------------------------------------------------------------
      
1902. #  This basic module only dealing with sprite angle. It's used within my
      
1903. # sideview battle system to rotate weapon icon.
      
1904. #------------------------------------------------------------------------------
      
1905. if $imported[:Theo_RotateImage]
      
1906. #==============================================================================
      
1907. module Theo
      
1908.   module Rotation
      
1909.     # -------------------------------------------------------------------------
      
1910.     # *) Init rotate function
      
1911.     # -------------------------------------------------------------------------
      
1912.     def init_rotate
      
1913.       @degree = self.angle.to_f
      
1914.       @target_degree = 0
      
1915.       @rotating = false
      
1916.       @rotate_speed = 0.0
      
1917.     end
      
1918.     # -------------------------------------------------------------------------
      
1919.     # *) Change to specific angle
      
1920.     # -------------------------------------------------------------------------
      
1921.     def change_angle(target_degree, duration)
      
1922.       @degree = self.angle.to_f
      
1923.       @target_degree = target_degree.to_f
      
1924.       if duration == 0
      
1925.         @rotate_speed = target_degree
      
1926.       else
      
1927.         @rotate_speed = (target_degree - @degree) / duration
      
1928.       end
      
1929.       @rotating = true
      
1930.     end
      
1931.     # -------------------------------------------------------------------------
      
1932.     # *) Update rotation
      
1933.     # -------------------------------------------------------------------------
      
1934.     def update_rotation
      
1935.       return unless @rotating
      
1936.       @degree += @rotate_speed
      
1937.       new_angle = @degree.round
      
1938.       self.angle = new_angle
      
1939.       if new_angle == @target_degree
      
1940.         init_rotate
      
1941.       end
      
1942.     end
      
1943.     # -------------------------------------------------------------------------
      
1944.     # *) Start rotate to additional degree
      
1945.     # -------------------------------------------------------------------------
      
1946.     def start_rotate(degree_plus, duration)
      
1947.       change_angle(@degree + degree_plus, duration)
      
1948.     end
      
1949.    
      
1950.   end
      
1951. end
      
1952. # -----------------------------------------------------------------------------
      
1953. # Implements on sprite
      
1954. # -----------------------------------------------------------------------------
      
1955. class Sprite
      
1956.   include Theo::Rotation
      
1957.   
      
1958.   alias theo_spr_rotate_init initialize
      
1959.   def initialize(viewport = nil)
      
1960.     theo_spr_rotate_init(viewport)
      
1961.     init_rotate
      
1962.   end
      
1963.   
      
1964.   alias theo_spr_rotate_update update
      
1965.   def update
      
1966.     theo_spr_rotate_update
      
1967.     update_rotation
      
1968.   end
      
1969.   
      
1970. end
      
1971. 
      
1972. end
      
1973. #==============================================================================
      
1974. # ** Smooth_Slide
      
1975. #------------------------------------------------------------------------------
      
1976. #  This module provides basic module for smooth sliding. It can be implemented
      
1977. # to any classes as long as they have x and y.
      
1978. #
      
1979. # Avalaible methods :
      
1980. # - smooth_move(x,y,dur,[reverse])
      
1981. #   Tells the object to move to specific x,y coordinate in given time duration
      
1982. #   in frame. If reverse set to true, object will start with maximum speed
      
1983. #
      
1984. # - smooth_slide(x,y,dur,[reverse])
      
1985. #   Tells the object to slide to specific x,y coordinate from original position
      
1986. #   in given time duration in frame. If reverse set to true, object will start
      
1987. #   with maximum speed
      
1988. #------------------------------------------------------------------------------
      
1989. if $imported[:Theo_SmoothMove]  # Activation Flag
      
1990. #==============================================================================
      
1991. module Smooth_Slide
      
1992.   # ---------------------------------------------------------------------------
      
1993.   # Initialize smooth movement data
      
1994.   # ---------------------------------------------------------------------------
      
1995.   def init_smove
      
1996.     @smooth_dur = 0     # Travel duration
      
1997.     @accel_x = 0.0      # Acceleration X
      
1998.     @accel_y = 0.0      # Acceleration Y
      
1999.     @vel_x = 0.0        # Velocity X
      
2000.     @vel_y = 0.0        # Velocity Y
      
2001.     @sreal_x = self.x   # Real position X
      
2002.     @sreal_y = self.y   # Real Position Y
      
2003.     @starget_x = 0.0    # Target X
      
2004.     @starget_y = 0.0    # Target Y
      
2005.     @srev = false       # Reverse Flag
      
2006.     @smove = false      # Moving Flag
      
2007.    
      
2008.     # The reason why I give 's' in front of most instance variables is for
      
2009.     # uniqueness. Well, if there is any basic module / script out there that
      
2010.     # also use same instance name, it may causes incompatibility
      
2011.    
      
2012.   end
      
2013.   # ---------------------------------------------------------------------------
      
2014.   # Do smooth movement
      
2015.   # ---------------------------------------------------------------------------
      
2016.   def smooth_move(x,y,dur,reverse = false)
      
2017.     init_smove
      
2018.     @srev = reverse
      
2019.     @smove = true
      
2020.     @smooth_dur = dur
      
2021.     @sreal_x = self.x.to_f
      
2022.     @sreal_y = self.y.to_f
      
2023.     @starget_x = x.to_i
      
2024.     @starget_y = y.to_i
      
2025.     calc_accel
      
2026.   end
      
2027.   # ---------------------------------------------------------------------------
      
2028.   # Do smooth slide
      
2029.   # ---------------------------------------------------------------------------
      
2030.   def smooth_slide(x,y,dur,reverse = false)
      
2031.     tx = x + self.x
      
2032.     ty = y + self.y
      
2033.     smooth_move(tx,ty,dur,reverse)
      
2034.   end
      
2035.   # ---------------------------------------------------------------------------
      
2036.   # Calculate acceleration
      
2037.   # ---------------------------------------------------------------------------
      
2038.   def calc_accel
      
2039.     # Get travel distance
      
2040.     dist_x = @starget_x - @sreal_x
      
2041.     dist_y = @starget_y - @sreal_y
      
2042.    
      
2043.     # Calculate acceleration
      
2044.     @accel_x = (dist_x/((@smooth_dur**2)/2.0))
      
2045.     @accel_y = (dist_y/((@smooth_dur**2)/2.0))
      
2046.    
      
2047.     # If reverse, velocity started on max speed
      
2048.     if @srev
      
2049.       @vel_x = (@accel_x * (@smooth_dur.to_f - 0.5))
      
2050.       @vel_y = (@accel_y * (@smooth_dur.to_f - 0.5))
      
2051.     end
      
2052.   end
      
2053.   # ---------------------------------------------------------------------------
      
2054.   # Execute end smooth
      
2055.   # ---------------------------------------------------------------------------
      
2056.   def end_smooth_slide
      
2057.     init_smove
      
2058.   end
      
2059.   # ---------------------------------------------------------------------------
      
2060.   # Update Smooth movement
      
2061.   # ---------------------------------------------------------------------------
      
2062.   def update_smove
      
2063.     if @smove
      
2064.       # If not reversed. Increase velocity on the first time executed
      
2065.       if !@srev
      
2066.         @vel_x += @accel_x
      
2067.         @vel_y += @accel_y
      
2068.       end
      
2069.       
      
2070.       # Give increment / decrement upon real position
      
2071.       @sreal_x = (@starget_x > @sreal_x ?
      
2072.         [@sreal_x + @vel_x, @starget_x].min :
      
2073.         [@sreal_x + @vel_x, @starget_x].max)
      
2074.       @sreal_y = (@starget_y > @sreal_y ?
      
2075.         [@sreal_y + @vel_y, @starget_y].min :
      
2076.         [@sreal_y + @vel_y, @starget_y].max)
      
2077.       
      
2078.       # Rounded real position
      
2079.       self.x = @sreal_x.round
      
2080.       self.y = @sreal_y.round
      
2081.       
      
2082.       # If reversed, decrease velocity after make a change to real position
      
2083.       if @srev
      
2084.         @vel_x -= @accel_x
      
2085.         @vel_y -= @accel_y
      
2086.       end
      
2087.       
      
2088.       # If target has reach it's destination, call end execution
      
2089.       if (self.x == @starget_x && self.y == @starget_y)
      
2090.         end_smooth_slide
      
2091.       end
      
2092.     end
      
2093.   end
      
2094.   # ---------------------------------------------------------------------------
      
2095.   # Get smooth moving flag
      
2096.   # ---------------------------------------------------------------------------
      
2097.   def smoving?
      
2098.     @smove
      
2099.   end
      
2100.   
      
2101. end
      
2102. # -----------------------------------------------------------------------------
      
2103. # Implemented on sprite
      
2104. # -----------------------------------------------------------------------------
      
2105. class Sprite
      
2106.   include Smooth_Slide
      
2107.   
      
2108.   alias smooth_init initialize
      
2109.   def initialize(v=nil)
      
2110.     smooth_init(v)
      
2111.     init_smove
      
2112.   end
      
2113.   
      
2114.   alias smooth_update update
      
2115.   def update
      
2116.     smooth_update
      
2117.     update_smove
      
2118.   end
      
2119.   
      
2120. end
      
2121. # -----------------------------------------------------------------------------
      
2122. # Implemented on window
      
2123. # -----------------------------------------------------------------------------
      
2124. class Window
      
2125.   include Smooth_Slide
      
2126.   
      
2127.   alias smooth_init initialize
      
2128.   def initialize(*args)
      
2129.     smooth_init(*args)
      
2130.     init_smove
      
2131.   end
      
2132.   
      
2133.   alias smooth_update update
      
2134.   def update
      
2135.     smooth_update
      
2136.     update_smove
      
2137.   end
      
2138.   
      
2139. end
      
2140. 
      
2141. end
      
2142. # =============================================================================
      
2143. # Below this line are just miscellaneous functions
      
2144. # -----------------------------------------------------------------------------
      
2145. # Debug print line
      
2146. # -----------------------------------------------------------------------------
      
2147. def debug
      
2148.   puts "这一行已被执行"
      
2149. end
      
2150. # -----------------------------------------------------------------------------
      
2151. # Debug print frame
      
2152. # -----------------------------------------------------------------------------
      
2153. def debugc
      
2154.   puts Graphics.frame_count
      
2155. end
      
2156. # -----------------------------------------------------------------------------
      
2157. # Copy object. Because calling clone/dup sometimes is not enough
      
2158. # -----------------------------------------------------------------------------
      
2159. def copy(object)
      
2160.   Marshal.load(Marshal.dump(object))
      
2161. end

复制代码

防卡顿脚本：

1. #===============================================================================
   
2. # TheoAllen - 终极防止卡顿
   
3. # Version : 1.1
   
4. # Language : English
   
5. #-------------------------------------------------------------------------------
   
6. # 帮助编写此脚本的人 :
   
7. # - Tsukihime
   
8. # - KilloZapit
   
9. # - Galv
   
10. #+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
    
11. # Contact :
    
12. #-------------------------------------------------------------------------------
    
13. # *> http://www.rpgmakerid.com
    
14. # *> http://www.rpgmakervxace.net
    
15. # *> http://www.theolized.com
    
16. #===============================================================================
    
17. ($imported ||= {})[:Theo_AntiLag] = true
    
18. #===============================================================================
    
19. # Change Logs:
    
20. # ------------------------------------------------------------------------------
    
21. # 2015.02.20 - Added page check enhancer to work with parallel process
    
22. # 2015.01.25 - Compatibility with Shaz's Mouse Script. def events_xy now should
    
23. #              always return array,
    
24. #            - Avoid error 'undefined method delete_sprite for nilClass'
    
25. # 2015.01.01 - Avoid unexpected error 'undefined method spriteset for scene'
    
26. # 2014.12.05 - Finished
    
27. #===============================================================================
    
28. =begin
    
29. 
    
30.   ------------------------------------------
    
31.   *) 介绍 :
    
32.   ------------------------------------------
    
33.   如你所知, RPG Maker 游戏中出现卡顿是个常见问题.
    
34.   你开始猜想会不会是因为在地图上设定了过多的事件，因此，为了防卡，你将地图拆分
    
35.   为小块，同时减少事件的使用.
    
36. 
    
37.   这也不全错，因为过多事件的确会让程序花更多时间去检查。可是，减少事件并不能
    
38.   极大地优化游戏速度。
    
39.   本脚本将提升游戏运行效率，阻止一些不必要的更新以提升游戏速度。
    
40.    
    
41.   注意，因为我改了许多地方，因此不能完全保证其可以较高的兼容其他脚本。
    
42.   相比于兼容其他人的脚本，我很可能会优先兼容我自己的脚本。
    
43.   
    
44.   ------------------------------------------
    
45.   *) 使用方法 :
    
46.   ------------------------------------------
    
47.   将本脚本防在插件脚本之下，Main之上。建议尽可能放在其他自定义脚本之上.
    
48.   
    
49.   如果发生兼容性的问题，在设定部分根据自己的需要进行修改。
    
50.   
    
51.   ------------------------------------------
    
52.   *)   使用条款 :
    
53.   署名脚本作者, TheoAllen. 你可以自由编辑此脚本，只要你不声明你是脚本的原作者
    
54.   如果你想用此脚本于商业游戏，请和我共享收益.别忘了给我一份免费的游戏拷贝.
    
55.   
    
56.   在标题部分还写有帮助编写此脚本的人，如果要使用本脚本于商业游戏，记得也给他们
    
57.   发一个免费的游戏拷贝 ;)
    
58.   
    
59. =end
    
60. #==============================================================================
    
61. # 设定 :
    
62. #==============================================================================
    
63. module Theo
    
64.   module AntiLag
    
65.    
    
66.   #=============================================================================
    
67.   # *) 普通优化
    
68.   #-----------------------------------------------------------------------------
    
69.   # 较为普通的优化方式，在地图中的总事件数为200 - 300之间时效果明显.
    
70.   #=============================================================================
    
71.   
    
72.   #-----------------------------------------------------------------------------
    
73.     Optimize_XY     = true
    
74.   #-----------------------------------------------------------------------------
    
75.   # 默认下，检查事件位置会检查同一地图中的全部事件的位置。如果你要检查事件的x,y
    
76.   # 坐标，系统会确认全部事件是否匹配。启用此优化后，全部事件会登记到某一个table上。
    
77.   # 检查时不会检查全部地图的事件，而是会检查某一个table内的事件。
    
78.   #
    
79.   # 建议将此优化设定为 true. 注意，此优化可能与“按像素移动”的脚本不兼容，
    
80.   # 因为其使用的是新的碰撞接触系统，而不是默认的图块网格.
    
81.   #-----------------------------------------------------------------------------
    
82.   
    
83.   #-----------------------------------------------------------------------------
    
84.     Optimize_Event  = true
    
85.   #-----------------------------------------------------------------------------
    
86.   # 默认下，如果系统引擎想要检查是否有事件被触发，其会检查地图中的全部事件。
    
87.   # 且每一帧都会检查。如果你在地图中设定了200个事件，则每秒会检查60 x 200次.
    
88.   #
    
89.   # 启用此优化后，如果某事件被触发，其会登记到一个记录列表中。
    
90.   # 之后引擎只会在这个记录列表中检查是否有事件被触发，而不会检查地图中的全部事件。
    
91.   #-----------------------------------------------------------------------------
    
92.   
    
93.   #-----------------------------------------------------------------------------
    
94.     Optimize_Sprite = true
    
95.   #-----------------------------------------------------------------------------
    
96.   # 默认下，系统引擎会更新画面外的全部精灵。有时，不必要的画面外更新会浪费时间. By
    
97.   # 启用此优化后，将会无视画面外精灵的更新。
    
98.   #-----------------------------------------------------------------------------
    
99.    
    
100.   #=============================================================================
     
101.   # *) 终极优化
     
102.   #-----------------------------------------------------------------------------
     
103.   # 此优化可以解决在同一地图中事件数大于230时发生卡顿的问题。
     
104.   # 使用了一些像按table搜索和随时处理任何不必要精灵的方式。
     
105.   #=============================================================================
     
106.    
     
107.   #-----------------------------------------------------------------------------
     
108.     Table_Limit_Search = 230
     
109.   #-----------------------------------------------------------------------------
     
110.   # 按Table搜索是一种从地图table中拾取事件来读取的自定义算法。
     
111.   # 区别于迭代所有事件并检查它们是否在画面中，此优化方式会先检查事件是否处于
     
112.   # 玩家可见的地图table中。所以，离玩家画面很远的事件不会被更新。
     
113.   # 但是，所并行处理和自动执行的事件，和事件中的移动路线设定仍然会正常更新。
     
114.   #
     
115.   # 当地图中的总事件数超过限制，脚本会使用table搜索的算法。当事件数为999 ，或
     
116.   # 10.000 时你就不用担心了.
     
117.   #
     
118.   # Table搜索需要将 Optimize_XY 设定为 true.
     
119.   #
     
120.   # 如果你不想使用table搜索的算法，将其设定为nil即可.
     
121.   #-----------------------------------------------------------------------------
     
122.   
     
123.   #-----------------------------------------------------------------------------
     
124.     Table_Range_Search = 2
     
125.   #-----------------------------------------------------------------------------
     
126.   # 确定table搜索会检查的范围. 设定为 3 则意为会更新到画面外3图块的区域。
     
127.   #
     
128.   # 注意，范围大小会影响游戏表现效果。
     
129.   # 建议设定为 2 - 4
     
130.   #-----------------------------------------------------------------------------
     
131.   
     
132.   #-----------------------------------------------------------------------------
     
133.     Dispose_Sprite  = true
     
134.   #-----------------------------------------------------------------------------
     
135.   # 有时，限制事件的更新远远不够。精灵对象也是个游戏表现杀手。
     
136.   # 无视画面外精灵会击打提升游戏顺畅度。此优化仅在启用table搜索时有效。
     
137.   #
     
138.   # 即时无视精灵有时会出现一些问题，可以设定为false来禁用此功能.
     
139.   #-----------------------------------------------------------------------------
     
140.   
     
141.   #-----------------------------------------------------------------------------
     
142.     PageCheck_Enchancer = true
     
143.   #-----------------------------------------------------------------------------
     
144.   # 在同一地图中存在事件页有20页的事件，且有一大堆并行处理改变变量或开关时，你会
     
145.   # 见到明显的卡顿。
     
146.   #
     
147.   # 此优化仅会刷新画面内事件的事件页。
     
148.   # 刷新地图外的事件有时是愚蠢的，因为就算是画面内，玩家也永远都不会知道暗中发生
     
149.   # 了什么。
     
150.   #
     
151.   # 可是，此优化可能会毁了某些系统，其仅为实验性功能。
     
152.   #-----------------------------------------------------------------------------
     
153.   
     
154.   end
     
155. end
     
156. 
     
157. #===============================================================================
     
158. # *) 最后的注释 :
     
159. #-------------------------------------------------------------------------------
     
160. # 最后说一下，以上是我对优化游戏速度的一些考量。游戏表现效果受到各种因素的影响：
     
161. #
     
162. # - 你电脑的 CPU 速度
     
163. # - 你的笔记本电脑 / PC 的温度
     
164. # - 你的电脑的 CPU 功率
     
165. # - 任务数量
     
166. # - 别人的脚本
     
167. #
     
168. # 以前我都是在旧电脑中使用 RM . 当我换更高级的笔记本后，发现60FPS真的是很顺滑.
     
169. #
     
170. # 如果你的 CPU 太热了, 关掉你的笔记本/ PC 使其冷却.
     
171. # 因为风扇故障，有次我的笔记本过热了.玩我的游戏时仅10 FPS.
     
172. # 我使用了自己的防卡脚本，但是没有一个起作用，直到我发现原来是笔记本过热了。
     
173. #
     
174. # 节能模式也会影响游戏体验. 为了防止卡顿，你可以试着切换到高性能模式.
     
175. # 有一次我的朋友在节能模式下玩我的游戏，才得 15 FPS.
     
176. #
     
177. # 一次性执行多个进程，在RM游戏中也会出现一些卡顿。
     
178. # 类似于画面在一段时间内不更新。
     
179. #
     
180. # 一些不完备的脚本也可能会影响显示效果。本防卡脚本仅在使用默认脚本的情况下进行
     
181. # 测试。
     
182. #
     
183. #-------------------------------------------------------------------------------
     
184. # *) 以下部分，除非你会写脚本，否则请勿改动。
     
185. #===============================================================================
     
186. 
     
187. #===============================================================================
     
188. # ** MapTable
     
189. #-------------------------------------------------------------------------------
     
190. #  This class used to register the event into 2D table to increase performance
     
191. #===============================================================================
     
192. 
     
193. class MapTable
     
194.   #-----------------------------------------------------------------------------
     
195.   # * Initialize
     
196.   #-----------------------------------------------------------------------------
     
197.   def initialize
     
198.     @table = []
     
199.     ($game_map.width + 1).times do |x|
     
200.       @table[x] = []
     
201.       ($game_map.height + 1).times do |y|
     
202.         @table[x][y] = []
     
203.       end
     
204.     end
     
205.   end
     
206.   #-----------------------------------------------------------------------------
     
207.   # * Set value
     
208.   #-----------------------------------------------------------------------------
     
209.   def set(x,y,val)
     
210.     @table[x][y] << val
     
211.   end
     
212.   #-----------------------------------------------------------------------------
     
213.   # * Get array
     
214.   #-----------------------------------------------------------------------------
     
215.   def get(x,y)
     
216.     @table[x][y]
     
217.   end
     
218.   
     
219. end
     
220. 
     
221. #===============================================================================
     
222. # ** Array
     
223. #===============================================================================
     
224. 
     
225. class Array
     
226.   
     
227.   # Just a fool proof
     
228.   def values
     
229.     return self
     
230.   end
     
231.   
     
232. end
     
233. 
     
234. #===============================================================================
     
235. # ** Game_Map
     
236. #===============================================================================
     
237. 
     
238. class Game_Map
     
239.   #-----------------------------------------------------------------------------
     
240.   # * Public attributes
     
241.   #-----------------------------------------------------------------------------
     
242.   attr_accessor :event_redirect     # Redirect events
     
243.   attr_reader :forced_update_events # To keep force move route updated
     
244.   attr_reader :keep_update_events   # To keep parallel process updated
     
245.   attr_reader :cached_events        # To store event that need to be updated
     
246.   attr_reader :starting_events      # To store activated event
     
247.   attr_reader :table                # 2D Map table
     
248.   #-----------------------------------------------------------------------------
     
249.   # * Constant
     
250.   #-----------------------------------------------------------------------------
     
251.   EVENT_LIMIT = Theo::AntiLag::Table_Limit_Search
     
252.   RANGE = Theo::AntiLag::Table_Range_Search
     
253.   #-----------------------------------------------------------------------------
     
254.   # * Alias method : Setup Events
     
255.   #-----------------------------------------------------------------------------
     
256.   alias theo_antilag_setup_events setup_events
     
257.   def setup_events
     
258.     @table = MapTable.new
     
259.     @forced_update_events = []
     
260.     @keep_update_events = []
     
261.     @starting_events = []
     
262.     @refreshed_events = []
     
263.     theo_antilag_setup_events
     
264.     select_on_screen_events
     
265.   end
     
266.   #-----------------------------------------------------------------------------
     
267.   # * Overwrite method : Events
     
268.   #-----------------------------------------------------------------------------
     
269.   def events
     
270.     @event_redirect ? @cached_events : @events
     
271.   end
     
272. #///////////////////////////////////////////////////////////////////////////////
     
273.   if Theo::AntiLag::Optimize_XY
     
274. #///////////////////////////////////////////////////////////////////////////////
     
275.   #-----------------------------------------------------------------------------
     
276.   # * Overwrite method : Event XY
     
277.   #-----------------------------------------------------------------------------
     
278.   def events_xy(x, y)
     
279.     @table.get(x,y) || []
     
280.   end
     
281.   #-----------------------------------------------------------------------------
     
282.   # * Overwrite method : Event XY nt
     
283.   #-----------------------------------------------------------------------------
     
284.   def events_xy_nt(x, y)
     
285.     @table.get(x,y).select do |event|
     
286.       event.pos_nt?(x, y)
     
287.     end
     
288.   end
     
289. #///////////////////////////////////////////////////////////////////////////////
     
290.   end
     
291. #///////////////////////////////////////////////////////////////////////////////
     
292.   if Theo::AntiLag::Optimize_Event
     
293. #///////////////////////////////////////////////////////////////////////////////
     
294.   #-----------------------------------------------------------------------------
     
295.   # * Overwrite method : Setup starting event
     
296.   #-----------------------------------------------------------------------------
     
297.   def setup_starting_map_event
     
298.     event = @starting_events[0]
     
299.     event.clear_starting_flag if event
     
300.     @interpreter.setup(event.list, event.id) if event
     
301.     event
     
302.   end
     
303.   #-----------------------------------------------------------------------------
     
304.   # * Overwrite method : Any event starting?
     
305.   #-----------------------------------------------------------------------------
     
306.   def any_event_starting?
     
307.     !@starting_events.empty?
     
308.   end
     
309. #///////////////////////////////////////////////////////////////////////////////
     
310.   end
     
311. #///////////////////////////////////////////////////////////////////////////////
     
312.   #-----------------------------------------------------------------------------
     
313.   # * Overwrite method : Refresh
     
314.   #-----------------------------------------------------------------------------
     
315.   def refresh
     
316.     return table_refresh if table_update? && Theo::AntiLag::PageCheck_Enchancer
     
317.     @events.each_value {|event| next if event.never_refresh; event.refresh }
     
318.     @common_events.each {|event| event.refresh }
     
319.     refresh_tile_events
     
320.     @need_refresh = false
     
321.   end
     
322.   #-----------------------------------------------------------------------------
     
323.   # * New method : Refresh event by table search
     
324.   #-----------------------------------------------------------------------------
     
325.   def table_refresh
     
326.     @refreshed_events = []
     
327.     @tile_events = []
     
328.     @common_events.each {|event| event.refresh }
     
329.     @need_refresh = false
     
330.   end
     
331.   #-----------------------------------------------------------------------------
     
332.   # * Overwrite method : Update events
     
333.   #-----------------------------------------------------------------------------
     
334.   def update_events
     
335.     last_events = (@cached_events.dup rescue @events.values)
     
336.     select_on_screen_events
     
337.     events = @cached_events | @keep_update_events | @forced_update_events
     
338.     if Theo::AntiLag::Dispose_Sprite
     
339.       offscreen_events = last_events - events
     
340.       offscreen_events.each {|event| event.delete_sprite}
     
341.     end
     
342.     events.each {|event| event.update}
     
343.     @common_events.each {|event| event.update}
     
344.   end
     
345.   #-----------------------------------------------------------------------------
     
346.   # * New method : Select on screen events
     
347.   #-----------------------------------------------------------------------------
     
348.   def select_on_screen_events
     
349.     unless table_update?
     
350.       @cached_events = @events.values
     
351.       return
     
352.     end
     
353.     #---------------------------------------------------------------------------
     
354.     # * Table search algorithm
     
355.     #---------------------------------------------------------------------------
     
356.     new_dpx = display_x.to_i
     
357.     new_dpy = display_y.to_i
     
358.     dpx = loop_horizontal? ? new_dpx - RANGE : [new_dpx - RANGE, 0].max
     
359.     dpy = loop_vertical? ? new_dpy - RANGE : [new_dpy - RANGE, 0].max
     
360.     sw = (Graphics.width >> 5) + RANGE * 2
     
361.     sh = (Graphics.height >> 5) + RANGE * 2
     
362.     @cached_events = []
     
363.     sw.times do |x|
     
364.       sh.times do |y|
     
365.         xpos = loop_horizontal? ? (x + dpx) % width : x + dpx
     
366.         ypos = loop_vertical? ? (y + dpy) % height : y + dpy
     
367.         next if xpos >= width || ypos >= height
     
368.         ary = @table.get(xpos, ypos)
     
369.         ary.each do |ev|
     
370.           unless @refreshed_events.include?(ev.id)
     
371.             ev.refresh
     
372.             @tile_events << ev if ev.tile?
     
373.             @refreshed_events << ev.id
     
374.           end
     
375.         end if Theo::AntiLag::PageCheck_Enchancer
     
376.         @cached_events += ary
     
377.       end
     
378.     end
     
379.     @cached_events.uniq!
     
380.   end
     
381.   #-----------------------------------------------------------------------------
     
382.   # * Check if table search need to be performed or not
     
383.   #-----------------------------------------------------------------------------
     
384.   def table_update?
     
385.     EVENT_LIMIT && @events.size > EVENT_LIMIT && Theo::AntiLag::Optimize_XY
     
386.   end
     
387.   
     
388. end
     
389. 
     
390. #===============================================================================
     
391. # ** Game_Temp
     
392. #===============================================================================
     
393. 
     
394. class Game_Temp
     
395.   attr_reader :event_sprites
     
396.   #-----------------------------------------------------------------------------
     
397.   # * Alias method : Initialize
     
398.   #-----------------------------------------------------------------------------
     
399.   alias theo_antilag_init initialize
     
400.   def initialize
     
401.     theo_antilag_init
     
402.     @event_sprites = {}
     
403.   end
     
404.   
     
405. end
     
406. 
     
407. #===============================================================================
     
408. # ** Game_CharacterBase
     
409. #===============================================================================
     
410. 
     
411. class Game_CharacterBase
     
412.   #-----------------------------------------------------------------------------
     
413.   # * Empty method : Sprite
     
414.   #-----------------------------------------------------------------------------
     
415.   def sprite
     
416.     return nil
     
417.   end
     
418.   #-----------------------------------------------------------------------------
     
419.   # * Empty method : Sprite =
     
420.   #-----------------------------------------------------------------------------
     
421.   def sprite=(spr)
     
422.   end
     
423.   
     
424. end
     
425. 
     
426. #===============================================================================
     
427. # ** Game_Event
     
428. #===============================================================================
     
429. 
     
430. class Game_Event
     
431.   #-----------------------------------------------------------------------------
     
432.   # * Never refesh flag
     
433.   #-----------------------------------------------------------------------------
     
434.   attr_reader :never_refresh
     
435.   #-----------------------------------------------------------------------------
     
436.   # * Alias method : Initialize
     
437.   #-----------------------------------------------------------------------------
     
438.   alias theo_antilag_init initialize
     
439.   def initialize(map_id, event)
     
440.     theo_antilag_init(map_id, event)
     
441.     $game_map.table.set(x,y,self)
     
442.     @last_x = @x
     
443.     @last_y = @y
     
444.   end
     
445.   #-----------------------------------------------------------------------------
     
446.   # * Alias method : Update
     
447.   #-----------------------------------------------------------------------------
     
448.   alias theo_antilag_update update
     
449.   def update
     
450.     if (sprite && sprite.disposed?) || sprite.nil?
     
451.       spriteset = SceneManager.scene.spriteset
     
452.       return unless spriteset
     
453.       spriteset.add_sprite(self)
     
454.     end
     
455.     theo_antilag_update
     
456.     if Theo::AntiLag::Optimize_XY && (@last_x != @x || @last_y != @y)
     
457.       $game_map.table.get(@last_x, @last_y).delete(self)
     
458.       $game_map.table.set(@x,@y,self)
     
459.       @last_x = @x
     
460.       @last_y = @y
     
461.     end
     
462.   end
     
463.   #-----------------------------------------------------------------------------
     
464.   # * Alias method : Start
     
465.   #-----------------------------------------------------------------------------
     
466.   alias theo_antilag_start start
     
467.   def start
     
468.     theo_antilag_start
     
469.     return unless Theo::AntiLag::Optimize_Event
     
470.     $game_map.starting_events << self if @starting
     
471.   end
     
472.   #-----------------------------------------------------------------------------
     
473.   # * Alias method : Clear starting flag
     
474.   #-----------------------------------------------------------------------------
     
475.   alias theo_antilag_clear_start clear_starting_flag
     
476.   def clear_starting_flag
     
477.     theo_antilag_clear_start
     
478.     return unless Theo::AntiLag::Optimize_Event
     
479.     $game_map.starting_events.delete(self)
     
480.   end
     
481.   #-----------------------------------------------------------------------------
     
482.   # * Alias method : Setup page setting
     
483.   #-----------------------------------------------------------------------------
     
484.   alias theo_antilag_setup_page_settings setup_page_settings
     
485.   def setup_page_settings
     
486.     theo_antilag_setup_page_settings
     
487.     if @event.pages.size == 1 && no_condition?(@event.pages[0].condition)
     
488.       @never_refresh = true
     
489.     end
     
490.     if @trigger == 3 || @interpreter
     
491.       $game_map.keep_update_events << self
     
492.       $game_map.keep_update_events.uniq!
     
493.     else
     
494.       $game_map.keep_update_events.delete(self)
     
495.     end
     
496.   end
     
497.   #-----------------------------------------------------------------------------
     
498.   # * Check if the events has no page condition
     
499.   #-----------------------------------------------------------------------------
     
500.   def no_condition?(page)
     
501.     !page.switch1_valid && !page.switch2_valid && !page.variable_valid &&
     
502.       !page.self_switch_valid && !page.item_valid && !page.actor_valid
     
503.   end
     
504.   #-----------------------------------------------------------------------------
     
505.   # * Delete sprite
     
506.   #-----------------------------------------------------------------------------
     
507.   def delete_sprite
     
508.     sprset = SceneManager.scene.spriteset
     
509.     return unless sprset
     
510.     SceneManager.scene.spriteset.delete_sprite(sprite)
     
511.   end
     
512.   #-----------------------------------------------------------------------------
     
513.   # * Overwrite method : Force move route
     
514.   #-----------------------------------------------------------------------------
     
515.   def force_move_route(move_route)
     
516.     super
     
517.     $game_map.forced_update_events << self
     
518.     $game_map.forced_update_events.uniq!
     
519.   end
     
520.   #-----------------------------------------------------------------------------
     
521.   # * Overwrite method : Restore move route
     
522.   #-----------------------------------------------------------------------------
     
523.   def restore_move_route
     
524.     super
     
525.     $game_map.forced_update_events.delete(self)
     
526.   end
     
527.   #-----------------------------------------------------------------------------
     
528.   # * Overwrite method : Sprite
     
529.   #-----------------------------------------------------------------------------
     
530.   def sprite
     
531.     $game_temp.event_sprites[@id]
     
532.   end
     
533.   #-----------------------------------------------------------------------------
     
534.   # * Overwrite method : Sprite =
     
535.   #-----------------------------------------------------------------------------
     
536.   def sprite=(spr)
     
537.     $game_temp.event_sprites[@id] = spr
     
538.   end
     
539.   
     
540. end
     
541. 
     
542. #===============================================================================
     
543. # ** Sprite Character
     
544. #===============================================================================
     
545. 
     
546. class Sprite_Character
     
547.   #-----------------------------------------------------------------------------
     
548.   # * Alias method : Initialize
     
549.   #-----------------------------------------------------------------------------
     
550.   alias theo_antilag_init initialize
     
551.   def initialize(viewport, character = nil)
     
552.     character.sprite = self if character
     
553.     theo_antilag_init(viewport, character)
     
554.   end
     
555.   #-----------------------------------------------------------------------------
     
556.   # * Alias method : Update
     
557.   #-----------------------------------------------------------------------------
     
558.   alias theo_antilag_update update
     
559.   def update
     
560.     @sx = @character.screen_x
     
561.     @sy = @character.screen_y
     
562.     if Theo::AntiLag::Optimize_Sprite && !need_update?
     
563.       self.visible = false
     
564.       return
     
565.     end  
     
566.     theo_antilag_update
     
567.   end
     
568.   #-----------------------------------------------------------------------------
     
569.   # * New method : Determine if on screen
     
570.   #-----------------------------------------------------------------------------
     
571.   def need_update?
     
572.     return true if graphic_changed?
     
573.     return true if @character.animation_id > 0
     
574.     return true if @balloon_sprite
     
575.     return true if @character.balloon_id != 0
     
576.     w = Graphics.width
     
577.     h = Graphics.height
     
578.     cw = @cw || 32
     
579.     ch = @ch || 32
     
580.     @sx.between?(-cw,w+cw) && @sy.between?(0,h+ch)
     
581.   end
     
582.   #-----------------------------------------------------------------------------
     
583.   # * Overwrite update position.
     
584.   # To limit screen_x and screen_y to be called many times
     
585.   #-----------------------------------------------------------------------------
     
586.   def update_position
     
587.     move_animation(@sx - x, @sy - y)
     
588.     self.x = @sx
     
589.     self.y = @sy
     
590.     self.z = @character.screen_z
     
591.   end
     
592.   #-----------------------------------------------------------------------------
     
593.   # * Overwrite animation origin
     
594.   # Since X and Y axis of sprite is not updated when off screen
     
595.   #-----------------------------------------------------------------------------
     
596.   def set_animation_origin
     
597.     if @animation.position == 3
     
598.       if viewport == nil
     
599.         @ani_ox = Graphics.width / 2
     
600.         @ani_oy = Graphics.height / 2
     
601.       else
     
602.         @ani_ox = viewport.rect.width / 2
     
603.         @ani_oy = viewport.rect.height / 2
     
604.       end
     
605.     else
     
606.       @ani_ox = @sx - ox + width / 2
     
607.       @ani_oy = @sy - oy + height / 2
     
608.       if @animation.position == 0
     
609.         @ani_oy -= height / 2
     
610.       elsif @animation.position == 2
     
611.         @ani_oy += height / 2
     
612.       end
     
613.     end
     
614.   end
     
615.   
     
616. end
     
617. 
     
618. #===============================================================================
     
619. # ** Spriteset_Map
     
620. #===============================================================================
     
621. 
     
622. class Spriteset_Map
     
623.   #-----------------------------------------------------------------------------
     
624.   # * Alias method : create character
     
625.   #-----------------------------------------------------------------------------
     
626.   alias theo_antilag_create_characters create_characters
     
627.   def create_characters
     
628.     $game_map.event_redirect = Theo::AntiLag::Dispose_Sprite
     
629.     theo_antilag_create_characters
     
630.     $game_map.event_redirect = false
     
631.   end
     
632.   #-----------------------------------------------------------------------------
     
633.   # * New method : delete sprite
     
634.   #-----------------------------------------------------------------------------
     
635.   def delete_sprite(spr)
     
636.     return unless spr
     
637.     return if spr.disposed?
     
638.     @character_sprites.delete(spr)
     
639.     spr.dispose
     
640.   end
     
641.   #-----------------------------------------------------------------------------
     
642.   # * New method : add sprite
     
643.   #-----------------------------------------------------------------------------
     
644.   def add_sprite(char)
     
645.     spr = Sprite_Character.new(@viewport1, char)
     
646.     @character_sprites.push(spr)
     
647.   end
     
648.   
     
649. end
     
650. 
     
651. #===============================================================================
     
652. # ** Scene_Base
     
653. #===============================================================================
     
654. 
     
655. class Scene_Base
     
656.   attr_reader :spriteset
     
657. end

复制代码

alexncf125

https://rpg.blue/thread-350955-1-1.html
把这个脚本插入到Theo的脚本之上

宝开君

alexncf125 发表于 2025-3-24 16:41
https://rpg.blue/thread-350955-1-1.html
把这个脚本插入到Theo的脚本之上

新工程的确能跑了，但是本来的工程还是不行。。。估计是脚本冲突吧，总之谢谢大佬了。