Buying Pokémon from a Mart

[p.claydon]

Ok to be able to make Pokémon buyable I've updated the Pokémon Mart script.

1st find

if quantity>=10 && isConst?(item,PBItems,:POKEBALL) &&

then directly above it paste this code

          if getID(PBItems,item) >= 567
            while quantity>0 do
          $game_variables[74]=getID(PBItems,item)
          $game_variables[75]=$game_variables[74]-566
          pbAddPokemon($game_variables[75],5)
          @adapter.removeItem(item)
          newquantity=quantity-1
          quantity=newquantity
          end
          end

were 567 is the 1st pokemon in the items.txt and 566 is the last non pokemon in the items.txt

you will need to add every pokemon into the items.txt and ensure that they are the LAST entry in that file.

if anyone is able to improve on this please let me know

 

[DurrCo Games]

Cool. I might use something like this for Renting Pokemon in my game's Stadium area.

 

[p.claydon]

ok slight issue with those who use

https://pokemonessentials.wikia.com/wiki/Tutorial:TM_shop_with_compatible_icons

then shops that show these icons will not work with this addon (well it works just can not have buyable pokemon in these shops)