Buen script.
Si no lo he entendido mal, el funcionamiento consiste en hacer preguntas de si/no y dependiendo de las respuestas añades valores a la var 400A. Luego dependiendo del valor de la var pues das un pokémon u otro, simulando el cuestionario que te hacen en mundo misterioso por así decir...