日志

【脚本】分解道具

热度 8已有 2435 次阅读2016-1-25 09:04 |个人分类:脚本| 道具

这个脚本需要搭配我的基础脚本共同使用：http://rm.66rpg.com/home.php?mod=space&uid=291206&do=blog&id=13513

=begin

===============================================================================

分解道具 By喵呜喵5

===============================================================================

【说明】

将主角背包里面的武器，防具，道具分解成其他若干道具。

分解之后，原物品消失，分解后的物品会放入主角的背包中。

在对应物品的备注栏输入：

<分解所得 [1,3]>

则分解该物品可以随机获得 1~3 个的 1 号道具

在备注栏输入：

<分解所得 [1,3]>

<分解所得 [2,4]>

则分解该物品可以随机获得 1~3 个的 1 号道具和 1~4 个的 2 号道具

在事件指令的脚本中输入

M5DI20160122.call

来打开分解界面

=end

$m5script ||= {}; raise("需要喵呜喵5基础脚本的支持") unless $m5script[:M5Base]

$m5script[:M5DI20160122] = 20160122; M5script.version(20151221)

module M5DI20160122

#==============================================================================

# 设定部分

#==============================================================================

GOLD = 500

# 单次分解所需的金钱

RATE = 0.1

# 分解获得更多数量道具的几率 + 10%

SE = 'Bell2'

# 分解成功时播放的音效，不需要的话填写 nil

VOCAB = {

ITEM: "分解道具",

WEAPON: "分解武器",

ARMOR: "分解防具",

HINT_HEAD: "分解成功后将获得",

HINT_FOOT: "确定分解吗？",

HINT_ERROR: "金钱不足",

HINT_SEP: "-",

HINT_UNIT: "个",

HINT_SUCCESS: "分解成功，获得了以下道具：",

OK: "分解",

CNACEL: "放弃"

}

# 用语设定

#==============================================================================

# 设定结束

#==============================================================================

class << self

def enough_money?; $game_party.gold >= GOLD; end

def call; SceneManager.call(Scene); end

end

Gold = Class.new(Window_Gold)

class Category < Window_ItemCategory

def initialize(width)

@gold_width = width

super()

end

def window_width; Graphics.width - @gold_width; end

def col_max; return 3; end

def make_command_list

add_command(VOCAB[:ITEM], :item)

add_command(VOCAB[:WEAPON], :weapon)

add_command(VOCAB[:ARMOR], :armor)

end

class Confirm < Window_HorzCommand

def initialize(x,y)

super

self.openness = 0

self.z = 300

self.back_opacity = 230

end

def window_width; Graphics.width; end

def col_max; 2; end

def make_command_list

add_command(VOCAB[:OK], :ok, M5DI20160122.enough_money?)

add_command(VOCAB[:CNACEL], :cancel)

end

class Result < Window_Base

def initialize(height)

super *position(height)

self.openness = 0

self.z = 300

self.back_opacity = 230

end

def position(height)

return [0, 0, Graphics.width, height]

end

def line_height; super; end

def draw_line(line, type, data)

y = line * line_height

case type

when 0 then draw_text_ex(0, y, data)

when 1

padding = draw_item_padding

width = contents.width - padding * 2

draw_item_name(data[0], padding, y, true, width)

num = draw_item_number(data[1])

draw_text(padding, y, width, line_height, num + VOCAB[:HINT_UNIT], 2)

end

line += 1

end

def draw_item_padding

end

def draw_item_number(value)

value == 1 ? "1 " : "1 #{VOCAB[:HINT_SEP]} #{value} "

end

def refresh(data)

contents.clear

line = 0

line = draw_line(line, 0, VOCAB[:HINT_HEAD])

line = draw_line(line, 0, "")

data.each {|item| line = draw_line(line, 1, item) }

line = draw_line(line, 0, "")

line = draw_line(line, 0,

M5DI20160122.enough_money? ? VOCAB[:HINT_FOOT] : VOCAB[:HINT_ERROR])

end

class Success < Result

def position(height)

w, h = Graphics.width / 2, Graphics.height / 2

return [(Graphics.width - w) / 2, (Graphics.height - h) * 2 / 3, w, h]

end

def draw_item_padding

end

def draw_item_number(value)

return "#{value} "

end

def refresh(data)

contents.clear

line = 0

line = draw_line(line, 0, VOCAB[:HINT_SUCCESS])

line = draw_line(line, 0, "")

data.each {|item| line = draw_line(line, 1, item) }

end

class SuccessCommand < Window_Command

def window_width; 0; end

def make_command_list

add_command('close success window', :ok)

end

class List < Window_ItemList

def include?(item)

return item.is_a?(RPG::Item) if @category == :item

super(item)

end

def enable?(item); item; end

def category=(category)

return if @category == category

@m5_data = nil

super(category)

end

def make_item_list

super

@m5_data = {} unless @m5_data

@data.reject! do |item|

next false if @m5_data[item.id]

result = item.m5_20160122_decompose_result

next true unless result

@m5_data[item.id] = result

false

end

@index = [@index, @data.size - 1].min

end

def item_decompose_data

return [] unless item

@m5_data[item.id].collect{|id, num| [$data_items[id], num] }

end

class Scene < Scene_MenuBase

def start

super

create_help_window

create_gold_window

create_category_window

create_list_window

create_confirm_window

create_result_window

create_success_window

end

def create_category_window

@category_window = Category.new(@gold_window.width)

@category_window.help_window = @help_window

@category_window.y = @help_window.height

@category_window.set_handler(:ok, method(:on_category_ok))

@category_window.set_handler(:cancel, method(:return_scene))

end

def create_gold_window

@gold_window = Gold.new

@gold_window.x = Graphics.width - @gold_window.width

@gold_window.y = @help_window.height

end

def create_list_window

wy = @category_window.y + @category_window.height

wh = Graphics.height - wy

@item_window = List.new(0, wy, Graphics.width, wh)

@item_window.help_window = @help_window

@item_window.set_handler(:ok, method(:on_item_ok))

@item_window.set_handler(:cancel, method(:on_item_cancel))

@category_window.item_window = @item_window

end

def create_confirm_window

@confirm_window = Confirm.new(0, 0)

@confirm_window.y = Graphics.height - @confirm_window.height

@confirm_window.set_handler(:ok, method(:on_confirm_ok))

@confirm_window.set_handler(:cancel, method(:on_confirm_cancel))

end

def create_result_window

@result_window = Result.new(Graphics.height - @confirm_window.height)

end

def create_success_window

@success_window = Success.new(0)

@success_window_command = SuccessCommand.new(0,0)

@success_window_command.set_handler(:ok, method(:on_confirm_cancel))

@success_window_command.set_handler(:cancel, method(:on_confirm_cancel))

end

def on_category_ok

@item_window.activate.select(0)

end

def on_item_ok

@result_window.refresh(@item_window.item_decompose_data)

@result_window.open

@confirm_window.refresh

@confirm_window.open.activate.select(0)

end

def on_item_cancel

@item_window.unselect

@category_window.activate

end

def on_confirm_ok

result = []

$game_party.lose_item(@item_window.item, 1)

@item_window.item_decompose_data.each do |i, n|

num = n * (rand + RATE)

num = [[num.round, 1].max, n].min

$game_party.gain_item(i, num)

result << [i, num]

end

$game_party.lose_gold(GOLD)

Audio.se_play("Audio/SE/#{SE}") if SE

@gold_window.refresh

@item_window.refresh

@success_window.refresh(result)

@success_window.open

@success_window_command.activate.select(0)

end

def on_confirm_cancel

@result_window.close

@confirm_window.close

@success_window.close

@item_window.activate

end

end # module M5DI20160122

class RPG::BaseItem

def m5_20160122_decompose_result

value = []

m5note("分解所得",nil,true,true) do |result|

value << eval(result.gsub(/，/){','})

end

value.empty? ? nil : value

end

鸡蛋

鲜花

刚表态过的朋友 (5 人)

收藏分享邀请举报

全部作者的其他最新日志

发表评论评论 (5 个评论)

回复雪域圣痕 2016-5-6 21:06: 不同物品不同的分解价格，不知道可不是设置呢，以作为备注的方式呢？

回复喵呜喵5 2016-5-6 21:16: 雪域圣痕: 不同物品不同的分解价格，不知道可不是设置呢，以作为备注的方式呢？
脚本暂时没有提供该功能，如果之后有追加时会回复你

回复 neko001 2017-4-3 22:47: 如果你分解完一个道具，背包里却没有其他可以分解的道具，游戏界面就像看起来卡住了一样，很僵啊。。按一下ESC才感觉活起来了。。而且希望可以设置可以分解的类型，例如只能分解武器？
另外希望那个得到分解出来的道具窗口可以自动关闭~不要手动确认啦

回复造小梦 2020-4-30 11:17: 喵呜喵5: 脚本暂时没有提供该功能，如果之后有追加时会回复你
大佬你基础脚本的网址打不开了，能把脚本私发给我吗？

回复喵呜喵5 2020-4-30 12:44: 造小梦: 大佬你基础脚本的网址打不开了，能把脚本私发给我吗？
https://rpg.blue/home.php?mod=space&uid=291206&do=blog&id=13513

喵呜喵5的树洞 https://rpg.blue/?291206 [收藏] [复制] [分享] [RSS]

日志

【脚本】分解道具

刚表态过的朋友 (5 人)

全部作者的其他最新日志

发表评论 评论 (5 个评论)

喵呜喵5

发表评论评论 (5 个评论)