"Разлом" карты

=begin Скрипт перемещения с анимацией "деления карты на четыре части" Автор: Cerberus =end module Division @map_bitmap = nil @trans_sprite = nil @trans_viewport = nil @turn = -1 @tr_rect = Rect.new @black = Color.new(0, 0, 0, 255) @divided = false def self.start @map_bitmap = Graphics.snap_to_bitmap @trans_viewport = Viewport.new(0, 0, 544, 416) @trans_sprite = Sprite.new(@trans_viewport) @turn = 52 @trans_sprite.bitmap = Bitmap.new(544, 416) @trans_sprite.bitmap.blt(0, 0, @map_bitmap, @tr_rect); @trans_sprite.x = 0 @trans_sprite.y = 0 @trans_sprite.z = 1000 @trans_viewport.z = 1000 @trans_sprite.visible = true @trans_viewport.visible = true end def self.turn @turn end def self.divided @divided end def self.divided= (val) @divided=val end def self.update print "Updating division... ", @turn, " " stop if (turn==0) shift if (turn>0) end def self.shift print "Shifting... " @tr_rect.set(@trans_viewport.rect.width / 2 - 4, 0, 8, @trans_viewport.rect.height) @map_bitmap.fill_rect(@tr_rect, @black); @tr_rect.set(0, @trans_viewport.rect.height / 2 - 4, @trans_viewport.rect.width, 8) @map_bitmap.fill_rect(@tr_rect, @black); @tr_rect.set(4, 4, @trans_viewport.rect.width / 2 - 4, @trans_viewport.rect.height / 2 - 4) @map_bitmap.blt(0, 0, @trans_sprite.bitmap, @tr_rect) @tr_rect.set(@trans_viewport.rect.width / 2, 4, @trans_viewport.rect.width / 2 - 4, @trans_viewport.rect.height / 2 - 4) @map_bitmap.blt(@trans_viewport.rect.width / 2 + 4, 0, @trans_sprite.bitmap, @tr_rect) @tr_rect.set(4, @trans_viewport.rect.height / 2, @trans_viewport.rect.width / 2 - 4, @trans_viewport.rect.height / 2 - 4) @map_bitmap.blt(0, @trans_viewport.rect.height / 2 + 4, @trans_sprite.bitmap, @tr_rect) @tr_rect.set(@trans_viewport.rect.width / 2, @trans_viewport.rect.height / 2, @trans_viewport.rect.width / 2 - 4, @trans_viewport.rect.height / 2 - 4) @map_bitmap.blt(@trans_viewport.rect.width / 2 + 4, @trans_viewport.rect.height / 2 + 4, @trans_sprite.bitmap, @tr_rect) @tr_rect.set(0, 0, @trans_viewport.rect.width, @trans_viewport.rect.height) @trans_sprite.bitmap.blt(0, 0, @map_bitmap, @tr_rect) @turn-=1 end def self.stop @turn = -1 @divided = true end def self.dispose @map_bitmap.dispose @trans_sprite.bitmap.dispose @trans_sprite.dispose @trans_viewport.dispose @divided = false end end class Scene_Base alias divis_update update def update if Division.turn>=0 Division.update print "Divis.upd ", Division.turn, "\n" end divis_update end end class Game_Interpreter def run wait_for_message while @list[@index] do Fiber.yield while Division.turn>=0 execute_command @index += 1 end Fiber.yield @fiber = nil end alias divis_fadeout command_221 def command_221 if Division.divided screen.start_fadeout (1) Division.dispose else divis_fadeout end end end class Scene_Map < Scene_Base alias divis_pre_transfer pre_transfer def pre_transfer if Division.divided @map_name_window.close Graphics.brightness = 0 $game_temp.fade_type = 0 Division.dispose else divis_pre_transfer end end end