Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- class PokemonTemp
- attr_accessor :catchcombo
- attr_accessor :especie
- attr_accessor :especies
- end
- cadenamaxima=31
- Events.onStartBattle+=proc {|sender,e|
- species=e[0]
- $PokemonTemp.catchcombo=0 if !$game_switches[118]
- $PokemonTemp.especies=species if $PokemonTemp.catchcombo==0
- if $PokemonTemp.catchcombo>=1 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [1,4,5,5,5,10,10,10,10,10,15,15]
- elsif $PokemonTemp.catchcombo>=6 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [50,30,5,9,6]
- elsif $PokemonTemp.catchcombo>=12 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [10,10,10,10,10,10,5,5,4,4,11,11]
- elsif $PokemonTemp.catchcombo>=12 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [40,30,10,9,11]
- elsif $PokemonTemp.catchcombo>=24 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [10,10,10,10,5,5,5,5,9,9,11,11]
- elsif $PokemonTemp.catchcombo>=24 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [40,20,15,14,11]
- elsif $PokemonTemp.catchcombo>=30 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [15,15,10,10,10,10,5,5,4,4,6,6]
- elsif $PokemonTemp.catchcombo>=30 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [10,10,10,30,40]
- elsif $PokemonTemp.catchcombo<=5 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [20,20,10,10,10,10,5,5,4,4,1,1]
- elsif $PokemonTemp.catchcombo<=5 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [60,30,5,4,1]
- end
- }
- Events.onWildBattleEnd+=proc {|sender,e|
- species=e[0]
- result=e[2]
- $PokemonTemp.especie=species if !$PokemonTemp.catchcombo==0
- if result==4
- $PokemonTemp.catchcombo+=1
- if $PokemonTemp.catchcombo>=1 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [1,4,5,5,5,10,10,10,10,10,15,15]
- elsif $PokemonTemp.catchcombo>=6 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [50,30,5,9,6]
- elsif $PokemonTemp.catchcombo>=12 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [10,10,10,10,10,10,5,5,4,4,11,11]
- elsif $PokemonTemp.catchcombo>=12 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [40,30,10,9,11]
- elsif $PokemonTemp.catchcombo>=24 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [10,10,10,10,5,5,5,5,9,9,11,11]
- elsif $PokemonTemp.catchcombo>=24 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [40,20,15,14,11]
- elsif $PokemonTemp.catchcombo>=30 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [15,15,10,10,10,10,5,5,4,4,6,6]
- elsif $PokemonTemp.catchcombo>=30 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [10,10,10,30,40]
- elsif $PokemonTemp.catchcombo<=5 && PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [20,20,10,10,10,10,5,5,4,4,1,1]
- elsif $PokemonTemp.catchcombo<=5 && $PokemonGlobal && $PokemonGlobal.surfing
- chances = [60,30,5,4,1]
- end
- $game_switches[118]=true
- elsif !result==4
- $game_switches[118]=false
- $PokemonTemp.catchcombo=0
- if PBTerrain.isGrass?($game_map.terrain_tag($game_player.x,$game_player.y))
- chances = [20,20,10,10,10,10,5,5,4,4,1,1]
- elsif $PokemonGlobal && $PokemonGlobal.surfing
- chances = [60,30,5,4,1]
- end
- end
- }
- Events.onWildPokemonCreate+=proc{|sender,e|
- pokemon =e[0]
- $PokemonTemp.catchcombo=0 if $PokemonTemp.catchcombo==nil
- if $PokemonTemp.catchcombo>=1
- pokemon.makeShiny
- elsif $PokemonTemp.catchcombo>=10
- for i in 0...6
- pokemon.iv[i]=11
- end
- if rand(4092)<2
- pokemon.makeShiny
- end
- elsif $PokemonTemp.catchcombo>=20
- for i in 0...6
- pokemon.iv[i]=21
- end
- if rand(4092)<4
- pokemon.makeShiny
- end
- elsif $PokemonTemp.catchcombo>=30
- for i in 0...6
- pokemon.iv[i]=31
- end
- if rand(4092)<8
- pokemon.makeShiny
- end
- end
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement