A few Galar Forms:
GALARIAN_MAPS = [1] (Can be changed to suit your game)
MultipleForms.register(:STUNFISK,{
"getFormOnCreation"=>proc{|pokemon|
if $game_map && GALARIAN_MAPS.include?($game_map.map_id)
next 1 # Galarian Stunfisk
else
next 0 # Stunfisk
end
},
"type1"=>proc{|pokemon|
next if pokemon.form==0 # Stunfisk
case pokemon.form
when 1; next getID(PBTypes,:GROUND) # Galarian Stunfisk
end
},
"type2"=>proc{|pokemon|
next if pokemon.form==0 # Stunfisk
case pokemon.form
when 1; next getID(PBTypes,:STEEL) # Galarian Stunfisk
end
},
"getBaseStats"=>proc{|pokemon|
case pokemon.form
when 1; next [109,81,99,66,84,32] # Galarian Stunfisk
else; next # Stunfisk
end
},
"getAbilityList"=>proc{|pokemon|
case pokemon.form
when 1; next [[getID(PBAbilities,:MIMICRY),0]] # Galarian Stunfisk
else; next # Stunfisk
end
},
"weight"=>proc{|pokemon|
next if pokemon.form==0 #
next 20.5 # Galarian Stunfisk
},
"getMoveList"=>proc{|pokemon|
next if pokemon.form==0 # Stunfisk
movelist=[]
case pokemon.form
when 1; movelist=[[1,:MUDSLAP],[1,:TACKLE],[1,:WATERGUN],[1,:METALCLAW],
[5,:ENDURE],[10,:MUDSHOT],[15,:REVENGE],[20,:METALSOUND],
[25,:SUCKERPUNCH],[30,:IRONDEFENSE],[35,:BOUNCE],[40,:MUDDYWATER],
[45,:SNAPTRAP],[50,:FLAIL],[55,:FISSURE]] # Galarian Stunfisk
end
for i in movelist
i[1]=getConst(PBMoves,i[1])
end
next movelist
},
"getMoveCompatibility"=>proc{|pokemon|
next if pokemon.form==0 # Stunfisk
movelist=[]
case pokemon.form
when 1; movelist=[# TMs
:YAWN,:ASTONISH,:CURSE,:SPITE,:PAINSPLIT,
:REFLECTTYPE,:BIND,:COUNTER
# Move Tutors
:STEELBEAM] # Galarian Stunfisk
end
for i in 0...movelist.length
movelist=getConst(PBMoves,movelist)
end
next movelist
},
"dexEntry"=>proc{|pokemon|
next if pokemon.form==0 # Stunfisk
next _INTL("Living in mud with a high iron content has given it a strong steel body.") # Galarian Stunfisk
},
"kind"=>proc{|pokemon|
next if pokemon.form==0 # Stunfisk
next _INTL("Trap") # Galarian Stunfisk
},
"onSetForm"=>proc{|pokemon,form|
pbSeenForm(pokemon)
}
})
MultipleForms.register(:WEEZING,{
"getFormOnCreation"=>proc{|pokemon|
if $game_map && GALARIAN_MAPS.include?($game_map.map_id)
next 1 # Galarian Weezing
else
next 0 # Weezing
end
},
"type1"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
case pokemon.form
when 1; next getID(PBTypes,:POISON) # Galarian Weezing
end
},
"type2"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
case pokemon.form
when 1; next getID(PBTypes,:FAIRY) # Galarian Weezing
end
},
"getAbilityList"=>proc{|pokemon|
case pokemon.form
when 1; next [[getID(PBAbilities,:LEVITATE),0],
[getID(PBAbilities,:NEUTRALIZINGGAS),1],
[getID(PBAbilities,:MISTYSURGE),2]] # Galarian Weezing
else; next # Weezing
end
},
"height"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
next 3 # Galarian Weezing
},
"weight"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
next 16 # Galarian Weezing
},
"wildHoldItems"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
next [0,getID(PBItems,:MISTYSEED),2] # Galarian Weezing
},
"getMoveList"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
movelist=[]
case pokemon.form
when 1; movelist=[[1,:DOUBLEHIT],[1,:STRANGESTEAM],[1,:DEFOG],[1,:HEATWAVE],
[1,:SMOG],[1,:SMOKESCREEN],[1,:HAZE],[1,:POISONGAS],
[1,:TACKLE],[1,:FAIRYWIND],[1,:AROMATICMIST],[12,:CLEARSMOG],
[16,:ASSURANCE],[20,:SLUDGE],[24,:AROMATHERAPY],[28,:SELFDESTRUCT],
[32,:SLUDGEBOMB],[38,:TOXIC],[44,:BELCH],[50,:EXPLOSION],
[56,:MEMENTO],[62,:DESTINYBOND],[68,:MISTYTERRAIN]] # Galarian Weezing
end
for i in movelist
i[1]=getConst(PBMoves,i[1])
end
next movelist
},
"getMoveCompatibility"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
movelist=[]
case pokemon.form
when 1; movelist=[# TMs
:HYPERBEAM,:GIGAIMPACT,:SCREECH,:SELFDESTRUCT,:REST,
:THIEF,:SNORE,:PROTECT,:ATTRACT,:RAINDANCE,
:SUNNYDAY,:WILLOWISP,:FACADE,:PAYBACK,:ASSURANCE,
:WONDERROOM,:VENOSHOCK,:ROUND,:MISTYTERRAIN,:BRUTALSWING
# Move Tutors] # Galarian Weezing
end
for i in 0...movelist.length
movelist=getConst(PBMoves,movelist)
end
next movelist
},
"dexEntry"=>proc{|pokemon|
next if pokemon.form==0 # Weezing
next _INTL("This Pokémon consumes particles that contaminate the air. Instead of leaving droppings, it expels clean air.") # Galarian Weezing
},
"onSetForm"=>proc{|pokemon,form|
pbSeenForm(pokemon)
}
})
MultipleForms.register(:MEOWTH,{
"getFormOnCreation"=>proc{|pokemon|
if $game_map && GALARIAN_MAPS.include?($game_map.map_id)
next 2 # Galarian Meowth
else
next 0 # Meowth
end
},
"type1"=>proc{|pokemon|
next if pokemon.form==0 # Meowth
case pokemon.form
when 2; next getID(PBTypes,:STEEL) # Galarian Meowth
end
},
"getBaseStats"=>proc{|pokemon|
case pokemon.form
when 2; next [50,65,55,40,40,40] # Galarian Meowth
else; next # Meowth
end
},
"getAbilityList"=>proc{|pokemon|
case pokemon.form
when 2; next [[getID(PBAbilities,:PICKUP),0],
[getID(PBAbilities,:TOUGHCLAWS),1],
[getID(PBAbilities,:UNNERVE),2]] # Galarian Meowth
else; next # Meowth
end
},
"evYield"=>proc{|pokemon|
case pokemon.form
when 2; next [0,1,0,0,0,0] # Galarian Meowth
else; next # Meowth
end
},
"height"=>proc{|pokemon|
next if pokemon.form==0 # Meowth
next 0.4 # Galarian Meowth
},
"weight"=>proc{|pokemon|
next if pokemon.form==0 # Meowth
next 4.2 # Galarian Meowth
},
"getMoveList"=>proc{|pokemon|
next if pokemon.form==0 # Meowth
movelist=[]
case pokemon.form
when 2; movelist=[[1,:FAKEOUT],[1,:GROWL],[4,:HONECLAWS],[8,:SCRATCH],
[12,:PAYDAY],[16,:METALCLAW],[20,:TAUNT],[24,:SWAGGER],
[29,:FURYSWIPES],[32,:SCREECH],[36,:SLASH],[40,:METALSOUND],
[44,:THRASH]] # Galarian Meowth
end
for i in movelist
i[1]=getConst(PBMoves,i[1])
end
next movelist
},
"getMoveCompatibility"=>proc{|pokemon|
next if pokemon.form==0 # Meowth
movelist=[]
case pokemon.form
when 1; movelist=[# TMs
:PAYDAY,:DIG,:SCREECH,:REST,:THIEF,
:SNORE,:PROTECT,:ATTRACT,:RAINDANCE,:SUNNYDAY,
:FACADE,:UTURN,:PAYBACK,:ASSUANCE,:SHADOWCLAW,
:ROUND,:RETALIATE
# Move Tutors
:STEELBEAM] # Galarian Meowth
end
for i in 0...movelist.length
movelist=getConst(PBMoves,movelist)
end
next movelist
},
"dexEntry"=>proc{|pokemon|
next if pokemon.form==0 # Meowth
next _INTL("Living with a savage, seafaring people has toughened this Pokémon's body so much that parts of it have turned to iron.") # Galarian Meowth
},
"onSetForm"=>proc{|pokemon,form|
pbSeenForm(pokemon)
}
})
Evolutions=PERRSERKER,LevelForm2,28 # Add to Meowth's Evolutions= in Pokemon.txt