<html>
<head>
<TITLE>:: E S O T É R I C A ::</TITLE>

   <meta name="Author" content="BMGV: Ana Flávia Miziara">
   <meta name="TITLE" value="ESOTÉRICA DA BMGV" />
   <meta name="LANGUAGE" value="pt-BR" />
   <meta name="Webmaster" value="Abelardo Filho, Artur Corteli Junior, Aurilene dos Santos, Flavia Tonalezi, Mauricio Melo, Ana Flávia Miziara" />
   <meta name="alias" content="http://www.bmgv.com.br" />
   <meta name="ABSTRACT" value="Os best-sellers em CD-ROM ESOTÉRICA, ENIGMA, MÉTODOS DIVINATÓRIOS, MEDITANDO COM OS ANJOS, PORTAL DOS ANJOS inteiros na Internet no site da Revista Esotérica da BMGV. O Maior conteúdo esotérico e de esoterismo na Internet. Esoterismo, Misticismo, Magia, Métodos Divinatórios, Adivinhação, Runas, Tarot, Cleromancia, Dominomancia, Cartomancia, Místicos, Profetas, Profecias, Espiritismo, Casa Solar, Cromoterapia, Búzios, Biorritimo, Ciclo Milenar, Ciclo Semanal, Oráculos, Reencarnação, Signos do Zodíaco, Signos Astecas, Signos Egípcios, Runas, Numerologia, Vampirismo, Cafeomancia, Teimancia, Acupuntura, Mudras, I Ching e muito mais." />
   <meta name="KEYWORDS" value="Os best-sellers em CD-ROM ESOTÉRICA, ENIGMA, MÉTODOS DIVINATÓRIOS, MEDITANDO COM OS ANJOS, PORTAL DOS ANJOS inteiros na Internet no site da Revista Esotérica da BMGV. O Maior conteúdo esotérico e de esoterismo na Internet. Esoterismo, Misticismo, Magia, Métodos Divinatórios, Adivinhação, Runas, Tarot, Cleromancia, Dominomancia, Cartomancia, Místicos, Profetas, Profecias, Espiritismo, Casa Solar, Cromoterapia, Búzios, Biorritimo, Ciclo Milenar, Ciclo Semanal, Oráculos, Reencarnação, Signos do Zodíaco, Signos Astecas, Signos Egípcios, Runas, Numerologia, Vampirismo, Cafeomancia, Teimancia, Acupuntura, Mudras, I Ching e muito mais." />
   <meta name="FORMAT" value="text/xhtml" />
   <meta name="COPYRIGHT" value="Copyright (c) 1995 by BMGV" />
   <meta name="OWNER" type="email" value="esoterica@revistaesoterica.com.br" />
   <link rel="stylesheet" href="mapa.css">
   <script language="JavaScript" src="mapa.js"></script>
</head>


<body bgcolor="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" text="#999999" link="#666666" vlink="#666666" alink="#666666" background="../imagens/fundo.jpg" bgproperties="fixed">


<a href="../esoterica.htm" onMouseOver="self.status='Voltar - Página Principal'; return true" onMouseOut="self.status=''; return true"><img src="../imagens/logo_esoterica.gif" width="150" height="48" vspace="10" hspace="43" border="0" alt="Esot&eacute;rica - VOLTAR para a p&aacute;gina principal" style="width:150;height:48;filter:alpha(opacity=100)" /onmouseover="this.filters.alpha.opacity=50" /onmouseout="this.filters.alpha.opacity=100"></a></div>

<CENTER><font face="arial" size="2"><div style="margin-left:180px;"> 

<a href="medalhao.htm"><img src="imagens/imagem_medalhao.jpg" width="200" height="200" border="0"></a><br>
<br>

Digite o nome completo [ sem acento e sem ç ]<br>
<br>
<INPUT name=TxtNome size=60 tabIndex=1 style="background-color:#CCCCCC;"><br>
<br>
Digite o dia de seu nascimento [ nesse formato dd/mm/aaaa ]<br>
<br>
<INPUT name=TxtData size=30 tabIndex=2 style="background-color:#D8D8D8;"><br>
<br>
<br>
<br>
<INPUT name=cmdcost class=botao tabIndex=5 type=button value=Processa B <><br>
<br>
<br>
<br>
<br>
<a href="index.htm"><img src="imagens/imagem_titulo.jpg" width="281" height="74" border="0" alt="Voltar para a página inicial de Musherrah"></a><br>
<br>

<br>
<br>
</div>

<!-- CRÉDITOS FINAIS -->
<div align="center">

  <p><font style="font-family: Arial; font-size: 8pt;"><i>Copyright &reg; 1995 
    / 2003 BMGV Music Software Net Editora</i><br>
    O conte&uacute;do desse site bem como os produtos da BMGV est&atilde;o protegidos 
    pela Lei 9.610 de 19.02.1998,<br>
    todos os direitos est&atilde;o reservados sob pena da Lei.<font color="#FF8040"> 
    N&atilde;o copie, n&atilde;o adapte, n&atilde;o insira sem autoriza&ccedil;&atilde;o 
    pr&eacute;via.<br><br></p>

<a href="mailto:esoterica@revistaesoterica.com.br" onMouseOver="self.status='Mande seu E-Mail'; return true" onMouseOut="self.status=''; return true">Entre em Contato</a> &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
<a href="http://www.revistaesoterica.com.br/quemsomos.htm" onMouseOver="self.status='Conheça nossa Equipe'; return true" onMouseOut="self.status=''; return true">Quem Somos</a> &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
<a href="http://www.revistaesoterica.com.br/produtos.htm" onMouseOver="self.status='Conheça os CDs-ROM, Livros e CDs'; return true" onMouseOut="self.status=''; return true">Conheça os nossos Produtos</a> &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
<a href="http://www.revistaesoterica.com.br/cadastro.asp" onMouseOver="self.status='Cadastre-se para receber boletins'; return true" onMouseOut="self.status=''; return true">Cadastre-se</a> &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 
<a href="http://www.revistaesoterica.com.br/recomendo.asp" onMouseOver="self.status='Indique a Revista Esotérica'; return true" onMouseOut="self.status=''; return true">Indique esse Site</a></div></font></font><br>
<br>
<br>


<SCRIPT language=VBScript>                 
<!-- Option Explicit                 
Sub cmdcost_OnClick() 	                 
	Dim Nome	               
	Dim Data               
	Dim Ambicao               
	Dim Personal               
	Dim Expres               
	Dim Desti               
	Dim num(10)               
	Dim f               
	Dim letra               
	dim let1                
	dim let2               
	Dim Nascim		               
	               
	Dim Signo(13)            
	Signo(1) = "Capricórnio"            
	Signo(2) = "Aquário"            
	Signo(3) = "Peixes"            
	Signo(4) = "Áries"            
	Signo(5) = "Touro"            
	Signo(6) = "Gemeos"            
	Signo(7) = "Câncer"            
	Signo(8) = "Leão"            
	Signo(9) = "Virgem"            
	Signo(10) = "Libra"            
	Signo(11) = "Escorpião"            
	Signo(12) = "Sagitário"            
 
	Dim imagem1(13)            
	imagem1(1) = "signos/capricornio.jpg"            
	imagem1(2) = "signos/aquario.jpg"            
	imagem1(3) = "signos/peixes.jpg"            
	imagem1(4) = "signos/aries.jpg"            
	imagem1(5) = "signos/touro.jpg"            
	imagem1(6) = "signos/gemeos.jpg"            
	imagem1(7) = "signos/cancer.jpg"            
	imagem1(8) = "signos/leao.jpg"            
	imagem1(9) = "signos/virgem.jpg"            
	imagem1(10) = "signos/libra.jpg"            
	imagem1(11) = "signos/escorpiao.jpg"            
	imagem1(12) = "signos/sagitario.jpg"            
 
	Dim imagem2(13)            
	imagem2(1) = "saturno.jpg"            
	imagem2(2) = "urano.jpg"            
	imagem2(3) = "netuno.jpg"            
	imagem2(4) = "marte.jpg"            
	imagem2(5) = "venus.jpg"            
	imagem2(6) = "mercurio.jpg"            
	imagem2(7) = "lua.jpg"            
	imagem2(8) = "sol.jpg"            
	imagem2(9) = "mercurio.jpg"            
	imagem2(10) = "venus.jpg"            
	imagem2(11) = "plutao.jpg"            
	imagem2(12) = "jupiter.jpg"            
 
	Dim planeta(13)            
	planeta(1) = "Saturno"            
	planeta(2) = "Urano"            
	planeta(3) = "Netuno"            
	planeta(4) = "Marte"            
	planeta(5) = "Vênus"            
	planeta(6) = "Mercurio"            
	planeta(7) = "Lua"            
	planeta(8) = "Sol"            
	planeta(9) = "Mercurio"            
	planeta(10) = "Venus"            
	planeta(11) = "Plutao"            
	planeta(12) = "Júpiter"            
 
            
	Dim Sig            
      	               
	Dim PeloNas(32)     
	PeloNas(1) = "Você tem o poder de realização. Aprenda a andar com as próprias pernas dentro de seus propósitos. Esse seu dia de nascimento estabelece que a construção de sua vida caminha de acordo com a sua personalidade. Procure ser mais sensível e delegar menos responsabilidades àqueles que não possuem condições favoráveis."

PeloNas(2) = "Você sabe como atingir as pessoas, portanto, desenvolva uma responsabilidade emocional no tratamento com o outro, preocupando-se com suas opiniões e sentimentos. Esse seu dia de nascimento estabelece um partidarismo, como a um juiz que interfere em tudo. Procure não despertar a competição entre os demais, tornando suas oportunidades desfavoráveis ao subestimar a capacidade dos demais."

PeloNas(3) = "Você tem o dom de fazer verdadeiros amigos. Procure valorizá-los o quanto merecem. Esse seu dia de nascimento faz com que você tenha uma vitalidade além do normal, com a facilidade de criar oportunidades em tudo o que se empenhar. Procure desenvolver um lado mais crítico, a fim de se aprimorar em seu trabalho."

PeloNas(4) = "Você sabe como exigir da vida o que lhe é de direito. Procure não exigir tanto de si mesmo. Esse seu dia de nascimento, faz com que os seus sentimentos sejam um pouco mais resguardados que os dos demais à sua volta, provocando modificações constantes em sua vida tornando-o sujeito a mal-entendidos."

PeloNas(5) = "Você tem a necessidade de ser livre e viver todas as experiências que a vida pode oferecer. Procure desenvolver a igualdade entre as pessoas. Esse seu dia de nascimento desenvolve um fator magnético em todos que o rodeiam. As pessoas procuram seguir a sua intuição em tudo o que pretendem realizar."

PeloNas(6) = "Você tem ideais de grandeza comunitária. Não permita que as pessoas interfiram em seus propósitos afastando-o do altruísmo. Esse seu dia de nascimento determina uma sensibilidade acentuada, que não interfere em suas responsabilidades e nem em sua capacidade de raciocínio prático, graças ao seu discernimento."

PeloNas(7) = "Você tem um senso apurado de julgamento, sensitividade e sensibilidade. Procure utilizar-se da intuição e da solidão como instrumentos de aprendizado interior. Esse seu dia de nascimento define um individualismo que está intimamente ligado ao seu interesse pelo desconhecido e às suas concepções profundas sobre o ocultismo, levando-o a julgar a vida cotidiana banal e mal direcionada. Procure encontrar o meio termo."

PeloNas(8) = "Você tem visão dos fatos e acontecimentos. Procure aproveitar essa sensibilidade e raciocínio para atingir os seus objetivos. Esse seu dia de nascimento o fortalece para os obstáculos impostos pela vida, tornando-o um batalhador inesgotável que quase sempre consegue o que quer."

PeloNas(9) = "Você é um detalhista nato, que quase sempre segura os seus planos devido ao excesso de responsabilidade e receios. Esse seu dia de nascimento estabelece uma vida mutável, repleta de acontecimentos novos e propostas diferenciadas, fazendo-o sair da rotina."

PeloNas(10) = "Você tem o dom de  desenvolver projetos em geral. procure desenvolver os seus de acordo com a sua visão interior. Esse seu dia de nascimento o inclina para vários tipos de ocupações, fazendo com que a sua vida se torne um ciclo interminável de acontecimentos pessoais e profissionais."

PeloNas(11) = "Você sabe ver longe e muito antes dos outros. Procure desenvolver esse lado em prol dos demais. Esse sei dia de nascimento o inspira para tudo o que se propuser a fazer, dando-lhe a certeza de que poderá chegar aonde quiser. A intuição é primordial para o alcance de seu sucesso."

PeloNas(12) = "Você é capas de conseguir promoções e destaque onde quer que vá. Desenvolva um poder de comunicação à altura. Esse seu dia de nascimento lhe impõe um nervosismo natural. Contudo, se a impaciência não dispersar a sua energia vital, poderá ter muitas possibilidades reais na vida por seus próprios esforços."

PeloNas(13) = "Você tem um jeito especial de ser e muitas vezes incompreendido. Procure superar a sua timidez e fazer valer suas intenções e sensibilidade. Esse seu dia de nascimento desperta a sua atenção e a dos demais para a conscientização dos problemas da terra, dando-lhe um destaque favorável no meio em que vive."

PeloNas(14) = "Você tem a necessidade de estar sempre ativo, em constantes mudanças e adquirindo experiências que renove, sua vida. Procure desenvolver a criatividade artística. Esse seu dia de nascimento determina a dualidade que, por um lado, pode ajudá-lo a subir na vida, por outro, não. O seu temperamento impulsivo influencia todo o seu cotidiano, geralmente estável."

PeloNas(15) = "Você aparentemente é um pouco rígido e severo. No entanto, tem um grande coração e sabe ser generoso quando quer. Esse seu dia de nascimento determina um teor de observação acentuado, que você poderá se utilizar para se sobressair no meio em que vive e trabalha."

PeloNas(16) = "Você é introspectivo e com tendências à depressão. Mas saiba que o seu potencial  o fará destacar-se dos demais. Procure adaptar-se às circunstâncias da vida e tirar proveito delas. Esse seu dia de nascimento influencia o seu instável estado de humor, pois, quase sempre, você se encontra entre o raciocínio e a emoção. transforme esse gangorra diária em um aspecto que o beneficie."

PeloNas(17) = "Você é um idealizador repleto de imaginação. Procure desenvolver atividades que sejam compatíveis com seu raciocínio técnico. Esse seu dia de nascimento é excelente para as minúcias e os detalhes. Geralmente são pessoas que têm uma capacidade espiritual destacada e que não a aproveitam."

PeloNas(18) = "Você que é um apaixonado pela vida e por tudo que a cerca, tirando proveito daqueles projetos dos quais possa se beneficiar. Esse seu dia de nascimento destaca a sua independência e autocrítica. Poderá ser visto pelos demais com muita admiração, desenvolvendo neles uma dependência extrema."

PeloNas(19) = "Você está à margem de todos, colocando-se sempre em um lugar neutro, sem envolvimentos, preservando a sua vida interior e concepções. Esse seu dia de nascimento expressa uma originalidade nada convencional. Atualize os seus conhecimentos e tire proveito desta qualidade."

PeloNas(20) = "Você é estável e cooperativo. Procure encontrar pessoas que possam ser um ponto de equilíbrio e que possam propiciar uma troca favorável. Esse seu dia de nascimento expressa uma passividade positiva, determinando uma tranqüilidade em seu empenho diário ou entre os amigos."

PeloNas(21) = "Você é um sonhador prático e realizador. Tudo a sua volta é cheio de magia e bem estar. Procure realizar o maior número de obras positivas pela vida. Esse seu dia de nascimento expressa um poder de concentração acentuado e uma emotividade e a compaixão que o envolve."

PeloNas(22) = "Você é um impressionista: se acredita ou se impressiona por uma coisa é capaz de levar a vida toda tentando fazer com que se torne realidade. Esse seu dia de nascimento determina uma natureza consciente e construtiva, mas tendendo a perder-se e, próprios raciocínios e sentimentos."


PeloNas(23) = "Você prefere assumir grandes responsabilidades ao mesmo tempo. Procure utilizar-se de sua eficiência para proveito próprio. Esse seu dia de nascimento expressa uma responsabilidade inclusive, desenvolver poderes de cura ou definir-se por uma especialização deste ramo."

PeloNas(24) = "Você analisa demais antes de qualquer realização. O fator de compensação da sua vida é o seu lado emocional, que sempre lhe traz equilíbrio e satisfação. Esse seu dia de nascimento determina uma personalidade caseira. Preocupa-se com tudo o que envolve a família e os grandes amigos, perdendo um pouco o eixo das metas de sua própria vida. "

PeloNas(25) = "Você dispersa energias vitais que poderiam fazê-lo alcançar muito mais rapidamente os seus objetivos. Procure lutar contra a sua autocrítica. Esse seu dia de nascimento expressa um a personalidade com dons místicos e com interesse profundo em aprender. Contudo, não permita que o egocentrismo e o autoconceito tomem a frente de suas atitudes. "

PeloNas(26) = "Você sabe organizar o seu dia-a-dia e toda a estrutura familiar. Procure expandir o seu lado profissional para que sua energia não fique tão canalizada. Esse seu dia de nascimento determina um otimismo influenciando todos à sua volta. A sua noção de responsabilidade e escrúpulo o destaca."

PeloNas(27) = "Você tem o poder de convencer todos ao seu redor. Adapte os seus sonhos a esse dom e, com certeza, encontrará êxito. Esse seu dia de nascimento expressa um envolvimento natural com tudo o que o rodeia, tornando a sua vida atribulada e confusa por problemas alheios e pelos seus mal resolvidos."

PeloNas(28) = "Você é muito tradicional e conservador, fazendo com que sua vida permaneça igual por muito tempo. Procure conhecer novas idéias, tendências, que só o farão evoluir. Não seja tão dominador. Esse seu dia de nascimento determina um sucesso atingido por esforços incessantes. Com tanta perseverança, assuma projetos de longa duração e com probabilidade de expansão. "


PeloNas(29) = "Você tem tudo para ser um guia espiritual ou profissional no meio em que vive. Saiba valorizar-se, desenvolvendo este potencial inato. Esse seu dia de nascimento expressa uma união dos valores morais e materiais, definindo-o como uma pessoa que inspira confiança e credibilidade. Geralmente atingem o sucesso facilmente. "

PeloNas(30) = "Você é dotado de sorte em quase tudo o que faz. Parece sempre ter uma proteção especial que o livra de problemas e o ajuda em suas metas. Esse seu dia de nascimento preserva o seu lado emocional e a sua privacidade. Seguindo a sua intuição livre de obstinações, a probabilidade de encontrar uma realização pessoal é muito grande."

PeloNas(31) = "Você não valoriza a rotina da vida como um meio de ensinamentos para a sua própria evolução. Procure unir o seu potencial criativo ao seu potencial de organização para encontrar um equilíbrio e uma proposta de vida que o satisfaça. Esse seu dia de nascimento, denota uma personalidade altruística, com a qualidade de saber discernir o bem do mal. Desenvolvendo a autoconfiança saberá, inclusive, encontrar meios que o façam destacar-se dos demais."

         
	Dim Pers(23)         

Pers(01)="Expressa uma personalidade correta, porém com ares de arrogância e autoritarismo. A imponência e a criatividade são percebidas por todos, por um lado despertam conflitos, por outro, admirações. A sua personalidade contém todos os elementos criativos que lhe permite equilibrar-se entre o seu orgulho e humildade, a segurança interior que o faz aprender através de suas experiências de vida; a sensibilidade que o torna flexível às mudanças acompanhando a evolução dos tempos, e a autenticidade, que lhe permite encontrar várias soluções para um mesmo problema. O fato de você adaptar-se facilmente às situações, determina uma personalidade equilibrada."

Pers(02)="Expressa uma personalidade pacífica e silenciosa, que aparenta humildade e dedicação. A cooperação e a diplomacia são percebidas por todos, que muitas vezes as interpretam como convenientes e oportunistas. Um fator essencial de sua personalidade é a flexibilidade de seu raciocínio e emoção, que lhe permite descobrir o eixo de ligação de onde origina-se a sua humildade e até onde termina a sua autoconfiança. Po isso a base de seu caráter está edificada sobre a verdade e o desejo de conhecer-se a si mesmo, que quase sempre o faz um otimista. Na essência, você não identifica-se com seu Eu-Idealizado assumindo ser uma pessoa que não é."

Pers(03)="Expressa uma personalidade atraente e carismática, tornando o ambiente em que vive favorável às suas intenções. O dinamismo é admirado por todos que compartilham de seus esforços. A sua personalidade tem um caráter extrovertido, de comunicar-se com todos traduzindo a sua linguagem interior, que é verdadeira e original, nunca reduzindo todos os fatos à simples conceitos. Caminha de acordo com a sua auto-estima rumo à auto-realização, compreendendo o seu potencial e limites, dentro de um contínuo autodesenvolvimento, que o leva quase sempre a um maior poder de criatividade."

Pers(04)="Expressa uma personalidade conservadora, de confiança e de qualidades seguras e criativas. A sua personalidade apresente um sentido de ordem com uma certeza de auto-realização, liberto de submissão generalizada que envolve a sociedade. Desvincula-se, embora conservador, de seu autoconceito que faz com que os homens a partir de sua auto-imagem orgulhosa e resignada, afastem-se de seu desenvolvimento gradual."

Pers(05)="Expressa uma personalidade versátil, capaz de agradar a todos, atraindo-os para seu benefício. O seu lado extremista é salientado, principalmente quando atinge o outro diretamente com suas exigências. A sua personalidade reflete um espírito aventureiro. Se por um lado o favorece devido ao fato das pessoas estarem sempre juntas e gerar uma sensação de estar protegido e de passividade, por outro, o fim dessa ilusão de auto-proteção, faz com que a sua personalidade procure sempre novos estímulos, impulsionando-o para frente e com isso alcançar objetivos reais."

Pers(06)="Expressa uma personalidade bondosa, destacando-se em qualquer ambiente com estilo e elegância. O seu estilo inconfundível é percebido pelos demais que tentam imitá-lo a todo momento. Se um lado a sua personalidade é impessoal, amando o belo, o justo sem deixar de lado os verdadeiros sentimentos pessoais, fazendo com que seu auto-estímulo expanda a sua vida, por outro, ela pode apresentar-se de forma passional, tranqüila, falseando uma hiperemotividade que não se permite possuir pelas paixões. Os hábitos e o cotidiano são grandes agentes da frieza da sua sensibilidade, que para seu tipo de personalidade excêntrica, só o conduz ao tédio."

Pers(07)="Expressa uma personalidade correta e mística, fazendo tudo à sua volta girar em torno de mistérios e magia. A sua personalidade tem um caráter introvertido, com traços característicos que vão desde a originalidade das idéias, tolerante às situações, passando pelo convencionalismo de comportamento, atingindo a humildade e estabilidade sem apegar-se às normas e obrigações. Um indivíduo crítico, que dificilmente permite que as críticas abalem a sua auto-estima. Na essência, você não utiliza-se do mecanismo de racionalização em defesa do seu EU."

Pers(08)="Expressa uma personalidade que parece ter influência no convívio social. Elegante e eloqüente, expressa-se de modo refinado nas conversas e reuniões. Uma personalidade segura é o que aparenta, e na essência pode não estar apresentando nenhum tipo de medo ou anseio, que instintivamente seria para conservar o seu poder de atração. O poder de persuasão é o que mais o destaca entre os demais. Na essência, o seu realismo e objetividade são absolutas, que vê o concreto através de suas experiências pessoais."

Pers(09)="Expressa uma personalidade amistosa e companheira, com um grau acentuado de carisma e ascendência sobre os demais. O romantismo e a vitalidade o destacam. A sua personalidade está diretamente ligada à sua maturidade emocional e por isso lhe permite ser altruísta. Muitos fatores se destacam, entre eles, o seu senso de proporção, a autoconfiança, e a aceitação de si mesmo, compreendendo as suas limitações e o valor das críticas construtivas."


Pers(11)="Expressa uma personalidade idealista e sonhadora, que envolve a todos com seus projetos inspirados. O excesso de individualismo, por vezes é destacado negativamente em sua personalidade. A sua personalidade, por vezes, apresenta uma discrepância do nível de inspiração de seus objetivos. Se o objetivo for além de suas perspectivas ou do que a sua capacidade permite, pode provocar frustrações e ansiedade. Se o nível de expectativa, que é o que você julga ser capaz de conseguir for mais realístico, automaticamente irá corrigir o nível de aspiração que o fará encontrar o equilíbrio para a sua personalidade, valorizando as suas qualidades."


Pers(22)="Expressa uma personalidade paciente e conhecedora de todos os assuntos necessários para a elevação do homem e de sua construção material. Uma personalidade quase autodidata. O seu grau de generosidade é o que mais o destaca dos demais. A sua personalidade é anticonvensionalista com a liberdade interior para abster-se de preconceitos, recusando-se a julgar pela aparência dos fatos e das pessoas. Analítico, examina cada situação avaliando as suas implicações, detalhes e mantendo a flexibilidade do senso de humor."  
       
         
	Dim amb(23)  
       
Amb(01) = "Expressa uma individualidade independente, criativa e dotada de um espírito de pioneirismo. Almeja negócios ambiciosos e de grande porte, às vezes não estabelece o planejamento necessário para a sua concretização com estabilidade. É um individualista que se expressa pela liderança, pela capacidade de dirigir e organizar tudo à sua volta com força e determinação. O seu defeito está em expressar-se com severidade demasiada, faltando-lhe tato e sensibilidade com os demais."

Amb(02) = "Expressa uma individualidade harmônica, bela, sensível e compreensiva. É dotado de uma diplomacia natural, não se importando de ser sempre conduzido, preferindo realizar as obras no Todo a não realizá-las. São pessoas fáceis de conviver e de atrair amigos, propiciando um progresso rápido voltado mais para as suas obras do que para si mesmo. O seu defeito está em direcionar toda a sua vida baseada em suas emoções, que, muitas vezes, propicia maus entendidos."

Amb(03) = "Expressa uma individualidade extrovertida, de poder da palavra e expressão ambiciosa. São pessoas com tendência a realizarem mais de uma coisa ao mesmo tempo, dispersando assim, energias potenciais que poderiam ser mais utilizadas para outros níveis. Contudo, geralmente concretizam brilhantemente as suas idéias. O seu defeito encontra-se na sua falta de paciência com aqueles que não sabem o que querem ou que demoram demais para tomar uma iniciativa."

Amb(04) = "Expressa uma individualidade prática e muito organizada interiormente. Sabe o que quer e como consegui-lo passo-a-passo. São pessoas disciplinadas e detalhistas, que exigem demais dos outros, fazendo com que alguns dêem mais do que podem. Se por um lado gera conflitos, por outro, faz com que os potenciais sejam, desenvolvidos e valorizados sem distinção. O seu defeito está em ser conservador demais, rejeitando de imediato o que é novo e que por muitas vezes poderia auxiliá-lo."

Amb(05) = "Expressa um individualidade versátil e complexa, porque desenvolve várias coisas ao mesmo tempo, segundo seu ponto de vista sem explicar aos demais. São pessoas que progridem rapidamente e revolucionam o meio em que vivem com suas idéias de vanguarda impondo a todos mudanças constantes. O seu defeito está em não valorizar a rotina como forma de aprendizagem e acabar não dando valor ao que já tem."

Amb(06) = "Expressa uma individualidade sensível, perceptível às necessidades dos demais. São pessoas responsáveis e conselheiras, que fazem do ambiente à sua volta o ponto de partida para todas as realizações profissionais. Um parâmetro que estabelecem para tudo estar de acordo com sua harmonia interior. São ambiciosos, mas não prejudicam ninguém. O seu defeito está em interferir sem limites, teimosamente, na vida dos demais, que muitas vezes, mesmo agindo com boas intenções, podem vir a prejudicá-lo."

Amb(07) = "Expressa uma individualidade introspectiva, sensitiva e ambiciona a perfeição. São pessoas intuitivas que sabem colocar as palavras certas na hora exata, gerando um ambiente espiritualmente tranqüilo e de sabedoria. São calmos e perfeccionistas, amantes da teoria e da meditação. O seu defeito está em não sabem analisar e fazer da solidão uma aliada para o crescimento interior e emocional."

Amb(08) = "Expressa uma individualidade organizada e de liderança. São pessoas que sabem utilizar-se do tato e da intuição para gerar probabilidades maiores de sucesso. Ambiciosos, trabalham em tudo o que tiverem chance de destaques sem receio de abrir campos desconhecidos e ainda inexplorados. O seu defeito está em não saber cooperar com todos à sua volta, usando uma força intelectual opressiva para retirar os empecilhos de sua frente."

Amb(09) = "Expressa uma individualidade humanitária que gera possibilidades a todos sem distinção. São pessoas carinhosas e generosas e não se preocupam em medir esforços para ajudar os demais. Sentem-se atraídos pelo belo, pelo novo, por conhecimentos que cooperam com sua evolução interior. O seu defeito está em não se valorizar o quanto deve. Aprenda a gostar mais de você."

Amb(11) = "Expressa uma individualidade com uma capacidade psíquica avançada. São pessoas que têm o dom  de captar o inconsciente coletivo e tirar dele proveitos para si e para o meio em que vivem. Tornam-se líderes facilmente, com uma habilidade, coragem e generosidade que as fazem alcançar o sucesso constantemente. O seu defeito está em não compartilhar e querer dividir os seus conhecimentos com os demais."

Amb(22) = "Expressa uma individualidade construtiva e ativa no sentido material. Gera oportunidades munida de seu conhecimento intelectual. São pessoas que têm a sua base concretizada em opiniões definidas e estabelecidas por um planejamento que atinge todos. O seu defeito está em não ser tão prático quanto lógico, o que acaba resultando em pouca iniciativa na vida."      
         
Dim Exp(23)     
    
Exp(01) ="A sua Missão na Vida é exercer iniciativa de líder com uma  ação munida de pioneirismo e vanguarda, procurando sempre desenvolver o seu lado emocional. Não se deixe transformar em uma pessoas convencida e orgulhosa e preste atenção especial no seu egoísmo. O sol indica uma renovação e, portanto, propicia novos empreendimentos e projetos com grande possibilidades de obter sucesso. No campo emocional indica cautela e sigilo quanto às questões pessoais. A sua atuação na vida estará de acordo com a sua missão, se atuar no campo das pesquisas, publicidade e área artística. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a publicidade."

Exp(02) ="A sua Missão na Vida é a de harmonizar o meio em que vive, equilibrando as vibrações entre todos. Para isso, a sua imaginação acentuada lhe será uma aliada importante. O seu lado espiritual é, por vezes, influenciável, indo do ateísmo à crendice total. Contudo, neste campo o seu grau de discernimento atua de forma brilhante. É romântico e emotivo, porém, faz com que sua dependência atue negativamente, tornando-o comodista e insatisfeito. A Lua indica a necessidades de cuidados para não ser passivo e melancólico ao extremo e não tender para o cansaço desnecessário que o torna prolixo e o faz perder oportunidades. Assim como a sua compreensão, a sua inspiração vem e vai. Procure saber avaliar bem a situação, a fim de que a concepção dos seus valores e contemplação de vida exerçam um aspecto favorável e grandioso, avaliando o que é ilusório e o que é real. Aproveite o seu dom da intuição para criar perspectivas vantajosas a seus objetivos. A sua atuação na vida estará mais de acordo com a sua Missão, se atuar no campo das artes e do comércio. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de músico e escritor."

Exp(03) ="A sua Missão na Vida é utilizar-se das palavras como meio de ativação dos sentidos, sendo mediador entre espiritual e o material. Júpiter indica que por serem dotados de grande talento e sorte, tendem à pretensão e ao orgulho e tornam-se prepotentes. Ao analisar as suas atitudes e seu grau de tolerância, não devem permitir que o espelho reflita inversamente, ressaltando os seus defeitos. Geralmente os seus regidos encontram fama e sucesso. A sua atuação na vida estará mais de acordo com a Missão, se atuar no campo da pedagogia, literatura e das artes. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de jornalista e veículos de comunicação."

Exp(04) ="A sua Missão na Vida é construir uma base sólida para a humanidade. As suas concepções arrojadas sobre o comportamento humano e as várias formas livres de viver poderão vir a ser de grande auxílio para os que estiverem à sua volta. Urano indica que é necessário tomar cuidado com o teor de sua agressividade para não destruir o seu poder de criação e, com isto, não conseguir atingir muitas pessoas. Preserve e cuide mais de seu lado afetivo, desenvolvendo a sua percepção, a fim de que o tempo não afaste as pessoas que o auxiliaram em seus esforços diários. A sua atuação estará mais de acordo com a sua Missão, se atuar no campo das construções e economia. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a carreira militar ou economista."

Exp(05) ="A sua Missão na Vida é utilizar-se de sua fácil assimilação da complexidade dos problemas humanos e ajudar os demais. Ao abranger e elaborar novas idéias e concepções de vida, abrirá outros caminhos e soluções para os conflitos alheios. Mercúrio indica intuição, poder de comunicação, eloqüência. A flexibilidade mental que lhe é oferecida deve ser usada com responsabilidade, aproveitando este e outros dons de forma construtiva e idônea. O dom da palavra, que o acompanha, deve adaptar-se aos bons e sólidos empreendimentos. A sua atuação estará mais de acordo com sua Missão, se atuar no campo da comunicação diretamente na mídia, seja na forma de publicidade ou de jornalismo. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de jornalista e repórter."

Exp(06) ="A sua Missão na Vida é a de servir, seja na forma humanitária, ajudando todos, seja na forma pessoal, individual, como aquele que acolhe e aconselha. Vênus indica que, a partir do momento em que você tomar conhecimento de suas qualidades e defeitos e lidar com eles naturalmente para gerar harmonia interior, será um de ser mais atrativo e sociável no meio em que vive. A diplomacia e o tato precisam ser mais desenvolvidos para obter êxito em seus empreendimentos. A sua atuação estará mais de acordo com sua Missão, se atuar no campo das artes, desenvolvendo a sua obra em favor dos demais. É uma bela forma, de liberar sua sensibilidade para muitas pessoas. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de artista."

Exp(07) ="A sua Missão na Vida é a de educar, ensinar, repassar, transmitir aos outros tudo aquilo que lhe foi ensinado, seja na forma de conhecimento, seja na forma intuitiva. Netuno indica, que a sua função está em harmonizar, intuindo os anseios e, tendo este poder, ir além e em auxílio aos demais. A tendência, neste caso, é ir contra os princípios e as regras pré estabelecidas, tornando-se um rebelde e anarquista sem razão. Para que isso não aconteça, tente libertar-se da superstição que habita em seu íntimo, ir em frente e lutar decisivamente por um único objetivo. Ser mais prático e sociável e menos analítico favorecerá as sua metas. A sua atuação estará mais de acordo com a sua Missão, se atuar no campo da Pedagogia ou do ocultismo, nos quais poderá melhor desenvolver as suas aptidões literárias e as suas necessidades de conhecimento interior. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de professor ou médico."

Exp(08) ="A sua Missão na Vida é a de dirigir, empresariar e organizar grandes empreendimentos que mudem a concepção do todo, podendo inclusive, ser o fator de progresso industrial de toda uma humanidade. Saturno indica que o progresso é um pouco lento, mas que sempre resulta em conquistas ao final. O seu método e sua seriedade podem auxiliá-lo a implantar opiniões no meio em que vive, favorecendo os seus intentos. Procure sempre testar o seu nível de sensibilidade com sua praticidade para evitar inimigos. A sua atuação estará mais de acordo com sua Missão, se atuar no campo dos negócios atingindo pessoas influentes e revolucionárias. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de investidor ou engenheiro."

Exp(09) ="A sua Missão na Vida é a do dever. Dever de aprender, de ensinar, de concretizar, de auxiliar, de desenvolver-se, de aproveitar os seus potenciais. Em alguns momentos a falta de persistência, na passagem dos obstáculos em seus empreendimentos é, por algumas vezes, causado pela influência das opiniões alheias. O seu poder de liderança e de realização é grande; a influência de sua atividade mental rege a sua ambição, mediando a sua teimosia e autoritarismo, que é natural em você. O entusiasmo e a dedicação que leva ao sucesso é o que move os seus trabalhos. Marte indica que sempre é o momento de aperfeiçoar o caráter, não permitindo que os seus impulsos dominem as suas ações cotidianas. A todo momento a necessidade de atenção para si tira a verdadeira função da vida, que é a de fornecer aos demais a coragem e a garra que lhe são peculiares. A sua atuação estará mais de acordo com sua Missão, se atuar onde possa ampliar o seu lado altruístico, no campo da comunidade e do bem-estar social. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de político."

Exp(11) ="A sua visão de vida é inquieta e irreverente, constitui imagens fortes e singulares, diferenciando as formas já estabelecidas. A sua vida é expressiva, valorosa e rica em compensações para a humanidade.  A sua Missão na Vida corresponde a esses valores, procurando sempre ser um mestre construtivo para o meio em que vive. Este número não tem regência planetária específica por originar em somatório o número 2. Você é um idealista e excêntrico, desligado do mundo exterior, ao ponto  de parecer que o mundo não tem o devido valor que lhe atribuem e toda a expressão de importância material que os demais creditam. Este e todos os seus conceitos partem de um visionismo de pensamento e buscas dos mistérios do universo que você procura desvendar. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, é a de artista, filófoso, para que possa desenvolver a beleza e o conhecimento simultaneamente."

Exp(22) ="A sua Missão na Vida é a de diferenciar o mundo, dando-lhe oportunidades iguais e apaziguando-o. A conseqüência negativa, porém, é que, na ânsia de adquirir conhecimentos  e estabelecer uma vanguarda, se deparam um muro de revolta interior, que o levam à manifestações de estados de depressão causados por pressões exteriores sem atingir os seus objetivos. Sua profissão ideal e que lhe propicia uma possibilidade maior de sucesso, está no campo diplomático, para que tenha a possibilidade de intermediar os povos."  
         
Dim des(23)   
      
Des(01) = "Os problemas geralmente aparecem devido à sua inflexibilidade e ao seu gênio forte, que criam inimigos ocultos sem que se perceba. Você precisa aprender a não ser tão individualista e a saber dosar o grau de autoritarismo e austeridade, desenvolvendo mais o seu potencial criativo do que a sua liderança. No sentido filosófico, você está apegado aos ideais e deslumbrado com seu poder de criatividade e superioridade aparente. Deseja grandes projetos, que se concretizem rapidamente. Procure analisar todos os detalhes e cercar-se de bons profissionais, para que seus objetivos se realizem. O seu karma é aprender a ser mais humilde, mais sensível e menos rígido com você e com os outros."

Des(02) = "Os problemas geralmente aparecem porque a sua instabilidade emocional quase nunca está controlada. Você precisa aprender a desenvolver a sua capacidade de cooperação e união com os demais, avaliando bem o ritmo e os objetivos dos outros. Não adianta julgar e agir baseado em seu referencial, nos seus conceitos. O importante é que se obtenha frutos das realizações e se estabeleça um ambiente harmônico e saudável satisfazendo à todos. É preciso ainda. Trabalhar o seu lado mais prático, já que a sua sensibilidade tem uma importância grande em sua vida. No sentido filosófico, você vive em ressonância com a vida e o que ela oferece de melhor. A sua vida interior é muito rica, propiciando uma visão muito mais subjetiva do que as dos demais, sendo às vezes mal interpretado. O seu karma é aprender a controlar as suas emoções."

Des(03) = "Os problemas geralmente aparecem porque a instabilidade emocional é acentuada. Causam indignação quando saem de um relacionamento com a mesma velocidade com que entraram. Você sempre quer ser o centro das atenções e quando isso não acontece, a obstinação e os empecilhos aumentam. Você precisa aprender a comunicar-se com os outros, relacionar-se de igual para igual sem criticar demais o comportamento alheio. No sentido filosófico, a sua característica interior é ser mais racional que emocional, mais instintivo que sábio. Utilize-se de seus conhecimentos profundos sobre o homem e sobre a vida para se equilibrar não sendo teimoso e nem passando aos outros as suas responsabilidades. O seu karma é aprender a ser menos teimoso e a viver em grupo."

Des(04) = "Os problemas geralmente acontecem porque você aniquila os argumentos opostos aos seus, mesmo quando você está errado. O seu senso de progresso e a sua visão futurista são tão complexos, que criam normas singulares de comportamento de vida, desprezando as opiniões alheias. Você deve aprender a ser submisso quando a situação assim exigir, procurando avaliar constantemente as suas atitudes. No sentido filosófico, você precisa compreender as relações de causa e efeito. No sentido metafórico, você não deve ser sua própria raiz que o impede de alcançar os céus. Não faça oposição a você mesmo só porque os seus limites são diferentes. O seu karma é aprender a ser menos intransigente e a respeitar mais os demais à sua volta."

Des(05) = "Os problemas geralmente acontecem porque você promete coisas que não pode ou não tem intenção de cumprir. Você precisa aprender a manter-se em um só objetivo por vez, canalizando forças e métodos que aproveitem a sua versatilidade, concretizando tudo o que começar. No sentido filosófico, a sua sensibilidade deve ser preservada e bem cuidada, procurando as soluções de conflitos dentro de você mesmo. O seu karma é aprender a ser mais responsável com você e com os outros."

Des(06) = "Os problemas geralmente aparecem porque você exerce uma grande atração sobre os demais com sua delicadeza e atenção, criando uma dependência de suas opiniões e criando uma armadilha para si próprio. Você precisa aprender a não ser tão exigente com os demais, desequilibrando-os o meio em que vive e desencadeando o processo da lei de retorno sobre você, acentuando ainda mais o seu karma, que é o de servir bem a todos sem distinção. No sentido filosófico, você procura o belo, o sensível, o prazer da sensação de ser livre. Embriaga-se facilmente por paixões momentâneas, deixando-se ser conduzido pelo grito interior que o lança para tudo o que possa envolvê-lo. Vive em ressonância com a alegria e o sofrimento, pois, na mesma intensidade com que ama, sente-se decepcionado por conceitos tirados apressadamente. O seu karma é aprender a controlar as suas emoções, egocentrismo e evitar influenciar às pessoas."

Des(07) = "Os problemas geralmente aparecem porque você não se adapta facilmente à vida comum e rotineira, o que resulta em um excesso de energia mal canalizada, que permite que fantasias e elucubrações imperem sobre o seu dia-a-dia. Desta forma, a conseqüência é que quase todos os seus desejos ficarão somente em sua mente. Você precisa aprender um método de repassar os seus conhecimentos aos outros. A inspiração divina que lhe é dada deve ser compartilhada com o maior número possível de pessoas, auxiliando-as na vida pessoal. No sentido filosófico, a humanidade é a raiz de sua personalidade. A contemplação universal, os sofrimentos e angústias dos homens são tormentos freqüentes e latentes para a sua sensibilidade. A extensão que a vida permite e que você quer atingir provoca uma sede incessante para o seu subconsciente que, por vezes, pode torná-lo totalmente indiferente ao mundo que o rodeia. O seu karma é aprender a se relacionar com os outros à sua volta e passar os seus conhecimento de uma forma que todos aprendam."

Des(08) = "Os problemas geralmente aparecem porque você está sempre muito atento à você mesmo e aos seus próprios benefícios, causando, nos demais, a impressão de ser totalmente indiferente a eles. Você precisa aprender a desenvolver o seu lado emocional e sensível, despertando um interesse e uma ligação espiritual com o universo, a fim de que as suas potencialidades não sejam constantemente bloqueadas. É preciso ter consciência de que o poder não é tudo na vida. No sentido filosófico, o seu comportamento, bem como as suas sensações estão sempre voltados para você mesmo, congelando e isolando as forças vitais que animariam a sua vida. Na realidade, você é um introvertido com tendências à melancolia e à insatisfação. O medo da frustração, o despojamento e a renúncia são atitudes de defesa que, por muitas vezes, o conduzem a uma solidão temporária. A calma e o controle interior desenvolvidos pela busca espiritual são caminhos ávidos e saudáveis para aniquilar este aspecto. O seu karma é aprender a controlar as suas emoções e atitudes precipitadas."

Des(09) = "Os problemas geralmente ocorrem porque você se deixa levar pela aparência dos fatos, precipitando-se, amarrando-se às suas próprias conclusões e não ouvindo e nem permitindo argumentações. Você precisa aprender a ser mais imparcial. Julgar algo ou alguém é uma das mais sérias e, por vezes, dolorosas causas da Lei Kármica. Se erramos e julgamos apressadamente, essa Lei de Retorno age sobre nós, desenvolvendo na mesma moeda. No sentido filosófico, você é uma pessoa em constante combustão devido à sua necessidade de agir com força e vitalidade, como se o poder da mente fosse de alguma forma inferior. A conquista é quase sempre um jogo, embora, algumas vezes, não existam adversários e nem competidores. O perigo está na natureza e na tensão que o envolvem, causando inimizades e transformando-o em expressão da impulsividade alheia. Não despreze a negatividade que existe em todos nós. O seu karma é aprender a não julgar as pessoas bem como as suas atitudes."

Des(11) = "Os problemas geralmente acontecem porque você não consegue dominar os seus ímpetos naturais. Você precisa aprender a ser humilde e menos ambicioso. Não é porque a vida lhe oferece oportunidades infinitas, que você tem o direito de menosprezar o trabalho dos demais e seus esforços. O seu karma é aprender a a ser mais amigo, companheiro das pessoas e ajudá-las no caminho da vida."

Des(22) = "Os problemas geralmente ocorrem devido ao seu imediatismo em resolver os problemas do mundo. Você precisa aprender a explorar mais o seu lado emocional, desenvolvendo um paralelo quanto às suas necessidades e intenções. O mundo não é só seu, muito embora, ele possa parecer estar a seus pés. O seu karma é aprender a ser um pouco mais emocional e sensível e menos materialista e racional."   
       
		               
		if TxtNome.value = "" then               
		   msgbox "O seu nome nao foi preenchido."               
		   Exit Sub               
		End if               
		if TxtData.value = "" then               
		   msgbox "A sua data de nascimento nao foi preenchida."               
		   Exit Sub               
		End if               
		if not isdate(TxtData.value) then               
		   msgbox "Data de Nascimento Invalida."               
		   Exit Sub               
		End if               
		Nome = Ucase(TxtNome.Value)               
		Data = TxtData.Value               
		Ambicao=0               
		Personal=0               
		Expres=0               
		Desti=0               
		num(0)=0		               
		num(1)=0		               
		num(2)=0		               
		num(3)=0		               
		num(4)=0		               
		num(5)=0		               
		num(6)=0		               
		num(7)=0		               
		num(8)=0		               
		num(9)=0		               
		dim cps          
		cps =   mid(Data,4,3) & left(Data,2)		            
		         
		if (cps >= "01/01" and cps <= "01/20") or ( cps >= "12/22" and cps<= "12/31")  then          
      	         sig = 1            
		elseif  (cps >= "01/21" and cps <= "02/19") then            
	 		  sig = 2	            
		elseif (cps >= "02/20" and cps <= "03/20")  then          
					  sig = 3	            
		elseif (cps >= "03/21" and cps <= "04/20")  then          
					  sig = 4	            
		elseif (cps >= "04/21" and cps <= "05/20")  then          
					  sig = 5	            
		elseif (cps >= "05/21" and cps <= "06/20")  then          
					  sig = 6	            
		elseif (cps >= "06/21" and cps <= "07/22")  then          
					  sig = 7	            
		elseif (cps >= "07/23" and cps <= "08/22")  then          
					  sig = 8	            
		elseif (cps >= "08/23" and cps <= "09/22")  then          
					  sig = 9	            
		elseif (cps >= "09/23" and cps <= "10/22")  then          
					  sig = 10	            
		elseif (cps >= "10/23" and cps <= "11/21")  then          
					  sig = 11	            
		elseif (cps >= "11/22" and cps <= "12/21")  then          
				  sig = 12	            
		End if          
		     
		For f = 1 to len(nome)               
		    Letra = mid(Nome,f,1)               
	       If Asc(Letra)>64 And ASC(Letra)<91 then               
	          Let1 = ASC(Letra)               
             Let2 = (Let1-64) - (INT((Let1-64)/9)*9)               
             IF Let2= 0 then               
                Let2= 9               
             End If               
             If instr("AEIOU",Letra)<>0 then               
                Ambicao = Ambicao + Let2               
             ELSE               
                Personal = Personal + Let2               
             End if               
             Expres = Expres + Let2               
             Num(Let2) = NUM(Let2) + 1               
          End if               
       Next               
       IF Ambicao = 0 then               
          FOR f = 1 TO len(Nome)               
              IF mid(Nome,F,1) = "Y" then               
                 Ambicao = Ambicao + 7               
                 Personal = Personal - 7               
              End if               
          NEXT               
       END IF               
       Nascim = left(Data,2) & mid(Data,4,2) & right(data,4)               
       FOR f = 1 TO 8               
          Letra = mid(Nascim,F,1)               
          IF Letra >= "0" AND Letra <= "9" then               
             Desti = Desti + asc(Letra)-48               
          END IF               
       NEXT               
       NUMB=0               
                   
      Dim Elemento             
       Select Case Numero(day(Data))               
       		Case 1,5,7               
			        Elemento = "Água"               
       		Case 2,4,8,11,22               
			        Elemento = "Fogo"               
       		Case 3,6,9               
			        Elemento = "Ar"               
       End Select		             
        
     Dim anos   
     Dim meses 
     Dim dias 
      
     Anos = year(date) - year(data) 
     meses = month(date) - month(data) 
     dias = day(date)-day(data) 
     if meses < 0 then  
        anos = anos -1 
        meses = 12 + meses 
        if dias < 0 then 
           dias = 31 + dias 
           meses = meses - 1 
        end if   
     elseif meses = 0 then 
         if dias < 0 then 
            anos = anos - 1 
            meses = 11 
            dias = 31 + dias 
          end if 
      else 
        if dias < 0 then 
           dias = 31 + dias 
           meses = meses - 1 
        end if   
     end if 
          
    Dim idade 
    idade = cstr(anos) +" anos, " + cstr(meses) + " meses e " + cstr(dias)+ " dias."            
             
                
      
      
      
            
            
        document.open 
        document.write "<html>" 
        document.write "<head>" 
        document.write "<title>Mapa Esotérica</title>" 

        document.write "<link rel=""stylesheet"" href=""mapa.css"">" 

        document.write "<script language=""JavaScript"" src=""mapa.js""></script>"

        document.write "</head>"                                                                           

        document.write "<body bgColor=""#000000"" text=""#CCCCCC"" background=""../imagens/fundo.jpg"" bgproperties=""fixed"">" 

        document.write "<a href=""../esoterica.htm""><img src=""../imagens/logo_esoterica.gif"" width=""150"" height=""48"" vspace=""3"" hspace=""33"" border=""0""></a>"

        document.write "<center><div style=""margin-left:180px;""><a href=""medalhao.htm""><img src=""imagens/imagem_medalhao.jpg"" width=""200"" height=""200"" border=""0""></center></div></a>"  

        document.write "<div style=""margin-left:200px; margin-right:40px;"">" 

        document.write "<font face=""Arial"" size=""2"">" 

        document.write "<p><b>Nome: </b><font color=""33CCFF"">" + Nome + "<br></font>" 

        document.write "<b>Idade:  </b><font color=""33CCFF""> " + idade + " <br></font>" 

	  document.write "<b>Signo: </b><font color=""33CCFF""> "+ Signo(sig) + "<br></font>" 

  	  document.write "<b>Planeta Regente de seu Signo:</b><font color=""33CCFF""> "+Planeta(sig)+"<br></font>" 

        document.write "<b>Elemento do dia de seu nascimento:</b><font color=""33CCFF""> "+elemento+"<br></font>" 
         
	  document.write "<p></p>" 

	  document.write "<b>Sua Individualidade:<font color=""33CCFF""> " +Cstr(Numero(Ambicao)) + "</b><br></font>" 

	  document.write "<b>Sua Personalidade:<font color=""33CCFF""> " + Cstr(Numero(Personal))+"</b><br></font>" 

	  document.write "<b>Sua Missão na Vida:<font color=""33CCFF"">  " + cstr(Numero(Expres)) + "</b><br></font>" 

	  document.write "<b>Seu Karma:<font color=""33CCFF""> "+ cstr(Numero(Desti))+"</b><br></p></font>" 

	  document.write "<p></p>" 
	  document.write "<p></p>" 
	  document.write "<p></p>" 

        document.write "<center><a href=""alfabeto.htm""><img border=""0"" src=""imagens/imagem_alfabeto.jpg"" width=""346"" height=""19"" alt=""Conheça sua letra inicial""></center></a>"  

	  document.write "<p></p>" 
	  document.write "<p></p>" 
	  document.write "<p></p>" 

	  document.write "<b><font color=""ff6000"">O dia de seu nascimento:</b><br></font>" 

	  document.write "<div align=""justify""> " + pelonas(day(Data)) + "</p>" 

	  document.write "<p></p>" 

	  document.write "<b><font color=""ff6000"">Sua Individualidade:</b><br></font>" 

 	  document.write "<div align=""justify"">" + Amb(Numero(Ambicao)) + "<br>" 

	  document.write "<p></p>" 

	  document.write "<b><font color=""ff6000"">Sua Personalidade:</b><br></font>" 

	  document.write "<div align=""justify"">"+Pers(Numero(Personal))+"</p>" 

	  document.write "<p></p>" 

	  document.write "<b><font color=""ff6000"">Sua Missão na Vida:</b><br></font>" 

 	  document.write "<div align=""justify""> " + Exp(Numero(Expres)) +"</p>" 

	  document.write "<p></p>" 

	  document.write "<b><font color=""ff6000"">Seu karma:</b><br></font>" 

 	  document.write "<div align=""justify""> "+Des(Numero(Desti))+"</p>" 

	  document.write "<p></p>" 
	  document.write "<p></p>" 

        document.write "<center><div style=""margin-left:180px;""><a href=""index.htm""><img src=""imagens/imagem_titulo.jpg"" width=""281"" height=""74"" border=""0"" alt=""Voltar para página inicial de Musherrah""></center></div></a>"  

	  document.write "<p></p>" 
	  document.write "<p></p>" 

	  document.write "<center><i>Copyright &reg; 1995/2003 BMGV Music Software Net Editora</i> " 

	  document.write "<p></p>" 
	  document.write "<p></p>" 
	  document.write "<p></p>" 
	  document.write "<p></p>" 

	  document.write "</body>" 
	  document.write "</html>" 
	  document.close 
End sub               
               
function Numero (byval Num)               
Dim Final                
Dim Nums               
Dim f               
Final = 0               
DO WHILE true               
   IF Num<10 OR Num=11 OR Num=22 then               
      Final = Num               
  	   Exit do               
   End if               
   Nums = " "               
   Nums = Num               
   Num = 0               
   FOR f=1 TO len(trim(Nums))               
	   Num = Num + mid(Nums,f,1)               
   NEXT               
loop               
Numero = Final               
End Function               
-->		                 
</SCRIPT>
</CENTER>
</BODY>
</HTML>