这令商品价格浮动的脚本，真的不懂用

xixifilm · 发表于 2013-2-3 23:12:56

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由 Mic_洛洛于 2013-2-25 00:03 编辑

这个令商品价格浮动的脚本，真的不懂用，不懂填写哪里，直接执行会出错，

RUBY 代码复制

#============================================================================
# Shop Taxes V1.6 (VXA version)
# By Emerald
#----------------------------------------------------------------------------
# Originally made by Falcon for RMXP
# Edited by Emerald to fit the RMVX and now also RMVX Ace
# You're free to use the script for any game, as long as you give credits
#----------------------------------------------------------------------------
# Version History
# 0.5 -> Script ported to RMVX Ace with minor edits to avoid errors
# 1.0 -> Further edits due to problems with percentage taxes
#               Added possibility to easily configure x/y position of tax information
#               and a value to configure if it will even be shown at all.
# 1.5 -> Again, further edits due to slight problems. But aside from that,
#               you can use <tax key item> again. Also added possibility to create
#               items which alter taxes. DRASTICALLY changed Instructions, be sure to
#               read it thoroughly.
# 1.6 -> Added Sell taxes and item Sell Tax changes.
#----------------------------------------------------------------------------
# With this script, you can almost fully control prices for VX Ace. You can
# normally set prices and prices unique per shop, and this script adds the
# possibility to make taxes. With these taxes, you can easily change prices of
# all items in a shop, either higher or lower.
#
# Instructions:
#
# Just as always, put this script between ▼ Materials and ▼ Main. If the
# information about the taxes is not shown correctly in shops, you can change
# it below.
#
#
# In order to add taxes, use the call script method within an event. Use
# the following codes codes:
#
# $game_system.tax.percent = x
# Where x > 100 results in a tax with x% the normal price
# Where x < 100 results in a discount with x% the normal price
#
# $game_systeme.tax.direct = y
# Where y > 0 results in a tax which adds y to every price
# Where y < 0 results in a discount which subtracts y to every price
#
# WARNING
# For n = the price of an item,
# If n - y equals 0, the item becomes free
# If n - y < 0, the item becomes free AND you GET money (why doesn't that happen
# in real life)
# If x = a negative value then you'll GET money (x% the normal price)
#
# ALWAYS!!, unless you're SURE the player can't have any items which alter taxes,
# add $game_system.tax.perbon to percentage taxes and $game_system.tax.dirbon to
# direct taxes. Else, the changes of the items ARE NOT APLIED!!
# END WARNING
#
# $game_system.selltax.percent = x
# $game_system.selltax.direct = y
# $game_system.selltax.perbon = x
# $game_system.selltax.dirbon = y
#
# Exact same story as above, only these are hidden and for items being sold.
#
#
# <tax key item>
# Use the above tag if you don't want that the price of that item can be changed
# by taxes. Useful for items which the player may not buy/sell.
#
#
# <tax +/-x>
# Use the above tag to make items which will alter direct taxes. Use + to make
# it higher, - to make it lower. Enter a value for x.
#
# <tax +/-x%>
# Use the above tag to make items whcih will alter percentage taxes. Use + to
# make it higher, - to make it lower. WARNING!! The value you enter for x will
# be ADDED or SUBSTRACTED of the current tax.percent!!
# Examples:
# $game_system.tax.percent = 150 & an item with <tax +20%> will result in a tax
# of 170%.
#
# $game_system.tax.percent = 100 (/no value set) & an item with <tax -42%> will
# result in a tax of 58%.
#
# NOTE that if the player gets any items with these tags, the amount he/she has
# of the item determines how many times the taxes will be altered! Two of the
# same items in Example 1 will result in a tax of 190% instead of 170%.
# Also, if the player gets any items with these tags, the changes to taxes will
# be stored in $game_system.tax.perbon and $game_system.tax.dirbon for
# percentage and direct taxes respectively. Always add these variable to
# $game_system.tax.percent and $game_system.tax.direct respectively if changes
# to these two are made. Don't change perbon and dirbon as they only handle the
# changes made by items.
#
# <selltax +/-x>
# Exact same effect as <tax...> but this one changes the prices of sold items.
#
# <selltax +/-x%>
# Same story as above.
#
# Use $game_system.selltax.perbon and $game_system.selltax.perbon for the above
# two tags.
#----------------------------------------------------------------------------
# Credits to:
# Falcon for the original script
# Blizard for the idea that triggered version 2.0 (Falcon's Credits)
# You, because you ate a cookie in your life =D (I hope... If not, I'll send
# Bennett to make you eat a cookie with his manliness...)
#----------------------------------------------------------------------------
# This script should be compatible with all shop systems. If not, alert me.
#============================================================================
#
# CONFIGURATIONS
#
#============================================================================
class Window_ShopStatus < Window_Base
 
  TAX                    = "Tax"   # Word which stands before percent tax IF the percent tax > 100
  DISCOUNT              = "价格"   # Word which stands before percent tax IF the percent tax < 100
  TAX_DIRECT      = "Tax (A)"     # Word which stands before direct tax IF the direct tax > 0
  DISCOUNT_DIRECT = "Discount (A)" # Word which stands before direct tax IF the direct tax < 0
  TAX_INFORMATION = true  # True = show information about taxes in shops, false = well... the opposite
  TAX_X            = 4    # x position of the information of the taxes. Usually, text has an x-value of 4
  TAX_Y            = 216  # y position of the information. Default = 216. Not that text starts on y = 0 and every line has a height of y = 24
 
end
 
module EME
  module REGEXP
        module ITEM
 
          # Only edit things past here if you know what you're doing
          KEY_ITEM_TAG = /<tax[\s_]?key[\s_]?item>/i # <tax key item>
          ITEM_TAX_PER = /<tax[\s_]?[ ]*([\+\-]\d+)([%％])>/i # <tax +/-x%>
          ITEM_TAX_DIR = /<tax[\s_]?[ ]*([\+\-]\d+)>/i  # <tax +/-x>
          ITEM_SELLTAX_PER = /<selltax[\s_]?[ ]*([\+\-]\d+)([%％])>/i # <selltax +/-x%>
          ITEM_SELLTAX_DIR = /<selltax[\s_]?[ ]*([\+\-]\d+)>/i  # <selltax +/-x>
 
        end
  end
end
 
#============================================================================
#
# Game_System
# Defines all needed variables for taxes.
#============================================================================
 
class Game_System::Tax
  attr_accessor :percent
  attr_accessor :perbon
  attr_accessor :direct
  attr_accessor :dirbon
 
  def initialize
        @percent = 100
        @perbon  = 0
        @direct  = 0
        @dirbon  = 0
  end
 
end
 
class Game_System::SellTax
  attr_accessor :percent
  attr_accessor :perbon
  attr_accessor :direct
  attr_accessor :dirbon
 
  def initialize
        @percent = 100
        @perbon  = 0
        @direct  = 0
        @dirbon  = 0
  end
 
end
 
class Game_System
  attr_reader :tax
  attr_reader :selltax
 
  alias eme_tax_initialize initialize
  def initialize
        eme_tax_initialize
        @tax = Tax.new
        @selltax = SellTax.new
  end
 
end
 
#============================================================================
#
# Window_ShopBuy
# Handles effects of taxes and <tax key item>.
#============================================================================
 
class Window_ShopBuy
 
  def price(item)
        @price[item]
        notetag_check(item)
        if @key_item
          @new_price = @price[item]
        elsif $game_system.tax.percent != 100 or $game_system.tax.direct != 0
          @new_price = @price[item] * $game_system.tax.percent / 100 + $game_system.tax.direct
        else
          @new_price = @price[item]
        end
  end
 
  def notetag_check(item)
        @key_item = false
        item.note.split(/[\r\n]+/).each { |line|
        case line
          when EME::REGEXP::ITEM::KEY_ITEM_TAG
                @key_item = true
          end
        }
  end
 
end
 
class Scene_Shop
 
  def selling_price
        the_selling_price = @item.price / 2
        notetag_check(@item)
        unless @key_item = true
          if $game_system.selltax.percent != 100
                the_selling_price *= $game_system.selltax.percent / 100
          end
          if $game_system.selltax.direct != 0
                the_selling_price += $game_system.selltax.direct
          end
        end
        return the_selling_price
  end
 
  def notetag_check(item)
        @key_item = false
        item.note.split(/[\r\n]+/).each { |line|
        case line
          when EME::REGEXP::ITEM::KEY_ITEM_TAG
                @key_item = true
          end
        }
  end
 
end
 
#============================================================================
#
# Game_Party
# Handles items which alter taxes.
#============================================================================
 
class Game_Party
 
  alias eme_tax_gain_item gain_item
  def gain_item(item, amount, include_equip = false)
        eme_tax_gain_item(item, amount, include_equip = false)
        if amount > 0 and item != nil
          item.note.split(/[\r\n]+/).each { |line|
          case line
                when EME::REGEXP::ITEM::ITEM_TAX_PER
                  $game_system.tax.percent += $1.to_i * amount
                  $game_system.tax.perbon += $1.to_i * amount
                when EME::REGEXP::ITEM::ITEM_TAX_DIR
                  $game_system.tax.direct += $1.to_i * amount
                  $game_system.tax.dirbon += $1.to_i * amount
                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER
                  $game_system.selltax.percent += $1.to_i * amount
                  $game_system.selltax.perbon += $1.to_i * amount
                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER
                  $game_system.selltax.percent += $1.to_i * amount
                  $game_system.selltax.perbon += $1.to_i * amount
                end
          }
        elsif item != nil
          item.note.split(/[\r\n]+/).each { |line|
          case line
                when EME::REGEXP::ITEM::ITEM_TAX_PER
                  $game_system.tax.percent -= $1.to_i * amount
                  $game_system.tax.perbon -= $1.to_i * amount
                when EME::REGEXP::ITEM::ITEM_TAX_DIR
                  $game_system.tax.direct -= $1.to_i * amount
                  $game_system.tax.dirbon -= $1.to_i * amount
                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER
                  $game_system.selltax.percent -= $1.to_i * amount
                  $game_system.selltax.perbon -= $1.to_i * amount
                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER
                  $game_system.selltax.percent -= $1.to_i * amount
                  $game_system.selltax.perbon -= $1.to_i * amount
                end
          }
        end
  end
 
end
 
#============================================================================
#
# Window_ShopStatus
# Handles information of taxes shown in shops.
#============================================================================
class Window_ShopStatus < Window_Base
 
  alias eme_tax_refresh refresh
  def refresh
        eme_tax_refresh
        if TAX_INFORMATION
          draw_taxes(TAX_X, TAX_Y)
        end
  end
 
  def draw_taxes(x, y)
        if $game_system.tax.percent != 100
          rect = Rect.new(x, y, contents.width - 4 - x, line_height)
          change_color(system_color)
          if $game_system.tax.percent > 100
                draw_text(rect, TAX + ":")
          else
                draw_text(rect, DISCOUNT + ":")
          end
          change_color(normal_color)
          draw_text(rect, $game_system.tax.percent.to_s + "%", 2)
        end
        if $game_system.tax.direct != 0
          rect = Rect.new(x, y + 24, contents.width - 4 - x, line_height)
          change_color(system_color)
          if $game_system.tax.direct > 0
                draw_text(rect, TAX_DIRECT + ":")
          else
                draw_text(rect, DISCOUNT_DIRECT + ":")
          end
          change_color(normal_color)
          draw_text(rect, $game_system.tax.direct.to_s, 2)
        end
  end
 
end

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


# Shop Taxes V1.6 (VXA version)


# By Emerald


#----------------------------------------------------------------------------


# Originally made by Falcon for RMXP


# Edited by Emerald to fit the RMVX and now also RMVX Ace


# You're free to use the script for any game, as long as you give credits


#----------------------------------------------------------------------------


# Version History


# 0.5 -> Script ported to RMVX Ace with minor edits to avoid errors


# 1.0 -> Further edits due to problems with percentage taxes


#               Added possibility to easily configure x/y position of tax information


#               and a value to configure if it will even be shown at all.


# 1.5 -> Again, further edits due to slight problems. But aside from that,


#               you can use <tax key item> again. Also added possibility to create


#               items which alter taxes. DRASTICALLY changed Instructions, be sure to


#               read it thoroughly.


# 1.6 -> Added Sell taxes and item Sell Tax changes.


#----------------------------------------------------------------------------


# With this script, you can almost fully control prices for VX Ace. You can


# normally set prices and prices unique per shop, and this script adds the


# possibility to make taxes. With these taxes, you can easily change prices of


# all items in a shop, either higher or lower.


#


# Instructions:


#


# Just as always, put this script between ▼ Materials and ▼ Main. If the


# information about the taxes is not shown correctly in shops, you can change


# it below.


#


#


# In order to add taxes, use the call script method within an event. Use


# the following codes codes:


#


# $game_system.tax.percent = x


# Where x > 100 results in a tax with x% the normal price


# Where x < 100 results in a discount with x% the normal price


#


# $game_systeme.tax.direct = y


# Where y > 0 results in a tax which adds y to every price


# Where y < 0 results in a discount which subtracts y to every price


#


# WARNING


# For n = the price of an item,


# If n - y equals 0, the item becomes free


# If n - y < 0, the item becomes free AND you GET money (why doesn't that happen


# in real life)


# If x = a negative value then you'll GET money (x% the normal price)


#


# ALWAYS!!, unless you're SURE the player can't have any items which alter taxes,


# add $game_system.tax.perbon to percentage taxes and $game_system.tax.dirbon to


# direct taxes. Else, the changes of the items ARE NOT APLIED!!


# END WARNING


#


# $game_system.selltax.percent = x


# $game_system.selltax.direct = y


# $game_system.selltax.perbon = x


# $game_system.selltax.dirbon = y


#


# Exact same story as above, only these are hidden and for items being sold.


#


#


# <tax key item>


# Use the above tag if you don't want that the price of that item can be changed


# by taxes. Useful for items which the player may not buy/sell.


#


#


# <tax +/-x>


# Use the above tag to make items which will alter direct taxes. Use + to make


# it higher, - to make it lower. Enter a value for x.


#


# <tax +/-x%>


# Use the above tag to make items whcih will alter percentage taxes. Use + to


# make it higher, - to make it lower. WARNING!! The value you enter for x will


# be ADDED or SUBSTRACTED of the current tax.percent!!


# Examples:


# $game_system.tax.percent = 150 & an item with <tax +20%> will result in a tax


# of 170%.


#


# $game_system.tax.percent = 100 (/no value set) & an item with <tax -42%> will


# result in a tax of 58%.


#


# NOTE that if the player gets any items with these tags, the amount he/she has


# of the item determines how many times the taxes will be altered! Two of the


# same items in Example 1 will result in a tax of 190% instead of 170%.


# Also, if the player gets any items with these tags, the changes to taxes will


# be stored in $game_system.tax.perbon and $game_system.tax.dirbon for


# percentage and direct taxes respectively. Always add these variable to


# $game_system.tax.percent and $game_system.tax.direct respectively if changes


# to these two are made. Don't change perbon and dirbon as they only handle the


# changes made by items.


#


# <selltax +/-x>


# Exact same effect as <tax...> but this one changes the prices of sold items.


#


# <selltax +/-x%>


# Same story as above.


#


# Use $game_system.selltax.perbon and $game_system.selltax.perbon for the above


# two tags.


#----------------------------------------------------------------------------


# Credits to:


# Falcon for the original script


# Blizard for the idea that triggered version 2.0 (Falcon's Credits)


# You, because you ate a cookie in your life =D (I hope... If not, I'll send


# Bennett to make you eat a cookie with his manliness...)


#----------------------------------------------------------------------------


# This script should be compatible with all shop systems. If not, alert me.


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


#


# CONFIGURATIONS


#


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


class Window_ShopStatus < Window_Base


 


  TAX                    = "Tax"   # Word which stands before percent tax IF the percent tax > 100


  DISCOUNT              = "价格"   # Word which stands before percent tax IF the percent tax < 100


  TAX_DIRECT      = "Tax (A)"     # Word which stands before direct tax IF the direct tax > 0


  DISCOUNT_DIRECT = "Discount (A)" # Word which stands before direct tax IF the direct tax < 0


  TAX_INFORMATION = true  # True = show information about taxes in shops, false = well... the opposite


  TAX_X            = 4    # x position of the information of the taxes. Usually, text has an x-value of 4


  TAX_Y            = 216  # y position of the information. Default = 216. Not that text starts on y = 0 and every line has a height of y = 24


 


end


 


module EME


  module REGEXP


        module ITEM


 


          # Only edit things past here if you know what you're doing


          KEY_ITEM_TAG = /<tax[\s_]?key[\s_]?item>/i # <tax key item>


          ITEM_TAX_PER = /<tax[\s_]?[ ]*([\+\-]\d+)([%％])>/i # <tax +/-x%>


          ITEM_TAX_DIR = /<tax[\s_]?[ ]*([\+\-]\d+)>/i  # <tax +/-x>


          ITEM_SELLTAX_PER = /<selltax[\s_]?[ ]*([\+\-]\d+)([%％])>/i # <selltax +/-x%>


          ITEM_SELLTAX_DIR = /<selltax[\s_]?[ ]*([\+\-]\d+)>/i  # <selltax +/-x>


 


        end


  end


end


 


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


#


# Game_System


# Defines all needed variables for taxes.


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


 


class Game_System::Tax


  attr_accessor :percent


  attr_accessor :perbon


  attr_accessor :direct


  attr_accessor :dirbon


 


  def initialize


        @percent = 100


        @perbon  = 0


        @direct  = 0


        @dirbon  = 0


  end


 


end


 


class Game_System::SellTax


  attr_accessor :percent


  attr_accessor :perbon


  attr_accessor :direct


  attr_accessor :dirbon


 


  def initialize


        @percent = 100


        @perbon  = 0


        @direct  = 0


        @dirbon  = 0


  end


 


end


 


class Game_System


  attr_reader :tax


  attr_reader :selltax


 


  alias eme_tax_initialize initialize


  def initialize


        eme_tax_initialize


        @tax = Tax.new


        @selltax = SellTax.new


  end


 


end


 


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


#


# Window_ShopBuy


# Handles effects of taxes and <tax key item>.


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


 


class Window_ShopBuy


 


  def price(item)


        @price[item]


        notetag_check(item)


        if @key_item


          @new_price = @price[item]


        elsif $game_system.tax.percent != 100 or $game_system.tax.direct != 0


          @new_price = @price[item] * $game_system.tax.percent / 100 + $game_system.tax.direct


        else


          @new_price = @price[item]


        end


  end


 


  def notetag_check(item)


        @key_item = false


        item.note.split(/[\r\n]+/).each { |line|


        case line


          when EME::REGEXP::ITEM::KEY_ITEM_TAG


                @key_item = true


          end


        }


  end


 


end


 


class Scene_Shop


 


  def selling_price


        the_selling_price = @item.price / 2


        notetag_check(@item)


        unless @key_item = true


          if $game_system.selltax.percent != 100


                the_selling_price *= $game_system.selltax.percent / 100


          end


          if $game_system.selltax.direct != 0


                the_selling_price += $game_system.selltax.direct


          end


        end


        return the_selling_price


  end


 


  def notetag_check(item)


        @key_item = false


        item.note.split(/[\r\n]+/).each { |line|


        case line


          when EME::REGEXP::ITEM::KEY_ITEM_TAG


                @key_item = true


          end


        }


  end


 


end


 


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


#


# Game_Party


# Handles items which alter taxes.


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


 


class Game_Party


 


  alias eme_tax_gain_item gain_item


  def gain_item(item, amount, include_equip = false)


        eme_tax_gain_item(item, amount, include_equip = false)


        if amount > 0 and item != nil


          item.note.split(/[\r\n]+/).each { |line|


          case line


                when EME::REGEXP::ITEM::ITEM_TAX_PER


                  $game_system.tax.percent += $1.to_i * amount


                  $game_system.tax.perbon += $1.to_i * amount


                when EME::REGEXP::ITEM::ITEM_TAX_DIR


                  $game_system.tax.direct += $1.to_i * amount


                  $game_system.tax.dirbon += $1.to_i * amount


                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER


                  $game_system.selltax.percent += $1.to_i * amount


                  $game_system.selltax.perbon += $1.to_i * amount


                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER


                  $game_system.selltax.percent += $1.to_i * amount


                  $game_system.selltax.perbon += $1.to_i * amount


                end


          }


        elsif item != nil


          item.note.split(/[\r\n]+/).each { |line|


          case line


                when EME::REGEXP::ITEM::ITEM_TAX_PER


                  $game_system.tax.percent -= $1.to_i * amount


                  $game_system.tax.perbon -= $1.to_i * amount


                when EME::REGEXP::ITEM::ITEM_TAX_DIR


                  $game_system.tax.direct -= $1.to_i * amount


                  $game_system.tax.dirbon -= $1.to_i * amount


                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER


                  $game_system.selltax.percent -= $1.to_i * amount


                  $game_system.selltax.perbon -= $1.to_i * amount


                when EME::REGEXP::ITEM::ITEM_SELLTAX_PER


                  $game_system.selltax.percent -= $1.to_i * amount


                  $game_system.selltax.perbon -= $1.to_i * amount


                end


          }


        end


  end


 


end


 


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


#


# Window_ShopStatus


# Handles information of taxes shown in shops.


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


class Window_ShopStatus < Window_Base


 


  alias eme_tax_refresh refresh


  def refresh


        eme_tax_refresh


        if TAX_INFORMATION


          draw_taxes(TAX_X, TAX_Y)


        end


  end


 


  def draw_taxes(x, y)


        if $game_system.tax.percent != 100


          rect = Rect.new(x, y, contents.width - 4 - x, line_height)


          change_color(system_color)


          if $game_system.tax.percent > 100


                draw_text(rect, TAX + ":")


          else


                draw_text(rect, DISCOUNT + ":")


          end


          change_color(normal_color)


          draw_text(rect, $game_system.tax.percent.to_s + "%", 2)


        end


        if $game_system.tax.direct != 0


          rect = Rect.new(x, y + 24, contents.width - 4 - x, line_height)


          change_color(system_color)


          if $game_system.tax.direct > 0


                draw_text(rect, TAX_DIRECT + ":")


          else


                draw_text(rect, DISCOUNT_DIRECT + ":")


          end


          change_color(normal_color)


          draw_text(rect, $game_system.tax.direct.to_s, 2)


        end


  end


 


end

xixifilm · 发表于 2013-2-5 14:04:32

????????????求使用经验

帐号		自动登录	找回密码
密码			注册会员

[已经过期] 这令商品价格浮动的脚本，真的不懂用

加入我们，或者，欢迎回来。