捕捉宠物例程-尕尕兔制作

px.凤翔九天 · 发表于 2011-1-24 20:55:55

我觉得以前的范例包中的捕捉系统更好，是用技能实现捕捉...
貌似比这个简单一点。

乌有君 *发表于 2011-1-24 20:55:57* · 发表于 2011-1-24 20:55:57

回复李光兆的帖子

其实技术上实现所有生物都能捕捉根本不是什么灰常复杂的事情。
在4年之前石器的宠物系统便已相当完善，而实际上偶只用了不到半天的时间就搞定了最初的版本。

基本实现方式：数据库的角色可以重复利用，成长系统可以重写。

参考偶的某个抓壮丁记中的代码。
（貌似又是上古物- -0）

英顺的马甲 · 发表于 2011-1-25 21:07:14

回复阿猫一号的帖子

用脚本吧，简单易用，插入main之前即可

class Scene_Battle
alias old_item_result make_item_action_result
def make_item_action_result
old_item_result
index = @active_battler.current_action.target_index
target = $game_troop.smooth_target_enemy(index)
@catch_item = [33] # 捕捉物品的 ID
@catch_enemy = [1,2,3,4,5,6,7,8,9,10,11,12,13,14] # 可被捕捉的怪物的 ID
if rand(100) < @item.hit and @catch_item.include?(@item.id) and
$game_party.actors.size < 4 and @catch_enemy.include?(target.id)
set_pet(target)
target.hp = 0
end
end
def set_pet(target)
@pet = RPG::Actor.new
@pet.id = $data_actors.size
@pet.name = target.name
@pet.class_id = 10
@pet.initial_level = 1
@pet.final_level = 1 + rand(10)
@pet.exp_basis = 20 + rand(20)
@pet.exp_inflation = 20 + rand(20)
@pet.character_name = target.battler_name
@pet.character_hue = target.battler_hue
@pet.battler_name = target.battler_name
@pet.battler_hue = target.battler_hue
@pet.parameters = Table.new(6,100)
for i in [email protected]_level
@pet.parameters[0,i] = target.maxhp + (i*(target.maxhp/2))
@pet.parameters[1,i] = target.maxsp + (i*(target.maxsp/2))
@pet.parameters[2,i] = target.str + (i*(target.str/2))
@pet.parameters[3,i] = target.dex + (i*(target.dex/2))
@pet.parameters[4,i] = target.agi + (i*(target.agi/2))
@pet.parameters[5,i] = target.int + (i*(target.int/2))
end
@pet.weapon_id = 0
@pet.armor1_id = 0
@pet.armor2_id = 0
@pet.armor3_id = 0
@pet.armor4_id = 0
@pet.weapon_fix = false
@pet.armor1_fix = false
@pet.armor2_fix = false
@pet.armor3_fix = false
@pet.armor4_fix = false
$data_actors.push(@pet)
$game_party.add_actor(@pet.id)
$game_party.refresh
end
end
class Scene_Save
def write_save_data(file)
characters = []
for i in 0...$game_party.actors.size
actor = $game_party.actors[i]
characters.push([actor.character_name, actor.character_hue])
end
Marshal.dump(characters, file)
Marshal.dump(Graphics.frame_count, file)
$game_system.save_count += 1
$game_system.magic_number = $data_system.magic_number
Marshal.dump($game_system, file)
Marshal.dump($game_switches, file)
Marshal.dump($game_variables, file)
Marshal.dump($game_self_switches, file)
Marshal.dump($game_screen, file)
Marshal.dump($game_actors, file)
Marshal.dump($game_party, file)
Marshal.dump($game_troop, file)
Marshal.dump($game_map, file)
Marshal.dump($game_player, file)
Marshal.dump($data_actors, file)
end
end
class Scene_Load
def read_save_data(file)
characters = Marshal.load(file)
Graphics.frame_count = Marshal.load(file)
$game_system = Marshal.load(file)
$game_switches = Marshal.load(file)
$game_variables = Marshal.load(file)
$game_self_switches = Marshal.load(file)
$game_screen = Marshal.load(file)
$game_actors = Marshal.load(file)
$game_party = Marshal.load(file)
$game_troop = Marshal.load(file)
$game_map = Marshal.load(file)
$game_player = Marshal.load(file)
$data_actors = Marshal.load(file)
if $game_system.magic_number != $data_system.magic_number
$game_map.setup($game_map.map_id)
$game_player.center($game_player.x, $game_player.y)
end
$game_party.refresh
end
end

复制代码

lj1983nian · 发表于 2011-1-26 11:19:24

顶下先…………………………………………………………

763663412 · 发表于 2011-8-2 13:28:38

啥？

迷蓝の海 · 发表于 2011-9-24 20:12:53

正想要啊~~~设定些可爱的宠物~~

姬文翔 · 发表于 2011-9-25 11:29:11

这个……还是用我自己做的好了

大宇宙时代 · 发表于 2011-12-23 11:53:42

谢谢楼主
学习了非常好的

knowlivegive · 发表于 2012-12-8 13:53:19

怎么用啊？读不了，我的软件是RPG MAKER VX ACE有没有办法？

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

[RMXP发布] 捕捉宠物例程-尕尕兔制作

点评

浏览过的版块

贵宾

开拓者