[求助]初级脚本问题

门清

引用第3楼无双修罗一闪于2007-01-03 14:17发表的:
没错,楼上说得对,敢问阁下可有这个脚本

脚本的话是Interpreter4里面的command125~128这些方法
大致流程是生成新的窗口并描绘窗口内容，刷新一定时间然后释放
事件的话，将对话框位置改到中，显示，显示文章“得到XX物品”然后将对话框位置改回去就行了

絮儿

恩~其实8难的~试了一下..一个简陋的得失提示..
-v-恩...有很多要改进....
class Interpreter
def command_125
    # 获取要操作的值
    value = operate_value(@parameters[0], @parameters[1], @parameters[2])
    # 增减金钱
    $game_party.gain_gold(value)
    a = Window_Base.new(200, 200, 200, 90)
    a.contents = Bitmap.new(a.width - 32, a.height - 32)
   Audio.se_play("Audio/SE/005-System05",80,100)
   if value >= 0
    a.contents.draw_text(0, 0, 50, 30, "GET")
    else
    a.contents.draw_text(0, 0, 50, 30, "LOSE")
    end
    a.contents.draw_text(60, 25, 200, 50, value.abs.to_s + $data_system.words.gold)
    for i in 0..60
    Graphics.update
    end
    a.dispose
    # 继续
    return true
  end
  #--------------------------------------------------------------------------
  # ● 增减物品
  #--------------------------------------------------------------------------
  def command_126
    # 获取要操作的值
    value = operate_value(@parameters[1], @parameters[2], @parameters[3])
    # 增减物品
    $game_party.gain_item(@parameters[0], value)
    a = Window_Base.new(200, 200, 200, 90)
    a.contents = Bitmap.new(a.width - 32, a.height - 32)
   Audio.se_play("Audio/SE/005-System05",80,100)
   if value >= 0
    a.contents.draw_text(0, 0, 50, 30, "GET")
    else
    a.contents.draw_text(0, 0, 50, 30, "LOSE")
    end
  
    a.contents.draw_text(50, 0, 60, 40, $data_items[@parameters[0]].name)
    a.contents.draw_text(60, 25, 200, 50, "*"+ value.abs.to_s)
    for i in 0..60
    Graphics.update
    end
    a.dispose
    # 继续
    return true
  end
  #--------------------------------------------------------------------------
  # ● 增减武器
  #--------------------------------------------------------------------------
  def command_127
    # 获取要操作的值
    value = operate_value(@parameters[1], @parameters[2], @parameters[3])
    # 增减武器
    $game_party.gain_weapon(@parameters[0], value)
   a = Window_Base.new(200, 200, 200, 90)
    a.contents = Bitmap.new(a.width - 32, a.height - 32)
   Audio.se_play("Audio/SE/005-System05",80,100)
   if value >= 0
    a.contents.draw_text(0, 0, 50, 30, "GET")
    else
    a.contents.draw_text(0, 0, 50, 30, "LOSE")
    end
  
    a.contents.draw_text(50, 0, 60, 40, $data_weapons[@parameters[0]].name)
    a.contents.draw_text(60, 25, 200, 50, "*"+ value.abs.to_s)
    for i in 0..60
    Graphics.update
    end
    a.dispose
    # 继续
    return true
  end
  #--------------------------------------------------------------------------
  # ● 增减防具
  #--------------------------------------------------------------------------
  def command_128
    # 获取要操作的值
    value = operate_value(@parameters[1], @parameters[2], @parameters[3])
    # 增减防具
    $game_party.gain_armor(@parameters[0], value)
     a = Window_Base.new(200, 200, 200, 90)
    a.contents = Bitmap.new(a.width - 32, a.height - 32)
   Audio.se_play("Audio/SE/005-System05",80,100)
   if value >= 0
    a.contents.draw_text(0, 0, 50, 30, "GET")
    else
    a.contents.draw_text(0, 0, 50, 30, "LOSE")
    end
  
    a.contents.draw_text(50, 0, 60, 40, $data_armors[@parameters[0]].name)
    a.contents.draw_text(60, 25, 200, 50, "*"+ value.abs.to_s)
    for i in 0..60
    Graphics.update
    end
    a.dispose
    # 继续
    return true
  end
end