Multiple Treasure Info



Fitur

  • Screenshot menjelaskan semuanya


Screenshots


http://www.imagebam.com/image/c9aac6135845551
kalo ga kelihatan Open new tab aja...


Scripts

Code:
#==============================================================================#
# Multi Treasure Info                                                          #
# By LiTTleDRAgo                                                              #
#==============================================================================#

module DRG_TREASURE_INFO
 
  MTI_HUD_X = -20
  MTI_HUD_Y = 420 - 100
  MTI_TIME = 1# 2
  WINDOW_PRIORITY_Z = 99999
  FONT = 'Monotype Corsiva'
  SIZE = 20 
  ACT_SE = 'Mana - Menu-01'
 
end

#==============================================================================
# ■ MTI
#==============================================================================
 class Mti < Sprite
  include DRG_TREASURE_INFO
 
#--------------------------------------------------------------------------
# ● Initialize
#--------------------------------------------------------------------------
  def initialize
    super
    init_text01
    init_text02
    init_text03
    init_text04
  end 
   
  def init_text01
    @text = Sprite.new
    @text.bitmap = Bitmap.new(120,40)
    @text.z = 2 + WINDOW_PRIORITY_Z
    @text.bitmap.font.name = FONT
    @text.bitmap.font.size = SIZE
    # @text.bitmap.font.color.set(250, 250, 250,220)
    @text.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text.zoom_x = $game_temp.mti_text_zoom_x
    @text.zoom_y = $game_temp.mti_text_zoom_y
    @text.opacity = $game_temp.mti_text_opa
  end
 
   
  def init_text02
    @text1 = Sprite.new
    @text1.bitmap = Bitmap.new(120,40)
    @text1.z = 2 + WINDOW_PRIORITY_Z
    @text1.bitmap.font.name = FONT
    @text1.bitmap.font.size = SIZE
    # @text1.bitmap.font.color.set(250, 250, 250,220)
    @text1.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text1.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text1.zoom_x = $game_temp.mti_text_zoom_x
    @text1.zoom_y = $game_temp.mti_text_zoom_y
    @text1.opacity = $game_temp.mti_text_opa
  end 
   
   
  def init_text03
    @text2 = Sprite.new
    @text2.bitmap = Bitmap.new(120,40)
    @text2.z = 2 + WINDOW_PRIORITY_Z
    @text2.bitmap.font.name = FONT
    @text2.bitmap.font.size = SIZE
    # @text2.bitmap.font.color.set(250, 250, 250,220)
    @text2.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text2.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text2.zoom_x = $game_temp.mti_text_zoom_x
    @text2.zoom_y = $game_temp.mti_text_zoom_y
    @text2.opacity = $game_temp.mti_text_opa
  end 
   
  def init_text04
    @text3 = Sprite.new
    @text3.bitmap = Bitmap.new(120,40)
    @text3.z = 2 + WINDOW_PRIORITY_Z
    @text3.bitmap.font.name = FONT
    @text3.bitmap.font.size = SIZE
  #  @text3.bitmap.font.color.set(250, 250, 250,220)
    @text3.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text3.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text3.zoom_x = $game_temp.mti_text_zoom_x
    @text3.zoom_y = $game_temp.mti_text_zoom_y
    @text3.opacity = $game_temp.mti_text_opa
  end 
 
#--------------------------------------------------------------------------
# ● Dispose
#--------------------------------------------------------------------------
  def dispose
    delete_text01
    delete_text02
    delete_text03
    delete_text04
    super 
  end
 
  def delete_text01
    @text.bitmap.dispose
    @text.dispose
  end
     
  def delete_text02
    @text1.bitmap.dispose
    @text1.dispose
  end
     
  def delete_text03
    @text2.bitmap.dispose
    @text2.dispose
  end
     
  def delete_text04
    @text3.bitmap.dispose
    @text3.dispose
  end
     
#--------------------------------------------------------------------------
# ● Update
#--------------------------------------------------------------------------
  def update
      super
      slide_update
      refresh if $game_temp.mti_start
  end
#--------------------------------------------------------------------------
# ● Refresh
#--------------------------------------------------------------------------
  def refresh
    $game_temp.mti_start = false
    @text_oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    if $game_temp.mti_text_acs == 0
      refresh_text01
    elsif $game_temp.mti_text_acs < 1
      refresh_text02
    elsif $game_temp.mti_text_acs < 2
      refresh_text03
    elsif $game_temp.mti_text_acs < 3
      refresh_text04
    elsif $game_temp.mti_text_acs < 4
      $game_temp.mti_text_acs = 0
      refresh
    end
  end
 
  def refresh_text01
    $game_temp.mti_text_acs += 1
    @text.bitmap.clear
    @text.opacity = 100
    @text.zoom_x = 1.50
    @text.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text.zoom_x = $game_temp.mti_text_zoom_x
    @text.zoom_y = $game_temp.mti_text_zoom_y
    @text.bitmap.draw_text(0, 0, 120, 40, $game_temp.mti_text.to_s,0)
    @text.visible = true
    @time1 = $game_temp.mti_text_time
    (@phase.nil? || @phase <= 0) ? @phase = 16 : @phase += 16
  end
   
  def refresh_text02
    $game_temp.mti_text_acs += 1
    @text1.bitmap.clear
    @text1.opacity = 100
    @text1.zoom_x = 1.50
    @text1.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text1.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text1.zoom_x = $game_temp.mti_text_zoom_x
    @text1.zoom_y = $game_temp.mti_text_zoom_y
    @text1.bitmap.draw_text(0, 0, 120, 40, $game_temp.mti_text.to_s,0)
    @text1.visible = true   
    @time2 = $game_temp.mti_text_time
    (@phase1.nil? || @phase1 <= 0) ? @phase1 = 16 : @phase1 += 16
  end
 
  def refresh_text03
    $game_temp.mti_text_acs += 1
    @text2.bitmap.clear
    @text2.opacity = 100
    @text2.zoom_x = 1.50
    @text2.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text2.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text2.zoom_x = $game_temp.mti_text_zoom_x
    @text2.zoom_y = $game_temp.mti_text_zoom_y
    @text2.bitmap.draw_text(0, 0, 120, 40, $game_temp.mti_text.to_s,0)
    @text2.visible = true
    @time3 = $game_temp.mti_text_time
    (@phase2.nil? || @phase2 <= 0) ? @phase2 = 16 : @phase2 += 16
  end
   
  def refresh_text04
    $game_temp.mti_text_acs += 1
    @text3.bitmap.clear
    @text3.opacity = 100
    @text3.zoom_x = 1.50
    @text3.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
    @text3.ox = -MTI_HUD_X - 50 + $game_temp.mti_text_x
    @text3.zoom_x = $game_temp.mti_text_zoom_x
    @text3.zoom_y = $game_temp.mti_text_zoom_y
    @text3.bitmap.draw_text(0, 0, 120, 40, $game_temp.mti_text.to_s,0)
    @text3.visible = true
    @time4 = $game_temp.mti_text_time
    (@phase3.nil? || @phase3 <= 0) ? @phase3 = 16 : @phase3 += 16
  end

#--------------------------------------------------------------------------
# ● Slide Update
#--------------------------------------------------------------------------
  def slide_update
    @time1 -= 1 if (!@time1.nil? && @time1 > 0)
    @time2 -= 1 if (!@time2.nil? && @time2 > 0)
    @time3 -= 1 if (!@time3.nil? && @time3 > 0)
    @time4 -= 1 if (!@time4.nil? && @time4 > 0)
    (!@time1.nil? && @time1 > 0) ? update_start_move1 : update_end_move1
    (!@time2.nil? && @time2 > 0) ? update_start_move2 : update_end_move2
    (!@time3.nil? && @time3 > 0) ? update_start_move3 : update_end_move3
    (!@time4.nil? && @time4 > 0) ? update_start_move4 : update_end_move4
  end
 
#--------------------------------------------------------------------------
# ● Update Start Move
#-------------------------------------------------------------------------- 
 def update_start_move1
    @text2.opacity -= 5 if @text2.opacity > 0
    return if @text.opacity >= 255
    if @phase > 0
      @phase -= 1
      @text.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
      @text1.oy += 1 #if @text1.oy < @text_oy+16
      @text2.oy += 1 #if @text2.oy < @text_oy+16*2
      @text3.oy += 1 #if @text3.oy < @text_oy+16*3
    end
    @text.opacity += 10
    if @text.zoom_x > 1.00
      @text.zoom_x -= 0.1
    elsif @text.zoom_x < 1.00
      @text.zoom_x = 1.00
      @text.zoom_y = 1.00
  end     
 end

  def update_start_move2
    @text3.opacity -= 5 if @text3.opacity > 0
    return if @text1.opacity >= 255
    if @phase1 > 0
      @phase1 -= 1
      @text1.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
      @text2.oy += 1# if @text2.oy < @text_oy+16
      @text3.oy += 1 #if @text3.oy < @text_oy+16*2
      @text.oy += 1  #if @text.oy < @text_oy+16*3
    end
    @text1.opacity += 10
    if @text1.zoom_x > 1.00
      @text1.zoom_x -= 0.1
    elsif @text1.zoom_x < 1.00
      @text1.zoom_x = 1.00
      @text1.zoom_y = 1.00
    end 
 end

  def update_start_move3
    @text.opacity -= 5 if @text.opacity > 0
    return if @text2.opacity >= 255 
    if @phase2 > 0
      @phase2 -= 1
      @text2.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
      @text3.oy += 1 # if @text3.oy < @text_oy+16
      @text.oy += 1  #if @text.oy < @text_oy+16*2
      @text1.oy += 1 #if @text1.oy < @text_oy+16*3

    end 
    @text2.opacity += 10
    if @text2.zoom_x > 1.00
      @text2.zoom_x -= 0.1
    elsif @text2.zoom_x < 1.00
      @text2.zoom_x = 1.00
      @text2.zoom_y = 1.00
    end
  end 
 
  def update_start_move4
    @text1.opacity -= 5 if @text1.opacity > 0
    return if @text3.opacity >= 255 
    if @phase3 > 0
      @phase3 -= 1
      @text3.oy = -MTI_HUD_Y + 5 + $game_temp.mti_text_y
      @text.oy += 1  #if @text.oy < @text_oy+16
      @text1.oy += 1 #if @text1.oy < @text_oy+16*2
      @text2.oy += 1 # if @text2.oy < @text_oy+16*3
    end 
    @text3.opacity += 10
    if @text3.zoom_x > 1.00
      @text3.zoom_x -= 0.1
    elsif @text3.zoom_x < 1.00
      @text3.zoom_x = 1.00
      @text3.zoom_y = 1.00
    end
  end 

#--------------------------------------------------------------------------
# ● Update End Move
#--------------------------------------------------------------------------
  def update_end_move1   
    if @text.opacity > 0
      @text.opacity -= 5
    else
      @text.visible = false
    end
  end
 
  def update_end_move2
    if @text1.opacity > 0
      @text1.opacity -= 5
    else
      @text1.visible = false
    end
  end
 
  def update_end_move3
    if @text2.opacity > 0
      @text2.opacity -= 5
    else
      @text2.visible = false
    end
  end
 
  def update_end_move4
    if @text3.opacity > 0
      @text3.opacity -= 5
    else
      @text3.visible = false
    end
  end
 
end


#===============================================================================
# ■ Interpreter
#===============================================================================
class Interpreter 
 
  #--------------------------------------------------------------------------
  # ● multi_treasure_info_popup(text)
  #-------------------------------------------------------------------------- 
  def multi_treasure_info_popup(text)
      $game_temp.mti_text = text
      $game_temp.mti_text_time = 40 * DRG_TREASURE_INFO::MTI_TIME
      $game_temp.mti_start = true     
  end

  def play_se_itm
      Audio.se_play("Audio/SE/" + DRG_TREASURE_INFO::ACT_SE , 70, 100) rescue nil
  end
   
  #--------------------------------------------------------------------------
  # ● Change Gold
  #--------------------------------------------------------------------------
  alias drgXp_command_125 command_125
  def command_125
      drgXp_command_125
      value = operate_value(@parameters[0], @parameters[1], @parameters[2])
      text = value.to_s + " " + $data_system.words.gold 
      multi_treasure_info_popup(text) if value > 0   
  end
 #--------------------------------------------------------------------------
 # ● Command_126 (ITEM)
 #--------------------------------------------------------------------------
 alias drgXp_item_command_126 command_126
 def command_126
    drgXp_item_command_126
    value = operate_value(@parameters[1], @parameters[2], @parameters[3]) 
    item_name = load_data("Data/Items.rxdata")
    text = value.to_s +  " x " + item_name[@parameters[0]].name
    multi_treasure_info_popup(text) if value > 0           
    play_se_itm if value > 0
 end
 #--------------------------------------------------------------------------
 # ● Command_127 (WEAPON)
 #--------------------------------------------------------------------------
 alias drgXp_item_command_127 command_127
 def command_127
    drgXp_item_command_127
    value = operate_value(@parameters[1], @parameters[2], @parameters[3]) 
    item_name = load_data("Data/Weapons.rxdata")
    text = value.to_s +  " x " + item_name[@parameters[0]].name
    multi_treasure_info_popup(text) if value > 0         
 end
   
 #--------------------------------------------------------------------------
 # ● Command_128 (ARMOR)
 #--------------------------------------------------------------------------
 alias drgXp_command_128 command_128
 def command_128
    drgXp_command_128
    value = operate_value(@parameters[1], @parameters[2], @parameters[3]) 
    item_name = load_data("Data/Armors.rxdata")
    text = value.to_s +  " x " + item_name[@parameters[0]].name
    multi_treasure_info_popup(text) if value > 0         
 end

end 

#==============================================================================
# ■ Scene_Map
#==============================================================================
class Scene_Map   
 
#--------------------------------------------------------------------------
# ● Main
#--------------------------------------------------------------------------
  alias drgXp_mti_main main
  def main 
    @mti = Mti.new
    drgXp_mti_main
    @mti.dispose
  end   
 
#--------------------------------------------------------------------------
# ● Update
#--------------------------------------------------------------------------
  alias drgXp_mti_update update
  def update
    drgXp_mti_update
    @mti.update
  end   
end 
#==============================================================================
# ■ Game_Temp
#==============================================================================
class Game_Temp 
    attr_accessor :mti_text_x
    attr_accessor :mti_text_y
    attr_accessor :mti_text_zoom_x
    attr_accessor :mti_text_zoom_y
    attr_accessor :mti_text_opa 
    attr_accessor :mti_text
    attr_accessor :mti_text_time
    attr_accessor :mti_text_acs
    attr_accessor :mti_start
   
#--------------------------------------------------------------------------
# ● Initialize
#--------------------------------------------------------------------------
 alias drgXp_if_initialize initialize
 def initialize   
  drgXp_if_initialize 
    @mti_text_x = 0
    @mti_text_y = 0
    @mti_text_zoom_x = 1.00
    @mti_text_zoom_y = 1.00
    @mti_text_opa = 0
    @mti_text = ""
    @mti_text_acs = 0
    @mti_text_time = 0
    @mti_start = false   
 end 
end

$drago_multi_treasure_info = true


Penulis : Irgi Kusuma ~ Sebuah blog yang menyediakan berbagai macam informasi

Artikel Multiple Treasure Info ini dipublish oleh Irgi Kusuma pada hari Minggu, 26 Februari 2012. Semoga artikel ini dapat bermanfaat.Terimakasih atas kunjungan Anda silahkan tinggalkan komentar.sudah ada 0 komentar: di postingan Multiple Treasure Info
 

0 komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)