关于，魔法商店

tionbi · 发表于 2012-2-10 17:16:23

本帖最后由 tionbi 于 2012-2-10 18:01 编辑

@数字是表示技能卖多少钱
原来一些上架的技能，我现在想不卖了
就把@+数字删了
结果在商店里技能还在，而且只要0金钱就可以学了
这要怎么办

唐门草楹 · 发表于 2012-2-10 18:01:13

本帖最后由唐门草楹于 2012-2-10 18:03 编辑

原脚本可以贴上来一下。据我所知的一个版本的魔法商店并不是没有@就不能学习，而是根据数据库的职业中特技栏中是否有这个技能来判断能否学习。
你看一下你这个角色的职业特技栏是不是存在这样一个特技，如果不想出售这个技能的话，去掉就可以了。

tionbi · 发表于 2012-2-10 18:02:39

唐门草楹发表于 2012-2-10 18:01
原脚本可以贴上来一下。据我所知的一个版本的魔法商店并不是没有@就不能学习，而是根据数据库的职业中特技 ...

谢谢你，我明天就开学了，今天想解决这个问题
我的脚本比较旧版，跟职业好像没挂钩
原脚本如下

#==============================================================================
# ■ 本脚本源自www.66rpg.com，转载与使用请保留此信息
#==============================================================================

#——以下是一些自定义的内容

$mShop_use_1 = "金钱" #——这项是购买魔法特技的货币的名称，如“灵魄”、“金钱”

$mShop_use_2 = "G"  #——这项是购买魔法特技的货币单位，如“点”、“￥”

$mShop_use_variable = 0  #——这项是购买魔法特技时消耗的变量编号，如果=0 则是消耗金钱

$mShop_Window_Opacity = 200  #——这项是窗口透明度

#==============================================================================
# ■ Window_MGold
#------------------------------------------------------------------------------
# 　显示金钱的窗口。
#==============================================================================
class Window_MGold < Window_Base
  #--------------------------------------------------------------------------
  # ● 初始化窗口
  #--------------------------------------------------------------------------
  def initialize
super(0, 0, 272, 64)
self.contents = Bitmap.new(width - 32, height - 32)
refresh
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
self.contents.clear
self.contents.font.color = system_color
self.contents.draw_text(0, 0 , 240,32 ,$mShop_use_1)
self.contents.font.color = normal_color
self.contents.draw_text(0, 0, 240-contents.text_size($mShop_use_2).width-6, 32, $mShop_gold.to_s, 2)
self.contents.font.color = system_color
self.contents.draw_text(0, 0, 240, 32, $mShop_use_2, 2)
  end
end
#==============================================================================
# ■ Scene_MShop
#------------------------------------------------------------------------------
# 　处理特技商店画面的类。
#==============================================================================
class Scene_MShop
  #--------------------------------------------------------------------------
  # ● 初始化
  #--------------------------------------------------------------------------
  def initialize(id)
@id = id
  end
  #--------------------------------------------------------------------------
  # ● 主处理
  #--------------------------------------------------------------------------
  def main
screen = Spriteset_Map.new
if $mShop_use_variable == 0
   $mShop_gold = $game_party.gold
else
   $mShop_gold = $game_variables[$mShop_use_variable]
end
# 生成帮助窗口
@help_window = Window_Help.new
@help_window.opacity = $mShop_Window_Opacity

# 生成金钱窗口
@gold_window = Window_MGold.new
@gold_window.x = 368
@gold_window.y = 416
@gold_window.opacity = $mShop_Window_Opacity
# 生成购买窗口
@buy_window = Window_MShopBuy.new(@id)
@buy_window.active = true
@buy_window.visible = true
@buy_window.help_window = @help_window
@buy_window.opacity = $mShop_Window_Opacity
# 生成状态窗口
@status_window = Window_MShopStatus.new
@status_window.visible = true
@status_window.active = false
@status_window.opacity = $mShop_Window_Opacity

#生成指令窗口
@command_window = Window_Command.new(160,["领悟","遗忘"])
@command_window.x = 320
@command_window.y = 240
@command_window.z = 500
@command_window.visible = false
@command_window.active = false
@command_window.opacity = $mShop_Window_Opacity

# 执行过渡
Graphics.transition
# 主循环
loop do
   # 刷新游戏画面
   Graphics.update
   # 刷新输入信息
   Input.update
   # 刷新画面
   update
   # 如果画面切换的话就中断循环
   if $scene != self
      break
   end
end
# 准备过渡
Graphics.freeze
# 释放窗口
@help_window.dispose
#@mhelp_window.dispose
@gold_window.dispose
@buy_window.dispose
@status_window.dispose
@command_window.dispose
screen.dispose
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面
  #--------------------------------------------------------------------------
  def update
# 刷新窗口
@help_window.update
#@mhelp_window.update
@gold_window.update
@buy_window.update
@status_window.update
@command_window.update
# 购买窗口激活的情况下: 调用 update_buy
if @buy_window.active
   update_buy
   return
end
if @status_window.active
   update_status
   return
end
if @command_window.active
   update_command
   return
end

  end

  #--------------------------------------------------------------------------
  # ● 刷新画面 (指令窗口激活的情况下)
  #--------------------------------------------------------------------------
  def update_command
if Input.trigger?(Input::B)
   $game_system.se_play($data_system.cancel_se)
   @status_window.index = -1
   @command_window.active = false
   @command_window.visible = false
   @buy_window.active = true
   return
end
if Input.trigger?(Input::C)
   if @command_window.index == 0
if $game_party.actors[@status_window.index].skill_learn?(@skill.id) or @skill.price >$mShop_gold
      $game_system.se_play($data_system.cancel_se)
      return
      else
      $game_system.se_play($data_system.decision_se)
      if $mShop_use_variable == 0
         $game_party.gain_gold([email protected])
         $mShop_gold -= @skill.price
      else
         $game_variables[$mShop_use_variable] -= @skill.price
         $mShop_gold -= @skill.price
      end
      $game_party.actors[@status_window.index].learn_skill(@skill.id)
      @gold_window.refresh
      @buy_window.refresh
      @status_window.refresh
      @status_window.index = -1
      @buy_window.active = true
      @command_window.active = false
      @command_window.visible = false
      end
   elsif  @command_window.index == 1
      if $game_party.actors[@status_window.index].skill_learn?(@skill.id) == false
      $game_system.se_play($data_system.cancel_se)
      return
      else
      $game_system.se_play($data_system.decision_se)
      if $mShop_use_variable == 0
         $game_party.gain_gold(@skill.price/2)  #<-遗忘价格为学习的一半,/2的地方相同
         $mShop_gold += @skill.price/2
      else
         $game_variables[$mShop_use_variable] += @skill.price/2
         $mShop_gold += @skill.price/2
      end
      $game_party.actors[@status_window.index].forget_skill(@skill.id)
      @gold_window.refresh
      @buy_window.refresh
      @status_window.refresh
      @status_window.index = -1
      @buy_window.active = true
      @command_window.active = false
      @command_window.visible = false
      end
   end
   return
end
  end

  #--------------------------------------------------------------------------
  # ● 刷新画面 (购买窗口激活的情况下)
  #--------------------------------------------------------------------------
  def update_buy
@status_window.skill = @buy_window.skill
if Input.trigger?(Input::B)
   $game_system.se_play($data_system.cancel_se)
   $scene = Scene_Map.new
   return
end
if Input.trigger?(Input::C)
   @skill = @buy_window.skill
   if @skill == nil #or @skill.price > $mShop_gold
      $game_system.se_play($data_system.buzzer_se)
      return
   end
   $game_system.se_play($data_system.decision_se)
   @buy_window.active = false
   @status_window.index = 0
   @status_window.active = true
end
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面 (状态窗口激活的情况下)
  #--------------------------------------------------------------------------
  def update_status
if Input.trigger?(Input::B)
   $game_system.se_play($data_system.cancel_se)
   @status_window.active = false
   @status_window.index = -1
   @buy_window.active = true
end
if Input.trigger?(Input::C)
   @status_window.active = false
   @command_window.visible = true
   @command_window.active = true
end
  end
end
#==============================================================================
# ■ Window_MShopStatus
#------------------------------------------------------------------------------
# 　特技商店画面、显示物品所持数与角色装备的窗口。
#==============================================================================
class Window_MShopStatus < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #--------------------------------------------------------------------------
  def initialize
super(368, 64, 272, 352)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.size = 18
@skill = nil
refresh
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
for i in 0...$game_party.actors.size
   actor = $game_party.actors
   self.contents.font.color = system_color
   self.contents.draw_text(0, 32*i, 240, 32, actor.name)
   if actor.skill_learn?(@skill.id)
   self.contents.font.color = Color.new(255,255,255,128)
   self.contents.draw_text(0, 32*i, 200, 32, "已经学习",2)
   else
   self.contents.font.color = Color.new(255,255,0,255)
   self.contents.draw_text(100, 32*i, 240, 32, "尚未学习")
   end
end
@item_max = $game_party.actors.size
end
  #--------------------------------------------------------------------------
  # ● 设置物品
  #    item : 新的物品
  #--------------------------------------------------------------------------
  def skill=(skill)
if @skill != skill
   @skill = skill
   refresh
end
  end
  #--------------------------------------------------------------------------
  # ● 刷新光标矩形
  #--------------------------------------------------------------------------
  def update_cursor_rect
if @index < 0
   self.cursor_rect.empty
else
   self.cursor_rect.set(0, @index * 32, self.width - 32, 32)
end
  end
end
#==============================================================================
# ■ Window_MShopBuy
#------------------------------------------------------------------------------
# 　特技商店画面、浏览显示可以购买的商品的窗口。
#==============================================================================
class Window_MShopBuy < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #    shop_goods : 商品
  #--------------------------------------------------------------------------
  def initialize(id)
super(0, 64, 368, 416)
@id = id
refresh
self.index = 0
  end
  #--------------------------------------------------------------------------
  # ● 获取物品
  #--------------------------------------------------------------------------
  def skill
return @data[self.index]
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
if self.contents != nil
   self.contents.dispose
   self.contents = nil
end
@data = []
for skill_id in @id
   skill = $data_skills[skill_id]
   if skill != nil
      @data.push(skill)
   end
end
@item_max = @data.size
if @item_max > 0
   self.contents = Bitmap.new(width - 32, row_max * 32)
   for i in 0...@item_max
      draw_item(i)
   end
end
  end
  #--------------------------------------------------------------------------
  # ● 描绘羡慕
  #    index : 项目编号
  #--------------------------------------------------------------------------
  def draw_item(index)
skill = @data[index]
# 除此之外的情况设置为无效文字色
if skill.price <= $mShop_gold
   self.contents.font.color = normal_color
else
   self.contents.font.color = disabled_color
end
x = 4
y = index * 32
rect = Rect.new(x, y, self.width - 32, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
bitmap = RPG::Cache.icon(skill.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
self.contents.draw_text(x + 28, y, 212, 32, skill.name, 0)
self.contents.draw_text(x + 240, y, 88, 32, skill.price.to_s, 2)
  end
  #--------------------------------------------------------------------------
  # ● 刷新帮助文本
  #--------------------------------------------------------------------------
  def update_help
@help_window.set_text(self.skill == nil ? "" : self.skill.description)
  end
end
#==============================================================================
# ■ RPG原装定义
#==============================================================================
module RPG
  class Skill
def description
   description = @description.split(/@/)[0]
   return description != nil ? description : ''
end
def price
   price = @description.split(/@/)[1]
   return price != nil ? price.to_i : 0
end
  end
end

唐门草楹 · 发表于 2012-2-10 18:07:45

我这有个比较新的版本的。不过要用#来间隔而不是@，你再试试看

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

#==============================================================================
# ■ 本脚本源自www.66rpg.com，转载与使用请保留此信息
#==============================================================================

#——以下是一些自定义的内容

$mShop_use_1 = "金钱" #——这项是购买魔法特技的货币的名称，如“灵魄”、“金钱”

$mShop_use_2 = "G"  #——这项是购买魔法特技的货币单位，如“点”、“￥”

$mShop_use_variable = 0  #——这项是购买魔法特技时消耗的变量编号，如果=0 则是消耗金钱

$mShop_Window_Opacity = 200  #——这项是窗口透明度

#==============================================================================
# ■ Window_MGold
#------------------------------------------------------------------------------
# 　显示金钱的窗口。
#==============================================================================
class Window_MGold < Window_Base
  #--------------------------------------------------------------------------
  # ● 初始化窗口
  #--------------------------------------------------------------------------
  def initialize
super(0, 0, 272, 64)
self.contents = Bitmap.new(width - 32, height - 32)
refresh
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
self.contents.clear
self.contents.font.color = system_color
self.contents.draw_text(0, 0 , 240,32 ,$mShop_use_1)
self.contents.font.color = normal_color
self.contents.draw_text(0, 0, 240-contents.text_size($mShop_use_2).width-6, 32, $mShop_gold.to_s, 2)
self.contents.font.color = system_color
self.contents.draw_text(0, 0, 240, 32, $mShop_use_2, 2)
  end
end
#==============================================================================
# ■ Scene_MShop
#------------------------------------------------------------------------------
# 　处理特技商店画面的类。
#==============================================================================
class Scene_MShop
  #--------------------------------------------------------------------------
  # ● 初始化
  #--------------------------------------------------------------------------
  def initialize(id)
@id = id
  end
  #--------------------------------------------------------------------------
  # ● 主处理
  #--------------------------------------------------------------------------
  def main
screen = Spriteset_Map.new
if $mShop_use_variable == 0
   $mShop_gold = $game_party.gold
else
   $mShop_gold = $game_variables[$mShop_use_variable]
end
# 生成帮助窗口
@help_window = Window_Help.new
@help_window.opacity = $mShop_Window_Opacity
# 生成金钱窗口
@gold_window = Window_MGold.new
@gold_window.x = 368
@gold_window.y = 416
@gold_window.opacity = $mShop_Window_Opacity
# 生成购买窗口
@buy_window = Window_MShopBuy.new(@id)
@buy_window.active = true
@buy_window.visible = true
@buy_window.help_window = @help_window
@buy_window.opacity = $mShop_Window_Opacity
# 生成状态窗口
@status_window = Window_MShopStatus.new
@status_window.visible = true
@status_window.active = false
@status_window.opacity = $mShop_Window_Opacity
# 执行过渡
Graphics.transition
# 主循环
loop do
   # 刷新游戏画面
   Graphics.update
   # 刷新输入信息
   Input.update
   # 刷新画面
   update
   # 如果画面切换的话就中断循环
   if $scene != self
      break
   end
end
# 准备过渡
Graphics.freeze
# 释放窗口
@help_window.dispose
#@mhelp_window.dispose
@gold_window.dispose
@buy_window.dispose
@status_window.dispose
screen.dispose
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面
  #--------------------------------------------------------------------------
  def update
# 刷新窗口
@help_window.update
#@mhelp_window.update
@gold_window.update
@buy_window.update
@status_window.update
# 购买窗口激活的情况下: 调用 update_buy
if @buy_window.active
   update_buy
   return
end
if @status_window.active
   update_status
   return
end
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面 (购买窗口激活的情况下)
  #--------------------------------------------------------------------------
  def update_buy
@status_window.skill = @buy_window.skill
if Input.trigger?(Input::B)
   $game_system.se_play($data_system.cancel_se)
   $scene = Scene_Map.new
   return
end
if Input.trigger?(Input::C)
   @skill = @buy_window.skill
   if @skill == nil or @skill.price > $mShop_gold
      $game_system.se_play($data_system.buzzer_se)
      return
   end
   $game_system.se_play($data_system.decision_se)
   @buy_window.active = false
   @status_window.index = 0
   @status_window.active = true
end
  end
  #--------------------------------------------------------------------------
  # ● 刷新画面 (状态窗口激活的情况下)
  #--------------------------------------------------------------------------
  def update_status
if Input.trigger?(Input::B)
   $game_system.se_play($data_system.cancel_se)
   @status_window.active = false
   @status_window.index = -1
   @buy_window.active = true
end
if Input.trigger?(Input::C)
   can_learn=false
   for j in $data_classes[$game_party.actors[@status_window.index].class_id].learnings
      if j.skill_id == @skill.id
      can_learn=true
      end
   end
   if can_learn==false
      $game_system.se_play($data_system.cancel_se)
      return
   end
   if $game_party.actors[@status_window.index].skill_learn?(@skill.id)
      $game_system.se_play($data_system.cancel_se)
      return
   else
      $game_system.se_play($data_system.decision_se)
      if $mShop_use_variable == 0
      $game_party.gain_gold([email protected])
      $mShop_gold -= @skill.price
      else
      $game_variables[$mShop_use_variable] -= @skill.price
      $mShop_gold -= @skill.price
      end
      $game_party.actors[@status_window.index].learn_skill(@skill.id)
      @gold_window.refresh
      @buy_window.refresh
      @status_window.refresh
      @status_window.active = false
      @status_window.index = -1
      @buy_window.active = true
   end
end
  end
end
#==============================================================================
# ■ Window_MShopStatus
#------------------------------------------------------------------------------
# 　特技商店画面、显示物品所持数与角色装备的窗口。
#==============================================================================
class Window_MShopStatus < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #--------------------------------------------------------------------------
  def initialize
super(368, 64, 272, 352)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.size = 15
@skill = nil
refresh
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
self.contents.clear
for i in 0...$game_party.actors.size
   actor = $game_party.actors
   draw_actor_graphic(actor,12,64*i+64)
   self.contents.font.color = system_color
   self.contents.draw_text(44, 64*i, 240, 32, actor.name)
   self.contents.draw_text(0, 64*i , 240-20,32,"等级",2)
   self.contents.font.color = normal_color
   self.contents.draw_text(0, 64*i, 240, 32, actor.level.to_s , 2)
   self.contents.font.color = system_color
   self.contents.draw_text(44, 64*i+22, 45, 32, $data_system.words.hp)
   self.contents.font.color = normal_color
   self.contents.draw_text(44, 64*i+22, 90, 32, actor.maxhp.to_s,2)
   self.contents.font.color = system_color
   self.contents.draw_text(150, 64*i+22, 45, 32, $data_system.words.sp)
   self.contents.font.color = normal_color
   self.contents.draw_text(150, 64*i+22, 90, 32, actor.maxsp.to_s,2)
   can_learn=false
   for j in $data_classes[actor.class_id].learnings
      if j.skill_id == @skill.id
      can_learn=true
      end
   end
   if can_learn == true
      if actor.skill_learn?(@skill.id)
      self.contents.font.color = Color.new(255,255,255,128)
      self.contents.draw_text(44, 64*i+44, 196, 32, "⊙此项特技已经学习⊙",2)
      else
      self.contents.font.color = Color.new(255,255,0,255)
      self.contents.draw_text(44, 64*i+44, 240, 32, "★此项特技尚未学习★")
      end
   else
      self.contents.font.color = Color.new(255,255,255,128)
      self.contents.draw_text(44, 64*i+44, 196, 32, "◇此项特技无法学习◇",2)
   end
end
@item_max = $game_party.actors.size
  end
  #--------------------------------------------------------------------------
  # ● 设置物品
  #    item : 新的物品
  #--------------------------------------------------------------------------
  def skill=(skill)
if @skill != skill
   @skill = skill
   refresh
end
  end
  #--------------------------------------------------------------------------
  # ● 刷新光标矩形
  #--------------------------------------------------------------------------
  def update_cursor_rect
if @index < 0
   self.cursor_rect.empty
else
   self.cursor_rect.set(0, @index * 64, self.width - 32, 64)
end
  end
end
#==============================================================================
# ■ Window_MShopBuy
#------------------------------------------------------------------------------
# 　特技商店画面、浏览显示可以购买的商品的窗口。
#==============================================================================
class Window_MShopBuy < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 初始化对像
  #    shop_goods : 商品
  #--------------------------------------------------------------------------
  def initialize(id)
super(0, 64, 368, 416)
@id = id
refresh
self.index = 0
  end
  #--------------------------------------------------------------------------
  # ● 获取物品
  #--------------------------------------------------------------------------
  def skill
return @data[self.index]
  end
  #--------------------------------------------------------------------------
  # ● 刷新
  #--------------------------------------------------------------------------
  def refresh
if self.contents != nil
   self.contents.dispose
   self.contents = nil
end
@data = []
for skill_id in @id
   skill = $data_skills[skill_id]
   if skill != nil
      @data.push(skill)
   end
end
@item_max = @data.size
if @item_max > 0
   self.contents = Bitmap.new(width - 32, row_max * 32)
   for i in 0...@item_max
      draw_item(i)
   end
end
  end
  #--------------------------------------------------------------------------
  # ● 描绘羡慕
  #    index : 项目编号
  #--------------------------------------------------------------------------
  def draw_item(index)
skill = @data[index]
# 除此之外的情况设置为无效文字色
if skill.price <= $mShop_gold
   self.contents.font.color = normal_color
else
   self.contents.font.color = disabled_color
end
x = 4
y = index * 32
rect = Rect.new(x, y, self.width - 32, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
bitmap = RPG::Cache.icon(skill.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
self.contents.draw_text(x + 28, y, 212, 32, skill.name, 0)
self.contents.draw_text(x + 240, y, 88, 32, skill.price.to_s, 2)
  end
  #--------------------------------------------------------------------------
  # ● 刷新帮助文本
  #--------------------------------------------------------------------------
  def update_help
@help_window.set_text(self.skill == nil ? "" : self.skill.description)
  end
end
#==============================================================================
# ■ RPG原装定义
#==============================================================================
module RPG
  class Skill
def description
   description = @description.split(/#/)[0]
   return description != nil ? description : ''
end
def price
   price = @description.split(/#/)[1]
   return price != nil ? price.to_i : 0
end
  end
end

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

tionbi · 发表于 2012-2-10 18:08:08

唐门草楹发表于 2012-2-10 18:01
原脚本可以贴上来一下。据我所知的一个版本的魔法商店并不是没有@就不能学习，而是根据数据库的职业中特技 ...

等一下，多亏你的提醒，我去菜单里看了
原来我把魔法商店整合到菜单里了，现在把技能ID删掉就没卖了。真是谢谢你

唐门草楹 · 发表于 2012-2-10 18:11:53

#呼叫魔法商店的时候，在事件中使用脚本：$scene = Scene_MShop.new([魔法编号1，2])

#在数据库的说明里，在说明文字后面加上@50 表示这个魔法价格为 50

是这个的原因嘛，以后复制脚本的时候真应该把作者的注解也复制上

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

[已经解决] 关于，魔法商店

R考场第七期银奖