#_________________________________________________
# MOG_Window Treasure Name V1.5
#_________________________________________________
# By Moghunter
#
http://www.atelier-rgss.com
#_________________________________________________
module MOG
#Font Name.
MPFONT = "Exocet"
#Fade ON/OFF (True - False).
MPITFD = true
#Fade Time.
MPITTM = 7
#Window Position.
# 0 = Upper.
# 1 = Left.
# 2 = Right.
# 3 = Lower.
MPITPS = 0
# Disable Window Switch.
MPITVIS = 5
# SE.
MPITSE = "056-Right02"
end
#_________________________________________________
$mogscript = {} if $mogscript == nil
$mogscript["mptreasure"] = true
#############
# Game_Temp #
#############
class Game_Temp
attr_accessor :fdittm
attr_accessor :mpit_x
attr_accessor :mpit_y
attr_accessor :it_id
attr_accessor :item_typ
attr_accessor :item_qua
alias mog25_initialize initialize
def initialize
mog25_initialize
@fdittm = 0
@it_id = 1
@wp_id = 1
@ar_id = 1
@item_typ = 0
@mpit_x = 0
@mpit_y = 0
@item_qua = 1
end
end
###############
# Interpreter #
###############
class Interpreter
alias mog25_command126 command_126
def command_126
mog25_command126
$game_temp.item_typ = 1
$game_temp.fdittm = 255 + 40 * MOG::MPITTM
$game_temp.it_id = @parameters[0]
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
$game_temp.item_qua = value
unless $game_switches[MOG::MPITVIS] == true
Audio.se_play("Audio/SE/" + MOG::MPITSE, 100,100) rescue nil
end
$ref = true
end
alias mog25_command127 command_127
def command_127
mog25_command127
$game_temp.item_typ = 2
$game_temp.fdittm = 255 + 40 * MOG::MPITTM
$game_temp.it_id = @parameters[0]
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
$game_temp.item_qua = value
unless $game_switches[MOG::MPITVIS] == true
Audio.se_play("Audio/SE/" + MOG::MPITSE, 100,100) rescue nil
end
$ref = true
end
alias mog25_command128 command_128
def command_128
mog25_command128
$game_temp.item_typ = 3
$game_temp.fdittm = 255 + 40 * MOG::MPITTM
$game_temp.it_id = @parameters[0]
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
$game_temp.item_qua = value
unless $game_switches[MOG::MPITVIS] == true
Audio.se_play("Audio/SE/" + MOG::MPITSE, 100,100) rescue nil
end
$ref = true
end
end
############
# Game_Map #
############
class Game_Map
attr_reader :map_id
def mpitnm
$mpitnm = load_data("Data/Items.rxdata")
$mpitnm[$game_temp.it_id].name
end
def mpwpnm
$mpwpnm = load_data("Data/Weapons.rxdata")
$mpwpnm[$game_temp.it_id].name
end
def mparnm
$mparnm = load_data("Data/Armors.rxdata")
$mparnm[$game_temp.it_id].name
end
end
###############
# Window Base #
###############
class Window_Base < Window
def nd_itpic
mapic = RPG::Cache.picture("")
end
def draw_mpitem(x,y)
mapic = RPG::Cache.picture("Itname") rescue nd_itpic
cw = mapic.width
ch = mapic.height
src_rect = Rect.new(0, 0, cw, ch)
self.contents.blt(x , y - ch + 65, mapic, src_rect)
self.contents.font.name = MOG::MPFONT
self.contents.font.size = 22
if $game_temp.item_typ == 1
self.contents.font.color = Color.new(0,0,0,255)
self.contents.draw_text(x - 19, y + 19, 110, 32, $game_temp.item_qua.to_s + "X",1)
self.contents.draw_text(x + 80, y + 29, 110, 32, $game_map.mpitnm.to_s,1)
self.contents.font.color = Color.new(255,255,255,255)
self.contents.draw_text(x - 20, y + 18, 110, 32, $game_temp.item_qua.to_s + "X",1)
self.contents.draw_text(x + 81, y + 30, 110, 32, $game_map.mpitnm.to_s,1)
icon_name = $data_items[$game_temp.it_id].icon_name
icon_pic = RPG::Cache.icon(icon_name.to_s)
self.contents.blt(x + 55, y + 34, icon_pic, Rect.new(0, 0, 24, 24), 255)
elsif $game_temp.item_typ == 2
self.contents.font.color = Color.new(0,0,0,255)
self.contents.draw_text(x - 19, y + 19, 110, 32, $game_temp.item_qua.to_s + "X",1)
self.contents.draw_text(x + 80, y + 30, 110, 32, $game_map.mpwpnm.to_s,1)
self.contents.font.color = Color.new(255,255,255,255)
self.contents.draw_text(x + 81, y + 29, 110, 32, $game_map.mpwpnm.to_s,1)
self.contents.draw_text(x - 20, y + 18, 110, 32, $game_temp.item_qua.to_s + "X",1)
icon_name = $data_weapons[$game_temp.it_id].icon_name
icon_pic = RPG::Cache.icon(icon_name.to_s)
self.contents.blt(x + 55, y + 34, icon_pic, Rect.new(0, 0, 24, 24), 255)
elsif $game_temp.item_typ == 3
self.contents.font.color = Color.new(0,0,0,255)
self.contents.draw_text(x + 80, y + 30, 110, 32, $game_map.mparnm.to_s,1)
self.contents.draw_text(x - 19, y + 19, 110, 32, $game_temp.item_qua.to_s + "X",1)
self.contents.font.color = Color.new(255,255,255,255)
self.contents.draw_text(x + 81, y + 29, 110, 32, $game_map.mparnm.to_s,1)
self.contents.draw_text(x - 20, y + 18, 110, 32, $game_temp.item_qua.to_s + "X",1)
icon_name = $data_armors[$game_temp.it_id].icon_name
icon_pic = RPG::Cache.icon(icon_name.to_s)
self.contents.blt(x + 55, y + 34, icon_pic, Rect.new(0, 0, 24, 24), 255)
else
end
end
end
##########
# Mpitem #
##########
class Mpitem < Window_Base
def initialize
super($game_temp.mpit_x, $game_temp.mpit_y, 250, 100)
self.contents = Bitmap.new(width - 32, height - 32)
self.opacity = 0
refresh
end
def refresh
self.contents.clear
draw_mpitem(10,0)
end
end
#############
# Scene_Map #
#############
class Scene_Map
alias mog25_main main
def main
@mpit = Mpitem.new
if $game_switches[MOG::MPITVIS] == true
@mpit.visible = false
else
@mpit.visible = true
end
@mpit.contents_opacity = $game_temp.fdittm
mog25_main
@mpit.dispose
end
alias mog25_update update
def update
mog25_update
if $ref == true
@mpit.refresh
if MOG::MPITPS == 0
@mpit.x = 200
@mpit.y = -150
elsif MOG::MPITPS == 1
@mpit.x = -240
@mpit.y = 200
elsif MOG::MPITPS == 2
@mpit.x = 640
@mpit.y = 200
else
@mpit.x = 200
@mpit.y = 480
end
$ref = false
end
if $game_switches[MOG::MPITVIS] == true or $game_temp.fdittm <= 0
@mpit.visible = false
else
@mpit.visible = true
end
$game_temp.mpit_x = @mpit.x
$game_temp.mpit_y = @mpit.y
if MOG::MPITPS == 0
if @mpit.y < 0
@mpit.y += 8
elsif @mpit.x >= 0
@mpit.y = 0
end
elsif MOG::MPITPS == 1
if @mpit.x < 0
@mpit.x += 10
elsif @mpit.x >= 0
@mpit.x = 0
end
elsif MOG::MPITPS == 2
if @mpit.x > 400
@mpit.x -= 10
elsif @mpit.x >= 400
@mpit.x = 400
end
else
if @mpit.y > 380
@mpit.y -= 8
elsif @mpit.y >= 380
@mpit.y = 380
end
end
@mpit.contents_opacity = $game_temp.fdittm
if MOG::MPITFD == true
$game_temp.fdittm -= 3 if $game_temp.fdittm > 0
end
end
end