Resumen de El misterio de la vida

Una versión corta del video "El misterio de la vida". Destaca algunos argumentos para invitar a reflexionar. Ver la versión completa




Contenido: 
Limitaciones que tiene la teoría de la selección natural.
Las máquinas moleculares son muy complejas, tienen una complejidad que no puede ser simplificada.
Los aminoácidos no pueden agruparse para formar proteínas sin las instrucciones genéticas por lo que tubieron que aparecer al mismo tiempo (una complejidad mayor)
Se descarta de antemano en la teoría una causa: la inteligencia.
Que está asociado siempre a información compleja: inteligencia.

Para responder a objeciones por las Transfuciones

Videos cortos para usar en la predicación si tiene internet en el movil.

¿Te puedes morir por no transfundirte sangre? (24 segundos) 

"Decir que alguien ha muerto por rechazar sangre es una afirmación engañosa y muy imprecisa. La gente muere a causa de una enfermedad, de un traumatismo, o de complicaciones quirúrgicas"
Jefe de Anestesiología y Cuidados críticos del Hospital Englewood, Nueva Jersey, USA

"Puedo decir que he tratado a mas de 200 Testigos de Jehová y jamás he perdido a un paciente por no haberle podido administrar sangre"
Profesor de Cirugía Cardiotoráxica  del Hospital de Cirugía Jackson Memorial, Florida, USA








Tratamiento de la hemorragia intensa (49 seg)

Cuando alguien pierde mucha sangre los médicos tienen dos prioridades urgentes.
Los más indispensable y apremiante es detener la hemorragia.
Todo lo demás es secundario”.
Y la segunda prioridad es restituir el volumen sanguíneo.
¿Que puede suceder cuando el volumen sanguíneo de un paciente disminuye demasiado?
La sangre no llega al cerebro o a otros órganos y el paciente puede morir.
Lo que hace falta es restituir el volumen, el riego sanguíneo y la oxigenación.
Una manera de corregir la merma del volumen sanguíneo es administrando otros fluidos por via intravenosa. Se pueden utilizar diversos tipos de fluidos, no tiene que ser necesariamente sangre.

RESUMEN
Prioridades: 1) Detener hemorragia 2) Recuperar volumen con fluido no sanguíneo.


Hablan:
Dr. Edwin A. Deitch Profesor y Jefe del Hospital Universitario de Cirugía de Newark , New Jersey, USA
Dr. Nicholas Namais Profesor Asistente del Hospital de Cirugía Jackson Memorial, Florida, USA

Dr. Stephen M. Cohen 
Profesor and Director Medico en Jefe del Hospital de Cirugía Jackson Memorial, Florida, USA












Peligros de las Transfusiones (1 min 37 seg)

Las transfusiones comportan verdaderos riesgos.
Dr. Willem de Groot
Pediatra, Centro de Ciencias de la Salud de Winnipeg, Canada:

Los agentes patógenos transmitidos por la sangre, particularmente el virus del SIDA son motivo de preocupación.
Dr Gerard A. Kaiser
Profesor y Decano de Cuidados Clinicos del Hospital Jackson Memorial, Florida, USA

La sangre es un producto biológico, puede ser portadora de enfermedades y demás.
La analizamos para detectar la mayoría de ellas pero algunas las desconocemos.
Profesor Richard K. Spence
Director de Educación Quirurgica de Birmingham, Alabama, USA.

Hemos visto aparecer algunas enfermedades nuevas y terribles, como el SIDA, que probablemente no existian en el pasado. Nadie sabe si la próxima enfermedad aparecerá dentro de 10 semanas,
Profesor Neil Blumberg
Director de la Unidad de Medicina Transfuncional y Banco de Sangre de la Universidad de Rochester, Nueva Cork, USA.

La hepatitis B y la hepatitis C se transmiten por la sangre y los costos sociales son muy altos.
Dra. Concha Lawand
Profesora Asistente de Anestesiología del Hospital Jacson Memorial, Florida, USA

Se producen reacciones transfucionales, son muy raras pero pueden ser peligrosas o hasta mortales.
Dr. Todd K. Rosengart
Cirugía Cardiotoráxica del Hospital Presbiterianos de Nueva York, USA.

Podemos clasificar mal la sangre y provocar una catástrofe. Algunos pacientes han muerto y mueren por haber recibido un tipo de sangre equivocado.
Profesor Richard K. Spence
Director de Educación Quirurgica de Birmingham, Alabama, USA.

Es curioso que ahora, a principios del siglo XXI, nos demos cuenta de que las transfusiones de sangre, hasta cierto punto, no logran aquello para lo que siempre las empleamos.
Profesor Donat R. Spahn
Instituto de Anestesiología del Hospital Universitario de Zurich, Suiza.

Con el paso de los años, nos hemos convencido de que muchas de las complicaciones que sufren los pacientes después de una operación, no se debe a mala suerte o a falta de habilidad quirúrgica sino que son consecuencia de las transfusiones
Profesor Neil Blumberg
Director de la Unidad de Medicina Transfuncional y Banco de Sangre de la Universidad de Rochester, Nueva Cork, USA.




Ver los 3 en lista de reproducción

Ver video completo Parte 1/2 y Parte 2/2

Gráfica de Versículos de Daniel Capitulo 11

La siguiente es una Gráfica con la posición del cumplimiento de cada versículo de Daniel capítulo 11 indicada con un circulo rojo con el número del versículo dentro.
Creada a partir de la información histórica que aparece en el libro "Las Profesías de Daniel" editado por los Testigos de Jehová.
Es un recorte del "Gráfico lineal de História" que se encuentra en este sitio web.

Si bien puede usarse mientras se lee el libro, más que nada es para tener una idea de donde están en la corriente del tiempo.

Primeros versículos: (del 2 al 19) Durante el imperio Medo Persa y Griego.
Después del 20 al  26. Durante el imperio Romano.
Por último del 27 al Final (45) en tiempos recientes. 

Al igual que la profecía de Daniel capítulo 2, que menciona la figura de distintos metales que se corresponden con las potencias que irían apareciendo en la historia, después de la época en que vivió Daniel, que era la del reinado de Babilonia, así también en este capítulo 11 se corresponden con estos imperios: Medos, Griegos y Romanos y la época actual desde fines del siglo 19.


Durante el imperio Medo Persa y Griego:

 
Durante el Imperio Romano:


En la época actual:
 


Para ver el cumplimiento de éstos versículo sobre el pueblo de Dios:
http://universaldata.blogspot.com/2012/08/testigos-de-jehova.html



Gráfica lineal de las Guerras

Guerras recientes

Observaciones

En toda la historia hasta 1914 (Primera Guerra Mundial, 1° GM) murieron 250 millones de personas en guerras.
Luego, de 1914 a 1945 (final de la Segunda Guerra Mundial, 2°GM) 
100 millones, y desde entonces (hasta 2012) unos 36 millones. 

Hasta 1914 el porcentaje de civiles en las guerras era del 10%, entonces pasó a 60% y aumentó hasta llegar al 90% actualmente (curva azul)

Cada guerra está representada por un triángulo desde su comienzo a su final y como altura la cantidad de muertos al final en escala logarítmica (es decir contando el número de ceros de la cifra). 
Los colores superiores de abajo hacia arriba indican: amarillo más de 100.000 muertos, naranja mas de 1 millón y rojo más de 10 millones. 

En la franja inferior de izquierdaa derecha el porcentaje de civiles: amarillo 60-73%, naranja 73 a 85% y rojo más de 85%

fuente: wikipedia_Anexo:Guerras_por_muertos

Muchos dicen que siempre hubo guerras, pero durante las guerras mundiales murio un tercio del total, muchisima gente y los civiles pasaron de 10 a 90%.





Esta gráfica muestra todas las guerras de la historia



Esta gráfica muestra la cantidad de muertos en las guerras desde 1880 al 2012. Se destacan la 1° y 2° Guerras Mundiales.


Esta gráfica muestra la cantidad de muertos en las guerras desde 1598 al 2012 pero en escala logarítmica para percibir mejor su distribución.



Aquí un resumen de los datos gráficados.


Conflicto Fecha Muertos Descripción
Primera guerra púnica -264 a -241 400000  Primera guerra púnica (264 a. C.-241 a. C.): 400.000 muertos, mayoría romanos.21 22
Segunda guerra púnica -218 a -202 300000  Segunda guerra púnica (218 a. C.-202 a. C.): 300.000 muertos, un tercio en Italia y otro en Hispania, el resto se reparte en los demás frentes de batalla.21
Tercera guerra púnica -149 a -146 445000  Tercera guerra púnica (149 a. C.-146 a. C.): De los 500.000 habitantes de Cartago solo 55.000 sobreviven a la guerra, los sobrevivientes son esclavizados (445.000 muertos).21
Guerras Serviles -135 a -71 1000000  Guerras Serviles: 1.000.000 de esclavos muertos.21 23
Guerra Cimbria -113 a -101 300000  Guerra Cimbria (113 a. C.-101 a. C.): 275.000 a 310.000 muertos.21
Guerra Social -91 a -88 300000  Guerra Social (91 a. C.-88 a. C.): 300.000 muertos.21
Vísperas asiáticas  -88 a -88 90000  Vísperas asiáticas (88 a. C.): 80.000 a 100.000 ciudadanos romanos muertos.
Tercera Guerra Mitridática -74 a -65 400000  Tercera Guerra Mitridática (74 a. C.-65 a. C.): 300.000 pónticos y 100.000 armenios muertos.21
Rebelión de Boudica -60 a -61 150000  Rebelión de Boudica (60-61 dC.): 70.000 romanos y aliados y 80.000 britanos rebeldes muertos según Tácito.21
Guerra de las Galias -58 a -51 700000  Guerra de las Galias (58 a. C.-51 a. C.): 400.000 a 1.000.000 muertos y 1.000.000 de esclavizados.21
Persecución a los cristianos 30 a 313 100000  Persecución a los cristianos (30-313): 100.000 cristianos martirizados.21
Primera Guerra Judeo-Romana 66 a 73 850000  Primera Guerra Judeo-Romana (66-73 dC.): 600.000 muertos según Tácito y 1.100.000 muertos y 97.000 esclavizados según Flavio Josefo.21
Guerra de Kitos 115 a 117 440000  Guerra de Kitos (115-117): 240.000 muertos en Chipre y 200.000 en Cirene.21
Rebelión de Bar Kojba 132 a 135 580000  Rebelión de Bar Kojba (132-135) 580.000 muertos.21
Guerra de Marco Aurelio contra Partia 161 a 166 400000  Guerra de Marco Aurelio contra Partia (161-166): 400.000 persas muertos y 100.000 esclavizados.21
Rebelión de los Turbantes Amarrillos 184 a 205 5000000  Rebelión de los Turbantes Amarrillos: entre 184 y 205 costo la vida de 3 a 7 millones de chinos (parte de los Tres Reinos).
Invasiones bárbaras 200 a 400 7000000  Invasiones bárbaras (siglos III-V): producto de las invasiones, guerras civiles, hambrunas, pestes, ruina económica y baja en la tasa de natalidad el imperio pudo perder unos siete millones.21
Rebelión An Shi 756 a 763 35500000  Rebelión An Shi: entre 756 y 763. Enfrentó a la dinastía Tang y al rebelde An Lushan, príncipe Lan de Yan, que se desarrolló en toda China. Costo la vida de 33 a 36 millones de personas.24
Cruzadas 1096 a 1291 5000000  Cruzadas: entre 1096 y 1291 causaron la muerte de no menos de 5 millones de personas.33
Invasiones mongolas 1207 a 1472 55000000  Invasiones mongolas: entre 1207, año de la unificación mongola, a 1472, año del fin de las invasiones tártaras. Murieron entre 3025 y 60 millones26 de personas en Asia, Medio Oriente y Europa. Se calculan en 30 a 40 millones de chinos muertos, 2 millones de húngaros,27 2 a 4 millones de persas y musulmanes. En cuanto a la población rusa en 1300 eran de 7 a 7,5 millones se redujo a 500 mil tras la invasión tártara,25 cerca de 3 millones de ucranianos, rusos y polacos fueron esclavizados por los mongoles.28 29
Guerra de los Cien Años 1337 a 1453 56000 Guerra de los Cien Años
Campañas de Tamerlán 1369 a 1405 15000000  Campañas de Tamerlán: entre 1369 y 1405. Costo la vida de 10 a 20 millones34 de personas en Medio Oriente, India, Asia y Rusia.
Guerras de religión de Francia 1562 a 1598 3000000  Guerras de religión de Francia: entre 1562 y 1598, costo la vida de 2 a 440 millones de franceses.
Manchues conquistan China 1616 a 1662 25000000  Manchues conquistan China: entre 1616 y 1662, es el fin de la Dinastía Ming y el inicio de la Dinastía Qing. Costo la vida de 25 millones de chinos.30
Guerra de los Treinta Años 1618 a 1648 9500000  Guerra de los Treinta Años: entre 1618 y 1648, afecto principalmente a Alemania, murieron 3 a 11,538 millones.
Genocidio de indígenas en Nortamérica 1775 a 1890 390000  Genocidio de indígenas en Nortamérica (1775-1890): 370.000 muertos (20.000 colonos blancos).
Rebelión de Túpac Amaru II 1780 a 1784 150000  Rebelión de Túpac Amaru II: 100.000 a 200.000 (1780-1784).53
Guerras Napoleonicas 1789 a 1815 5000000 entre 1789 y 1815 costo la vida de 3,5 a 6,5 millones de europeos

(incluyendo 1,5 millones de franceses).

País o región Bajas

Imperio Francés 1.000.00017 -1.700.00018 (militares)

Aliados de Francia 6.500.018

Imperio Ruso 400.00017 -450.00018 (militares)

Estados alemanes 360.00018 -400.00017 (militares)

Prusia 13.000.018

Imperio austríaco 200.00017 -376.00018 (militares)

Imperio español 300.00017 18 (militares)

Imperio británico 200.00017 -310.00018 (militares)

Estados italianos 12.000.018

Miembros menores de las Coaliciones 19.200.018

Total militar 2.967.000-4.043.000

Cíviles europeos 1.000.000-3.000.00017

Haití 16.000.018

Total 4.127.000-7.203.000
Guerras del Opio 1800 a 1899 140000  Guerras del Opio: entre 1839 y 1842, y entre 1856 y 1860 causaron la muerte de 15 a 60 millones de chinos.33
Independencia de México 1810 a 1821 325000  Independencia de México (1810-1821): 250.000 -500.000 muertos.
Guerra de 1812  1812 a 1812 20000  Guerra de 1812: 20.000 muertos.
Guerra de la Independencia de Chile 1813 a 1826 30000  Guerra de la Independencia de Chile: 30.000 muertos (1813-1826).58
Campañas de Shaka 1816 a 1828 1500000  Campañas de Shaka: entre 1816 y 1828, costo la vida de 143 a 2 millones de personas.44
Guerra de Texas 1835 a 1836 2200  Guerra de Texas (1835-1836): 2.200 muertos.
Guerras del Opio 1839 a 1860 37500000  Guerras del Opio: entre 1839 y 1842, y entre 1856 y 1860 causaron la muerte de 15 a 60 millones de chinos.33
Intervención estadounidense en México 1846 a 1848 23000  Intervención estadounidense en México (1846-1848): 23.000 muertos.
Guerra del Pacífico 1847 a 1915 300000
Rebelión Taiping 1851 a 1864 25000000  Rebelión Taiping: entre 1851 y 1864, en sureste de China, entre la Dinastía Qing y los rebeldes Taiping. Costo la vida de 2031 a 3032 millones de personas.
Rebelión de Panthay 1856 a 1873 1000000  Rebelión de Panthay: entre 1856 a 1873, en China. Murieron 1 millón de personas.
Guerra de Reforma 1857 a 1861 8000  Guerra de Reforma (1857-1861): 8.000 muertos.
Guerra Federal 1859 a 1863 125000   Guerra Federal (1859-1863): 100.00048 -150.00047 muertos.
Guerra de Secesión  1861 a 1865 690000  Guerra de Secesión (1861-1865): 690.000 muertos (incluyendo la post-guerra).49
Rebelión de Panthay 1862 a 1867 38000  Rebelión de Panthay: entre 1856 a 1873, en China. Murieron 1 millón de personas.
Rebelión Dungan 1862 a 1877 10000000  Rebelión Dungan: entre 1862 y 1877, enfrentó a las tribus musulmanas del oeste chino, apoyados por Rusia, y los ejércitos Qing. Costo la vida de 8 a 12 millones de personas. Se calcula que la población de la provincia de Shaanxi paso de 13 a 7 millones.
Guerra de la Triple Alianza 1864 a 1870 440000  Guerra de la Triple Alianza (1864-1870): 440.000 muertos.
Guerra hispano-sudamericana 1864 a 1866 Enfrentamiento entre España y la alianza de cuatro repúblicas sudamericanas: Perú, Chile, Ecuador y Bolivia, conocido en España como «Guerra del Pacífico» o «Primera Guerra del Pacífico» y como «Guerra contra España» en Perú y Chile.
Guerra de los Diez Años 1868 a 1878 200000  Guerra de los Diez Años (1868-1878): 200.000 muertos.
Guerra del Guano y Salitre 1879 a 1883 14000  Guerra del Pacífico (1879-1883): 14.000 muertos.
Guerra Civil de 1891 1891 a 1891 7000  Guerra Civil de 1891: 4.000 a 10.000 muertos.
Guerra de Canudos 1893 a 1897 30000  Guerra de Canudos (1893-1897): 30.000 muertos48
Guerra de Independencia cubana 1895 a 1898 350000  Guerra de Independencia cubana (1895-1898): 300.000 muertos (50.000 españoles).
Segunda Guerra de los Bóers 1899 a 1902 87500  Segunda Guerra de los Bóers: 75.000 a 100.000 muertos (1899-02).
Revolución Mexicana 1910 a 1920 1000000  Revolución Mexicana: 1.000.000 de muertos (1910-1920).
Primera Guerra Mundial 1914 a 1918 20000000 Entre 1914 a 1918, costo la vida de 10 a 31 millones de personas, entre civiles y militares. Los rusos tuvieron además 4 a 6 millones de heridos, los ingleses 3 millones de heridos y mutilados, los franceses 5,6 millones, Alemania sufrió 6 millones de heridos, los italianos 1,6 millones y los serbios 1,7 millones. Las minorías también sufrieron fuertes perdidas, 1.128.000 polacos y 450.000 judíos europeos resultaron muertos durante la guerra.
Guerra civil rusa 1917 a 1922 10000000  Guerra civil rusa: entre 1917 y 1922, costo la vida de 5 a 20 millones de rusos.
Guerra civil china 1928 a 1936 2000000  Guerra civil china: en el periodo entre 1928 a 1936 murieron 2 millones de personas, y en el periodo de 1945 a 1949 mueren 1,2 millones de chinos (no se incluyen las muertes de la guerra sino-japonesa que se incluyen en la Segunda Guerra Mundial).
Guerra del Chaco 1932 a 1935 100000  Guerra del Chaco: 100.000 muertos (1932-1935).
Segunda Guerra Ítalo-Etíope 1935 a 1936 1600000  Segunda Guerra Ítalo-Etíope: 1,6 millones de muertos (1935-36).
Guerra civil española 1936 a 1939 500000  Guerra civil española: de 1936 a 1939. Mueren entre 500000 y un millón de personas.
Segunda guerra mundial 1939 a 1945 66000000 Segunda guerra mundial
Rebelión Malgache 1947 a 1948 90000  Rebelión Malgache: 80.000 a 100.000 muertos (1947-48).
La Violencia 1948 a 1953 300000  La Violencia: 300.000 colombianos muertos (1948-1953).51
Primera Guerra indo-pakistaní 1948 a 1949 1000000  Primera Guerra indo-pakistaní: de 1948 a 1949, la división y posterior guerra costo la vida de 450 mil a 1,5 millones de personas.
Guerra de Corea 1950 a 1953 3000000  Guerra de Corea: de 1950 a 1953, murieron de 2,5 a 3,539 millones de personas.
Rebelión Mau Mau 1952 a 1959 38000  Rebelión Mau Mau: 38.000 muertos (1952-59).
Guerra de independencia argelina 1954 a 1962 1200000  Guerra de independencia argelina: entre 1954 y 1962, costo la vida de 1,2 millones de personas.33
Primera Guerra Civil Sudanesa 1955 a 1972 500000  Primera Guerra Civil Sudanesa: 500.000 muertos (1955-72).
Guerra de Vietnam 1957 a 1975 4000000  Guerra de Vietnam: de 1957 a 1975, costo de 2 a 6 millones de vidas.33
Crisis del Congo 1960 a 1965 100000  Crisis del Congo: 100.000 muertos (1960-65).
Guerra civil de Guatemala 1960 a 1996 200000  Guerra civil de Guatemala: 200.000 muertos (1960-1996).52
Guerra de Independencia de Angola 1961 a 1974 52000  Guerra de Independencia de Angola: 52.000 muertos (1961-74).
Guerra de la Independencia Eritrea 1961 a 1991 730000  Guerra de la Independencia Eritrea: 730.000 muertos (1961-91).
Guerra civil de Angola 1964 a 2012 3250000  Guerra civil de Angola: 500.000 a 1.550.000 muertos (1974-02).
Guerra civil de Rhodesia 1964 a 1979 30000  Guerra civil de Rhodesia: 30.000 muertos (1964-79).
Guerra de Independencia de Mozambique 1964 a 1974 63500  Guerra de Independencia de Mozambique: 63.500 muertos (1964-74).
Guerra de Biafra 1967 a 1970 2500000  Guerra de Biafra: entre 1967 y 1970, costo la vida de 2 a 3 millones de personas.
Guerra indo-pakistaní de 1971 1971 a 1971 3000000  Guerra indo-pakistaní de 1971: costo la vida de más de 3 millones de personas.
Idi Amín en Uganda 1971 a 1979 300000  Idi Amín en Uganda: 300.000 a 600.000 muertos.
Guerra civil de Angola 1974 a 2002 1000000  Guerra civil de Angola: 500.000 a 1.550.000 muertos (1974-02).
Guerra Civil Etíope 1974 a 1991 1000000  Guerra Civil Etíope: un millón de muertos (muchos por la sequía) (1974-91).
Guerra civil de Angola 1975 a 2003 1000000  Guerra civil de Angola: de 1975 a 2003, costo la vida de 500 mil a 1,5 millón de personas.
Guerra del Sáhara Occidental 1975 a 1991 12500  Guerra del Sáhara Occidental: 10.000 a 15.000 muertos (1975-91)
Guerra civil de Mozambique 1977 a 1992 950000  Guerra civil de Mozambique: entre 1977 y 1992, costo 900.000 a 1.000.000 de vidas.
Guerra de Ogaden 1977 a 1978 13000  Guerra de Ogaden: 13.000 muertos (1977-78).
Guerra Uganda-Tanzania 1978 a 1979 5000  Guerra Uganda-Tanzania: 5.000 muertos.
Guerra civil afgana 1979 a 2012 2000000  Guerra civil afgana: desde 1979 al presente, ha costado la vida de 1,541 a 2 millones42 de afganos.
Guerra Civil de El Salvador 1980 a 1992 80000  Guerra Civil de El Salvador: 75.000 a 85.000 muertos (1980-92).
Guerras civiles de Liberia 1980 a 2012 65000  Guerras civiles de Liberia: 250.000 muertos (1989-03).
Segunda Guerra Civil Sudanesa 1983 a 2005 1950000  Segunda Guerra Civil Sudanesa: 1,9 a 2 millones de muertos (1983-2005).
Guerra civil de Angola 1987 a 1991 500000  Guerra civil de Angola: de 1975 a 2003, costo la vida de 500 mil a 1,5 millón de personas.
Guerra civil de Somalia 1987 a 2012 650000  Guerra civil de Somalia: de 1987 a la actualidad. Mueren de 300 mil a un millón de personas.
Guerra Civil Somalí 1988 a 2012 650000  Guerra Civil Somalí: 300.000 a 1.000.000 de muertos (1988-hoy).
Guerras civiles de Liberia 1989 a 2003 250000  Guerras civiles de Liberia: 250.000 muertos (1989-03).
Primera guerra del Congo 1991 a 2002 140000  Primera guerra del Congo: 200.000 muertos.
Primera guerra del Congo 1996 a 1997 200000  Primera guerra del Congo: 200.000 muertos.
Guerra entre Etiopía y Eritrea 1998 a 2000 150000  Guerra entre Etiopía y Eritrea: 53.000 a 300.000 muertos (1998-00).
Segunda Guerra del Congo 1998 a 2003 4600000  Segunda Guerra del Congo: entre 1998 y 2003, costo la vida de 3,836 a 5,437 millones de vidas.
Guerra civil en Costa de Marfil 2002 a 2007 400000  Guerra civil en Costa de Marfil: 400.000 muertos (2002-07).
Conflicto de Darfur 2003 a 2012 450000  Conflicto de Darfur: 450.000 muertos (2003-hoy).

Gráfica de funciones de EDU Universaldata

EDU Universaldata es el programa que genera todo el proyecto Universaldata.

Esta gráfica muestra las 1140 funciones y subrutinas del programa EDU y sus mutuas invocaciones.
Estan agrupadas en 84 modulos y totalizan unas 3600 curvas de llamadas a funciones.
El codigo SVG se genera automaticamente desde el mismo programa leyendo sus propios archivos fuente en tiempo real.
El archivo SVG generado (Download) contine en las etiquetas de los links la info que indica que funciones están relacionadas. Abajo las dos rutinas que la generan.

Una ves bajado puede usar un navegador y aumentar con el zoom (Ctrl+ruedita del mouse)



Function leer_archivos_bas_y_frm()
lis = lista_de_archivos(rr & "programa", "*.frm")
lis = lis & enter & lista_de_archivos(rr & "programa", "*.bas")
sep = chr(9)

'PRIMERA PASADA para determinar sub y functions
Call renglon(lis, ren, resto)
Do While ren <> "" Or resto <> "" 'recorre los archivos
        codigo = archivo_a_texto(rr & "programa\" & ren) 'obtiene su codigo
       
        clave = "Function"
        clave_ini = clave & " "
        clave_fin = "End " & clave
        rutina = extrae(codigo, clave_ini, clave_fin, p1, p2, prev, remanente)
        Do While rutina <> ""
        nombre = extrae(rutina, clave & " ", "(")
        If nombre <> "" Then nombre = Mid(nombre, Len(clave_ini) + 1, Len(nombre) - Len(clave_ini))
            lista = lista & IIf(lista <> "", enter, "") & " " & nombre
            planilla = planilla & enter & ren & chr(9) & clave & chr(9) & nombre & chr(9) '& """" & rutina & """"
            'planilla = planilla & enter & ren & ";" & clave & ";" & nombre '& ";" '& """" & rutina & """"
        rutina = extrae(remanente, clave_ini, clave_fin, p1, , , remanente2)
        list_rut = list_rut & enter & nombre & chr(9) & """" & rutina & """"
        remanente = remanente2
        Loop
       
        clave = "Sub"
        clave_ini = clave & " "
        clave_fin = "End " & clave
        rutina = extrae(codigo, clave_ini, clave_fin, p1, p2, prev, remanente)
        Do While rutina <> ""
        nombre = extrae(rutina, clave & " ", "(")
        If nombre <> "" Then nombre = Mid(nombre, Len(clave_ini) + 1, Len(nombre) - Len(clave_ini) - 1)
            If nombre <> "" Then
                lista = lista & IIf(lista <> "", enter, "") & "call " & nombre
                planilla = planilla & enter & ren & chr(9) & clave & chr(9) & nombre & chr(9)
                'planilla = planilla & enter & ren & ";" & clave & ";" & nombre
            End If
        rutina = extrae(remanente, clave_ini, clave_fin, p1, , , remanente2)
        list_rut = list_rut & enter & nombre & chr(9) & """" & rutina & """"
        remanente = remanente2
        Loop
       
    Call renglon(resto, ren, resto)
Loop
'Call texto_a_archivo(rr & "programa\programa.csv", planilla)
'Call texto_a_archivo(rr & "programa\subyfunc.csv", lista)
lista = texto_a_expreg(lista)
exp_lista = Replace(lista, enter, "|")

planilla = ""
'SEGUNDA PASADA ya sabiendo cuales sub y funciones existen
Call renglon(lis, ren, resto)
planilla = ""
Do While ren <> "" Or resto <> "" 'recorre los archivos
        codigo = archivo_a_texto(rr & "programa\" & ren) 'obtiene su codigo
       
        clave = "Function"
        clave_ini = clave & " "
        clave_fin = "End " & clave
        rutina = extrae(codigo, clave_ini, clave_fin, p1, p2, prev, remanente)
        Do While rutina <> ""
        pri = InStr(1, rutina, ")")
        rut2 = Mid(rutina, pri + 1, Len(rutina) - (pri + 1 + Len(clave_fin)))
        largo = Len(rut2)
        res = ""
        Call exp_reg(rutina, exp_lista, res)
        nombre = extrae(rutina, clave & " ", "(")
        If nombre <> "" Then nombre = Mid(nombre, Len(clave_ini) + 1, Len(nombre) - Len(clave_ini) - 1)
        res2 = Replace(res, enter & nombre & enter, "")
        'If res2 <> res Then Stop
        res = unicos(res2)
        res = Replace(res, nombre & "(" & chr(9), "")
        res = Replace(res, chr(9) & enter, chr(9))
        res = Replace(res, enter, chr(9))
        res = Replace(res, "(", "")
        res = Replace(res, " ", "")
        If InStr(1, nombre, enter) = 0 Then
            planilla = planilla & enter & ren & chr(9) & clave & chr(9) & nombre & chr(9) & largo & chr(9) & res
            'planilla = planilla & enter & ren & ";" & clave & ";" & nombre '& ";" '& """" & rutina & """"
        End If
        rutina = extrae(remanente, clave_ini, clave_fin, p1, , , remanente2)
       
        remanente = remanente2
        Loop
       
        clave = "Sub"
        clave_ini = clave & " "
        clave_fin = "End " & clave
        rutina = extrae(codigo, clave_ini, clave_fin, p1, p2, prev, remanente)
        Do While rutina <> ""
        pri = InStr(1, rutina, ")")
        rut2 = Mid(rutina, pri + 1, Len(rutina) - (pri + 1 + Len(clave_fin)))
        largo = Len(rut2)
        res = ""
        Call exp_reg(rutina, exp_lista, res)
        nombre = extrae(rutina, clave & " ", "(")
        If nombre <> "" Then nombre = Mid(nombre, Len(clave_ini) + 1, Len(nombre) - Len(clave_ini) - 1)
        res2 = Replace(res, "Call " & nombre & chr(9), "")
        'If res2 <> res Then Stop
        res = unicos(res2)
        res = Replace(res, chr(9) & enter, chr(9))
        res = Replace(res, enter, chr(9))
        res = Replace(res, "(", "")
        res = Replace(res, "Call ", "")
        If InStr(1, nombre, enter) = 0 Then
            planilla = planilla & enter & ren & chr(9) & clave & chr(9) & nombre & chr(9) & largo & chr(9) & res
            'planilla = planilla & enter & ren & ";" & clave & ";" & nombre
        End If
        rutina = extrae(remanente, clave_ini, clave_fin, p1, , , remanente2)
        remanente = remanente2
        Loop
    Call renglon(resto, ren, resto)
Loop
abc = planilla
'Call texto_a_archivo(rr & "programa\programa.csv", planilla)
Call texto_a_archivo(rr & "programa\list_rut.csv", list_rut)
End Function




Function graficar_planilla_vb()
planilla = archivo_a_texto(rr & "programa\programa.csv")
list_rut = archivo_a_texto(rr & "programa\list_rut.csv")

nr = cantidad_de_renglones(planilla)
cfa = nr * 10
Dim r(2000, 4) As String
ra = cfa / 6.28
Pi = 3.141592
ma = 360 / cfa
codigo2 = ""
codigo = ""
archant = ""

For i = 0 To nr - 1
    If i = 0 Then Call renglon(planilla, ren, resto) Else Call renglon(resto, ren, resto)
    If i = 0 Then Call renglon(list_rut, ren_rut, restolist_rut) Else Call renglon(restolist_rut, ren_rut, restolist_rut)
    If ren <> "" Then
    nom_rutina = campoi(ren, 2)
    arch = campoi(ren, 0):
    If arch <> archant Then
    n = n + 1
    If n = 15 Then n = 1
        nn = color_cvg(n)
    End If
    archant = arch
    angulo = Int(90 - i * ma * 10)
    alfa = i * ma * Pi / 18
    X = Int(ra * Sin(alfa))
    Y = Int(ra * Cos(alfa))
    r(i, 1) = nom_rutina
    r(i, 2) = str(X)
    r(i, 3) = str(Y)
    r(i, 4) = nn
    tipo = campoi(ren, 1):
    ruti = campoi(ren_rut, 1)
    ruti = Replace(ruti, "'", " ")
    ruti = Replace(ruti, enter, " ")
    ruti = Replace(ruti, """", " ")
    ruti = ""
    If InStr(1, ruti, "'") > 0 Then Stop
    codigo = codigo & enter & ""
    If angulo > -270 And angulo < -90 Then alin = "text-anchor='end'": corr = 180: dx = -20 Else alin = "": corr = 0: dx = 0
    Texto = "" & sacar_tildes(nom_rutina, True) & ""
    'Texto = link_svg(Texto, "#", sacar_tildes(nom_rutina & ":  " & ruti, True))
    codigo2 = codigo2 & enter & Texto
   
   
    End If
Next i

codigo3 = ""
codigo4 = ""
archant = ""

For i = 0 To nr - 1
    If i = 1 Then Call renglon(planilla, ren, resto) Else Call renglon(resto, ren, resto)
        If ren <> "" Then
            nom_rutina = campoi(ren, 2)
            arch = campoi(ren, 0)
            list_rut = list_rut & " | " & nom_rutina
            Call coord(r, nom_rutina, x1, y1)
                If arch <> archant Then
                    If archant <> "" Then
                        angulo = Int(90 - i * ma * 10)
                        If angulo > -270 And angulo < -90 Then alin = "text-anchor='end'": corr = 180: dx = -20 Else alin = "text-anchor='start'": corr = 0: dx = 0
                            textoarch = "" & sacar_tildes(arch, True) & ""
                            textoarch = link_svg(textoarch, "#", sacar_tildes(arch & list_rut, True)): list_rut = ""
                            codigo4 = codigo4 & enter & textoarch
                            xarch = Val(x1)
                            yarch = Val(y1)
                    Else
                        xarch = Val(x1)
                        yarch = Val(y1)
                    End If
                Else
                        xarch = Val((xarch + x1) / 2)
                        yarch = Val((yarch + y1) / 2)
                End If
            archant = arch

            If x1 <> "" Then
                For j = 5 To cant_camp(ren) - 1
                nom_rutina2 = campoi(ren, j)
                Call coord(r, nom_rutina2, x2, y2)
                If x2 <> "" Then
                    angulo = Int(90 - i * ma * 10)
                    dist = Sqr(Abs((x2 - x1) ^ 2 + (y2 - y1) ^ 2))
                    factor = 1 - (dist / ra * 2) / 4
                    x21 = Int(x1 * factor)
                    y21 = Int(y1 * factor)
                    x22 = Int(x2 * factor)
                    y22 = Int(y2 * factor)
                    curva = ""
                    curva = link_svg(curva, "#", sacar_tildes(nom_rutina & "-> " & nom_rutina2, True))
                    codigo3 = codigo3 & enter & curva
                    textoarch = link_svg(textoarch, "#", arch)
                    nl = nl + 1
                End If
                Next j
            End If
            'End If
        End If
Next i

codigo2 = codigo2 & enter & "
"
codigo = codigo & enter & codigo4 & enter & codigo2 & codigo3
v = Int(ra * 1.5)
graficar_planilla_vb = encabezado_svg(codigo, 1600, 1600, -v, 2 * v, -v, 2 * v)
Call texto_a_archivo(rr & "programa\grafica.svg", graficar_planilla_vb)
End Function

Exodo del Pueblo Israelita y su calendario y Resumen de Libros (Génesis, Exodo, Levítico, Números)






Testigos de Jehová


El siguiente gráfico muestra el lugar del cumplimiento de los últimos versículos del capitulo 11 del libro bíblico de Daniel (ver gráfica de todos los versículos). 
Note que ya se han cumplido todos desde el siglo XX y faltan cumplirse solo los versículos 44 y 45 (que corresponden al Armagedón).




En el siguiente gráfico se pueden ver los principales sucesos de la historia de los Testigos de Jehová: cuando se cumplen las profesías de Daniel que les aplican a ellos (versículos 32 al 35) y Daniel capítulo 12 (debajo del eje de los años). La curva dorada muestra la cantidad de los hermanos ungidos de cristo que reinaran desde el cielo. Su recolección tuvo un máximo en 1935 y luego se juntó, a "la gran muchedumbre" (curva gris) que vivirá en la Tierra después del Armagedón. Ver Revelación (Apocalipsis) capítulo 7. Esta curva muestra la misma escala que la de los ungidos hasta poco antes del 60 y luego se la comprime unas 100 veces. Aparecen dos curvas más: El numero de países donde se predica y el numero de bautismos anuales que gira en el entorno de los 300.000 (Los bautismos no están a escala con las otras pero si consigo misma respecto a su cero).


En la siguiente gráfica aparecen curvas adicionales: horas anuales (1700 millones en naranja), asistencia a la Conmemoracion de la muerte de Cristo (19 millones en rojo), estudios bíblicos (8,4 millones en gris claro) y predicadores de tiempo completo (800 mil en negro)




Gráfica detallada y con profecías de Daniel 11, 12 y Revelación y anuarios y libro: Los Testigos de Jehová, proclamadores del Reino de Dio"
(no incluye Daniel capítulo 2, ni Mateo 24, Marcos 13 o Lucas 21)


Apocalipsis (Revelación) se acerca su magnifica culminación

Las siguientes gráficas muestran en que momento se cumplen los textos bíblicos del libro de revelación o apocalipsis. Es un resumen para tener una visión global según aparecen las explicaciones en el libro "Apocalipsis, se acerca su magnífica culminación" editado por los "Testigos de Jehová". A partir del Capitulo 6 se encuentran las visiones de los acontecimientos que estamos viviendo actualmente.



Estructura del Libro "Apocalipsis, se acerca su magnífica culminación" editado por los "Testigos de Jehová"

Estructura del Libro de Revelación o Apocalipsis https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjZ72NJdJ9eoPQBB01syqu22-FIXQ6gOP4vzdYdrrQJPGwGBbVYtgHFa1729vpUcxOUcGqxEvWp0f6NFdGB4kw_HuN8Mne_MkcSTAV0N6Yozb0z8c1qBsgVWfpexVjPz3C4u7jKfw5v6fE/s640/Estructura+del+Libro+de+Revelaci%25C3%25B3n.jpg










Gráfica de los Periodos de tiempo abarcados por el libro biblico Revelación (Apocalipsis). Este último libro es Basicamente la descripción de un proceso judicial, el juicio de Jehová Dios desde el capítulo 6 en adelante: 
Mas abajo aparecen los capítulos más detallados 

 

Periodos del libro de Revelacion o Apocalipsis  https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgVRLa29NkvJST-x8EugEKc7f4aWQr40kqXWZyMlIEQSCqMSnu5zpDQCoNF-YszOlOlTGS5jJpnYRi1sWUAMknaNW3FW0oFR-hkQSDuWOWJZAwNhjSmsIKum5_eG1hLE2F2_r6uYuZO9ng/s640/Periodos.jpg


Apocalipsis o Revelación Capítulo 6
Para ver de donde sale la curva roja de la guerra asociada al caballo rojo ver la página Guerras





Apocalipsis o Revelación Capítulo 7





Apocalipsis o Revelación Capítulo 8 y 9






Apocalipsis o Revelación Capítulo 10 y 11 


Se seguirá completando... 

Historia gráfica de Inglaterra


 Gráfica lineal de la historia de  Inglaterra








43
Claudio inicia conquista de Britania
122
Muralla de Adriano
409
Se retira Roma
449
invaden anglosajones, britanos contratan mercenarios germánicos
664
Rey Oswy escoge tradición de Roma
560
616
Etelberto el Santo de Kent rey de Britania
s VII
Reyes de Northumbria
s. VIII
Reyes de Mercia
825
Egberto de Wessex derrota a Mercios Nace:775 Reina:802 Muere:839
871
Alfredo el Grande.
878
Victoria de Edington contra los Daneses. Nace:849 Reina: 871 Muere:899
899
924
Eduardo el Viejo
937
Athelstan. Termina de conquistar Danelaw.
978
1016
Etelberto II Nace:968 Reina:938 Muere: 1016
1014
derrotado por el danés Suen I Barba de Horquilla
Canuto I venció a Edmundo II: Inglaterra forma parte de Dinamarca y Noruega.
1042
1066
Eduardo el Confesor.
1066
Guillermo I de Normandía el Conquistador
Inglaterra se alejó de Escandinavia
1087
Guillermo II en Inglaterra y Roberto en Normandía
1106
Enrique I
1135
1154
Esteban I de Blois (rey) (Guerra Civil)
1154
Enrique II abarca mitad de Francia, Irlanda y Escocia.
1189
1199
Ricardo I Corazón de León (Cruzadas y luchas en Francia)
1204
Juan sin Tierra pierde Normandia.
1213
Capitula contra Inocencio III
1216
Enrique III
s. XII y XIII
Inglaterra prospera Universidad de Oxford y Cambridge.
1272
1307
Eduardo I (rey) estaba en Oriente en una Cruzada.
Consejo Feudal se convierte en Parlamento
Conquistó Gales
1314
Roberto I reafirmó la independencia de Escocia por 300 años.
1327
Eduardo II pierde contra Roberto I y abdica.
1337
1453
Eduardo III. Guerra de los 100 años contra Francia.
1349
1670
Peste Negra
1381
revueltas campesinas
139
Pierde conquistas de 1346.
1309
1376
Papas en Avignon (Francia)
1378
1417
Cisma de Occidente. Empieza crítica contra corrupción de la iglesia.
Ricardo II nieto de Eduardo III
1399
Enrique IV
1413
1422
Enrique V
1422
Enrique VI
1429
Juana de Arco impulsa resistencia francesa contra gob. Ingles. Muere en 1431
1455
1485
Guerra de Dos Rosas.
1509
1547
Enrique VIII
1547
1553
Eduardo VI
1553
1558
Maria I
1550
1603
Isabel I (Vence a la Armada Invencible de España)
1603
Completa la conquista de Irlanda.
1603
1625
Jacobo I (Inglaterra y Escocia)
1625
1649
Carlos I
1649
1658
Oliver Cromwell: Sometió a Irlanda y Escocia. Disolvió el parlamento. Guerras anglo-holandesas (52-54) Jamaica arrebatada a España en 1655.
1660
1685
Carlos II
Jacobo II
Guillermo III de Orange
1689
1697
Guerra de la Liga de Augsburgo
1701
1713
Guerra de Sucesión Española para frenar a Luis IX (Francia) con John Churchill