请问怎么设置只可以买入不可以卖出的商店啊

xczasc

如题，不会脚本真是我心中的痛

18649119621

RUBY 代码复制

#==============================================================================
# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息
#============================================================================== 
 
#只能购买的商店：
#在商店前面一行事件添加脚本：$game_temp.shop_type = 1
 
#只能卖出的商店：
#在商店前面一行事件添加脚本：$game_temp.shop_type = 2
 
#普通商店：不用改动。
 
class Scene_Shop
  # --------------------------
  def main
    @help_window = Window_Help.new
    @command_window = Window_ShopCommand.new
    @gold_window = Window_Gold.new
    @gold_window.x = 480
    @gold_window.y = 64
    @dummy_window = Window_Base.new(0, 128, 640, 352)
    @buy_window = Window_ShopBuy.new($game_temp.shop_goods)
    @buy_window.active = false
    @buy_window.visible = false
    @buy_window.help_window = @help_window
    @sell_window = Window_ShopSell.new
    @sell_window.active = false
    @sell_window.visible = false
    @sell_window.help_window = @help_window
    @number_window = Window_ShopNumber.new
    @number_window.active = false
    @number_window.visible = false
    @status_window = Window_ShopStatus.new
    @status_window.visible = false
    if $game_temp.shop_type == 1
      @command_window.index = 0
      @command_window.active = false
      @dummy_window.visible = false
      @buy_window.active = true
      @buy_window.visible = true
      @buy_window.refresh
      @status_window.visible = true
    end
    if $game_temp.shop_type == 2
      @command_window.index = 1
      @command_window.active = false
      @dummy_window.visible = false
      @sell_window.active = true
      @sell_window.visible = true
      @sell_window.refresh
    end
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @status_window.item = nil
    @status_window.refresh
    @help_window.dispose
    @command_window.dispose
    @gold_window.dispose
    @dummy_window.dispose
    @buy_window.dispose
    @sell_window.dispose
    @number_window.dispose
    @status_window.dispose
    $game_temp.shop_type = 0
  end
  # --------------------------
  def update
    @help_window.update
    @command_window.update
    @gold_window.update
    @dummy_window.update
    @buy_window.update
    @sell_window.update
    @number_window.update
    @status_window.update
    if @command_window.active
      update_command
      return
    end
    if @buy_window.active
      update_buy
      return
    end
    if @sell_window.active
      update_sell
      return
    end
    if @number_window.active
      update_number
      return
    end
  end
  # --------------------------
  def update_command
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      $scene = Scene_Map.new
      return
    end
    if Input.trigger?(Input::C)
      case @command_window.index
      when 0
        $game_system.se_play($data_system.decision_se)
        @command_window.active = false
        @dummy_window.visible = false
        @buy_window.active = true
        @buy_window.visible = true
        @buy_window.refresh
        @status_window.visible = true
      when 1
        $game_system.se_play($data_system.decision_se)
        @command_window.active = false
        @dummy_window.visible = false
        @sell_window.active = true
        @sell_window.visible = true
        @sell_window.refresh
      when 2
        $game_system.se_play($data_system.decision_se)
        $scene = Scene_Map.new
      end
      return
    end
  end
  # --------------------------
  def update_buy
    @status_window.item = @buy_window.item
    if Input.trigger?(Input::B)
      if $game_temp.shop_type == 1
         $game_system.se_play($data_system.cancel_se)
         $scene = Scene_Map.new
      else
      $game_system.se_play($data_system.cancel_se)
      @command_window.active = true
      @dummy_window.visible = true
      @buy_window.active = false
      @buy_window.visible = false
      @status_window.visible = false
      @status_window.item = nil
      @help_window.set_text("")
      end
      return
    end
    if Input.trigger?(Input::C)
      @item = @buy_window.item
      if @item == nil or @item.price > $game_party.gold
        $game_system.se_play($data_system.buzzer_se)
        return
      end
      case @item
      when RPG::Item
        number = $game_party.item_number(@item.id)
      when RPG::Weapon
        number = $game_party.weapon_number(@item.id)
      when RPG::Armor
        number = $game_party.armor_number(@item.id)
      end
      if number == 99
        $game_system.se_play($data_system.buzzer_se)
        return
      end
      $game_system.se_play($data_system.decision_se)
      max = @item.price == 0 ? 99 : $game_party.gold / @item.price
      max = [max, 99 - number].min
      @buy_window.active = false
      @buy_window.visible = false
      @number_window.set(@item, max, @item.price)
      @number_window.active = true
      @number_window.visible = true
    end
  end
  # --------------------------
  def update_sell
    if Input.trigger?(Input::B)
      if $game_temp.shop_type == 2
         $game_system.se_play($data_system.cancel_se)
         $scene = Scene_Map.new
      else
      $game_system.se_play($data_system.cancel_se)
      @command_window.active = true
      @dummy_window.visible = true
      @sell_window.active = false
      @sell_window.visible = false
      @status_window.item = nil
      @help_window.set_text("")
      return
      end
    end
    if Input.trigger?(Input::C)
      @item = @sell_window.item
      @status_window.item = @item
      if @item == nil or @item.price == 0
        $game_system.se_play($data_system.buzzer_se)
        return
      end
      $game_system.se_play($data_system.decision_se)
      case @item
      when RPG::Item
        number = $game_party.item_number(@item.id)
      when RPG::Weapon
        number = $game_party.weapon_number(@item.id)
      when RPG::Armor
        number = $game_party.armor_number(@item.id)
      end
      max = number
      @sell_window.active = false
      @sell_window.visible = false
      @number_window.set(@item, max, @item.price / 2)
      @number_window.active = true
      @number_window.visible = true
      @status_window.visible = true
    end
  end
  # --------------------------
  def update_number
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      @number_window.active = false
      @number_window.visible = false
      case @command_window.index
      when 0
        @buy_window.active = true
        @buy_window.visible = true
      when 1
        @sell_window.active = true
        @sell_window.visible = true
        @status_window.visible = false
      end
      return
    end
    if Input.trigger?(Input::C)
      $game_system.se_play($data_system.shop_se)
      @number_window.active = false
      @number_window.visible = false
      case @command_window.index
      when 0
        $game_party.lose_gold(@number_window.number * @item.price)
        case @item
        when RPG::Item
          $game_party.gain_item(@item.id, @number_window.number)
        when RPG::Weapon
          $game_party.gain_weapon(@item.id, @number_window.number)
        when RPG::Armor
          $game_party.gain_armor(@item.id, @number_window.number)
        end
        @gold_window.refresh
        @buy_window.refresh
        @status_window.refresh
        @buy_window.active = true
        @buy_window.visible = true
      when 1
        $game_party.gain_gold(@number_window.number * (@item.price / 2))
        case @item
        when RPG::Item
          $game_party.lose_item(@item.id, @number_window.number)
        when RPG::Weapon
          $game_party.lose_weapon(@item.id, @number_window.number)
        when RPG::Armor
          $game_party.lose_armor(@item.id, @number_window.number)
        end
        @gold_window.refresh
        @sell_window.refresh
        @status_window.refresh
        @sell_window.active = true
        @sell_window.visible = true
        @status_window.visible = false
      end
      return
    end
  end
end
 
 
 
 
class Window_ShopCommand < Window_Selectable
  # ----------------------------------------
  def initialize
    super(0, 64, 480, 64)
    self.contents = Bitmap.new(width - 32, height - 32)
    @item_max = 3
    @column_max = 3
    @commands = ["购买", "卖出", "离开"]
    self.contents.font.name = "黑体"
    self.contents.font.size = 24
    refresh
    self.index = 0
  end
  # ----------------------------------------
  def refresh
    self.contents.clear
    if $game_temp.shop_type == 0
      for i in 0...@item_max
      draw_item(i)
      end
    end
    if $game_temp.shop_type == 1
      self.contents.draw_text(4, 0, 324, 32, "只能购买，不能卖出")
      self.index = -1
      update_cursor_rect
    end
    if $game_temp.shop_type == 2
      self.contents.draw_text(4, 0, 324, 32, "只能卖出，不能购买")
      self.index = -1
      update_cursor_rect
    end
  end
  # ----------------------------------------
  def draw_item(index)
    x = 4 + index * 160
    self.contents.draw_text(x, 0, 128, 32, @commands[index])
  end
  # ----------------------------------------
  def update_cursor_rect
    if $game_temp.shop_type == 0
      super
    end
    if $game_temp.shop_type == 1 || $game_temp.shop_type == 2
      self.cursor_rect.empty
    end
  end
end
class Game_Temp
  # ----------------------------------------
  attr_accessor :shop_type
  alias ini initialize
  def initialize
    ini
    @shop_type = 0
  end
end
 
 
#==============================================================================
# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息
#=========================================================================

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


# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息


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


 


#只能购买的商店：


#在商店前面一行事件添加脚本：$game_temp.shop_type = 1


 


#只能卖出的商店：


#在商店前面一行事件添加脚本：$game_temp.shop_type = 2


 


#普通商店：不用改动。


 


class Scene_Shop


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


  def main


    @help_window = Window_Help.new


    @command_window = Window_ShopCommand.new


    @gold_window = Window_Gold.new


    @gold_window.x = 480


    @gold_window.y = 64


    @dummy_window = Window_Base.new(0, 128, 640, 352)


    @buy_window = Window_ShopBuy.new($game_temp.shop_goods)


    @buy_window.active = false


    @buy_window.visible = false


    @buy_window.help_window = @help_window


    @sell_window = Window_ShopSell.new


    @sell_window.active = false


    @sell_window.visible = false


    @sell_window.help_window = @help_window


    @number_window = Window_ShopNumber.new


    @number_window.active = false


    @number_window.visible = false


    @status_window = Window_ShopStatus.new


    @status_window.visible = false


    if $game_temp.shop_type == 1


      @command_window.index = 0


      @command_window.active = false


      @dummy_window.visible = false


      @buy_window.active = true


      @buy_window.visible = true


      @buy_window.refresh


      @status_window.visible = true


    end


    if $game_temp.shop_type == 2


      @command_window.index = 1


      @command_window.active = false


      @dummy_window.visible = false


      @sell_window.active = true


      @sell_window.visible = true


      @sell_window.refresh


    end


    Graphics.transition


    loop do


      Graphics.update


      Input.update


      update


      if $scene != self


        break


      end


    end


    Graphics.freeze


    @status_window.item = nil


    @status_window.refresh


    @help_window.dispose


    @command_window.dispose


    @gold_window.dispose


    @dummy_window.dispose


    @buy_window.dispose


    @sell_window.dispose


    @number_window.dispose


    @status_window.dispose


    $game_temp.shop_type = 0


  end


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


  def update


    @help_window.update


    @command_window.update


    @gold_window.update


    @dummy_window.update


    @buy_window.update


    @sell_window.update


    @number_window.update


    @status_window.update


    if @command_window.active


      update_command


      return


    end


    if @buy_window.active


      update_buy


      return


    end


    if @sell_window.active


      update_sell


      return


    end


    if @number_window.active


      update_number


      return


    end


  end


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


  def update_command


    if Input.trigger?(Input::B)


      $game_system.se_play($data_system.cancel_se)


      $scene = Scene_Map.new


      return


    end


    if Input.trigger?(Input::C)


      case @command_window.index


      when 0


        $game_system.se_play($data_system.decision_se)


        @command_window.active = false


        @dummy_window.visible = false


        @buy_window.active = true


        @buy_window.visible = true


        @buy_window.refresh


        @status_window.visible = true


      when 1


        $game_system.se_play($data_system.decision_se)


        @command_window.active = false


        @dummy_window.visible = false


        @sell_window.active = true


        @sell_window.visible = true


        @sell_window.refresh


      when 2


        $game_system.se_play($data_system.decision_se)


        $scene = Scene_Map.new


      end


      return


    end


  end


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


  def update_buy


    @status_window.item = @buy_window.item


    if Input.trigger?(Input::B)


      if $game_temp.shop_type == 1


         $game_system.se_play($data_system.cancel_se)


         $scene = Scene_Map.new


      else


      $game_system.se_play($data_system.cancel_se)


      @command_window.active = true


      @dummy_window.visible = true


      @buy_window.active = false


      @buy_window.visible = false


      @status_window.visible = false


      @status_window.item = nil


      @help_window.set_text("")


      end


      return


    end


    if Input.trigger?(Input::C)


      @item = @buy_window.item


      if @item == nil or @item.price > $game_party.gold


        $game_system.se_play($data_system.buzzer_se)


        return


      end


      case @item


      when RPG::Item


        number = $game_party.item_number(@item.id)


      when RPG::Weapon


        number = $game_party.weapon_number(@item.id)


      when RPG::Armor


        number = $game_party.armor_number(@item.id)


      end


      if number == 99


        $game_system.se_play($data_system.buzzer_se)


        return


      end


      $game_system.se_play($data_system.decision_se)


      max = @item.price == 0 ? 99 : $game_party.gold / @item.price


      max = [max, 99 - number].min


      @buy_window.active = false


      @buy_window.visible = false


      @number_window.set(@item, max, @item.price)


      @number_window.active = true


      @number_window.visible = true


    end


  end


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


  def update_sell


    if Input.trigger?(Input::B)


      if $game_temp.shop_type == 2


         $game_system.se_play($data_system.cancel_se)


         $scene = Scene_Map.new


      else


      $game_system.se_play($data_system.cancel_se)


      @command_window.active = true


      @dummy_window.visible = true


      @sell_window.active = false


      @sell_window.visible = false


      @status_window.item = nil


      @help_window.set_text("")


      return


      end


    end


    if Input.trigger?(Input::C)


      @item = @sell_window.item


      @status_window.item = @item


      if @item == nil or @item.price == 0


        $game_system.se_play($data_system.buzzer_se)


        return


      end


      $game_system.se_play($data_system.decision_se)


      case @item


      when RPG::Item


        number = $game_party.item_number(@item.id)


      when RPG::Weapon


        number = $game_party.weapon_number(@item.id)


      when RPG::Armor


        number = $game_party.armor_number(@item.id)


      end


      max = number


      @sell_window.active = false


      @sell_window.visible = false


      @number_window.set(@item, max, @item.price / 2)


      @number_window.active = true


      @number_window.visible = true


      @status_window.visible = true


    end


  end


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


  def update_number


    if Input.trigger?(Input::B)


      $game_system.se_play($data_system.cancel_se)


      @number_window.active = false


      @number_window.visible = false


      case @command_window.index


      when 0


        @buy_window.active = true


        @buy_window.visible = true


      when 1


        @sell_window.active = true


        @sell_window.visible = true


        @status_window.visible = false


      end


      return


    end


    if Input.trigger?(Input::C)


      $game_system.se_play($data_system.shop_se)


      @number_window.active = false


      @number_window.visible = false


      case @command_window.index


      when 0


        $game_party.lose_gold(@number_window.number * @item.price)


        case @item


        when RPG::Item


          $game_party.gain_item(@item.id, @number_window.number)


        when RPG::Weapon


          $game_party.gain_weapon(@item.id, @number_window.number)


        when RPG::Armor


          $game_party.gain_armor(@item.id, @number_window.number)


        end


        @gold_window.refresh


        @buy_window.refresh


        @status_window.refresh


        @buy_window.active = true


        @buy_window.visible = true


      when 1


        $game_party.gain_gold(@number_window.number * (@item.price / 2))


        case @item


        when RPG::Item


          $game_party.lose_item(@item.id, @number_window.number)


        when RPG::Weapon


          $game_party.lose_weapon(@item.id, @number_window.number)


        when RPG::Armor


          $game_party.lose_armor(@item.id, @number_window.number)


        end


        @gold_window.refresh


        @sell_window.refresh


        @status_window.refresh


        @sell_window.active = true


        @sell_window.visible = true


        @status_window.visible = false


      end


      return


    end


  end


end


 


 


 


 


class Window_ShopCommand < Window_Selectable


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


  def initialize


    super(0, 64, 480, 64)


    self.contents = Bitmap.new(width - 32, height - 32)


    @item_max = 3


    @column_max = 3


    @commands = ["购买", "卖出", "离开"]


    self.contents.font.name = "黑体"


    self.contents.font.size = 24


    refresh


    self.index = 0


  end


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


  def refresh


    self.contents.clear


    if $game_temp.shop_type == 0


      for i in 0...@item_max


      draw_item(i)


      end


    end


    if $game_temp.shop_type == 1


      self.contents.draw_text(4, 0, 324, 32, "只能购买，不能卖出")


      self.index = -1


      update_cursor_rect


    end


    if $game_temp.shop_type == 2


      self.contents.draw_text(4, 0, 324, 32, "只能卖出，不能购买")


      self.index = -1


      update_cursor_rect


    end


  end


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


  def draw_item(index)


    x = 4 + index * 160


    self.contents.draw_text(x, 0, 128, 32, @commands[index])


  end


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


  def update_cursor_rect


    if $game_temp.shop_type == 0


      super


    end


    if $game_temp.shop_type == 1 || $game_temp.shop_type == 2


      self.cursor_rect.empty


    end


  end


end


class Game_Temp


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


  attr_accessor :shop_type


  alias ini initialize


  def initialize


    ini


    @shop_type = 0


  end


end


 


 


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


# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息


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

18649119621

就是这个脚本，291行可以换字体

18649119621

这是以前的脚本，能用。以前66RPG上有的

xczasc

18649119621 发表于 2018-7-11 09:42
这是以前的脚本，能用。以前66RPG上有的

超级感谢！

xczasc

诶它说Window_Selectable没有被定义。

18649119621

可能有脚本冲突，把这个脚本换个位置试试

18649119621

我这里是没有问题的，你看一看输入脚本正确了没有

xczasc

18649119621 发表于 2018-7-11 13:25
我这里是没有问题的，你看一看输入脚本正确了没有

可以用了！！谢谢！！！

Tsar_NicholasII

(xxx商人):是否购买一个x物品?
显示选择项:买，不买
买的场合:
条件分歧:金钱 y 以上时:
(xxx商人):购买成功。x物品+1。金钱-y。
除此以外的场合:
(xxx商人):卢布不足。
不买的场合:无