Project1
标题:
【废渣型脚本产物Ⅱ】VX物品偷盗脚本
[打印本页]
作者:
冰舞蝶恋
时间:
2011-3-13 15:26
标题:
【废渣型脚本产物Ⅱ】VX物品偷盗脚本
本帖最后由 冰舞蝶恋 于 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
复制代码
作者:
小冰
时间:
2011-3-13 16:19
本帖最后由 小冰 于 2011-3-13 16:34 编辑
更新一下,加入支持武器和防具的偷盗,以及偷盗是否允许失败、成功率的设置。
#===============================================================================
# 〇 偷盗脚本完善版
# ——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
复制代码
作者:
冰舞蝶恋
时间:
2011-3-13 16:20
吖……占楼,准备下次更新………【你这无敌大懒人怎么可能继续更新啊啊啊啊啊!!!?
顺便说明楼上是咱马甲。
作者:
小冰
时间:
2011-3-14 18:24
本帖最后由 小冰 于 2011-3-14 18:25 编辑
强悍更新最终版!加入新功能,修正BUG。
#===============================================================================
# 〇 偷盗脚本最终版
# ——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
复制代码
呼呼……这可是咱更新最多、写得最长的一个脚本啦。话说没人看到么…………好吧更新完这次就懒得再写了。。
作者:
冰舞蝶恋
时间:
2011-3-14 19:35
本帖最后由 冰舞蝶恋 于 2011-3-14 19:35 编辑
啊。。难道被人54了么!!【这种废渣谁会在意啊!
【可毕竟是咱辛辛苦苦写的耶!【对咱这种技术来说。。
作者:
伢疼
时间:
2011-3-14 22:49
提示:
作者被禁止或删除 内容自动屏蔽
作者:
DeathKing
时间:
2011-3-14 23:11
不用在意写得是好是坏,用于尝试的精神很好!
当然,只有迈出了第一步,才会有以后的成功。
作者:
无名小兵
时间:
2011-3-14 23:11
:)只想SBS系统也能用。。。。
作者:
冰舞蝶恋
时间:
2011-3-15 13:11
回复
无名小兵
的帖子
SB-傻逼
BS-鄙视
SBS是啥?
作者:
无名小兵
时间:
2011-3-15 16:00
:L VX的超级横版啊= = 约束有汉化过 全称大概是这个 Sideview Battle System Configurations
作者:
冰舞蝶恋
时间:
2011-3-15 17:17
回复
无名小兵
的帖子
咱表示不冲突的说。。
作者:
无名小兵
时间:
2011-3-15 21:28
本帖最后由 无名小兵 于 2011-3-15 21:36 编辑
回复
冰舞蝶恋
的帖子
我错了 原来这个不是战斗时用的偷盗。。。
作者:
冰舞蝶恋
时间:
2011-3-15 22:07
回复
无名小兵
的帖子
可以用于站到呀,用技能的公共事件
作者:
里昂sir
时间:
2011-3-16 22:07
原来类名是可以用中文的
作者:
冰舞蝶恋
时间:
2011-3-16 22:09
回复
里昂sir
的帖子
{:nm_2:}夕阳!!是夕阳姐么!
好久都不回来看咱啦…………呜,还换了头像,害的咱以为是小柯。。
作者:
240985764
时间:
2011-6-3 13:36
真是个好东西呢~~~~
支持下~~~
作者:
冰魂狂雪
时间:
2011-7-8 14:52
什马?没模范
作者:
忧雪の伤
时间:
2011-7-9 15:38
method 请不要用中文命名。
作者:
冷血冰狐
时间:
2011-8-8 15:32
想请问下,到偷盗成功后,想第二次偷盗显示“已经没有物品”。。设置上去了吗 ?
作者:
jin878404951
时间:
2011-10-23 00:59
我觉得蛮好的啊!
起码我用不来
作者:
rpg549007821
时间:
2011-10-23 01:43
http://rpg.blue/forum.php?mod=vi ... B%E7%9B%97%E7%AA%83
我曾经做过一个事件版的。
作者:
1416127952
时间:
2012-3-9 19:01
好棒啊!!!!!!!!!!激动激动激动激动激动激动。。。。。以下省略一万个鸡冻
!但是我不会用啊!!!谁教教我
‘‘──1416127952于2012-3-23 23:21补充以下内容
好东西啊!!!!!!!我想改偷窃很久了!!!!!!!!!!!!哇哈哈!不过~~~~~~
咋用啊!!!!!!
’’
作者:
lyz
时间:
2012-7-29 10:55
这个脚本怎么用啊!
作者:
brackwind
时间:
2012-10-8 18:45
我想請問大大
這個偷竊能力是不同怪物偷到不同物品
還是不論怪物是誰,偷到的物品是隨機決定?
作者:
vianze
时间:
2013-6-12 01:32
试验了一下用公共开关可以实现战斗技能转换。
作者:
1614064849
时间:
2013-6-25 19:47
我是捡破烂的,来收了
欢迎光临 Project1 (https://rpg.blue/)
Powered by Discuz! X3.1