| |
|
71
|
Foros Generales / Foro Libre / Ultima temporada juego de tronos; ¿que creeis que pasara?
|
en: 10 Marzo 2019, 23:02 pm
|
|
Hola, veréis, ya que el próximo 15 de abril se estrena la octava (y, por cierto, ultima) temporada de juego de tronos, quisiera abrir este tema para que todos podamos compartir nuestras teorías de lo que puede pasar, y, bueno, sobre como creéis que acabara (o no podría acabar) la serie.
Entonces, y, aparte de avisar de posibles spoilers para los que les falte por ver alguna temporada, aprovecho para comentar lo que creo que podría pasar:
Por una parte, he pensado en la posibilidad de que los caminantes blancos invadan desembarco del rey (ya que es una ciudad de gran importancia), y, después de la batalla, empiecen a revivir a todo dios ampliando en gran numero sus filas.
Por supuesto, esto incluiría revivir a Lannister Cersey, generando una dura situacion con su hermano, Jaime Lannister. Ademas podrian conseguir la ballesta anti-dragones que esta en poder de Cersey para rematar la faena con los dos dragones restantes y abriendo la posibilidad a que sean reanimados..
Por otra parte, y, siguiendo con los caminantes blancos y dragones; siguiendo un poco la historia de juego de tronos, creo recordar que había un cementerio de dragones. Entonces, he pensado en la posibilidad de que si los caminantes blancos accedieran a dicho cementerio para revivir los esqueletos de los dragones, aumentando así sus fuerzas en gran medida.
Y, bueno, como nota sobre este punto, recordemos que, dado el caso, no seria la primera vez que reaniman un cadáver en malas conciciones, ya que, tal y como vimos en la séptima temporada, algunos caminantes estaban literalmente en los huesos.
Por ultimo, y, sobre posibles finales, he pensado en el siguiente (que, por cierto, seria uno de los peores);
Básicamente, Daenerys muere después de una batalla enfrentándose a uno (o mas) de sus dragones, y, posteriormente, John sucumbe a los caminantes blancos, se une a ellos, y, al no superar la perdida de su pareja, la revive. Como ultima nota, quisiera añadir a esta posibilidad la situación inversa, o, almenos, en el sentido de que John muere y Daenerys sucumbe y se convierte en caminante blanco para revivir a John.
Bueno, pues, aquí acaban mis teorías sobre la octava y ultima temporada de juego de tronos.
Muchas gracias por vuestra atención, y, bueno, saludos.
|
|
|
|
|
72
|
Foros Generales / Foro Libre / Disturbios y muertos en la frontera de Venezuela por ayuda humanitaria
|
en: 23 Febrero 2019, 22:28 pm
|
Hola, veréis, quisiera abrir este tema para continuar con las ultimas noticias sobre la situación en Venezuela, y, bueno, intentar evitar desviar el tema principal del siguiente hilo y de otros similares donde se ha hablado de Venezuela: https://foro.elhacker.net/foro_libre/cuba_acusa_a_eeuu_de_mover_tropas_para_preparar_accion_militar_en_venezuela-t492609.0.htmlEntonces, y, yendo ya al tema principal; basicamente, hoy se ha mencionado en las noticias que ha habido disturbios y muertos (entre otras cosas) ante la llegada de la ayuda humanitaria a Venezuela: Titulares: 20 minutos:- Directo | Llegada de ayuda humanitaria a Venezuela: Muertos, graves disturbios y deserciones en la entrada de los camiones
Ver más en: https://www.20minutos.es/noticia/3571305/0/directo-venezuela-camiones-ayuda-humanitaria/#xtor=AD-15&xts=467263
21.57 h El concierto chavista anunciado para este sábado fue suspendido de acuerdo con la información ofrecida a la Agencia EFE por dos fuentes del Gobierno de Nicolás Maduro que participaban en la organización de este evento, debido a la baja asistencia al primer recital y a los disturbios en la zona. 21.56 h El Parlamento venezolano, de mayoría opositora, denunció este sábado que hasta las 16.00 hora local (21.00 horas en la península) se contabilizan cuatro personas asesinadas y más de 20 heridos de bala en la frontera de Venezuela con Brasil.
El periodico:- Últimas noticias de Venezuela, Guaidó y Maduro | Directo
La inminente llegada de la ayuda humanitaria dispara la tensión en el país caribeño
Nueva jornada clave para Venezuela. Se esperaba para este sábado la entrada de ayuda humanitaria al país desde Colombia, tras el multitudinario concierto del viernes donde Juan Guaidó dio un nuevo paso en su desafío a Nicolás Maduro cruzando la frontera y asistiendo a la cita. Abrimos un hilo en directo con las últimas noticias sobre Venezuela, Guaidó, Maduro y la caravana humanitaria.
22:09
Más de 20 militares y policías venezolanos han desertado este sábado en medio del intento de ingreso de ayuda humanitaria a su país, según informan fuentes de Migración Colombia. Según el reporte, hasta el momento han desertado "dos mujeres de la Policía Nacional Bolivariana, un miembro de las Fuerzas Especiales (FAES), un conductor de una tanqueta de la Guardia Nacional, 18 miembros de la Guardia Nacional Bolivariana, dos de ellos con sus familias, y un oficial de la Armada venezolana".
21:46
El Parlamento venezolano, de mayoría opositora, ha denunciado que hasta las cuatro de la tarde (hora local) se han contabilizado cuatro personas asesinadas y más de 20 heridos de bala en la frontera de Venezuela con Brasil. "Lo que ocurre en la frontera con Brasil no es represión común (...) Lo que ocurre en Santa Elena de Uairén es una masacre contra el pueblo indígena pemón en donde contabilizamos cuatro personas asesinadas y más de 20 heridos de bala", dijo en rueda de prensa el diputadoo opositor Juan Andrés Mejía.
Fuente(s): https://www.20minutos.es/noticia/3571305/0/directo-venezuela-camiones-ayuda-humanitaria/https://www.elperiodico.com/es/internacional/20190223/venezuela-guaido-maduro-ultimas-noticias-directo-7319991Y, bueno, para los usuarios del foro que vivis en Venezuela; si necesitáis algo (aunque sea hablar con alguien aunque sea por privado), solo comentar que estoy aquí para lo que necesitéis. Muchas gracias por vuestra atención, y, bueno, saludos. |
|
|
|
|
73
|
Comunicaciones / Dispositivos Móviles (PDA's, Smartphones, Tablets) / Duda sobre el desvio de llamadas en Android
|
en: 1 Febrero 2019, 23:22 pm
|
Hola, veréis, quisiera abrir este tema porque me ha surgido una duda con el desvió de llamadas en teléfonos Android. Entonces, al buscar información sobre el tema, he encontrado la esta información en la siguiente web; nunca
Activar el desvío de llamadas en Android a nivel de teléfono
Si queremos tener un control total y gestionarlo a nivel del propio dispositivo, podremos activar el desvío de llamadas a través de los ajustes.
En primer lugar, deberemos abrir la aplicación teléfono e darle al botón con los 3 puntos, para a continuación:
[...]
Al mismo nivel tendremos la opción Desvío de llamadas, en la cual si entramos tendremos 4 posibilidades de desvío:
Desviar siempre
Desviar cuando esté ocupado
Desviar cuando no responda
Desviar cuando no esté disponible (cobertura)
Al pulsar sobre cada una de las opciones se abrirá un menú donde podemos introducir el número al que queremos desviar nuestras llamadas, con lo que podremos elegir cómo realizar los desvíos y en qué casos queremos que entren en funcionamiento.
Fuente: https://elandroidelibre.elespanol.com/2016/07/activar-desvio-llamadas-en-android.htmlEntonces, la duda que me ha surgido es si, bueno, la operadora con la que tengo contratada el numero de teléfono podría cobrar "algún extra" por utilizar este método para desviar llamadas, ya que es la primera vez que he visto esta función de Android. Por ultimo, también quisiera comentar que lo único que sabia hasta ahora para desviar llamadas era que había que hablar con la operadora y el tema de cobros por el servicio. Bueno, pues, ante todo agradecer de antemano la ayuda ofrecida con este tema. Muchas gracias por vuestra atención, y, bueno, saludos. |
|
|
|
|
74
|
Foros Generales / Dudas Generales / ¿Que alternativas a Adsense me recomendais?
|
en: 3 Enero 2019, 22:21 pm
|
|
Hola, veréis, el caso es que quisiera abrir este tema porque quisiera exponer una duda, y, bueno, quisiera escuchar vuestras recomendaciones, si no es molestia, claro esta.
Entonces, y, yendo directamente al tema; el caso es que hace años me banearon la cuenta de Google Adsense por, digamos, motivos obvios, y, bueno, quisiera preguntar que otros servicios de publicidad me podéis recomendar para, digamos, poder obtener ingresos con mi blog.
Y, bueno, ante todo, agradezco vuestras respuestas y recomendaciones.
Muchas gracias por vuestra atención, y, bueno, saludos.
|
|
|
|
|
75
|
Programación / Programación General / Pequeño programa para estadisticas deportivas
|
en: 3 Enero 2019, 19:23 pm
|
Hola, vereis, quisiera crear este tema para, bueno, compartir un pequeño codigo en Blitz 3D (un antiguo compilador Basic) que hice hace algun tiempo para generar estadisticas de un determinado equipo deportivo, y, por otra parte, poder compararlas con los de otro equipo insertando los resultados de los partidos que han jugado. Aun asi, y, aunque no suelo añadir graficos a los programas que voy creando, espero que sea de interes para los que les guste los deportes. base$=CurrentDir()+"BD_eventos_deportivos\"
If FileType(base$)=0
CreateDir base$
EndIf
Cls
Locate 0,0
Print "Inserte el pais donde se realizan los partidos:"
pais$=Input()
If pais$=""
Cls
Locate 0,0
Print "No ha insertado un nombre valido."
Print "Pulse una tecla para salir del programa."
WaitKey()
End
EndIf
base$=base$+pais$+"\"
If FileType(base$)=0
CreateDir base$
EndIf
Print "Inserte el nombre del deporte:"
pais$=Input()
If pais$=""
Cls
Locate 0,0
Print "No ha insertado un nombre valido."
Print "Pulse una tecla para salir del programa."
WaitKey()
End
EndIf
base$=base$+pais$
Cls
Locate 0,0
If FileType(base$)=0 Or FileType(base$)=2
Print "No hay datos del deporte indicado."
Print "Pulse una tecla para seguir."
WaitKey()
Goto inicio
EndIf
If FileType(base$)=1
Print "Ya existe un archivo con datos del deporte indicado."
Print "Pulse una tecla para cargar los datos."
WaitKey()
fileout=ReadFile(base$)
cantidad_equipos#=ReadFloat(fileout)
cantidad_partidos#=ReadFloat(fileout)
If cantidad_equipos#=0
Goto carga_00
EndIf
cantidad_equipos#=cantidad_equipos#-1
Dim lista_equipos$(cantidad_equipos#)
For tr#=0 To cantidad_equipos#
dat$=ReadString(fileout)
lista_equipos$(tr#)=dat$
Next
cantidad_equipos#=cantidad_equipos#+1
.carga_00
If cantidad_partidos#=0
Goto carga_01
EndIf
cantidad_partidos#=cantidad_partidos#-1
Dim lista_partidos$(cantidad_partidos#,2)
Dim resultados_partidos#(cantidad_partidos#,1)
For tr#=0 To cantidad_partidos#
For trr#=0 To 2
dat$=ReadString(fileout)
lista_partidos$(tr#,trr#)=dat$
Next
For trr#=0 To 1
opciones#=ReadFloat(fileout)
resultados_partidos#(tr#,trr#)=opciones#
Next
Next
cantidad_partidos#=cantidad_partidos#+1
.carga_01
CloseFile(fileout)
Cls
Locate 0,0
Print "Los datos se han cargado."
Print "Pulse una tecla para continuar."
WaitKey()
Goto inicio
EndIf
.inicio
Cls
Locate 0,0
Print "¿Que desea hacer?."
Print "1) Crear un equipo o modificar el nombre de uno existente."
Print "2) Añadir/modificar un partido."
Print "3) Ver una lista de todos los equipos."
Print "4) Ver todos los partidos."
Print "5) Ver los partidos de un equipo."
Print "6) Modificar un partido guardado en este programa."
Print "7) Ver las estadisticas generales de un equipo." ;faltan porcentajes
Print "8) Ver las posibilidades de un partido." ;faltan porcentajes
Print "9) Salir del programa."
opciones#=Input()
If opciones#=1
Cls
Locate 0,0
Print "Inserte el nombre del equipo a crear o modificar su nombre:"
dat$=Input()
If dat$=""
Print "Ha insertado un nombre no valido."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
If cantidad_equipos#=0
Dim lista_equipos$(cantidad_equipos#)
lista_equipos$(cantidad_equipos#)=dat$
cantidad_equipos#=cantidad_equipos#+1
Cls
Locate 0,0
Print "Se ha creado el equipo con el nombre indicado."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
If cantidad_equipos#>0
cantidad_equipos#=cantidad_equipos#-1
For tr#=0 To cantidad_equipos#
If dat$=lista_equipos$(tr#)
.modificar_nombre_equipo
Cls
Locate 0,0
Print "Ya existe un equipo con el nombre indicado."
Print "¿Desea modificar su nombre? (S/N)."
dat$=Input()
If dat$="S" Or dat$="s"
Cls
Locate 0,0
Print "Inserte el nuevo nombre del equipo:"
dat$=Input()
If dat$=""
Print "Ha insertado un nombre no valido."
Print "Pulse una tecla para volver al menu inicial."
cantidad_equipos#=cantidad_equipos#+1
WaitKey()
Goto inicio
EndIf
For trr#=0 To cantidad_equipos#
If dat$=lista_equipos$(trr#)
Cls
Locate 0,0
Print "El nombre indicado ya esta en uso."
Print "Pulse una tecla para volver al menu inicial."
cantidad_equipos#=cantidad_equipos#+1
WaitKey()
Goto inicio
EndIf
Next
lista_equipos$(tr#)=dat$
cantidad_equipos#=cantidad_equipos#+1
Cls
Locate 0,0
Print "Se ha modificado el nombre del equipo."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
If dat$="N" Or dat$="n"
cantidad_equipos#=cantidad_equipos#+1
Cls
Locate 0,0
Print "No se ha modificado el nombre del equipo."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
Goto modificar_nombre_equipo
EndIf
Next
Dim lista_equipos_b$(cantidad_equipos#)
For tr#=0 To cantidad_equipos#
dat_b$=lista_equipos$(tr#)
lista_equipos_b$(tr#)=dat_b$
Next
cantidad_equipos#=cantidad_equipos#+1
Dim lista_equipos$(cantidad_equipos#)
cantidad_equipos#=cantidad_equipos#-1
For tr#=0 To cantidad_equipos#
dat_b$=lista_equipos_b$(tr#)
lista_equipos$(tr#)=dat_b$
Next
cantidad_equipos#=cantidad_equipos#+1
lista_equipos$(cantidad_equipos#)=dat$
cantidad_equipos#=cantidad_equipos#+1
Cls
Locate 0,0
Print "Se ha creado el equipo con el nombre indicado."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
EndIf
If opciones#=2
Cls
Locate 0,0
If cantidad_equipos#<2
Print "Ha creado menos de 2 equipo."
Print "Debe crear 2 o mas para acceder a esta opcion."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
cantidad_equipos#=cantidad_equipos#-1
Print "Inserte el nombre del 1er equipo:"
dat$=Input()
For tr#=0 To cantidad_equipos#
If dat$=lista_equipos$(tr#)
Print "Inserte el nombre del 2er equipo:"
dat_b$=Input()
For trr#=0 To cantidad_equipos#
If dat_b$=lista_equipos$(trr#)
cantidad_equipos#=cantidad_equipos#+1
.fecha_00
Cls
Locate 0,0
Print "Inserte la fecha del partido:"
daty$=Input()
Cls
Locate 0,0
Print "Inserte la puntuacion del equipo " + dat$
var_00#=Input()
Cls
Locate 0,0
Print "Inserte la puntuacion del equipo " + dat_b$
var_01#=Input()
.confirm_00
Cls
Locate 0,0
Print "Los datos del partido son los siguientes:"
Print "Fecha del partido:"
Print daty$
Print ""
Print "Nombre del 1er equipo y puntuacion:"
Print dat$ + " " + var_00#
Print ""
Print "Nombre del 2o equipo y puntuacion:"
Print dat_b$ + " " + var_01#
Print "¿Que desea hacer?."
Print "1) Reinsertar todos los datos del partido."
Print "2) Guardar los datos del partido y volver al menu inicial."
Print "3) Descartar los datos del partido y volver al menu inicial."
opciones#=Input()
If opciones#=1
Goto fecha_00
EndIf
If opciones#=2
If cantidad_partidos#=0
Dim lista_partidos$(cantidad_partidos#,2)
Dim resultados_partidos#(cantidad_partidos#,1)
lista_partidos$(cantidad_partidos#,0)=daty$
lista_partidos$(cantidad_partidos#,1)=dat$
lista_partidos$(cantidad_partidos#,2)=dat_b$
resultados_partidos#(cantidad_partidos#,0)=var_00#
resultados_partidos#(cantidad_partidos#,1)=var_01#
cantidad_partidos#=cantidad_partidos#+1
Cls
Locate 0,0
Print "Los datos del partido se han guardado."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
If cantidad_partidos#>0
cantidad_partidos#=cantidad_partidos#-1
Dim lista_partidos_b$(cantidad_partidos#,2)
Dim resultados_partidos_b#(cantidad_partidos#,1)
For trn#=0 To cantidad_partidos#
For tts#=0 To 2
dat_c$=lista_partidos$(trn#,tts#)
lista_partidos_b$(trn#,tts#)=dat_c$
Next
For tts#=0 To 1
opcs#=resultados_partidos#(trn#,tts#)
resultados_partidos_b#(trn#,tts#)=opcs#
Next
Next
cantidad_partidos#=cantidad_partidos#+1
Dim lista_partidos$(cantidad_partidos#,2)
Dim resultados_partidos#(cantidad_partidos#,1)
cantidad_partidos#=cantidad_partidos#-1
For trn#=0 To cantidad_partidos#
For tts#=0 To 2
dat_c$=lista_partidos_b$(trn#,tts#)
lista_partidos$(trn#,tts#)=dat_c$
Next
For tts#=0 To 1
opcs#=resultados_partidos_b#(trn#,tts#)
resultados_partidos#(trn#,tts#)=opcs#
Next
Next
cantidad_partidos#=cantidad_partidos#+1
lista_partidos$(cantidad_partidos#,0)=daty$
lista_partidos$(cantidad_partidos#,1)=dat$
lista_partidos$(cantidad_partidos#,2)=dat_b$
resultados_partidos#(cantidad_partidos#,0)=var_00#
resultados_partidos#(cantidad_partidos#,1)=var_01#
cantidad_partidos#=cantidad_partidos#+1
Cls
Locate 0,0
Print "Los datos del partido se han guardado."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
EndIf
If opciones#=3
Goto inicio
EndIf
Goto confirm_00
EndIf
Next
Cls
Locate 0,0
Print "No se ha encontrado ningun equipo con el nombre indicado."
Print "Pulse una tecla para volver al menu inicial."
cantidad_equipos#=cantidad_equipos#+1
WaitKey()
Goto inicio
EndIf
Next
Cls
Locate 0,0
Print "No se ha encontrado ningun equipo con el nombre indicado."
Print "Pulse una tecla para volver al menu inicial."
cantidad_equipos#=cantidad_equipos#+1
WaitKey()
Goto inicio
EndIf
If opciones#=3
Cls
Locate 0,0
If cantidad_equipos#<1
Print "No ha creado ningun equipo."
Print "Debe crear almenos 1 antes de acceder a esta opcion."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
cantidad_equipos#=cantidad_equipos#-1
trr#=0
For tr#=0 To cantidad_equipos#
trr#=trr#+1
trx#=tr#+1
Print "Equipo no. " + trx# + ":"
Print lista_equipos$(tr#)
If trr#=10
Print ""
Print "Inserte R o r para volver al menu inicial y"
Print "dejar de ver equipos."
dat$=Input()
If dat$="R" Or dat$="r"
cantidad_equipos#=cantidad_equipos#+1
Goto inicio
EndIf
trr#=0
Cls
Locate 0,0
EndIf
Next
Print ""
Print "No hay mas equipos."
Print "Pulse una tecla para volver al menu inicial."
cantidad_equipos#=cantidad_equipos#+1
WaitKey()
Goto inicio
EndIf
If opciones#=4
Cls
Locate 0,0
If cantidad_partidos#=0
Print "No se ha creado ningun partido."
Print "Debe crear almenos uno antes de acceder a esta opcion."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
cantidad_partidos#=cantidad_partidos#-1
trn#=0
For tr#=0 To cantidad_partidos#
trr#=tr#+1
trn#=trn#+1
Print "Numero de partido:" + trr#
Print "Fecha/referencia del partido:"
Print lista_partidos$(tr#,0)
Print ""
Print "Equipos/resultados:"
Print lista_partidos$(tr#,1) + " / " + lista_partidos$(tr#,2)
Print ""
Print resultados_partidos#(tr#,0) + " / " + resultados_partidos#(tr#,1)
Print ""
If trn#=3
trn#=0
Print "Inserte R o r para volver al menu inicial y dejar de"
Print "ver los resultados de cada partido."
dat$=Input()
If dat$="R" Or dat$="r"
cantidad_partidos#=cantidad_partidos#+1
Goto inicio
EndIf
Cls
Locate 0,0
EndIf
Next
cantidad_partidos#=cantidad_partidos#+1
Print ""
Print "No hay mas partidos para mostrar."
Print "Pulse una tecla para volver al menu inicial"
WaitKey()
Goto inicio
EndIf
If opciones#=5
Cls
Locate 0,0
If cantidad_partidos#=0
Print "No se ha creado ningun partido."
Print "Debe crear almenos uno antes de acceder a esta opcion."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
cantidad_partidos#=cantidad_partidos#-1
trn#=0
Print "Indique el nombre del equipo que quiere ver sus partidos:"
dat$=Input()
trr#=0
For tr#=0 To cantidad_partidos#
If dat$=lista_partidos$(tr#,1) Or dat$=lista_partidos$(tr#,2)
trr#=tr#+1
trn#=trn#+1
Print "Numero de partido:" + trr#
Print "Fecha/referencia del partido:"
Print lista_partidos$(tr#,0)
Print ""
Print "Equipos/resultados:"
Print lista_partidos$(tr#,1) + " / " + lista_partidos$(tr#,2)
Print ""
Print resultados_partidos#(tr#,0) + " / " + resultados_partidos#(tr#,1)
Print ""
If trn#=5
trn#=0
Print "Inserte R o r para volver al menu inicial y dejar de"
Print "ver los resultados de cada partido."
dat$=Input()
If dat$="R" Or dat$="r"
cantidad_partidos#=cantidad_partidos#+1
Goto inicio
EndIf
EndIf
EndIf
Next
cantidad_partidos#=cantidad_partidos#+1
If trr#=0
Cls
Locate 0,0
Print "El equipo que ha indicado no ha jugado ningun partido."
.retorno_menu_inicial
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
Print ""
Print "El equipo indicado no ha jugado mas partidos."
Goto retorno_menu_inicial
EndIf
If opciones#=6
Cls
Locate 0,0
If cantidad_partidos#=0
Print "No se ha creado ningun partido."
Print "Debe crear almenos uno antes de acceder a esta opcion."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
Print "Inserte el numero del partido que se ha"
Print "guardado en este programa:"
Print "(Inserte un valor menor a 1 o mayor a " + cantidad_partidos#
Print " para volver al menu inicial.)"
opciones#=Input()
If opciones#<0 Or opciones#>cantidad_partidos#
Goto inicio
EndIf
tr#=opciones#-1
.confirmacion_mod_partido
Cls
Locate 0,0
Print "Datos del partido:"
Print "Numero de partido:" + opciones#
Print "Fecha/referencia del partido:"
Print lista_partidos$(tr#,0)
Print ""
Print "Equipos/resultados:"
Print lista_partidos$(tr#,1) + " / " + lista_partidos$(tr#,2)
Print ""
Print resultados_partidos#(tr#,0) + " / " + resultados_partidos#(tr#,1)
Print "¿Esta seguro que desea modificar el resultado de este partido? (S/N)."
dat$=Input()
If dat$="S" Or dat$="s"
.confirm_new_result_01
Cls
Locate 0,0
Print "Inserte el resultado del equipo " + lista_partidos$(tr#,1)
var_00#=Input()
Print "Inserte el resultado del equipo " + lista_partidos$(tr#,2)
var_01#=Input()
.confirm_new_result_00
Cls
Locate 0,0
Print "Numero del partido: " + opciones#
Print "El resultado actual del partido " + lista_partidos$(tr#,1) + " / " + lista_partidos$(tr#,2)
Print "es el siguiente:
Print var_00# + " / " + var_01#
Print ""
Print "El nuevo resultado del partido " + lista_partidos$(tr#,1) + " / " + lista_partidos$(tr#,2)
Print "es el siguiente:
Print resultados_partidos#(tr#,0) + " / " + resultados_partidos#(tr#,1)
Print ""
Print "¿Que desea hacer?."
Print "1) Modificar el nuevo resultado."
Print "2) Descartar el nuevo resultado."
Print "3) Guardar el nuevo resultado."
options#=Input()
If options#=1
Goto confirm_new_result_01
EndIf
If options#=2
Goto inicio
EndIf
If options#=3
resultados_partidos#(tr#,0)=var_00#
resultados_partidos#(tr#,1)=var_01#
Cls
Locate 0,0
Print "Resultado modificado."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
Goto confirm_new_result_00
EndIf
If dat$="N" Or dat$="n"
Goto inicio
EndIf
Goto confirmacion_mod_partido
EndIf
If opciones#=7
Cls
Locate 0,0
If cantidad_equipos#<2
Print "Ha creado menos de 2 equipos."
Print "Debe crear 2 o mas para acceder a esta opcion."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
If cantidad_partidos#=0
Print "No hay datos sobre ninguno de los equipos insertados,"
Print "ya que ninguno ha jugado ningun partido."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
Cls
Locate 0,0
Print "Inserte el nombre del equipo para ver sus datos:"
dat$=Input()
cantidad_partidos#=cantidad_partidos#-1
Dim estadistica#(10)
For tr#=0 To cantidad_partidos#
If dat$=lista_partidos$(tr#,1)
opciones#=estadistica#(0)
opciones#=opciones#+1
;partidos jugados
estadistica#(0)=opciones#
opciones_b#=estadistica#(1)
opciones_c#=resultados_partidos#(tr#,0)
opciones_b#=opciones_b#+opciones_c#
estadistica#(1)=opciones_b#
opciones_b#=estadistica#(3)
opciones_c#=resultados_partidos#(tr#,1)
opciones_b#=opciones_b#+opciones_c#
estadistica#(3)=opciones_b#
opciones_b#=resultados_partidos#(tr#,0)
opciones_c#=resultados_partidos#(tr#,1)
If opciones_b#>opciones_c#
opciones_e#=5
EndIf
If opciones_b#=opciones_c#
opciones_e#=6
EndIf
If opciones_b#<opciones_c#
opciones_e#=7
EndIf
opciones_d#=estadistica#(opciones_e#)
opciones_d#=opciones_d#+1
estadistica#(opciones_e#)=opciones_d#
EndIf
If dat$=lista_partidos$(tr#,2)
opciones#=estadistica#(0)
opciones#=opciones#+1
;partidos jugados
estadistica#(0)=opciones#
opciones_b#=estadistica#(3)
opciones_c#=resultados_partidos#(tr#,0)
opciones_b#=opciones_b#+opciones_c#
estadistica#(3)=opciones_b#
opciones_b#=estadistica#(1)
opciones_c#=resultados_partidos#(tr#,1)
opciones_b#=opciones_b#+opciones_c#
estadistica#(1)=opciones_b#
opciones_b#=resultados_partidos#(tr#,0)
opciones_c#=resultados_partidos#(tr#,1)
If opciones_b#>opciones_c#
opciones_e#=7
EndIf
If opciones_b#=opciones_c#
opciones_e#=6
EndIf
If opciones_b#<opciones_c#
opciones_e#=5
EndIf
opciones_d#=estadistica#(opciones_e#)
opciones_d#=opciones_d#+1
estadistica#(opciones_e#)=opciones_d#
EndIf
Next
;media de goles
opciones#=estadistica#(0)
opciones_b#=estadistica#(1)
opciones_b#=opciones_b#/opciones#
estadistica#(2)=opciones_b#
opciones_b#=estadistica#(3)
opciones_b#=opciones_b#/opciones#
estadistica#(4)=opciones_b#
opciones#=estadistica#(0)
For txx#=0 To 2
txr#=txx#+5
txn#=txx#+8
opciones_b#=estadistica#(txr#)
opciones_b#=opciones_b#/opciones#
opciones_b#=opciones_b#*100
estadistica#(txn#)=opciones_b#
Next
Cls
Locate 0,0
Print "Nombre del equipo: " + dat$
Print "Partidos jugados: " + estadistica#(0)
Print "Puntos totales marcados: " + estadistica#(1)
Print "Media de puntos totales marcados: " + estadistica#(2)
Print "Puntos totales que le han marcado: " + estadistica#(3)
Print "Media de puntos totales que le han marcado: " + estadistica#(4)
Print "Partidos ganados: " + estadistica#(5)
Print "Partidos perdidos: " + estadistica#(6)
Print "Partidos empatados: " + estadistica#(7)
Print "Posibilidades generales de ganar: " + estadistica#(8)
Print "Posibilidades generales de empatar: " + estadistica#(9)
Print "Posibilidades generales de perder: " + estadistica#(10)
Print ""
Print "No hay mas datos que mostrar."
Print "Pulse una tecla para volver al menu inicial."
cantidad_partidos#=cantidad_partidos#+1
WaitKey()
Goto inicio
EndIf
If opciones#=8
Cls
Locate 0,0
opciones_d#=0
If cantidad_partidos#=0
Print "No hay datos sobre partidos, ya"
Print "que ninguno ha jugado ningun partido."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
EndIf
Dim equipos_00$(1)
Cls
Locate 0,0
Print "Inserte el nombre del 1er equipo:"
dat$=Input()
equipos_00$(0)=dat$
cantidad_equipos#=cantidad_equipos#-1
For tr#=0 To cantidad_equipos#
If dat$=lista_equipos$(tr#)
cantidad_equipos#=cantidad_equipos#+1
Goto busquedas_equipos_var_nn
EndIf
Next
cantidad_equipos#=cantidad_equipos#+1
Print "No se ha encontrado ningun equipo con el 1er nombre."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
.busquedas_equipos_var_nn
Cls
Locate 0,0
Print "Inserte el nombre del 2o equipo:"
dat$=Input()
cantidad_equipos#=cantidad_equipos#-1
equipos_00$(1)=dat$
var#=0
Cls
Locate 0,0
For tr#=0 To cantidad_equipos#
If dat$=lista_equipos$(tr#)
cantidad_equipos#=cantidad_equipos#+1
Goto busquedas_equipos_var
EndIf
Next
cantidad_equipos#=cantidad_equipos#+1
Print "No se ha encontrado ningun equipo con el 2o nombre."
Print "Pulse una tecla para volver al menu inicial."
WaitKey()
Goto inicio
.busquedas_equipos_var
cantidad_partidos#=cantidad_partidos#-1
Dim estadistica_b#(1,10)
For trx#=0 To 1
dat$=equipos_00$(trx#)
For tr#=0 To cantidad_partidos#
If dat$=lista_partidos$(tr#,1)
opciones#=estadistica_b#(trx#,0)
opciones#=opciones#+1
;partidos jugados
estadistica_b#(trx#,0)=opciones#
opciones_b#=estadistica_b#(trx#,1)
opciones_c#=resultados_partidos#(tr#,0)
opciones_b#=opciones_b#+opciones_c#
estadistica_b#(trx#,1)=opciones_b#
opciones_b#=estadistica_b#(trx#,3)
opciones_c#=resultados_partidos#(tr#,1)
opciones_b#=opciones_b#+opciones_c#
estadistica_b#(trx#,3)=opciones_b#
opciones_b#=resultados_partidos#(tr#,0)
opciones_c#=resultados_partidos#(tr#,1)
If opciones_b#>opciones_c#
opciones_e#=5
EndIf
If opciones_b#=opciones_c#
opciones_e#=6
EndIf
If opciones_b#<opciones_c#
opciones_e#=7
EndIf
opciones_d#=estadistica_b#(trx#,opciones_e#)
opciones_d#=opciones_d#+1
estadistica_b#(trx#,opciones_e#)=opciones_d#
EndIf
If dat$=lista_partidos$(tr#,2)
opciones#=estadistica_b#(trx#,0)
opciones#=opciones#+1
;partidos jugados
estadistica_b#(trx#,0)=opciones#
opciones_b#=estadistica_b#(trx#,3)
opciones_c#=resultados_partidos#(tr#,0)
opciones_b#=opciones_b#+opciones_c#
estadistica_b#(trx#,3)=opciones_b#
opciones_b#=estadistica_b#(trx#,1)
opciones_c#=resultados_partidos#(tr#,1)
opciones_b#=opciones_b#+opciones_c#
estadistica_b#(trx#,1)=opciones_b#
opciones_b#=resultados_partidos#(tr#,0)
opciones_c#=resultados_partidos#(tr#,1)
If opciones_b#>opciones_c#
opciones_e#=7
EndIf
If opciones_b#=opciones_c#
opciones_e#=6
EndIf
If opciones_b#<opciones_c#
opciones_e#=5
EndIf
opciones_d#=estadistica_b#(trx#,opciones_e#)
opciones_d#=opciones_d#+1
estadistica_b#(trx#,opciones_e#)=opciones_d#
EndIf
Next
;media de goles
opciones#=estadistica_b#(trx#,0)
opciones_b#=estadistica_b#(trx#,1)
opciones_b#=opciones_b#/opciones#
estadistica_b#(trx#,2)=opciones_b#
opciones_b#=estadistica_b#(trx#,3)
opciones_b#=opciones_b#/opciones#
estadistica_b#(trx#,4)=opciones_b#
opciones#=estadistica_b#(trx#,0)
For txx#=0 To 2
txr#=txx#+5
txn#=txx#+8
opciones_b#=estadistica_b#(trx#,txr#)
opciones_b#=opciones_b#/opciones#
opciones_b#=opciones_b#*100
estadistica_b#(trx#,txn#)=opciones_b#
Next
Next
dat$=equipos_00$(0)
dat_b$=equipos_00$(1)
opciones_d#=0
checs_00#=0
Dim media_encuentros#(1,2)
Dim partidos_final_casa#(1,3)
Dim percents_partidos_final_casa#(1,2)
Dim goles_casa#(1,3)
For tr#=0 To cantidad_partidos#
If dat$=lista_partidos$(tr#,1)
If dat_b$=lista_partidos$(tr#,2)
opciones_a#=resultados_partidos#(tr#,0)
opciones_b#=resultados_partidos#(tr#,1)
opps#=goles_casa#(0,0)
opps#=opps#+opciones_a#
goles_casa#(0,0)=opps#
opps#=goles_casa#(0,1)
opps#=opps#+opciones_b#
goles_casa#(0,1)=opps#
opciones_d#=opciones_d#+1
checs_00#=checs_00#+1
If opciones_a#>opciones_b#
opciones_c#=partidos_final_casa#(0,0)
opciones_c#=opciones_c#+1
partidos_final_casa#(0,0)=opciones_c#
opciones_c#=media_encuentros#(0,0)
opciones_c#=opciones_c#+1
media_encuentros#(0,0)=opciones_c#
opciones_c#=media_encuentros#(1,2)
opciones_c#=opciones_c#+1
media_encuentros#(1,2)=opciones_c#
EndIf
If opciones_a#=opciones_b#
opciones_c#=partidos_final_casa#(0,1)
opciones_c#=opciones_c#+1
partidos_final_casa#(0,1)=opciones_c#
opciones_c#=media_encuentros#(0,1)
opciones_c#=opciones_c#+1
media_encuentros#(0,1)=opciones_c#
media_encuentros#(1,1)=opciones_c#
opciones_c#=media_encuentros#(1,1)
opciones_c#=opciones_c#+1
media_encuentros#(1,1)=opciones_c#
EndIf
If opciones_a#<opciones_b#
opciones_c#=partidos_final_casa#(0,2)
opciones_c#=opciones_c#+1
partidos_final_casa#(0,2)=opciones_c#
opciones_c#=media_encuentros#(0,2)
opciones_c#=opciones_c#+1
media_encuentros#(0,2)=opciones_c#
opciones_c#=media_encuentros#(1,0)
opciones_c#=opciones_c#+1
media_encuentros#(1,0)=opciones_c#
EndIf
EndIf
EndIf
If dat_b$=lista_partidos$(tr#,1)
If dat$=lista_partidos$(tr#,2)
opciones_a#=resultados_partidos#(tr#,1)
opciones_b#=resultados_partidos#(tr#,0)
opciones_d#=opciones_d#+1
opps#=goles_casa#(1,1)
opps#=opps#+opciones_a#
goles_casa#(1,1)=opps#
opps#=goles_casa#(1,0)
opps#=opps#+opciones_b#
goles_casa#(1,0)=opps#
If opciones_a#>opciones_b#
opciones_c#=partidos_final_casa#(1,2)
opciones_c#=opciones_c#+1
partidos_final_casa#(1,2)=opciones_c#
opciones_c#=media_encuentros#(0,0)
opciones_c#=opciones_c#+1
media_encuentros#(0,0)=opciones_c#
opciones_c#=media_encuentros#(1,2)
opciones_c#=opciones_c#+1
media_encuentros#(1,2)=opciones_c#
EndIf
If opciones_a#=opciones_b#
opciones_c#=partidos_final_casa#(1,1)
opciones_c#=opciones_c#+1
partidos_final_casa#(1,1)=opciones_c#
opciones_c#=media_encuentros#(0,1)
opciones_c#=opciones_c#+1
media_encuentros#(0,1)=opciones_c#
media_encuentros#(1,1)=opciones_c#
opciones_c#=media_encuentros#(1,1)
opciones_c#=opciones_c#+1
media_encuentros#(1,1)=opciones_c#
EndIf
If opciones_a#<opciones_b#
opciones_c#=partidos_final_casa#(1,0)
opciones_c#=opciones_c#+1
partidos_final_casa#(1,0)=opciones_c#
opciones_c#=media_encuentros#(0,2)
opciones_c#=opciones_c#+1
media_encuentros#(0,2)=opciones_c#
opciones_c#=media_encuentros#(1,0)
opciones_c#=opciones_c#+1
media_encuentros#(1,0)=opciones_c#
EndIf
EndIf
EndIf
Next
Dim percents#(1,2)
jenova_002#=0
jenova_003#=0
For tr#=0 To 1
For trr#=0 To 2
jenova_001#=partidos_final_casa#(tr#,trr#)
jenova_002#=jenova_002#+jenova_001#
jenova_003#=jenova_003#+jenova_001#
partidos_final_casa#(tr#,3)=jenova_002#
Next
jenova_002#=0
Next
For tr#=0 To 1
For trr#=0 To 2
opciones_a#=media_encuentros#(tr#,trr#)
opciones_b#=opciones_a#/opciones_d#
opciones_b#=opciones_b#*100
percents#(tr#,trr#)=opciones_b#
opciones_a#=partidos_final_casa#(tr#,trr#)
jenova_001#=partidos_final_casa#(tr#,3)
opciones_b#=opciones_a#/jenova_001#
opciones_b#=opciones_b#*100
percents_partidos_final_casa#(tr#,trr#)=opciones_b#
Next
Next
checs_01#=opciones_d#-checs_00#
Dim goles_finales#(1,1)
For te#=0 To 1
If te#=0
opciones_e#=checs_00#
EndIf
If te#=1
opciones_e#=checs_01#
EndIf
opciones_a#=goles_casa#(te#,0)
opciones_a#=opciones_a#/opciones_e#
goles_casa#(te#,2)=opciones_a#
opciones_a#=goles_casa#(te#,1)
opciones_a#=opciones_a#/opciones_e#
goles_casa#(te#,3)=opciones_a#
Next
opciones_a#=goles_casa#(0,0)
opciones_b#=goles_casa#(1,1)
opciones_c#=opciones_a#+opciones_b#
goles_finales#(0,0)=opciones_c#
opciones_a#=goles_casa#(1,0)
opciones_b#=goles_casa#(0,1)
opciones_c#=opciones_a#+opciones_b#
goles_finales#(1,0)=opciones_c#
opciones_c#=goles_finales#(0,0)
opciones_c#=opciones_c#/opciones_d#
goles_finales#(0,1)=opciones_c#
opciones_c#=goles_finales#(1,0)
opciones_c#=opciones_c#/opciones_d#
goles_finales#(1,1)=opciones_c#
Dim ratios_partido_home#(1,2)
For tr#=0 To 1
For trr#=0 To 2
opcional#=percents_partidos_final_casa#(tr#,trr#)
opcional_b#=100/opcional#
ratios_partido_home#(tr#,trr#)=opcional_b#
If opcional#=0
ratios_partido_home#(tr#,trr#)=0
EndIf
Next
Next
Print "Datos gral. de los partidos:"
Print ""
Print "Nombres de los equipos:"
Print dat$ + " / " + dat_b$
Print ""
Print "Ratio beneficios apuesta del partido"
Print "en casa: " + ratios_partido_home#(0,0) + " : " + ratios_partido_home#(0,1) + " : " + ratios_partido_home#(0,2) + " / " + ratios_partido_home#(0,0) + " : " + ratios_partido_home#(0,1) + " : " + ratios_partido_home#(0,2)
Print "Total de partidos jugados: " + jenova_003#
Print "Partidos que han jugado en casa: " + partidos_final_casa#(0,3) + " / " + partidos_final_casa#(1,3)
Print "Partidos ganados: " + media_encuentros#(0,0) + " (" + percents#(0,0) + "%) / " + media_encuentros#(1,0) + " (" + percents#(1,0) + "%)"
Print "Partidos ganados en casa: " + partidos_final_casa#(0,0) + " (" + percents_partidos_final_casa#(0,0) + "%) / " + partidos_final_casa#(1,0) + " (" + percents_partidos_final_casa#(1,0) + "%)"
Print "Partidos empatados: " + media_encuentros#(0,1) + " (" + percents#(0,1) + "%) / " + media_encuentros#(1,1) + " (" + percents#(1,1) + "%)"
Print "Partidos empatados en casa: " + partidos_final_casa#(0,1) + " (" + percents_partidos_final_casa#(0,1) + "%) / " + partidos_final_casa#(1,1) + " (" + percents_partidos_final_casa#(1,1) + "%)"
Print "Partidos perdidos: " + media_encuentros#(0,2) + " (" + percents#(0,2) + "%) / " + media_encuentros#(1,2) + " (" + percents#(1,2) + "%)"
Print "Partidos perdidos en casa: " + partidos_final_casa#(0,2) + " (" + percents_partidos_final_casa#(0,2) + "%) / " + partidos_final_casa#(1,2) + " (" + percents_partidos_final_casa#(1,2) + "%)"
Print "Goles marcados en casa: " + goles_casa#(0,0) + " / " + goles_casa#(1,0)
Print "Goles que le han marcados en casa: " + goles_casa#(0,1) + " / " + goles_casa#(1,1)
Print "Resultado medio en casa: " + goles_casa#(0,2) + " - " + goles_casa#(0,3) + " / " + goles_casa#(1,2) + " - " + goles_casa#(1,3)
Print "Total goles marcados: " + goles_finales#(0,0) + " - " + goles_finales#(1,0)
Print "Media gral. goles marcados: " + goles_finales#(0,1) + " - " + goles_finales#(1,1)
Print ""
Print "Datos gral. de los equipos:"
Print "Nombre del equipo: " + dat$ + " / " + dat_b$
Print "Partidos jugados: " + estadistica_b#(0,0) + " / " + estadistica_b#(1,0)
Print "Puntos totales marcados: " + estadistica_b#(0,1) + " / " + estadistica_b#(1,1)
Print "Media de puntos totales marcados: " + estadistica_b#(0,2) + " / " + estadistica_b#(1,2)
Print "Puntos totales que le han marcado: " + estadistica_b#(0,3) + " / " + estadistica_b#(1,3)
Print "Media de puntos totales que le han marcado: " + estadistica_b#(0,4) + " / " + estadistica_b#(1,4)
Print "Partidos ganados: " + estadistica_b#(0,5) + " / " + estadistica_b#(1,5)
Print "Partidos empatados: " + estadistica_b#(0,6) + " / " + estadistica_b#(1,6)
Print "Partidos perdidos: " + estadistica_b#(0,7) + " / " + estadistica_b#(1,7)
Print "Posibilidades generales de ganar: " + estadistica_b#(0,8) + " / " +estadistica_b#(1,8)
Print "Posibilidades generales de empatar: " + estadistica_b#(0,9) + " / " +estadistica_b#(1,9)
Print "Posibilidades generales de perder: " + estadistica_b#(0,10) + " / " + estadistica_b#(1,10)
Print ""
Print "No hay mas datos que mostrar."
Print "Pulse una tecla para volver al menu inicial."
cantidad_partidos#=cantidad_partidos#+1
WaitKey()
Goto inicio
EndIf
If opciones#=9
.salida_programa
Cls
Locate 0,0
Print "¿Desea guardar los datos de los equipos y sus partidos? (S/N)."
dat$=Input()
If dat$="n" Or dat$="N"
End
EndIf
If dat$="s" Or dat$="S"
If FileType(base$)=1
DeleteFile base$
EndIf
fileout=WriteFile(base$)
WriteFloat(fileout,cantidad_equipos#)
WriteFloat(fileout,cantidad_partidos#)
If cantidad_equipos#=0
Goto carga_10
EndIf
cantidad_equipos#=cantidad_equipos#-1
For tr#=0 To cantidad_equipos#
dat$=lista_equipos$(tr#)
WriteString(fileout,dat$)
Next
.carga_10
If cantidad_partidos#=0
Goto carga_11
EndIf
cantidad_partidos#=cantidad_partidos#-1
For tr#=0 To cantidad_partidos#
For trr#=0 To 2
dat$=lista_partidos$(tr#,trr#)
WriteString(fileout,dat$)
Next
For trr#=0 To 1
opciones#=resultados_partidos#(tr#,trr#)
WriteFloat(fileout,opciones#)
Next
Next
.carga_11
Cls
Locate 0,0
Print "Los datos se han actualizado."
Print "Pulse una tecla para salir del programa."
WaitKey()
End
EndIf
Goto salida_programa
EndIf
Goto inicio
|
|
|
|
|
76
|
Media / Juegos y Consolas / ¿Algun jugador del GTA V online en el foro?
|
en: 26 Diciembre 2018, 21:52 pm
|
|
Hola, vereis, quisiera abrir este tema para preguntar si hay algún jugador del GTA V online en el foro.
Y, bueno, quisiera preguntarlo por si hay gente que actualmente juega, y, dicho sea de paso, quedar de vez en cuando para realizar "raids" (o, por su defecto, "otras actividades") dentro del juego, si no es molestia, claro esta.
Muchas gracias por vuestra atención, y, bueno, saludos.
|
|
|
|
|
77
|
Foros Generales / Foro Libre / Noticia; EUA avisa de riesgo de...
|
en: 23 Diciembre 2018, 21:30 pm
|
Hola, vereis, quiero abrir este tema para compartir una noticia que me ha llamado la atencion, y que, bueno, comentan que EE.UU. avisado (via Twitter, por cierto) a España sobre "riesto de atentado en las Ramblas estas navidades". Y, bueno, sin palabras por mi parte viendo lo ocurrido el agosto del año pasado y toda la ****** que ha generado la prensa con este tema: FUENTE: https://www.elperiodico.com/es/barcelona/20181223/estados-unidos-avisa-peligro-atentado-rambla-7218123Noticia: Estados Unidos avisa en Twitter de riesgo de atentados en la Rambla estas Navidades.Mensaje del Departamento de Estados Unidos a sus ciudadanos a través de las redes sociales pidiendo precaución en la zona de La Rambla de Barcelona ante la posibilidad de atentados durante estas fechas navideñas. En su cuenta de Twitter dedicada a difundir advertencias a los pasajeros estadounidenses en el extranjero, la Oficina de Asuntos Consulares, difundieron un apunte en el que llaman a evitar pasear por esa zona. "Extremen la precaución alrededor de las áreas con movimiento de vehículos, incluidos autobuses, en el área de Las Ramblas de Barcelona durante las Navidades y el Año Nuevo. Los terroristas pueden atacar sin apenas aviso, o sin aviso, teniendo como objetivos localizaciones turísticas, centros de transporte y otras zonas públicas", publicaron. En una circular más extensa piden a los turistas que se encuentren en Barcelona que estén atentos especialmente en grandes aglomeraciones como eventos o festivales que se celebran durante estas fechas, "estar en estado de alerta en espacios públicos -como iglesias, atracciones turísticas, escuelas, hospitales y transporte tanto público como privado-". Piden que sigan las instrucciones de la policía y las autoridades gubernamentales y les facilitan un listado de contactos. Fuentes de Interior, aseguran a EL PERIÓDICO que la alerta terrorista se mantiene en un nivel de 4 sobre 5 y aseguran que se ha mejorado la coordinación de los Mossos con otros cuerpos policiales con su entrada en el CITCO (Centro de Inteligencia contra el Terrorismo y el Crimen Organizado). Tras el atentado del 14 de agosto del año pasado en La Rambla, se instalaron bolardos en diciembre para prevenir posibles ataques. También se reforzó la seguridad otros puntos de atracción turística como la zona que acoge el templo de la Sagrada Familia. Las embajadas de Paris, Londres y Berlín también notificaron a sus ciudadanos que debían extremar las precauciones ante la amenaza de posibles atentos aunque no detallaron ciudades u otras ubicaciones concretas. |
|
|
|
|
78
|
Foros Generales / Foro Libre / Para los aficionados de Juego de tronos del foro.
|
en: 14 Noviembre 2018, 09:59 am
|
Hola, vereis, el caso es que quiero abrir este tema para compartir una noticia sobre la serie de Juego de Tronos, y, bueno, mas concretamente sobre la fecha de estreno de su octava (y ultima) temporada, el cual ha sido confirmado para abril del 2019, por eso: Fuente de la noticia: https://www.elperiodico.com/es/tele/20181113/juego-tronos-fin-abril-7145057Noticia: 'Juego de tronos' llegará a su fin en abril con la temporada 8 HBO programa el estreno de la última temporada de la exitosa serie para la primavera del 2019 Juego de tronos llega a su fin. No es por falta de audiencia, ni por falta de ideas, porque sus guionistas las siguen teniendo. Pero todo acaba y Juego de tronos también. En abril, HBO ofrecerá la temporada 8, los últimos capítulos de la exitosa serie. Y la plataforma presenta un nuevo tráiler con una leyenda: "Cada batalla. Cada traición. Cada alianza. Cada peligro. Cada lucha. Cada sacrificio. Cada juramento. Cada muerte. Es todo #PorElTrono". Sus fans, que son legiones, no necesitan que les expliquen en qué consiste la serie, por embrolladas que sean sus tramas. Y a quienes no la han visto, raras avis, se las tendríamos que explicar en demasiadas líneas. Solo unas breves pinceladas: está basada en la serie de novelas Canción de hielo y fuego, del escritor estadounidense George R. R. Martin, cuyo primer libro se titula Juego de tronos y está ambientada en los continentes ficticios de Poniente y Esos, donde se suceden violentas batallas por el poder y relaciones en las que la abunda el sexo y la venganza. Para esos pocos que no la han visto, HBO tiene todas las temporadas a su disposición. Por si aún quieren engancharse a la fiebre de 'Juego de tronos'. |
|
|
|
|
79
|
Foros Generales / Foro Libre / Sobre la orden de destituciones de consules de Borrell...
|
en: 17 Octubre 2018, 22:37 pm
|
Hola, vereis, el caso es que mientras estaba tarde/noche estaba mirando las noticias, han habido una o dos que, me han llamado especialmente la atencion, y, bueno, quisiera publicar (almenos) una de ellas y aprovechar para compartir opiniones sobre si las relaciones de España con otros paises de Europa pueden ir a mejor o a peor, si no es molestia, claro esta. Entonces, la noticia es la siguiente: --------------------------------------------------------------------------------------------------------- Fuente: https://www.elperiodico.com/es/politica/20181017/borrell-destituye-consul-grecia-barcelona-7094870Noticia; Borrell ordena destituir al cónsul honorario de Grecia en Barcelona por "agravios a la bandera de España" Exteriores afea a Fernando Turró que haya acudido a actos "que no son propios" de la condición diplomática, como la manifestación de la Diada. El cónsul general honorario de Grecia en Barcelona, Fernando Turró, ha sido destituido a petición del Ministerio de Asuntos Exteriores por "agravios a la bandera de España", informa Efe. Fuentes de Exteriores han precisado que Turró ha acudido a "varios actos que no son propios" de la condición diplomática, como participar en una manifestación de la Diada luciendo símbolos independentistas, incluida una camiseta con la 'estelada'. En su comparecencia ante la comisión mixta de la Unión Europea (UE), Borrell ha explicado que el embajador de Grecia en España, Christodoulos Lazaris, por "agraviar a la bandera del Estado español en la calle". "Eso un cónsul no lo puede hacer", ha remachado. Fuentes diplomáticas han explicado que Turró, empresario y arquitecto, participó, en diciembre del año pasado, en un acto en el extranjero con el 'expresident' Carles Puigdemont y que en la última Diada se manifestó con una camiseta con la bandera independentista. A raíz de estos hechos, la introductora de embajadores, Caridad Batalla, citó al embajador griego en España la semana pasada y este se comprometió a cesarlo. El ministro ha respondido así a la diputada Laura Castell Fort (ERC) que, durante la comparecencia le ha reprochado el cese de cónsules honorarios en Catalunya por su apoyo al secesionismo. Borrell ha puntualizado que han sido cesados por sus respectivos embajadores. Castell ha acusado al ministro de estar llevando a cabo una política de "desinfección". Los cónsules honorarios no son diplomáticos, tienen menos competencias que los cónsules de carrera y, con frecuencia son ciudadanos del país de destino, no del Estado al que representan. Su figura se rige por el Convenio de Viena de Relaciones Consulares, que establece que los representantes diplomáticos de un país no podrán entrometerse en la política interna del país anfitrión. Si así fuese, este puede retirarles el 'exequatur' o permiso de representación oficial que se concede a quien -sin ser diplomático- ostenta la representación honoraria de otro Estado. Cuatro ceses con el PP Esta es la primera ocasión en que, con el Gobierno del PSOE, se cesa a un cónsul honorario en Catalunya por motivos relacionados con el proceso independentista. Con el del PP fueron cuatro los destituidos en los últimos años, representantes de Finlandia, Filipinas, Letonia y Bulgaria. --------------------------------------------------------------------------------------------------------- Y, bueno, ya como opinion personal a raiz de noticias como esta, quisiera darle a Borrell el beneficio de la duda y creer que puede mejorar las relaciones exteriores con otros paies de Europa. Ahora bien, por ahora mantengo mis dudas de que realmente pueda ser de ayuda y que consiga mejorar en gran medida las relaciones que tiene con, almenos, Grecia y Belgica. |
|
|
|
|
80
|
Sistemas Operativos / Windows / ¿apagar windows cuando termine un proceso con un .bat?.
|
en: 20 Septiembre 2018, 22:54 pm
|
|
Hola, vereis, el caso es que hoy he estado realizado un backup de algunas series que tengo descargadas, y, bueno, dado que me ha llevado varias horas, quisiera realizar una pregunta, si no es molestia, claro esta;
¿Seria posible ejecutar un apagado automatico del sistema cuando termine un proceso (en mi caso, terminar de copiar archivos)?.
Entonces, en caso de ser posible, ¿que comando deberia utilizar ademas del comando "Shutdown"?.
Y, bueno, ya de entrada, gracias de antemano por la ayuda.
Muchas gracias por vuestra atencion, y, bueno, saludos.,
|
|
|
|
|
|
| |
|
Mostrar Temas
