Lo comento linea a linea para que os quede más claro lo que he hecho:
--//------------------------------------------------------------------------
--// Ejemplo de azar y condicionales
--//------------------------------------------------------------------------
slInitSystem(TV_320x240,NULL,1) -- Inicio el sistema de video, esta vez he puesto una resolución más baja que el otro dia me flipe
slPrint("Generamos un numero al azar -", 2, 1) -- Los print ya los conocemos, ponemos en pantalla una información
slRandom() -- El comando nuevo que hemos aprendido, con esto ya ha generado un número entre 0.0 y el 1 con un montón de decimales
if slRandom()<0.49999999999999 then slPrint("RESULTADO: Ha salido menos de medio", 2, 3)
else slPrint("RESULTADO: Ha salido mas de medio", 2, 3)
end -- Aqui tenemos el primer condicional, le estamos diciendo que si el número que ha generado al azar con el comando slRandom es más pequeño que 0.5 o medio, entonces que ponga en pantalla que efectivamente ha salido menos. Luego el else le dice que si no es asi, por logica aplastante es que será más, por lo tanto en ese caso tiene que escribir en pantalla que ha salido más
slPrint("Para los desconfiaos,", 2, 5) -- prints normales de texto no los comento ya
slPrint("aqui esta la prueba:", 2, 6)
slPrint(slRandom(), 2, 7) -- Esto es en parte lo que aprendimos en la anterior lección, imprimir una variable. En este caso el resultado del comando slRandom que lo ha guardado como una variable interna y con ese resultado hemos hecho el condicional y obrado en consecuencia
slPrint("-------------------", 2, 10)
slPrint("Ahora generamos otro distinto -", 2, 11)
slRandom() -- Lo mismo, generamos otro nuevo
if slRandom()<0.49999999999999 then slPrint("Ha salido menos de medio", 2, 13)
else slPrint("Ha salido mas de medio", 2, 13)
end -- Volvemos a comprobar el valor que tiene con el condicionante y le decimos que haga una cosa u otra
slPrint("A las pruebas me remito:", 2, 14)
slPrint(slRandom(), 2, 15) -- Volvemos a imprimir el número con el que hemos trabajado para demostrar que funciona
slPrint("Ryo Suzuki _ www.segasaturno.com", 2, 18) -- Un poco de autobombo nunca viene mal xD
while true do slSynch() end
--// Ejemplo de azar y condicionales
--//------------------------------------------------------------------------
slInitSystem(TV_320x240,NULL,1) -- Inicio el sistema de video, esta vez he puesto una resolución más baja que el otro dia me flipe
slPrint("Generamos un numero al azar -", 2, 1) -- Los print ya los conocemos, ponemos en pantalla una información
slRandom() -- El comando nuevo que hemos aprendido, con esto ya ha generado un número entre 0.0 y el 1 con un montón de decimales
if slRandom()<0.49999999999999 then slPrint("RESULTADO: Ha salido menos de medio", 2, 3)
else slPrint("RESULTADO: Ha salido mas de medio", 2, 3)
end -- Aqui tenemos el primer condicional, le estamos diciendo que si el número que ha generado al azar con el comando slRandom es más pequeño que 0.5 o medio, entonces que ponga en pantalla que efectivamente ha salido menos. Luego el else le dice que si no es asi, por logica aplastante es que será más, por lo tanto en ese caso tiene que escribir en pantalla que ha salido más
slPrint("Para los desconfiaos,", 2, 5) -- prints normales de texto no los comento ya
slPrint("aqui esta la prueba:", 2, 6)
slPrint(slRandom(), 2, 7) -- Esto es en parte lo que aprendimos en la anterior lección, imprimir una variable. En este caso el resultado del comando slRandom que lo ha guardado como una variable interna y con ese resultado hemos hecho el condicional y obrado en consecuencia
slPrint("-------------------", 2, 10)
slPrint("Ahora generamos otro distinto -", 2, 11)
slRandom() -- Lo mismo, generamos otro nuevo
if slRandom()<0.49999999999999 then slPrint("Ha salido menos de medio", 2, 13)
else slPrint("Ha salido mas de medio", 2, 13)
end -- Volvemos a comprobar el valor que tiene con el condicionante y le decimos que haga una cosa u otra
slPrint("A las pruebas me remito:", 2, 14)
slPrint(slRandom(), 2, 15) -- Volvemos a imprimir el número con el que hemos trabajado para demostrar que funciona
slPrint("Ryo Suzuki _ www.segasaturno.com", 2, 18) -- Un poco de autobombo nunca viene mal xD
while true do slSynch() end