Abagail Asta

Programer by birth
Veteran
Joined
Oct 21, 2013
Messages
33
Reaction score
35
First Language
Russian
Primarily Uses
I will update this as much as I can. :) saddly I have alot of other things to take care of as well so this is not my first prioraty this is also my first post so dont be mad if this is a crummy post.

I DONT CLAIM POKEMON ESSENTIALS TO BE MINE ALTHOUGH I HAVE MADE A LOT OF CHANGES!!

so there are common scripts and not common scripts we will start with common scripts.

_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._

Common script:

give one pokemon to party if full the to box = pbAddPokemon:)<name of the pokemon species>,<Level>)

give one pokemon to party only = pbAddToParty:)<name of the pokemon species>,<Level>)

give a ribon = p=$Trainer.pokemonParty[0]
ret=p.upgradeRibbon:)HOENNCOOL,
                    :HOENNCOOLSUPER,
                    :HOENNCOOLHYPER,
                    :HOENNCOOLMASTER)
pbSet(1,ret)
pbSet(2,p.name)
if ret>0
  pbSet(3,PBRibbons.getName(ret))
end


your pc = pbTrainerPC

pokemon center pc = pbPokeCenterPC

give all badges = for i in 0...16
 $Trainer.badges=true
end


choose a pokemon thats not an egg = pbChooseNonEggPokemon(1,2)

Use this for a berry tree just tells the program that when acted upon to pick the berry = pbPickBerry(PBItems::<bery name>,<amount>)

Use this for bery tree tels the program that it is a berry tree = pbBerryPlant

Takes an item from the player =  $PokemonBag.pbDeleteItem(pbGet(<number not sure what it does>))

This one is self explanatory <chooses a non egg pokemon> = pbChooseNonEggPokemon(1,2)

 

Uncommon

 

Looks at the total EVs of the lead Pokémon, and rewards a ribbon to it if the total is maxed (255). =
p=$Trainer.pokemonParty[0]
ev=0
for i in 0...6
  ev+=p.ev
end
maxed=(ev>=255) ? 1 : 0
maxed=2 if p.hasRibbon?:)EFFORT)
pbSet(1,p.name)
pbSet(2,maxed)


give pokegear = $Trainer.pokegear=true
give running shoes = $PokemonGlobal.runningShoes=true

give pokedex = $Trainer.pokedex=true

checks the selected pokemons happiness = poke=pbGetPokemon(1)
h=poke.happiness
stage=0
stage=1 if h>=1
stage=2 if h>=50
stage=3 if h>=100
stage=4 if h>=150
stage=5 if h>=200
stage=6 if h>=255
pbSet(3,stage)


Kurts script parts = pbChooseItemFromList(
_I("<c2=6546675A>Which Apricorn would you like me to convert?"),8,
:REDAPRICORN,:YLWAPRICORN,:BLUAPRICORN,
:GRNAPRICORN,:pNKAPRICORN,:WHTAPRICORN,
:BLKAPRICORN)


 

+

 

$PokemonBag.pbDeleteItem(pbGet(8))

 

+

 

pbSet(3,PBItems.getName(pbGet(8)))

 

+

 

arr=[:REDAPRICORN,:LEVELBALL,
:YLWAPRICORN,:MOONBALL,:BLUAPRICORN,:LUREBALL,
:GRNAPRICORN,:FRIENDBALL,:pNKAPRICORN,:LOVEBALL,
:WHTAPRICORN,:FASTBALL,:BLKAPRICORN,:HEAVYBALL]
item=pbGet(8); pbSet(8,0)
for i in 0...(arr.length/2)
  if item==getID(PBItems,arr[2*i])
    pbSet(8,getID(PBItems,arr[2*i+1]))
    break
  end


 

+

 

pbSetEventTime

 

Nurse joy = Kernel.pbSetPokemonCenter

+

pbSet(6,$Trainer.party.length)

 

To set you game to debug = $DEBUG=true

 

Download the contents of the file at the given web address, and call it "string". If something was downloaded, save it to Variable 1. If nothing was downloaded, save an error message
to Variable 1 instead. = string=pbDownloadToString(
   "http://upokecenter.com/downloadtest.txt"
)
if string==""
  pbSet(1,_I("The download failed."))
else
  pbSet(1,string)

end

 

gets an able pokemon. An able pokemon is a non-egg non-fainted Pokemon = pbFirstAblePokemon(1)

 

 
 
Last edited by a moderator:

cosmickitty

Veteran
Veteran
Joined
Oct 15, 2012
Messages
406
Reaction score
147
First Language
English
Primarily Uses
Umm... Maybe it's cut off because I'm on a mobile device, but I don't see how this is a complete script

also, if you didnt create the script you should credit whoever did
 

kerbonklin

Hiatus King
Veteran
Joined
Jan 6, 2013
Messages
1,726
Reaction score
276
First Language
English
Primarily Uses
RMMV
^

There's no link or script provided at all here... Kinda looks like it got cut off? (No "Uncommon" at least...)

You might want to fix this up quick before a mod sees this.
 
Last edited by a moderator:

Abagail Asta

Programer by birth
Veteran
Joined
Oct 21, 2013
Messages
33
Reaction score
35
First Language
Russian
Primarily Uses
because i posted this today and i have school sometimes there was a shortege in what i could do also thank you for a comment and i did credit pokemon essentials i just dont know who made pokemon essentials and for a final these are code snipets like say you want to give the player a pokemon but dont know how to thats why this is here.
 

Latest Threads

Latest Posts

Latest Profile Posts

unintentionally made a track that sounds straight out of Yume Nikki
Revisiting one of my older projects in a long time to work some more on the mechanics. I've been working on- and off-again for about a year now on recreating the Force and Mystic systems from Wild ARMs. And I think I've finally made some good breakthroughs on that!

Still, it is not perfect and I may post my thoughts at a later time to see if there are any other suggestions or alternatives I've missed.
actor name string, why you gotta be case sensitive like that?
Doing RPG Maker News for 26th October 2021

My entire world, full of monsters and treasures, will likely be done by the end of the year. After that it's all NPCs and side quests... then done. I'm never making an open world game again xD

Forum statistics

Threads
116,105
Messages
1,095,828
Members
151,496
Latest member
NewGAmeR
Top