Project1

标题: 请教偷窃脚本切换地图后不还原成NPC携带物品初始状态方法 [打印本页]
作者: taeckle    时间: 2021-10-24 21:27
标题: 请教偷窃脚本切换地图后不还原成NPC携带物品初始状态方法
本帖最后由 taeckle 于 2021-10-25 05:14 编辑

本人在网上找到了一个简单的偷窃脚本，新开一个默认工程后在main上面插入就能使用，

请问大家要怎么搞才能让每次读档重新载入地图后(执行$game_map.setup($game_map.map_id)指令后)让NPC携带的物品不还原成新开工程时的初始状态啊？(比如现在的情况是先偷地图上第1号NPC携带的第2号物品, 然后再从当前地图出去再进来, 刚才偷第1号NPC的第2号物品就会又出现在第1号NPC携带物品列表里了)

先附上这个偷窃脚本代码, 下面还有在地图上设置的地图事件:

  1. #-------------------------------------------------------------------------
  2. # ★★★★★★
  3. #-------------------------------------------------------------------------
  4. module Stolen
  5.   STEAL_SKILL_ID = 1   # 偷盗特技id
  6. end
  7. #-------------------------------------------------------------------------
  8. # ★★★★★★
  9. #-------------------------------------------------------------------------
  10. class Scene_Map
  11.   attr_accessor :spriteset
  12. end

  14. #-------------------------------------------------------------------------
  15. # ★★★★★★
  16. #-------------------------------------------------------------------------
  17. class Window_Npc_Item < Window_Selectable
  18.   #--------------------------------------------------------------------------
  19.   # ● 初始化对像
  20.   #--------------------------------------------------------------------------
  21.   def initialize(item)
  22.     super(224, 80, 188+100, 320)
  23.     @column_max = 1
  24.     @item = item
  25.     @item_max = @item.size
  26.     self.height = @item.size*32+32
  27.     self.y = (480-self.height)/2
  28.     self.opacity = 160
  29.     refresh
  30.     self.index = 0
  31.   end
  32.   #--------------------------------------------------------------------------
  33.   def item
  34.     return @item[self.index]
  35.   end
  36.   #--------------------------------------------------------------------------
  37.   def refresh
  38.     if self.contents != nil
  39.       self.contents.dispose
  40.       self.contents = nil
  41.     end
  42.     if @item_max > 0
  43.       self.contents = Bitmap.new(width - 32, row_max * 32)
  44.       for i in 0...@item_max
  45.         draw_item(i)
  46.       end
  47.     end
  48.   end
  49.   #--------------------------------------------------------------------------
  50.   def draw_item(index)
  51.     item = @item[index]   
  52.     x = 4
  53.     y = index * 32
  54.     bitmap = RPG::Cache.icon(item.icon_name)
  55.     self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24))
  56.     self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
  57.   end

  59. end
  60. #-------------------------------------------------------------------------
  61. # ★★★★★★
  62. #-------------------------------------------------------------------------
  63. class Game_Party
  64.   attr_reader   :stealexp
  65.   attr_accessor :stealnpc
  66.   alias initialize_old initialize
  67.   def initialize
  68.     initialize_old
  69.     @stealexp = 0
  70.     @stealnpc = {}
  71.   end
  72.   def add_sexp(n)
  73.     @stealexp = [[@stealexp + n, 0].max, 100].min
  74.   end
  75. end
  76. #-------------------------------------------------------------------------
  77. # ★★★★★★
  78. #-------------------------------------------------------------------------
  79. class Interpreter
  80.   def judge
  81.     @npc_item = []
  82.     @npc_item.clear
  83.     if @list[0].code == 108
  84.       if @list[0].parameters[0].split(/:/)[0] == "可偷盗对象"
  85.         unless @list[0].parameters[0].split(/:/)[1] == nil
  86.           @npc_item = eval(@list[0].parameters[0].split(/:/)[1])
  87.         end
  88.       #@list[0].parameters[0] = "不可偷盗"
  89.       end
  90.     end
  91.   end
  92.   #偷盗
  93.   def steal
  94.    unless judge_skill
  95.       @message_waiting = true
  96.       $game_temp.message_proc = Proc.new { @message_waiting = false }
  97.       $game_temp.message_text = "无人会偷盗技能!"
  98.       return true
  99.    end
  100.    if @npc_item.size == 0
  101.       @message_waiting = true
  102.       $game_temp.message_proc = Proc.new { @message_waiting = false }
  103.       $game_temp.message_text = "对方已无任何道具."
  104.       return true
  105.    end
  106.       $win = Window_Npc_Item.new(@npc_item)
  107.    loop do
  108.         $game_map.update
  109.         $scene.spriteset.update
  110.         Graphics.update
  111.         Input.update
  112.         $win.update
  113.     if Input.trigger?(Input::B)
  114.         $win.dispose
  115.         $game_system.se_play($data_system.cancel_se)
  116.         return true
  117.     end  
  118.     if Input.trigger?(Input::C)
  119.           $win.dispose
  120.           $game_map.events[@event_id].animation_id = $data_skills[Stolen::STEAL_SKILL_ID].animation2_id
  121.      for i in 1..$data_animations[$data_skills[Stolen::STEAL_SKILL_ID].animation2_id].frame_max*4
  122.           Graphics.update
  123.           $game_map.update
  124.           $game_player.update
  125.           $scene.spriteset.update
  126.      end
  127.      if successful?(@list[2].parameters[0].split(/,/)[1].split(/:/)[1].to_i)
  128.           $game_party.add_sexp(2)  #偷盗经验值上升
  129.           item = $win.item
  130.       case item
  131.        when RPG::Item
  132.           $game_party.gain_item(item.id, 1)
  133.           @list[4].parameters[0].slice!(item.id.to_s+",")              
  134.        when RPG::Weapon
  135.           $game_party.gain_weapon(item.id, 1)
  136.           @list[6].parameters[0].slice!(item.id.to_s+",")
  137.        when RPG::Armor
  138.           $game_party.gain_armor(item.id, 1)
  139.           @list[5].parameters[0].slice!(item.id.to_s+",")
  140.       else   
  141.       end
  142.           @wait_count = 1                       
  143.           return true
  144.      else
  145.           #$game_party.add_sexp(1)       #偷盗经验值上升         
  146.           @message_waiting = true
  147.           $game_temp.message_proc = Proc.new { @message_waiting = false }
  148.           $game_temp.message_text = "盗取失败，被发现了！"            
  149.           Audio.se_play("Audio/SE/"+"Glass1",80,100)
  150.           @wait_count = 1         
  151.       if $data_troops[@list[3].parameters[0].split(/:/)[1].to_i] != nil
  152.           $game_temp.battle_abort = true
  153.           $game_temp.battle_calling = true
  154.           $game_temp.battle_troop_id = @list[3].parameters[0].split(/:/)[1].to_i
  155.           $game_temp.battle_can_escape = false
  156.           $game_temp.battle_can_lose = false
  157.           current_indent = @list[@index].indent
  158.           $game_temp.battle_proc = Proc.new { |n| @branch[current_indent] = n }
  159.       end
  160.      end
  161.     break
  162.     end  # end of C键
  163.    end #end of loop do
  164.   end #end of def
  165.    #是否有“盗窃”技能判断
  166.   def judge_skill
  167.     actor = $game_party.actors
  168.     for i in 0...actor.size
  169.      if actor[i].skills.include?(Stolen::STEAL_SKILL_ID)
  170.         return true
  171.      end
  172.     end
  173.     return false
  174.   end
  175.    #取得物品
  176.   def get_item
  177.     temp_item = []     
  178.     # 是 物品 判断
  179.     if @list[4].parameters[0].split(/:/)[0] == "Item"
  180.       if @list[4].parameters[0].split(/:/)[1] != nil
  181.         b1 = @list[4].parameters[0].split(/:/)[1].split(/,/)
  182.         for i in 0...b1.size
  183.           temp_item.push($data_items[b1[i].to_i])
  184.         end      
  185.       end
  186.     end
  187.     # 是 武器 判断
  188.     if @list[6].parameters[0].split(/:/)[0] == "Weapon"
  189.       if @list[6].parameters[0].split(/:/)[1] != nil
  190.         b2 = @list[6].parameters[0].split(/:/)[1].split(/,/)
  191.         for i in 0...b2.size
  192.           temp_item.push($data_weapons[b2[i].to_i])
  193.         end
  194.       end
  195.     end
  196.     # 是 防具 判断
  197.     if @list[5].parameters[0].split(/:/)[0] == "Armor"
  198.       if @list[5].parameters[0].split(/:/)[1] != nil
  199.         b3 = @list[5].parameters[0].split(/:/)[1].split(/,/)
  200.         for i in 0...b3.size
  201.           temp_item.push($data_armors[b3[i].to_i])
  202.         end
  203.       end
  204.     end
  205.     # 返回物品数组
  206.     return temp_item
  207.    end
  208.    #偷盗成功判断
  209.    def successful?(n) # n - 对象npc的过失率
  210.     s_rate = 101
  211.     return rand(101) < s_rate
  212.   end
  213.   #------------------------------------------
  214. end
复制代码




附件里有完整的工程制作

偷窃脚本地图事件设置.PNG (103.73 KB, 下载次数: 21)

地图事件上的设置

地图事件上的设置

taeckle简单的偷窃脚本_1.rar

191.09 KB, 下载次数: 16

第2张地图从左边进入
作者: soulsaga    时间: 2021-10-24 22:36
你的事件触发是决定键..读档后后需要再执行这个事件才行?
作者: guoxiaomi    时间: 2021-10-25 17:42
这个偷窃脚本的设计就是这样，相当于你有一定的概率可以避免战斗直接获取经验和物品。也非常适合S/L大法。
如果你想让被偷过的东西在显示的时候减少，那么你就需要对所有可以偷窃的事件的状态进行记录。每次偷窃时，查询一下之前的记录，去掉已经偷掉的部分就行。
但是转念一想，这和储物箱并没有本质区别：NPC的东西只能拿不能放回，并且每次只能拿1个
作者: guoxiaomi    时间: 2021-10-26 15:51
本帖最后由 guoxiaomi 于 2021-10-26 16:16 编辑

RUBY 代码复制
  1. # encoding: utf-8
  2. module Taeckle
  3.   # 2 is the id of global variable which saves all npcs' stolen data
  4.   Stolen_Data_VID = 2
  5.  
  6.   class Stolen_Data
  7.     def initialize
  8.       @data = {}
  9.     end
  10.  
  11.     def setup(index, force)
  12.       if force || @data[index].nil?
  13.         @data[index] = []
  14.         yield @data[index]
  15.       end
  16.     end
  17.  
  18.     def update(index)
  19.       data = @data[index]
  20.       if data.empty?
  21.         return :empty_storage
  22.       end
  23.       # -----------------------------------------
  24.       # 定义处理 data 的方式
  25.       # 偷窃成功时操作 $game_party 以增加道具
  26.       # -----------------------------------------
  27.  
  28.       # -----------------------------------------
  29.       return true
  30.     end
  31.   end
  32. end
  33.  
  34. class Interpreter
  35.   def steal_setup(vid = Taeckle::Stolen_Data_VID, &block)
  36.     if $game_variables[vid] == 0
  37.       $game_variables[vid] = Taeckle::Stolen_Data.new
  38.     end
  39.     index = $game_map.map_id * 1000 + @event_id
  40.     $game_variables[vid].setup(index, false, &block)
  41.   end
  42.  
  43.   def steal_update(vid = Taeckle::Stolen_Data_VID)
  44.     index = $game_map.map_id * 1000 + @event_id
  45.     $game_variables[vid].update(index)
  46.   end
  47. end
  48.  
  49. =begin
  50. # 直接在事件脚本里调用 steal_setup 和 steal_update
  51. # usage : 
  52. # 1. 向 data 里添加数据，数据类型任意
  53. steal_setup { |data|
  54.   data << [1, 2]
  55.   data << [3, 4]
  56. }
  57. # 2. 必须在 steal_setup 后使用，执行动作
  58. @steal_result = steal_update()
  59. # 3. 在条件分歧里判断结果以执行不同的分支
  60. @steal_result == :empty_storage
  61. =end
作者: taeckle    时间: 2021-10-28 02:44
guoxiaomi 发表于 2021-10-26 15:51
# encoding: utf-8
module Taeckle
  # 2 is the id of global variable which saves all npcs' stolen dat ...

大神我还有个问题，你看我上面的脚本第133、136、139行里的那个"slice!(item.id.to_s+",")"，表示的意思是在对象@list[4].parameters[0]中删除item.id，那如果我想在对象@list[4].parameters[0]中增加item.id又该用哪个指令呢？
作者: taeckle    时间: 2021-10-31 16:01
本帖最后由 taeckle 于 2021-10-31 16:17 编辑
guoxiaomi 发表于 2021-10-26 15:51
# encoding: utf-8
module Taeckle
  # 2 is the id of global variable which saves all npcs' stolen dat ...


报告大神，我死磕了几天后这个问题终于被咱解决了，给你也分享下咱死磕的成果:
先总结下解决这个问题的整体思路，鉴于我的工程里还没有重名的NPC，我还是决定用事件名称来标记NPC以及其所携带的物品，在此之前得先用到那个显示事件名称脚本(插入到main上面就能用了,下面会有的), 然后得在$game_system里增加个存放NPC携带物品的全局变量， 最后完善偷窃脚本.

第1步: 把这个显示事件名称脚本插入到main上面:

  1. # 使用方法：插入到main前即可，之后就会显示每个事件的名字。
  2. # 不想显示名字的NPC直接把名字设置为一个空格就行了。
  3. #
  4. # 附加功能：名字颜色区分：比如一个NPC的名字是 小龙,2 就会用2号颜色(红色)显示
  5. #
  6. # 修改NPC名的方法：$game_map.events[事件ID编号].name =
  7. # 比如某个宝箱，原名宝箱，打开后名为“打开的宝箱”，则
  8. # $game_map.events[@event_id].name = "打开的宝箱" 或者
  9. # $game_map.events[2].name = "打开的宝箱" (假设宝箱是2号事件)
  10. #
  11. # 修改颜色定义：70-88行，131-149行，自己随便改。
  12. #
  13. # 给主角带上名字：192行，改 "" 为 "主角" 或者 $game_party.actors[0].name 即可
  14. #
  15. # 是否显示姓名的开关：157行，开头的井号去掉。则以后39号开关打开的时候才会显示姓名
  16. #
  17. #==============================================================================
  18. # ■ Game_Event
  19. #------------------------------------------------------------------------------
  20. #  处理事件的类。条件判断、事件页的切换、并行处理、执行事件功能
  21. # 在 Game_Map 类的内部使用。
  22. #==============================================================================
  23. class Game_Event < Game_Character
  24. #——————————————————————————————————————
  25. # 用来返回名称
  26. #——————————————————————————————————————
  27. def name
  28.   return @event.name
  29. end  
  30. def name=(newname)
  31.   @event.name = newname
  32. end
  33. end

  35. #==============================================================================
  36. # ■ Sprite_Character
  37. #------------------------------------------------------------------------------
  38. #  角色显示用脚本。监视 Game_Character 类的实例、
  39. # 自动变化脚本状态。
  40. #==============================================================================

  42. class Sprite_Character < RPG::Sprite
  43.   def dispose
  44.   super
  45.   @namesprite.dispose unless @namesprite.nil?
  46.   @titlesprite.dispose unless @titlesprite.nil?
  47.   @class_sprite.dispose unless @class_sprite.nil?
  48.   end
  49. #--------------------------------------------------------------------------
  50. # ● 定义实例变量
  51. #--------------------------------------------------------------------------
  52. attr_accessor :character                # 角色
  53.   #--------------------------------------------------------------------------
  54. # ● 初始化对像
  55. #     viewport  : 查看端口
  56. #     character : 角色 (Game_Character)
  57. #--------------------------------------------------------------------------
  58. def initialize(viewport, character = nil)
  59.   if character == nil
  60.   name = ""
  61.   else
  62.   name = character.name #if character != nil
  63.   end
  64.   super(viewport)
  65.   @npc_name = ["AA","BB","CC","DD"]
  66.   @character = character
  67.   @namesprite = Sprite.new
  68.   @namesprite.bitmap = Bitmap.new(160, 48)
  69.   @namesprite.bitmap.font.name = ["黑体", "楷体", "宋体"]
  70.   @namesprite.bitmap.font.size = 15
  71.   @namesprite.bitmap.font.color.set( 30, 255,   0)
  72.    ################################################
  73.    @titlesprite = Sprite.new
  74.    @titlesprite.bitmap = Bitmap.new(160, 48)#160，48
  75.    @titlesprite.bitmap.font.name = ["黑体", "楷体", "宋体"] #"楷体"
  76.    @titlesprite.bitmap.font.size = 25
  77.    @titlesprite.bitmap.font.color.set(255, 200, 0)
  78.    @class_sprite = Sprite.new
  79.    @class_sprite.bitmap = Bitmap.new(160, 48)#160，48
  80.    @class_sprite.bitmap.font.name = ["黑体", "楷体", "宋体"] #"楷体"
  81.    @class_sprite.bitmap.font.size = 25
  82.    @class_sprite.bitmap.font.color.set(  0, 255, 255)
  83.    ################################################
  84.   @evname = name
  85.   @evname_split = name.split(/,/)[0]
  86.   @evoy = 0
  87.   if name[0, 2]=="EV"
  88.     @evname_split = " "
  89.   end
  90.   #@tile_id = @character.tile_id
  91.   #if @tile_id >= 384 && @character.name.split(/,/)[1] == nil
  92.    # @evname_split = " "
  93.   #end
  94.   if name.split(/,/)[1] != nil
  95.     case name.split(/,/)[1]
  96.     when "0"
  97.       @namesprite.bitmap.font.color.set(255, 255, 255)
  98.     when "1"
  99.       @namesprite.bitmap.font.color.set(120, 120, 120)
  100.     when "2"
  101.       @namesprite.bitmap.font.color.set(255,   0,   0)
  102.     when "3"
  103.       @namesprite.bitmap.font.color.set(30, 255,   0)
  104.     when "4"
  105.       @namesprite.bitmap.font.color.set(0, 112, 221)
  106.     when "5"
  107.       @namesprite.bitmap.font.color.set(163,  53, 238)
  108.     when "6"
  109.       @namesprite.bitmap.font.color.set(247, 102,   0)
  110.     when "7"
  111.       @namesprite.bitmap.font.color.set(255, 210,   0)
  112.     else
  113.       @evoy = name.split(/,/)[1].to_i
  114.       #@namesprite.bitmap.font.color.set(255, 255, 255)
  115.     end
  116.   end
  117.   if @evname_split != "" and @evname_split != nil
  118.      if @character.character_name == "" && @character.tile_id == 0
  119.       @evname_split = ""
  120.      end
  121.      if character.is_a?(Game_Player)
  122.         if character.id == 0
  123.          case $game_variables[16]
  124.          when -999999..-60
  125.           @namesprite.bitmap.font.color.set(255,   0,   0)
  126.          when -59..79
  127.           @namesprite.bitmap.font.color.set(255, 255, 255)
  128.          when 80..999999
  129.           @namesprite.bitmap.font.color.set(255, 255,   0)
  130.          else
  131.          end
  132.        else
  133.         @namesprite.bitmap.font.color.set(30, 255, 0)
  134.       end
  135.       for i in 0..@npc_name.size
  136.        if @evname_split == @npc_name[i]
  137.         @namesprite.bitmap.font.color.set(30, 255, 0)
  138.        end
  139.       end
  140.      end
  141.      
  142.      @namesprite.bitmap.draw_text(0, 24, 160, 36, @evname_split, 1)
  143.   end
  144. ################################################
  145.    
  146.    if character.is_a?(Game_Player) && character.id == 0
  147.      if $game_party.actors[character.id].armor1_id != 0
  148.       @evtitle = $data_armors[$game_party.actors[character.id].armor1_id].name.to_s
  149.      else
  150.       @evtitle = ""#$game_party.actors[character.id].class_name
  151.     end
  152.      @class_name = $game_party.actors[character.id].class_name
  153.      for i in 0..@npc_name.size
  154.        if @evname_split == @npc_name[i]
  155.         @class_name = ""
  156.         @evtitle = ""
  157.        end
  158.      end
  159.      @class_name = "" if $game_party.actors[character.id].class_id == 1 or $game_party.actors[character.id].class_id == 26
  160.      @titlesprite.bitmap.draw_text(0, 0, 160, 36, @evtitle, 1)#160 36
  161.      @class_sprite.bitmap.draw_text(0, 0, 160, 36, @class_name, 1)
  162.    end
  163.    ################################################
  164.   update
  165. end
  166. #--------------------------------------------------------------------------
  167. # ● 更新画面
  168. #--------------------------------------------------------------------------
  169. def update
  170.   super
  171.   return if  @character == nil
  172.   # 元件 ID、文件名、色相与现在的情况存在差异的情况下
  173.   if @tile_id != @character.tile_id or
  174.      @character_name != @character.character_name or
  175.      @character_hue != @character.character_hue
  176.     # 记忆元件 ID 与文件名、色相
  177.     @tile_id = @character.tile_id
  178.     @character_name = @character.character_name
  179.     @character_hue = @character.character_hue
  180.     # 元件 ID 为有效值的情况下
  181.     if @tile_id >= 384
  182.       self.bitmap = RPG::Cache.tile($game_map.tileset_name,
  183.         @tile_id, @character.character_hue)
  184.       self.src_rect.set(0, 0, 32, 32)
  185.       self.ox = 16
  186.       self.oy = 32
  187.     # 元件 ID 为无效值的情况下
  188.     else
  189.       self.bitmap = RPG::Cache.character(@character.character_name,
  190.         @character.character_hue)
  191.       @cw = bitmap.width / 4
  192.       @ch = bitmap.height / 4
  193.       self.ox = @cw / 2
  194.       self.oy = @ch
  195.     end
  196.   end
  197.   if @evname != @character.name
  198.     @namesprite.bitmap.clear
  199.     @evname = @character.name
  200.     @evname_split = @character.name.split(/,/)[0]
  201.     if @character.name.split(/,/)[1] != nil
  202.       case @character.name.split(/,/)[1]
  203.       when "0"
  204.         @namesprite.bitmap.font.color.set(255, 255, 255)
  205.       when "1"
  206.         @namesprite.bitmap.font.color.set(120, 120, 120)
  207.       when "2"
  208.         @namesprite.bitmap.font.color.set(255,   0,   0)
  209.       when "3"
  210.         @namesprite.bitmap.font.color.set( 30, 255,   0)
  211.       when "4"
  212.         @namesprite.bitmap.font.color.set(  0, 112, 221)
  213.       when "5"
  214.         @namesprite.bitmap.font.color.set(163,  53, 238)
  215.       when "6"
  216.         @namesprite.bitmap.font.color.set(255, 128,   0)
  217.       when "7"
  218.         @namesprite.bitmap.font.color.set(229, 204, 128)
  219.       else
  220.         @namesprite.bitmap.font.color.set(255, 255, 255)
  221.       end
  222.     end
  223.    
  224.     if @evname_split != "" and @evname_split != nil
  225.       if character.character_name == ""  && character.tile_id == 0
  226.       @evname_split = ""
  227.       end
  228.      if character.is_a?(Game_Player)
  229.         if character.id == 0
  230.          case $game_variables[16]
  231.          when -999999..-150
  232.           @namesprite.bitmap.font.color.set(255,   0,   0)
  233.          when -149..79
  234.           @namesprite.bitmap.font.color.set(255, 255, 255)
  235.          when 80..999999
  236.           @namesprite.bitmap.font.color.set(247, 102,   0)
  237.          else
  238.          end
  239.        else
  240.         @namesprite.bitmap.font.color.set(30, 255, 0)
  241.       end
  242.        for i in 0..@npc_name.size
  243.         if @evname_split == @npc_name[i]
  244.         @namesprite.bitmap.font.color.set(30, 255, 0)
  245.         end
  246.        end
  247.       end
  248.       @namesprite.bitmap.draw_text(0, 24, 160, 36, @evname_split, 1)
  249.     end
  250.     ################################################
  251.    
  252.    if character.is_a?(Game_Player)
  253.      if $game_party.actors[character.id].armor1_id != 0
  254.       @evtitle = $data_armors[$game_party.actors[character.id].armor1_id].name.to_s
  255.      else
  256.       @evtitle = ""#$game_party.actors[character.id].class_name
  257.     end
  258.      @class_name = $game_party.actors[character.id].class_name
  259.       for i in 0..@npc_name.size
  260.        if @evname_split == @npc_name[i]
  261.         @class_name = ""
  262.         @evtitle = ""
  263.        end
  264.       end
  265.      @class_name = "" if $game_party.actors[character.id].class_id == 1 or $game_party.actors[character.id].class_id == 26
  266.      @titlesprite.bitmap.draw_text(0, 0, 160, 36, @evtitle, 1)#160 36
  267.      @class_sprite.bitmap.draw_text(0, 0, 160, 36, @class_name, 1)
  268.    end
  269.    ################################################
  270.   end
  271.   @namesprite.x = self.x-80
  272.   @namesprite.y = self.y-self.oy-10-@evoy
  273.    ################################################
  274.    if @class_name == ""
  275.    @titlesprite.x = self.x-80
  276.    @titlesprite.y = self.y-123
  277.    
  278.    @class_sprite.x = self.x-80
  279.    @class_sprite.y = self.y-123
  280.    else     
  281.    @titlesprite.x = self.x-80
  282.    #@titlesprite.y = self.y-148 #原人物模型位置
  283.    @titlesprite.y = self.y-141
  284.    
  285.    @class_sprite.x = self.x-80
  286.    #@class_sprite.y = self.y-130 #原人物模型位置
  287.    @class_sprite.y = self.y-123
  288.    end
  289. # @namesprite.visible = $game_switches[12]
  290.   # 设置可视状态
  291.   self.visible = (not @character.transparent)
  292.   # 图形是角色的情况下
  293.   if @tile_id == 0
  294.     # 设置传送目标的矩形
  295.     sx = @character.pattern * @cw
  296.     sy = (@character.direction - 2) / 2 * @ch
  297.     self.src_rect.set(sx, sy, @cw, @ch)
  298.   end
  299.   # 设置脚本的坐标
  300.   self.x = @character.screen_x
  301.   self.y = @character.screen_y
  302.   self.z = @character.screen_z(@ch)
  303.   # 设置不透明度、合成方式、茂密
  304.   self.opacity = @character.opacity
  305.   self.blend_type = @character.blend_type
  306.   self.bush_depth = @character.bush_depth
  307.   # 动画
  308.   if @character.animation_id != 0
  309.     animation = $data_animations[@character.animation_id]
  310.     animation(animation, true)
  311.     @character.animation_id = 0
  312.   end
  313. end
  314. end
  315. #==============================================================================
  316. # ■ Game_Player
  317. #------------------------------------------------------------------------------
  318. #  处理主角的类。事件启动的判定、以及地图的滚动等功能。
  319. # 本类的实例请参考 $game_player。
  320. #==============================================================================

  322. class Game_Player < Game_Character
  323. def name
  324.   return $game_party.actors[0].name
  325. end
  326. end
复制代码



第2步: 在$game_system里增加个存放NPC携带物品的全局变量:

RUBY 代码复制
  1. #==============================================================================
  2. # ■ Game_System
  3. #------------------------------------------------------------------------------
  4. # 　处理系统附属数据的类。也可执行诸如 BGM 管理之类的功能。本类的实例请参考
  5. # $game_system 。
  6. #==============================================================================
  7.  
  8. class Game_System
  9.   #--------------------------------------------------------------------------
  10.   # ● 定义实例变量
  11.   #--------------------------------------------------------------------------
  12.   attr_reader   :map_interpreter          # 地图事件用解释程序
  13.   attr_reader   :battle_interpreter       # 战斗事件用解释程序
  14.   attr_accessor :timer                    # 计时器
  15.   attr_accessor :timer_working            # 计时器执行中的标志
  16.   attr_accessor :save_disabled            # 禁止存档
  17.   attr_accessor :menu_disabled            # 禁止菜单
  18.   attr_accessor :encounter_disabled       # 禁止遇敌
  19.   attr_accessor :message_position         # 文章选项 显示位置
  20.   attr_accessor :message_frame            # 文章选项 窗口外关
  21.   attr_accessor :save_count               # 存档次数
  22.   attr_accessor :magic_number             # 魔法编号
  23.   attr_accessor :npc_carry_items          # NPC携带的物品集合 
  24.   #--------------------------------------------------------------------------
  25.   # ● 初始化对像
  26.   #--------------------------------------------------------------------------
  27.   def initialize
  28.     @map_interpreter = Interpreter.new(0, true)
  29.     @battle_interpreter = Interpreter.new(0, false)
  30.     @timer = 0
  31.     @timer_working = false
  32.     @save_disabled = false
  33.     @menu_disabled = false
  34.     @encounter_disabled = false
  35.     @message_position = 2
  36.     @message_frame = 0
  37.     @save_count = 0
  38.     @magic_number = 0
  39.     @npc_carry_items  = Hash["偷窃对象1"=>[[1,11],[2,12],[3,13]],
  40.     "偷窃对象2"=>[[5,15],[6,16],[7,17]],
  41.     "guoxiaomi"=>[[2],[3],[5,5,5]],
  42.     "待定"=>[[],[],[]]]
  43.   end
  44.   #--------------------------------------------------------------------------
  45.   # ● 演奏 BGM
  46.   #     bgm : 演奏的 BGM
  47.   #--------------------------------------------------------------------------
  48.   def bgm_play(bgm)
  49.     @playing_bgm = bgm
  50.     if bgm != nil and bgm.name != ""
  51.       Audio.bgm_play("Audio/BGM/" + bgm.name, bgm.volume, bgm.pitch)
  52.     else
  53.       Audio.bgm_stop
  54.     end
  55.     Graphics.frame_reset
  56.   end
  57.   #--------------------------------------------------------------------------
  58.   # ● 停止 BGM
  59.   #--------------------------------------------------------------------------
  60.   def bgm_stop
  61.     Audio.bgm_stop
  62.   end
  63.   #--------------------------------------------------------------------------
  64.   # ● BGM 的淡出
  65.   #     time : 淡出时间 (秒)
  66.   #--------------------------------------------------------------------------
  67.   def bgm_fade(time)
  68.     @playing_bgm = nil
  69.     Audio.bgm_fade(time * 1000)
  70.   end
  71.   #--------------------------------------------------------------------------
  72.   # ● 记忆 BGM
  73.   #--------------------------------------------------------------------------
  74.   def bgm_memorize
  75.     @memorized_bgm = @playing_bgm
  76.   end
  77.   #--------------------------------------------------------------------------
  78.   # ● 还原 BGM
  79.   #--------------------------------------------------------------------------
  80.   def bgm_restore
  81.     bgm_play(@memorized_bgm)
  82.   end
  83.   #--------------------------------------------------------------------------
  84.   # ● 演奏 BGS
  85.   #     bgs : 演奏的 BGS
  86.   #--------------------------------------------------------------------------
  87.   def bgs_play(bgs)
  88.     @playing_bgs = bgs
  89.     if bgs != nil and bgs.name != ""
  90.       Audio.bgs_play("Audio/BGS/" + bgs.name, bgs.volume, bgs.pitch)
  91.     else
  92.       Audio.bgs_stop
  93.     end
  94.     Graphics.frame_reset
  95.   end
  96.   #--------------------------------------------------------------------------
  97.   # ● BGS 的淡出
  98.   #     time : 淡出时间 (秒)
  99.   #--------------------------------------------------------------------------
  100.   def bgs_fade(time)
  101.     @playing_bgs = nil
  102.     Audio.bgs_fade(time * 1000)
  103.   end
  104.   #--------------------------------------------------------------------------
  105.   # ● 记忆 BGS
  106.   #--------------------------------------------------------------------------
  107.   def bgs_memorize
  108.     @memorized_bgs = @playing_bgs
  109.   end
  110.   #--------------------------------------------------------------------------
  111.   # ● 还原 BGS
  112.   #--------------------------------------------------------------------------
  113.   def bgs_restore
  114.     bgs_play(@memorized_bgs)
  115.   end
  116.   #--------------------------------------------------------------------------
  117.   # ● ME 的演奏
  118.   #     me : 演奏的 ME
  119.   #--------------------------------------------------------------------------
  120.   def me_play(me)
  121.     if me != nil and me.name != ""
  122.       Audio.me_play("Audio/ME/" + me.name, me.volume, me.pitch)
  123.     else
  124.       Audio.me_stop
  125.     end
  126.     Graphics.frame_reset
  127.   end
  128.   #--------------------------------------------------------------------------
  129.   # ● SE 的演奏
  130.   #     se : 演奏的 SE
  131.   #--------------------------------------------------------------------------
  132.   def se_play(se)
  133.     if se != nil and se.name != ""
  134.       Audio.se_play("Audio/SE/" + se.name, se.volume, se.pitch)
  135.     end
  136.   end
  137.   #--------------------------------------------------------------------------
  138.   # ● 停止 SE 
  139.   #--------------------------------------------------------------------------
  140.   def se_stop
  141.     Audio.se_stop
  142.   end
  143.   #--------------------------------------------------------------------------
  144.   # ● 获取演奏中 BGM
  145.   #--------------------------------------------------------------------------
  146.   def playing_bgm
  147.     return @playing_bgm
  148.   end
  149.   #--------------------------------------------------------------------------
  150.   # ● 获取演奏中 BGS
  151.   #--------------------------------------------------------------------------
  152.   def playing_bgs
  153.     return @playing_bgs
  154.   end
  155.   #--------------------------------------------------------------------------
  156.   # ● 获取窗口外观的文件名
  157.   #--------------------------------------------------------------------------
  158.   def windowskin_name
  159.     if @windowskin_name == nil
  160.       return $data_system.windowskin_name
  161.     else
  162.       return @windowskin_name
  163.     end
  164.   end
  165.   #--------------------------------------------------------------------------
  166.   # ● 设置窗口外观的文件名
  167.   #     windowskin_name : 新的窗口外观文件名
  168.   #--------------------------------------------------------------------------
  169.   def windowskin_name=(windowskin_name)
  170.     @windowskin_name = windowskin_name
  171.   end
  172.   #--------------------------------------------------------------------------
  173.   # ● 获取战斗 BGM
  174.   #--------------------------------------------------------------------------
  175.   def battle_bgm
  176.     if @battle_bgm == nil
  177.       return $data_system.battle_bgm
  178.     else
  179.       return @battle_bgm
  180.     end
  181.   end
  182.   #--------------------------------------------------------------------------
  183.   # ● 设置战斗 BGM
  184.   #     battle_bgm : 新的战斗 BGM
  185.   #--------------------------------------------------------------------------
  186.   def battle_bgm=(battle_bgm)
  187.     @battle_bgm = battle_bgm
  188.   end
  189.   #--------------------------------------------------------------------------
  190.   # ● 获取战斗结束的 BGM
  191.   #--------------------------------------------------------------------------
  192.   def battle_end_me
  193.     if @battle_end_me == nil
  194.       return $data_system.battle_end_me
  195.     else
  196.       return @battle_end_me
  197.     end
  198.   end
  199.   #--------------------------------------------------------------------------
  200.   # ● 设置战斗结束的 BGM
  201.   #     battle_end_me : 新的战斗结束 BGM
  202.   #--------------------------------------------------------------------------
  203.   def battle_end_me=(battle_end_me)
  204.     @battle_end_me = battle_end_me
  205.   end
  206.   #--------------------------------------------------------------------------
  207.   # ● 刷新画面
  208.   #--------------------------------------------------------------------------
  209.   def update
  210.     # 计时器减 1
  211.     if @timer_working and @timer > 0
  212.       @timer -= 1
  213.     end
  214.   end
  215. end



第3步: 完善偷窃脚本:

RUBY 代码复制
  1. #-------------------------------------------------------------------------
  2. # ★★★★★★
  3. #-------------------------------------------------------------------------
  4. module Stolen
  5.   STEAL_SKILL_ID = 1   # 偷盗特技id
  6. end
  7. #-------------------------------------------------------------------------
  8. # ★★★★★★
  9. #-------------------------------------------------------------------------
  10. class Scene_Map
  11.   attr_accessor :spriteset
  12. end
  13.  
  14. #-------------------------------------------------------------------------
  15. # ★★★★★★
  16. #-------------------------------------------------------------------------
  17. class Window_Npc_Item < Window_Selectable
  18.   #--------------------------------------------------------------------------
  19.   # ● 初始化对像
  20.   #--------------------------------------------------------------------------
  21.   def initialize(item)
  22.     super(224, 80, 188+100, 320)
  23.     @column_max = 1
  24.     @item = item
  25.     @item_max = @item.size
  26.     self.height = @item.size*32+32
  27.     self.y = (480-self.height)/2
  28.     self.opacity = 160
  29.     refresh
  30.     self.index = 0
  31.   end
  32.   #--------------------------------------------------------------------------
  33.   def item
  34.     return @item[self.index]
  35.   end
  36.   #--------------------------------------------------------------------------
  37.   def refresh
  38.     if self.contents != nil
  39.       self.contents.dispose
  40.       self.contents = nil
  41.     end
  42.     if @item_max > 0
  43.       self.contents = Bitmap.new(width - 32, row_max * 32)
  44.       for i in 0...@item_max
  45.         draw_item(i)
  46.       end
  47.     end
  48.   end
  49.   #--------------------------------------------------------------------------
  50.   def draw_item(index)
  51.     item = @item[index]    
  52.     x = 4
  53.     y = index * 32
  54.     bitmap = RPG::Cache.icon(item.icon_name)
  55.     self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24))
  56.     self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
  57.   end
  58.  
  59. end
  60. #-------------------------------------------------------------------------
  61. # ★★★★★★
  62. #-------------------------------------------------------------------------
  63. class Game_Party
  64.   attr_reader   :stealexp
  65.   attr_accessor :stealnpc
  66.   alias initialize_old initialize
  67.   def initialize
  68.     initialize_old
  69.     @stealexp = 0
  70.     @stealnpc = {}
  71.   end
  72.   def add_sexp(n)
  73.     @stealexp = [[@stealexp + n, 0].max, 100].min
  74.   end
  75. end
  76. #-------------------------------------------------------------------------
  77. # ★★★★★★
  78. #-------------------------------------------------------------------------
  79. class Interpreter
  80.   def judge    
  81.     @npc_item = []
  82.     @npc_item.clear
  83.     if @list[0].code == 108
  84.       if @list[0].parameters[0].split(/:/)[0] == "可偷盗对象"
  85.         unless @list[0].parameters[0].split(/:/)[1] == nil
  86.           @npc_item = eval(@list[0].parameters[0].split(/:/)[1])
  87.         end
  88.       end
  89.     end
  90.   end
  91.   #偷盗
  92.   def steal
  93.    unless judge_skill
  94.       @message_waiting = true
  95.       $game_temp.message_proc = Proc.new { @message_waiting = false }
  96.       $game_temp.message_text = "无人会偷盗技能!"
  97.       return true
  98.    end
  99.    if @npc_item.size == 0
  100.       @message_waiting = true
  101.       $game_temp.message_proc = Proc.new { @message_waiting = false }
  102.       $game_temp.message_text = "对方已无任何道具."
  103.       return true
  104.    end
  105.       win = Window_Npc_Item.new(@npc_item)
  106.    loop do
  107.         $game_map.update
  108.         $scene.spriteset.update
  109.         Graphics.update
  110.         Input.update
  111.         win.update
  112.     if Input.trigger?(Input::B)
  113.         win.dispose
  114.         $game_system.se_play($data_system.cancel_se)
  115.         return true
  116.     end  
  117.     if Input.trigger?(Input::C)
  118.         win.dispose
  119.         $game_map.events[@event_id].animation_id = $data_skills[Stolen::STEAL_SKILL_ID].animation2_id
  120.      for i in 1..$data_animations[$data_skills[Stolen::STEAL_SKILL_ID].animation2_id].frame_max*4
  121.         Graphics.update
  122.         $game_map.update
  123.         $game_player.update
  124.         $scene.spriteset.update
  125.      end
  126.      if successful?(@list[2].parameters[0].split(/,/)[1].split(/:/)[1].to_i)
  127.         $game_party.add_sexp(2)  #偷盗经验值上升
  128.         item = win.item
  129.        case item
  130.         when RPG::Item    
  131.           $game_party.gain_item(item.id, 1)
  132.           g_npc=$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][0]
  133.           g_npc.delete_at g_npc.index item.id #这里最好用指令arr.delete_at arr.index，用delete的话会把所有item.id号物品全删了
  134.         when RPG::Weapon
  135.           $game_party.gain_weapon(item.id, 1)
  136.           g_npc=$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][1]
  137.           g_npc.delete_at g_npc.index item.id
  138.         when RPG::Armor
  139.           $game_party.gain_armor(item.id, 1)
  140.           g_npc=$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][2]
  141.           g_npc.delete_at g_npc.index item.id 
  142.        end 
  143.           @wait_count = 1                       
  144.           return true
  145.      else
  146.           #$game_party.add_sexp(1)       #偷盗经验值上升          
  147.           @message_waiting = true
  148.           $game_temp.message_proc = Proc.new { @message_waiting = false }
  149.           $game_temp.message_text = "盗取失败，被发现了！"             
  150.           Audio.se_play("Audio/SE/"+"Glass1",80,100)
  151.           @wait_count = 1         
  152.       if $data_troops[@list[3].parameters[0].split(/:/)[1].to_i] != nil
  153.           $game_temp.battle_abort = true
  154.           $game_temp.battle_calling = true
  155.           $game_temp.battle_troop_id = @list[3].parameters[0].split(/:/)[1].to_i
  156.           $game_temp.battle_can_escape = false
  157.           $game_temp.battle_can_lose = false
  158.           current_indent = @list[@index].indent
  159.           $game_temp.battle_proc = Proc.new { |n| @branch[current_indent] = n }
  160.       end
  161.      end
  162.     break
  163.     end  # end of C键
  164.    end #end of loop do 
  165.   end #end of def
  166.    #是否有“盗窃”技能判断
  167.    def judge_skill
  168.     actor = $game_party.actors
  169.     for i in 0...actor.size
  170.      if actor[i].skills.include?(Stolen::STEAL_SKILL_ID)
  171.         return true
  172.      end
  173.     end
  174.     return false
  175.    end
  176.    #取得物品
  177.    def get_item
  178.     temp_item = []
  179.     #生成物品列表
  180.      for i in 0...$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][0].size
  181.       temp_item.push($data_items[$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][0][i].to_i])
  182.     end  
  183.     #生成武器列表
  184.      for i in 0...$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][1].size
  185.       temp_item.push($data_weapons[$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][1][i].to_i])
  186.     end  
  187.     #生成防具列表   
  188.      for i in 0...$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][2].size
  189.       temp_item.push($data_armors[$game_system.npc_carry_items[$game_map.events[@event_id].name.split(/,/)[0].to_s][2][i].to_i])
  190.     end  
  191.     #返回物品数组  
  192.     return temp_item
  193.    end
  194.    #偷盗成功判断
  195.    def successful?(n) # n - 对象npc的过失率, 这里暂时设定为100%成功
  196.     s_rate = 101
  197.     return rand(101) < s_rate
  198.    end
  199.   #------------------------------------------  
  200. end


taeckle简单的偷窃脚本_version_0.2.rar

194.66 KB, 下载次数: 8
作者: guoxiaomi    时间: 2021-10-31 17:22
能用就行，但是你没必要把整个game_system都抄下来吧



欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1