社区应用 最新帖子 精华区 社区服务 会员列表 统计排行 道具中心
主题 : 转载——物品得失提示脚本。
hx19900906 离线
级别: ②入门
显示用户信息 
0  发表于: 2010-01-31   
来源于 菜单界面 分类

转载——物品得失提示脚本。

效果是“得到物品失去物品自动提示”


2L上脚本
脚本是6R的……不知道这里有没有?
其实我主要是想请教脚本高手帮看看

提示的对话框提留时间在哪修改,默认的停留太短了。
评价一下你浏览此帖子的感受

精彩

感动

搞笑

开心

愤怒

无聊

灌水
hx19900906 离线
级别: ②入门
显示用户信息 
1  发表于: 2010-01-31   
复制代码
  1. #==============================================================================
  2. # 本腳本來自[url]www.66RPG.com[/url],使用和轉載請保留此信息
  3. #==============================================================================
  4. # 注意!!!在對話後得到物品,請在對話後先用事件等待3幀,否則對話框來不及消失。
  5. # 開關定義:
  6. $noshowgold = 41                        # 不显示金钱得失
  7. $noshowitem = 42                        # 不显示物品得失
  8. $noshowweapon = 43                      # 不显示武器得失
  9. $noshowarmor = 44                       # 不显示防具得失
  10. # 以上開關,當打開的時候,獲得物品將不會提示,比如默認打開41號開關,獲得金錢不再提示
  11. # 不想提示等级升降时,就在事件命令直接选择是否显示就行了。
  12. #——聲效,可以自己改
  13. folder = "Audio/SE/"
  14. $gain_gold_se   = folder +"Shop"      # 获得金钱声效
  15. $loss_gold_se   = folder +"Blow2"     # 失去金钱声效
  16. $gain_item_se   = folder +"Item1"     # 获得物品声效
  17. $loss_item_se   = folder +"Blow2"     # 失去物品声效
  18. $gain_weapon_se = folder +"Item1"     # 获得武器声效
  19. $loss_weapon_se = folder +"Blow2"     # 失去武器声效
  20. $gain_armor_se  = folder +"Item1"     # 获得防具声效
  21. $loss_armor_se  = folder +"Blow2"     # 失去防具声效
  22. $gain_lv_se     = folder +"Item1"     # 提升等级声效
  23. $loss_lv_se     = folder +"Blow2"     # 降低等级声效
  24. # ————————————————————————————————————
  25. class Game_Interpreter
  26.   #--------------------------------------------------------------------------
  27.   # ● 增減金錢
  28.   #--------------------------------------------------------------------------
  29.   def command_125
  30.     value = operate_value(@params[0], @params[1], @params[2])
  31.     $game_party.gain_gold(value)
  32.     if $game_switches[$noshowgold]==false
  33.       show_gain_window(0, value)
  34.     end
  35.     return true
  36.   end
  37.   #--------------------------------------------------------------------------
  38.   # ● 增減物品
  39.   #--------------------------------------------------------------------------
  40.   def command_126
  41.     value = operate_value(@params[1], @params[2], @params[3])
  42.     $game_party.gain_item($data_items[@params[0]], value)
  43.     if $game_switches[$noshowitem]==false
  44.       show_gain_window(1, value)
  45.     end
  46.     $game_map.need_refresh = true
  47.     return true
  48.   end
  49.   #--------------------------------------------------------------------------
  50.   # ● 增減武器
  51.   #--------------------------------------------------------------------------
  52.   def command_127
  53.     value = operate_value(@params[1], @params[2], @params[3])
  54.     $game_party.gain_item($data_weapons[@params[0]], value, @params[4])
  55.     if $game_switches[$noshowweapon]==false
  56.       show_gain_window(2, value)
  57.     end
  58.     return true
  59.   end
  60.   #--------------------------------------------------------------------------
  61.   # ● 增減防具
  62.   #--------------------------------------------------------------------------
  63.   def command_128
  64.     value = operate_value(@params[1], @params[2], @params[3])
  65.     $game_party.gain_item($data_armors[@params[0]], value, @params[4])
  66.     if $game_switches[$noshowarmor]==false
  67.       show_gain_window(3, value)
  68.     end
  69.     return true
  70.   end
  71.   
  72.   #--------------------------------------------------------------------------
  73.   # ● 等级増減
  74.   #--------------------------------------------------------------------------
  75.   def command_316
  76.     value = operate_value(@params[1], @params[2], @params[3])
  77.     iterate_actor_id(@params[0]) do |actor|
  78.       actor.change_level(actor.level + value, false)
  79.       if @params[4]
  80.         show_gain_level_window(actor,value)
  81.       end
  82.     end
  83.     return true
  84.   end
  85.   
  86.   def show_gain_window(type, value)
  87.     snstar2006_66rpg_item = $data_armors[@params[0]]
  88.     snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
  89.     snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
  90.     if value >= 0
  91.       gain_text = "獲得"    
  92.     else
  93.       gain_text = "失去"
  94.     end
  95.     
  96.     case type
  97.     when 0
  98.       gain_type = "金錢"
  99.       if value >=0
  100.         Audio.se_play($gain_gold_se,80,100)
  101.       else
  102.         Audio.se_play("Audio/SE/"+"Item1",80,100)
  103.       end
  104.     when 1
  105.       gain_type = "物品"
  106.       string = $data_items[@params[0]]
  107.       if value >=0
  108.         Audio.se_play($gain_item_se,80,100)
  109.       else
  110.         Audio.se_play($loss_item_se,80,100)
  111.       end
  112.     when 2
  113.       gain_type = "武器"
  114.       string = $data_weapons[@params[0]]
  115.       if value >=0
  116.         Audio.se_play($gain_weapon_se,80,100)
  117.       else
  118.         Audio.se_play($loss_weapon_se,80,100)
  119.       end
  120.     when 3
  121.       gain_type = "防具"
  122.       string = $data_armors[@params[0]]
  123.       if value >=0
  124.         Audio.se_play($gain_armor_se,80,100)
  125.       else
  126.         Audio.se_play($loss_armor_se,80,100)
  127.       end
  128.     end
  129.     
  130.     snstar2006_66rpg.contents.draw_text(0,0,160,32,gain_text+gain_type+":")
  131.     
  132.     unless type == 0
  133.       snstar2006_66rpg.draw_item_name(string, 28, 32, true)
  134.       snstar2006_66rpg.contents.draw_text(0, 32, 150, 32, "×"+value.abs.to_s, 2)
  135.     else
  136.       snstar2006_66rpg.contents.draw_text(32,32,240,32,value.abs.to_s + "  "+ Vocab::gold)
  137.     end
  138.     
  139.     snstar2006_66rpg.opacity = 160
  140.     
  141.     for i in 0..30
  142.       Graphics.update
  143.     end
  144.     
  145.     for i in 0..10
  146.       snstar2006_66rpg.opacity -= 30
  147.       snstar2006_66rpg.contents_opacity -= 30
  148.       Graphics.update
  149.     end
  150.     
  151.     snstar2006_66rpg.dispose
  152.   end
  153.   def show_gain_level_window(actor,value)
  154.     lvstring = Vocab::level
  155.         
  156.     snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
  157.     snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
  158.     
  159.     if value >= 0
  160.       gain_text = "提升"
  161.       Audio.se_play($gain_lv_se,80,100)
  162.     else
  163.       gain_text = "降低"
  164.       Audio.se_play($loss_lv_se,80,100)
  165.     end
  166.     
  167.     
  168.     snstar2006_66rpg.contents.draw_text(0, 0, 108, 32, actor.name)
  169.     string = lvstring+gain_text+value.abs.to_s+"级"
  170.     snstar2006_66rpg.contents.draw_text(32,32,160,32,string)
  171.     snstar2006_66rpg.opacity = 160
  172.     
  173.     for i in 0..30
  174.       Graphics.update
  175.     end
  176.     
  177.     for i in 0..10
  178.       snstar2006_66rpg.opacity -= 30
  179.       snstar2006_66rpg.contents_opacity -= 30
  180.       Graphics.update
  181.     end
  182.     
  183.     snstar2006_66rpg.dispose
  184.   end
  185. end
  186. #==============================================================================
  187. # 本腳本來自[url]www.66RPG.com[/url],使用和轉載請保留此信息
  188. #==============================================================================
[ 此帖被secondsen在2010-02-01 19:48重新编辑 ]
secondsen 离线
级别: 总版主
显示用户信息 
2  发表于: 2010-01-31   
第一次看到转载的脚本发到这的,观望
我就是你们的神,庶民们,追随我吧!跟着我一起拖后腿!
拖后腿的人发勋章!
小睡 离线
级别: ②入门
显示用户信息 
3  发表于: 2010-01-31   
想要VX的……
还要慢慢改……哎
哎呀呀呀~
secondsen 离线
级别: 总版主
显示用户信息 
4  发表于: 2010-02-01   
依样画葫芦,下午给你看看我的。
我就是你们的神,庶民们,追随我吧!跟着我一起拖后腿!
拖后腿的人发勋章!
hx19900906 离线
级别: ②入门
显示用户信息 
5  发表于: 2010-02-01   
话说…………这就是VX的!…………?

第一次转载?
那我再发几个吧,可怜6R关了,来不及备份大量脚本…………痛苦啊
secondsen 离线
级别: 总版主
显示用户信息 
6  发表于: 2010-02-01   
还是和你那个帖子一样的问题。。作者是谁,得到许可了么?
我就是你们的神,庶民们,追随我吧!跟着我一起拖后腿!
拖后腿的人发勋章!
secondsen 离线
级别: 总版主
显示用户信息 
7  发表于: 2010-02-01   
小睡,看图。。这个是得到物品,自己选择留下哪一个。
图片:新建 BMP 图像.PNG
我就是你们的神,庶民们,追随我吧!跟着我一起拖后腿!
拖后腿的人发勋章!
basara-spike 离线
级别: ①新人
显示用户信息 
8  发表于: 2011-02-10   
经xp测试,无效……
描述
快速回复

认证码:

验证问题:
12-5=?,答案:7 正确答案:7
按"Ctrl+Enter"直接提交