【废渣型脚本产物Ⅱ】VX物品偷盗脚本

冰舞蝶恋 · 发表于 2011-3-13 15:26:33

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由冰舞蝶恋于 2011-3-14 18:32 编辑

突然发现自己真的好杯具。。
写一个破脚本，除掉设置部分和注释总共才8行，
就开了两个问题。。。【啊，好像只有一个【好健忘啊0.0
而且其中两行还是"end"
真是囧的要死。
好吧表示咱刚看到了剑兰前辈的数组教程，
然后又在写一个关于XX的脚本【这也保密！？
发了问题
然后就突发奇想写出以下的破烂来了。。
嗯，记得上次的事件版被黄鸡前辈批评了，
这次希望大家多捧捧场【这种烂东西也值得捧场么！！
好吧那么就发脚本跟范例了，使用方法在注释里。
其实这种东西稍微改下句子神马的都可以做抽奖活动之类的东西吧。
哈……把更新都整合到主楼来咯。

#===============================================================================
# 〇偷盗脚本精简版
# ——By.冰舞蝶恋
#-------------------------------------------------------------------------------
# 说明：在事件脚本里写上“偷盗”即可调用。
#===============================================================================
class Game_Interpreter
def 偷盗
#-以下是设置部分--------------------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的物品的文字。
$gs = 1 # 一次能偷到的个数。
wp = [1, 2, 3, 4, 5, 6, 7, 8,] # 可偷的物品id，暂时不支持武器和防具。
#-----------------------------------------------------------------------------
$z = rand(wp.size)
$game_party.gain_item($data_items[wp[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_items[wp[$z]].name}*#{$gs}！")
end
end

复制代码

#===============================================================================
# 〇偷盗脚本完善版
# ——By.冰舞蝶恋
#-------------------------------------------------------------------------------
# 说明：支持物品、武器和防具的偷盗。加入允许失败的情况。
# 在事件脚本里写上“偷盗物品”、“偷盗武器”或“偷盗防具”。
# 注：该完善版经常出错。不推荐使用。
#===============================================================================
class Game_Interpreter
#===============================================================================
#===============================================================================
def 偷盗物品
#-以下是物品偷盗的设置部分----------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的物品的文字。
$gs = 1 # 一次能偷到的个数。
wp = [1, 2, 3, 4, 5, 6, 7, 8,] # 可偷的物品id。
yx = true # 允许失败？
jl = 5 # 失败的概率，比如设置可偷盗10个物品，那么将有5/15的几率失败。
$tx2 = "偷盗失败！" # 用于提示失败的情况下的文字。
#-----------------------------------------------------------------------------
$z = 0
if yx = true
$z = rand(wp.size+jl)
else
$z = rand(wp.size)
end
if $z > wp.size
set_message_waiting
$game_message.texts.push("#{$tx2}")
else
$game_party.gain_item($data_items[wp[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_items[wp[$z]].name}*#{$gs}！")
end
end
#===============================================================================
#===============================================================================
def 偷盗武器
#-以下是武器偷盗的设置部分----------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的物品的文字。
$gs = 1 # 一次能偷到的个数。
wq = [1, 2, 3, 4, 5,] # 可偷的武器id。
yx = true # 允许失败？
jl = 5 # 失败的概率，详情设置见物品部分。
$tx2 = "偷盗失败！" # 用于提示失败的情况下的文字。
#-----------------------------------------------------------------------------
$z = 0
if yx = true
$z = rand(wq.size+jl)
else
$z = rand(wq.size)
end
if $z > wq.size
set_message_waiting
$game_message.texts.push("#{$tx2}")
else
$game_party.gain_item($data_weapons[wq[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_weapons[wq[$z]].name}*#{$gs}！")
end
end
#===============================================================================
#===============================================================================
def 偷盗防具
#-以下是防具偷盗的设置部分----------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的物品的文字。
$gs = 1 # 一次能偷到的个数。
fj = [1, 2, 3,] # 可偷的防具id。
yx = true # 允许失败？
jl = 5 # 失败的概率，详情设置见物品部分。
$tx2 = "偷盗失败！" # 用于提示失败的情况下的文字。
#-----------------------------------------------------------------------------
$z = 0
if yx = true
$z = rand(fj.size+jl)
else
$z = rand(fj.size)
end
if $z > fj.size
set_message_waiting
$game_message.texts.push("#{$tx2}")
else
$game_party.gain_item($data_armors[fj[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_armors[fj[$z]].name}*#{$gs}！")
end
end
end

复制代码

#===============================================================================
# 〇偷盗脚本最终版
# ——By.冰舞蝶恋
#-------------------------------------------------------------------------------
# 说明：支持物品、武器和防具的偷盗。加入允许失败的情况。可设置失败率。
# 在事件脚本里写上“偷盗物品”、“偷盗武器”或“偷盗防具”即可调用。
# 加入可随机获得物品/武器/防具个数的功能。
# 修正脚本会弹错的BUG。
# 注意：设置中不可包含小数、负数。
#===============================================================================
class Game_Interpreter
#===============================================================================
#===============================================================================
def 偷盗物品
#-以下是物品偷盗的设置部分----------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的物品的文字。
#---------------------------------------------------------------------------
$gs = 0 # 一次能偷到的个数。如果希望被偷盗的物品个数是随机数，
# 请写为0，然后在以下的数组中设定。
#---------------------------------------------------------------------------
$sj = [1, 10] # 前一个数是随机数量的最小值，后一个是随机数量的最大值。
#---------------------------------------------------------------------------
wp = [1, 2, 3, 4, 5, 6, 7, 8, 0, 0, 0, 0, ] # 可偷的物品id。
# 注意：可偷盗的物品id效果可叠加。譬如设置相同id的次数越多，那么该id的物品
# 偷盗的几率就越大。0代表失败。可自己设定失败率，若没有0，那么代表偷盗将不
# 会失败。
#---------------------------------------------------------------------------
$tx2 = "偷盗失败！" # 用于提示失败的情况下的文字。
#-----------------------------------------------------------------------------
$z = rand(wp.size)
if $gs <= 0
$gs = rand($sj[1]-$sj[0]+1)+$sj[0]
end
if wp[$z] != 0
$game_party.gain_item($data_items[wp[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_items[wp[$z]].name}*#{$gs}！")
else
set_message_waiting
$game_message.texts.push("#{$tx2}")
end
end
#===============================================================================
#===============================================================================
def 偷盗武器
#-以下是武器偷盗的设置部分----------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的武器的文字。
#---------------------------------------------------------------------------
$gs = 1 # 一次能偷到的个数。如果希望被偷盗的武器个数是随机数，
# 请写为0，然后在以下的数组中设定。
#---------------------------------------------------------------------------
$sj = [1, 4] # 前一个数是随机数量的最小值，后一个是随机数量的最大值。
#---------------------------------------------------------------------------
wq = [1, 2, 3, 4, 5, 0, 0, ] # 可偷的武器id。
# 注意：可偷盗的武器id效果可叠加。譬如设置相同id的次数越多，那么该id的武器
# 偷盗的几率就越大。0代表失败。可自己设定失败率，若没有0，那么代表偷盗将不
# 会失败。
#---------------------------------------------------------------------------
$tx2 = "偷盗失败！" # 用于提示失败的情况下的文字。
#-----------------------------------------------------------------------------
$z = rand(wq.size)
if $gs <= 0
$gs = rand($sj[1]-$sj[0]+1)+$sj[0]
end
if wq[$z] != 0
$game_party.gain_item($data_weapons[wq[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_weapons[wq[$z]].name}*#{$gs}！")
else
set_message_waiting
$game_message.texts.push("#{$tx2}")
end
end
#===============================================================================
#===============================================================================
def 偷盗防具
#-以下是防具偷盗的设置部分----------------------------------------------------
$tx = "你偷到了" # 用来提示偷到的防具的文字。
#---------------------------------------------------------------------------
$gs = 1 # 一次能偷到的个数。如果希望被偷盗的防具个数是随机数，
# 请写为0，然后在以下的数组中设定。
#---------------------------------------------------------------------------
$sj = [1, 3] # 前一个数是随机数量的最小值，后一个是随机数量的最大值。
#---------------------------------------------------------------------------
fj = [1, 2, 3, 0, ] # 可偷的防具id。
# 注意：可偷盗的防具id效果可叠加。譬如设置相同id的次数越多，那么该id的防具
# 偷盗的几率就越大。0代表失败。可自己设定失败率，若没有0，那么代表偷盗将不
# 会失败。
#---------------------------------------------------------------------------
$tx2 = "偷盗失败！" # 用于提示失败的情况下的文字。
#-----------------------------------------------------------------------------
$z = rand(fj.size)
if $gs <= 0
$gs = rand($sj[1]-$sj[0]+1)+$sj[0]
end
if fj[$z] != 0
$game_party.gain_item($data_armors[fj[$z]],$gs)
set_message_waiting
$game_message.texts.push("#{$tx}#{$data_armors[fj[$z]].name}*#{$gs}！")
else
set_message_waiting
$game_message.texts.push("#{$tx2}")
end
end
end

复制代码

1614064849 · 发表于 2013-6-25 19:47:17

我是捡破烂的,来收了

vianze · 发表于 2013-6-12 01:32:28

试验了一下用公共开关可以实现战斗技能转换。

brackwind · 发表于 2012-10-8 18:45:22

我想請問大大
這個偷竊能力是不同怪物偷到不同物品
還是不論怪物是誰，偷到的物品是隨機決定？

lyz · 发表于 2012-7-29 10:55:28

这个脚本怎么用啊！

1416127952 · 发表于 2012-3-9 19:01:31

好棒啊！！！！！！！！！！激动激动激动激动激动激动。。。。。以下省略一万个鸡冻

！但是我不会用啊！！！谁教教我

‘‘──1416127952于2012-3-23 23:21补充以下内容

好东西啊！！！！！！！我想改偷窃很久了！！！！！！！！！！！！哇哈哈！不过~~~~~~

咋用啊！！！！！！
’’

rpg549007821 · 发表于 2011-10-23 01:43:03

http://rpg.blue/forum.php?mod=vi ... B%E7%9B%97%E7%AA%83
我曾经做过一个事件版的。

jin878404951 · 发表于 2011-10-23 00:59:02

我觉得蛮好的啊！

起码我用不来

冷血冰狐 · 发表于 2011-8-8 15:32:34

想请问下，到偷盗成功后，想第二次偷盗显示“已经没有物品”。。设置上去了吗？

忧雪の伤 · 发表于 2011-7-9 15:38:53

method 请不要用中文命名。

冰魂狂雪 · 发表于 2011-7-8 14:52:53

什马？没模范

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

[RMVX发布] 【废渣型脚本产物Ⅱ】VX物品偷盗脚本

加入我们，或者，欢迎回来。

评分

点评

浏览过的版块

贵宾