Dani_SR_17
¡Pokémon LionHeart!
Lotería Pokémon "La Pokéria"
Hola a todos, este es mis primer tutorial en este foro
Actualizado, arreglos en probabilidades, muestra el nombre y la imagen del Pokémon
Traigo un sencillo, pero a su vez útil script.
El script básicamente simula una lotería, en la cual podeis conseguir un Pokémon aleatorio de la 1º, 2º o 3º gen.
Dicho Pokémon tiene puede estar al 5 al 20 o al 50, con las siguientes probabilidades.
- Nivel 5 -> Prob = 70/80
- Nivel 20 -> Prob = 9/80
- Nivel 50 -> Prob = 1/80
Todos los Pokémon tienen la misma probabilidad :blush:
Si pagas un extra, tienes 1/2 de prob de que sea Shiny, si no lo pagas tienes un 1/10 de prob. (Requiere esta rutina: Sinyzer)
En mi Script, pido 5.000 de dinero cada vez que se juegue y 2.500 para Shiny, pero la cifra es muy fácil de variar
Añadido sonido al recibir el Pokémon.
Ahora te dice el nombre del Pokémon y te muestra su imagen.
Os dejo un vídeo en el que pruebo el script.
Siento la mala calidad del vídeo y los errores en los textos, pero hoy mi ordenador va a tirones...
Siento la mala calidad del vídeo y los errores en los textos, pero hoy mi ordenador va a tirones...
Y aquí tenéis el Script
Podéis descargarlo de este enlace (Viene con Room lista para probarlo).
O lo podeís copiar de aquí.
Código:
#dynamic 0x800000
#org @start
lock
faceplayer
showmoney 0x0 0x0 0x0
msgbox @bienvenido 0x5 'Te pregunta si quieres jugar
compare LASTRESULT 0x1
if 0x1 goto @jugar
msgbox @adios 0x6
hidemoney 0x0 0x0
release
end
#org @jugar 'Comienza el script.
checkmoney 0x1388 0x0 'Comprueba si tienes el dinero suficiente, en este caso 5.000
compare LASTRESULT 0x1
if 0x0 goto @nomoney
paymoney 0x1388 0x0 'Pagas la cantidad que elijas, en este caso 5.000
msgbox @vamos 0x6
msgbox @quieroshiny 0x5 'Te pregunta si quieres que sea más prbable que sea shiny
compare LASTRESULT 0x1
if 0x1 goto @siquieroshiny
if 0x0 goto @noquieroshiny
#org @siquieroshiny '1/2 de prob de que sea shiny (si pagas)
checkmoney 0x9C4 0x0
compare LASTRESULT 0x1
if 0x0 goto @nomoneyshiny
paymoney 0x9C4 0x0
random 0x2
compare LASTRESULT 0x0
if 0x1 goto @esshiny
if 0x2 goto @suerte
#org @nomoneyshiny
msgbox @nomonshiny 0x5
compare LASTRESULT 0x1
if 0x1 goto @noquieroshiny
if 0x0 goto @adios
#org @esshiny
setvar 0x8003 0x1
goto @suerte
#org @noquieroshiny '1/10 de prob de que sea shiny
random 0xB
compare LASTRESULT 0x0
if 0x1 goto @esshiny
if 0x2 goto @suerte
#org @suerte
pause 0x20
sound 0x30
pause 0x20
random 0x17F
compare LASTRESULT 0xFA 'La región de la que va a ser el poke.
if 0x3 goto [MENTION=13560]kan[/MENTION]toojohto
if 0x2 goto @hoen
' Si sale Kanto o Johto
#org [MENTION=13560]kan[/MENTION]toojohto
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5koj
if 0x1 goto @nivel50koj
if 0x2 goto @nivel20koj
#org @nivel5koj
random 0xFB
addvar LASTRESULT 0x1
bufferpokemon 0x0 LASTRESULT
showpokepic LASTRESULT 0x14 0x24
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios2 0x6
hidepokepic
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20koj
random 0xFB
addvar LASTRESULT 0x1
bufferpokemon 0x0 LASTRESULT
showpokepic LASTRESULT 0x14 0x24
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios2 0x6
hidepokepic
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50koj
random 0xFB
addvar LASTRESULT 0x1
bufferpokemon 0x0 LASTRESULT
showpokepic LASTRESULT 0x14 0x24
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios2 0x6
hidepokepic
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
' Si sale Hoen
#org @hoen
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5h
if 0x1 goto @nivel50h
if 0x2 goto @nivel20h
#org @nivel5h
random 0x86
addvar LASTRESULT 0x115
bufferpokemon 0x0 LASTRESULT
showpokepic LASTRESULT 0x14 0x24
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios2 0x6
hidepokepic
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20h
random 0x86
addvar LASTRESULT 0x115
bufferpokemon 0x0 LASTRESULT
showpokepic LASTRESULT 0x14 0x24
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios2 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50h
random 0x86
addvar LASTRESULT 0x115
bufferpokemon 0x0 LASTRESULT
showpokepic LASTRESULT 0x14 0x24
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios2 0x6
hidepokepic
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nomoney 'Si no tienes suficiente dinero vienes aquí.
msgbox @dinero 0x6
hidemoney 0x0 0x0
release
end
#org @quieroshiny
= ¿Deseas que sea más probable que\nsea shiny?, solo son 2.500 más.
#org @bienvenido
= Bienvenido la Pokéria, aquí podrás\nprobar suerte intentando conseguir\lun Pokémon aleatorio a un nivel\laleatorio.\pSon solo 5.000 ¿Deseas\nprobar suerte?
#org @vamos
= Vamos a ver si tienes suerte.
#org @adios
= Hasta la vista, vuelve cuando\nquieras.
#org @dinero
= No tienes suficiente dinero...
#org @adios2
= ¡Enorabuena, has conseguido un\n[buffer1]!\pVuelve cuando quieras.
#org @nomonshiny
= No tienes dinero suficiente para\npagar el extra para que sea más\lprobable que sea shiny, ¿Deseas\lseguir jugando igualmente?
Os dejo un vídeo en el que pruebo el script.
Siento la mala calidad del vídeo y los errores en los textos, pero hoy mi ordenador va a tirones...
Y aquí tenéis el Script
Podéis descargarlo de este enlace (Viene con Room lista para probarlo).
O lo podeís copiar de aquí.
Siento la mala calidad del vídeo y los errores en los textos, pero hoy mi ordenador va a tirones...
Y aquí tenéis el Script
Podéis descargarlo de este enlace (Viene con Room lista para probarlo).
O lo podeís copiar de aquí.
Código:
#dynamic 0x800000
#org @start
lock
faceplayer
showmoney 0x0 0x0 0x0
msgbox @bienvenido 0x5 'Te pregunta si quieres jugar
compare LASTRESULT 0x1
if 0x1 goto @jugar
msgbox @adios 0x6
hidemoney 0x0 0x0
release
end
#org @jugar 'Comienza el script.
checkmoney 0x1388 0x0 'Comprueba si tienes el dinero suficiente, en este caso 5.000
compare LASTRESULT 0x1
if 0x0 goto @nomoney
paymoney 0x1388 0x0 'Pagas la cantidad que elijas, en este caso 5.000
msgbox @vamos 0x6
setvar 0x40FF 0x0 'Reinicio de variables
setvar 0x40FE 0x0
setvar 0x40FD 0x0
msgbox @quieroshiny 0x5 'Te pregunta si quieres que sea más prbable que sea shiny
compare LASTRESULT 0x1
if 0x1 goto @siquieroshiny
if 0x0 goto @noquieroshiny
#org @siquieroshiny '1/2 de prob de que sea shiny (si pagas)
checkmoney 0x9C4 0x0
compare LASTRESULT 0x1
if 0x0 goto @nomoney
paymoney 0x9C4 0x0
random 0x1
compare LASTRESULT 0x0
if 0x1 goto @esshiny
if 0x2 goto @suerte
#org @esshiny
setvar 0x8003 0x1
goto @suerte
#org @noquieroshiny '1/10 de prob de que sea shiny
random 0x9
compare LASTRESULT 0x0
if 0x1 goto @esshiny
if 0x2 goto @suerte
#org @suerte
pause 0x20
sound 0x30
pause 0x20
random 0x17F
compare LASTRESULT 0xFA 'La región de la que va a ser el poke.
if 0x3 goto [MENTION=13560]kan[/MENTION]toojohto
if 0x2 goto @hoen
' Si sale Kanto o Johto
#org [MENTION=13560]kan[/MENTION]toojohto
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5koj
if 0x1 goto @nivel50koj
if 0x2 goto @nivel20koj
#org @nivel5koj
random 0xFA
addvar LASTRESULT 0x1
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20koj
random 0xFA
addvar LASTRESULT 0x1
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50koj
random 0xFA
addvar LASTRESULT 0x1
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
' Si sale Hoen
#org @hoen
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5h
if 0x1 goto @nivel50h
if 0x2 goto @nivel20h
#org @nivel5h
random 0x86
addvar LASTRESULT 0x116
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20h
random 0x86
addvar LASTRESULT 0x116
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50h
random 0x86
addvar LASTRESULT 0x116
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nomoney 'Si no tienes suficiente dinero vienes aquí.
msgbox @dinero 0x6
hidemoney 0x0 0x0
release
end
#org @quieroshiny
= ¿Deseas que sea más probable que\nsea shiny?, solo son 2.500 más.
#org @bienvenido
= Bienvenido la Pokéria, aquí podrás\nprobar suerte intentando conseguir\lun Pokémon aleatorio a un nivel\laleatorio.\pSon solo 5.000 ¿Deseas\nprobar suerte?
#org @vamos
= Vamos a ver si tienes suerte.
#org @adios
= Hasta la vista, vuelve cuando\nquieras.
#org @dinero
= No tienes suficiente dinero...
Os dejo un vídeo en el que pruebo el script.
Siento la mala calidad del vídeo y los errores en los textos, pero hoy mi ordenador va a tirones...
Y aquí el script para descargarlo: Script
Y aquí el script, para los que no lo quieran descargar.
Siento la mala calidad del vídeo y los errores en los textos, pero hoy mi ordenador va a tirones...
Y aquí el script para descargarlo: Script
Y aquí el script, para los que no lo quieran descargar.
Código:
#dynamic 0x800000
#org @start
lock
faceplayer
showmoney 0x0 0x0 0x0
msgbox @bienvenido 0x5 'Te pregunta si quieres jugar
compare LASTRESULT 0x1
if 0x1 goto @jugar
msgbox @adios 0x6
hidemoney 0x0 0x0
release
end
#org @jugar 'Comienza el script.
checkmoney 0x1388 0x0 'Comprueba si tienes el dinero suficiente, en este caso 5.000
compare LASTRESULT 0x1
if 0x0 goto @nomoney
paymoney 0x1388 0x0 'Pagas la cantidad que elijas, en este caso 5.000
msgbox @vamos 0x6
setvar 0x40FF 0x0 'Reinicio de variables
setvar 0x40FE 0x0
setvar 0x40FD 0x0
random 0x2
compare LASTRESULT 0x1 'La región de la que va a ser el poke.
if 0x0 goto [MENTION=13560]kan[/MENTION]to
if 0x1 goto @johto
if 0x2 goto @hoen
' Si sale Kanto
#org [MENTION=13560]kan[/MENTION]to
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5k
if 0x1 goto @nivel50k
if 0x2 goto @nivel20k
#org @nivel5k
random 0x98
addvar LASTRESULT 0x1
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20k
random 0x98
addvar LASTRESULT 0x1
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50k
random 0x98
addvar LASTRESULT 0x1
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
' Si sale Johto
#org @johto
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5j
if 0x1 goto @nivel50j
if 0x2 goto @nivel20j
#org @nivel5j
random 0x63
addvar LASTRESULT 0x98
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20j
random 0x63
addvar LASTRESULT 0x98
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50j
random 0x63
addvar LASTRESULT 0x98
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
' Si sale Hoen
#org @hoen
random 0x51
compare LASTRESULT 0x46 'Nivel 5, 70/80. Nivel 20, 9/50. Nivel 50 1/80. Estas son las probabilidades.
if 0x0 goto @nivel5h
if 0x1 goto @nivel50h
if 0x2 goto @nivel20h
#org @nivel5h
random 0x86
addvar LASTRESULT 0x116
givepokemon LASTRESULT 0x5 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel20h
random 0x86
addvar LASTRESULT 0x116
givepokemon LASTRESULT 0x14 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nivel50h
random 0x86
addvar LASTRESULT 0x116
givepokemon LASTRESULT 0x32 0x0 0x0 0x0 0x0
msgbox @adios 0x6
hidemoney 0x0 0x0
setflag 0x828 'Activa el menu de los Pokémon, por si se usa al comienzo de un hack.
release
end
#org @nomoney 'Si no tienes suficiente dinero vienes aquí.
msgbox @dinero 0x6
hidemoney 0x0 0x0
release
end
#org @bienvenido
= Bienvenido la Pokéria, aquí podrás\nprobar suerte intentando conseguir\lun Pokémon aleatorio a un nivel\laleatorio.\pSon solo 5.000 ¿Deseas\nprobar suerte?
#org @vamos
= Vamos a ver si tienes suerte.
#org @adios
= Hasta la vista, vuelve cuando\nquieras.
#org @dinero
= No tienes suficiente dinero...
Espero que os guste