☰

contaraves

Conta quantas espécies de aves da lista do usuário tiveram seu registro em determinado local

  1. // ==UserScript==
  2. // @name        contaraves
  3. // @namespace   -
  4. // @description Conta quantas espécies de aves da lista do usuário tiveram seu registro em determinado local
  5. // @include     http://www.wikiaves.com/especies.php?t=u&u=*
  6. // @include     http://www.wikiaves.com.br/especies.php?t=u&u=*
  7. // @version     1
  8. // @require     http://ajax.googleapis.com/ajax/libs/jquery/2.1.4/jquery.min.js
  9. // @require     https://greasyfork.org/scripts/5392-waitforkeyelements/code/WaitForKeyElements.js?version=115012
  10. // @grant       GM_addStyle
  11. // ==/UserScript==
  12.  
  13. var extrato,seletor,seletorb,seletorc,quiqui,queque,tt,pen,tem,extcid,cc,dd,temest;
  14. var barrawidth=0;
  15. var pe = "&p=";
  16. var emno = " em ";
  17. var estados = [
  18.   "/AC<","/AL<","/AM<","/AP<","/BA<","/CE<","/DF<","/ES<","/GO<","/MA<","/MG<","/MS<","/MT<","/PA<","/PB<","/PE<","/PI<","/PR<","/RJ<","/RN<","/RO<","/RR<","/SC<","/SE<",
  19. 	"/SP<","/TO<","-<br>"];
  20.  
  21. var listacodIBGE = [
  22. "Aceguá","4300034","Água Santa","4300059","Agudo","4300109","Ajuricaba","4300208","Alecrim","4300307","Alegrete","4300406","Alegria","4300455",
  23. "Almirante Tamandaré do Sul","4300471","Alpestre","4300505","Alto Alegre","4300554","Alto Feliz","4300570","Alvorada","4300604","Amaral Ferrador","4300638","Ametista do Sul","4300646",
  24. "André da Rocha","4300661","Anta Gorda","4300703","Antônio Prado","4300802","Arambaré","4300851","Araricá","4300877","Aratiba","4300901","Arroio do Meio","4301008",
  25. "Arroio do Padre","4301057","Arroio do Sal","4301073","Arroio do Tigre","4301107","Arroio dos Ratos","4301206","Arroio Grande","4301305","Arvorezinha","4301404",
  26. "Augusto Pestana","4301503","Áurea","4301552","Bagé","4301602","Balneário Pinhal","4301636","Barão","4301651","Barão de Cotegipe","4301701","Barão do Triunfo","4301750",
  27. "Barra do Quaraí","4301875","Barra do Guarita","4301859","Barra do Ribeiro","4301909","Barra do Rio Azul","4301925","Barra Funda","4301958","Barracão","4301800",
  28. "Barros Cassal","4302006","Benjamin Constant do Sul","4302055","Bento Gonçalves","4302105","Boa Vista das Missões","4302154","Boa Vista do Buricá","4302204",
  29. "Boa Vista do Cadeado","4302220","Boa Vista do Incra","4302238","Boa Vista do Sul","4302253","Bom Jesus","4302303","Bom Princípio","4302352","Bom Progresso","4302378",
  30. "Bom Retiro do Sul","4302402","Boqueirão do Leão","4302451","Bossoroca","4302501","Bozano","4302584","Braga","4302600","Brochier","4302659","Butiá","4302709",
  31. "Caçapava do Sul","4302808","Cacequi","4302907","Cachoeira do Sul","4303004","Cachoeirinha","4303103","Cacique Doble","4303202","Caibaté","4303301","Caiçara","4303400",
  32. "Camaquã","4303509","Camargo","4303558","Cambará do Sul","4303608","Campestre da Serra","4303673","Campina das Missões","4303707","Campinas do Sul","4303806","Campo Bom","4303905",
  33. "Campo Novo","4304002","Campos Borges","4304101","Candelária","4304200","Cândido Godói","4304309","Candiota","4304358","Canela","4304408","Canguçu","4304507",
  34. "Canoas","4304606","Canudos do Vale","4304614","Capão Bonito do Sul","4304622","Capão da Canoa","4304630","Capão do Cipó","4304655","Capão do Leão","4304663",
  35. "Capela de Santana","4304671","Capitão","4304689","Capivari do Sul","4304697","Carazinho","4304705","Caraá","4304713","Carlos Barbosa","4304804","Carlos Gomes","4304853",
  36. "Casca","4304903","Caseiros","4304952","Catuípe","4305009","Caxias do Sul","4305108","Centenário","4305116","Cerrito","4305124","Cerro Branco","4305132",
  37. "Cerro Grande","4305157","Cerro Grande do Sul","4305173","Cerro Largo","4305207","Chapada","4305306","Charqueadas","4305355","Charrua","4305371","Chiapetta","4305405",
  38. "Chuí","4305439","Chuvisca","4305447","Cidreira","4305454","Ciríaco","4305504","Colinas","4305587","Colorado","4305603","Condor","4305702","Constantina","4305801",
  39. "Coqueiro Baixo","4305835","Coqueiros do Sul","4305850","Coronel Barros","4305871","Coronel Bicaco","4305900","Coronel Pilar","4305934","Cotiporã","4305959",
  40. "Coxilha","4305975","Crissiumal","4306007","Cristal","4306056","Cristal do Sul","4306072","Cruz Alta","4306106","Cruzaltense","4306130","Cruzeiro do Sul","4306205",
  41. "David Canabarro","4306304","Derrubadas","4306320","Dezesseis de Novembro","4306353","Dilermando de Aguiar","4306379","Dois Irmãos","4306403","Dois Irmãos das Missões","4306429",
  42. "Dois Lajeados","4306452","Dom Feliciano","4306502","Dom Pedrito","4306551","Dom Pedro de Alcântara","4306601","Dona Francisca","4306700","Doutor Maurício Cardoso","4306734",
  43. "Doutor Ricardo","4306759","Eldorado do Sul","4306767","Encantado","4306809","Encruzilhada do Sul","4306908","Engenho Velho","4306924","Entre-Ijuís","4306932",
  44. "Entre Rios do Sul","4306957","Erebango","4306973","Erechim","4307005","Ernestina","4307054","Erval Grande","4307203","Erval Seco","4307302","Esmeralda","4307401",
  45. "Esperança do Sul","4307450","Espumoso","4307500","Estação","4307559","Estância Velha","4307609","Esteio","4307708","Estrela","4307807","Estrela Velha","4307815","Eugênio de Castro","4307831",
  46. "Fagundes Varela","4307864","Farroupilha","4307906","Faxinal do Soturno","4308003","Faxinalzinho","4308052","Fazenda Vilanova","4308078","Feliz","4308102","Flores da Cunha","4308201",
  47. "Floriano Peixoto","4308250","Fontoura Xavier","4308300","Formigueiro","4308409","Forquetinha","4308433","Fortaleza dos Valos","4308458","Frederico Westphalen","4308508",
  48. "Garibaldi","4308607","Garruchos","4308656","Gaurama","4308706","General Câmara","4308805","Gentil","4308854","Getúlio Vargas","4308904","Giruá","4309001",
  49. "Glorinha","4309050","Gramado","4309100","Gramado dos Loureiros","4309126","Gramado Xavier","4309159","Gravataí","4309209","Guabiju","4309258","Guaíba","4309308",
  50. "Guaporé","4309407","Guarani das Missões","4309506","Harmonia","4309555","Herval","4307104","Herveiras","4309571","Horizontina","4309605","Hulha Negra","4309654",
  51. "Humaitá","4309704","Ibarama","4309753","Ibiaçá","4309803","Ibiraiaras","4309902","Ibirapuitã","4309951","Ibirubá","4310009","Igrejinha","4310108","Ijuí","4310207",
  52. "Ilópolis","4310306","Imbé","4310330","Imigrante","4310363","Independência","4310405","Inhacorá","4310413","Ipê","4310439","Ipiranga do Sul","4310462","Iraí","4310504",
  53. "Itaara","4310538","Itacurubi","4310553","Itapuca","4310579","Itaqui","4310603","Itati","4310652","Itatiba do Sul","4310702","Ivorá","4310751","Ivoti","4310801",
  54. "Jaboticaba","4310850","Jacuizinho","4310876","Jacutinga","4310900","Jaguarão","4311007","Jaguari","4311106","Jaquirana","4311122","Jari","4311130","Jóia","4311155",
  55. "Júlio de Castilhos","4311205","Lagoa Bonita do Sul","4311239","Lagoa dos Três Cantos","4311254","Lagoa Vermelha","4311270","Lagoão","4311304","Lajeado","4311403",
  56. "Lajeado do Bugre","4311429","Lavras do Sul","4311502","Liberato Salzano","4311601","Lindolfo Collor","4311627","Linha Nova","4311643","Maçambara","4311700",
  57. "Machadinho","4311718","Mampituba","4311734","Manoel Viana","4311759","Maquiné","4311775","Maratá","4311791","Marau","4311809","Marcelino Ramos","4311908",
  58. "Mariana Pimentel","4311981","Mariano Moro","4312005","Marques de Souza","4312054","Mata","4312104","Mato Castelhano","4312138","Mato Leitão","4312153","Mato Queimado","4312179",
  59. "Maximiliano de Almeida","4312203","Minas do Leão","4312252","Miraguaí","4312302","Montauri","4312351","Monte Alegre dos Campos","4312377","Monte Belo do Sul","4312385",
  60. "Montenegro","4312401","Mormaço","4312427","Morrinhos do Sul","4312443","Morro Redondo","4312450","Morro Reuter","4312476","Mostardas","4312500","Muçum","4312609",
  61. "Muitos Capões","4312617","Muliterno","4312625","Não-Me-Toque","4312658","Nicolau Vergueiro","4312674","Nonoai","4312708","Nova Alvorada","4312757","Nova Araçá","4312807",
  62. "Nova Bassano","4312906","Nova Boa Vista","4312955","Nova Bréscia","4313003","Nova Candelária","4313011","Nova Esperança do Sul","4313037","Nova Hartz","4313060",
  63. "Nova Pádua","4313086","Nova Palma","4313102","Nova Petrópolis","4313201","Nova Prata","4313300","Nova Ramada","4313334","Nova Roma do Sul","4313359","Nova Santa Rita","4313375",
  64. "Novo Barreiro","4313391","Novo Cabrais","4313409","Novo Hamburgo","4313425","Novo Machado","4313441","Novo Tiradentes","4313466","Novo Xingu","4313490",
  65. "Osório","4313508","Paim Filho","4313607","Palmares do Sul","4313656","Palmeira das Missões","4313706","Palmitinho","4313805","Panambi","4313904","Pantano Grande","4313953",
  66. "Paraí","4314001","Paraíso do Sul","4314027","Pareci Novo","4314035","Parobé","4314050","Passa Sete","4314068","Passo do Sobrado","4314076","Passo Fundo","4314100",
  67. "Paulo Bento","4314134","Paverama","4314159","Pedras Altas","4314175","Pedro Osório","4314209","Pejuçara","4314308","Pelotas","4314407","Picada Café","4314423",
  68. "Pinhal","4314456","Pinhal da Serra","4314464","Pinhal Grande","4314472","Pinheirinho do Vale","4314498","Pinheiro Machado","4314506","Pirapó","4314555",
  69. "Piratini","4314605","Planalto","4314704","Poço das Antas","4314753","Pontão","4314779","Ponte Preta","4314787","Portão","4314803","Porto Alegre","4314902",
  70. "Porto Lucena","4315008","Porto Mauá","4315057","Porto Vera Cruz","4315073","Porto Xavier","4315107","Pouso Novo","4315131","Presidente Lucena","4315149",
  71. "Progresso","4315156","Protásio Alves","4315172","Putinga","4315206","Quaraí","4315305","Quatro Irmãos","4315313","Quevedos","4315321","Quinze de Novembro","4315354",
  72. "Redentora","4315404","Relvado","4315453","Restinga Seca","4315503","Rio dos Índios","4315552","Rio Grande","4315602","Rio Pardo","4315701","Riozinho","4315750",
  73. "Roca Sales","4315800","Rodeio Bonito","4315909","Rolador","4315958","Rolante","4316006","Ronda Alta","4316105","Rondinha","4316204","Roque Gonzales","4316303",
  74. "Rosário do Sul","4316402","Sagrada Família","4316428","Saldanha Marinho","4316436","Salto do Jacuí","4316451","Salvador das Missões","4316477","Salvador do Sul","4316501",
  75. "Sananduva","4316600","Sant\'\Ana do Livramento","4316709","Santa Bárbara do Sul","4316733","Santa Cecília do Sul","4316758","Santa Clara do Sul","4316808",
  76. "Santa Cruz do Sul","4316907","Santa Margarida do Sul","4316956","Santa Maria","4316972","Santa Maria do Herval","4317004","Santa Rosa","4317103",
  77. "Santa Tereza","4317202","Santa Vitória do Palmar","4317251","Santana da Boa Vista","4317301","Santiago","4317400","Santo Ângelo","4317509",
  78. "Santo Antônio da Patrulha","4317558","Santo Antônio das Missões","4317608","Santo Antônio do Palma","4317707","Santo Antônio do Planalto","4317756",
  79. "Santo Augusto","4317806","Santo Cristo","4317905","Santo Expedito do Sul","4317954","São Borja","4318002","São Domingos do Sul","4318051",
  80. "São Francisco de Assis","4318101","São Francisco de Paula","4318200","São Gabriel","4318309","São Jerônimo","4318408","São João da Urtiga","4318424",
  81. "São João do Polêsine","4318432","São Jorge","4318440","São José das Missões","4318457","São José do Herval","4318465","São José do Hortêncio","4318481",
  82. "São José do Inhacorá","4318499","São José do Norte","4318507","São José do Ouro","4318606","São José do Sul","4318614","São José dos Ausentes","4318622",
  83. "São Leopoldo","4318705","São Lourenço do Sul","4318804","São Luiz Gonzaga","4318903","São Marcos","4319000","São Martinho","4319109",
  84. "São Martinho da Serra","4319125","São Miguel das Missões","4319158","São Nicolau","4319208","São Paulo das Missões","4319307","São Pedro da Serra","4319356",
  85. "São Pedro das Missões","4319364","São Pedro do Butiá","4319372","São Pedro do Sul","4319406","São Sebastião do Caí","4319505","São Sepé","4319604",
  86. "São Valentim","4319703","São Valentim do Sul","4319711","São Valério do Sul","4319737","São Vendelino","4319752","São Vicente do Sul","4319802",
  87. "Sapiranga","4319901","Sapucaia do Sul","4320008","Sarandi","4320107","Seberi","4320206","Sede Nova","4320230","Segredo","4320263","Selbach","4320305",
  88. "Senador Salgado Filho","4320321","Sentinela do Sul","4320354","Serafina Corrêa","4320404","Sério","4320453","Sertão","4320503","Sertão Santana","4320552",
  89. "Sete de Setembro","4320578","Severiano de Almeida","4320602","Silveira Martins","4320651","Sinimbu","4320677","Sobradinho","4320701","Soledade","4320800","Tabaí","4320859",
  90. "Tapejara","4320909","Tapera","4321006","Tapes","4321105","Taquara","4321204","Taquari","4321303","Taquaruçu do Sul","4321329","Tavares","4321352",
  91. "Tenente Portela","4321402","Terra de Areia","4321436","Teutônia","4321451","Tio Hugo","4321469","Tiradentes do Sul","4321477","Toropi","4321493","Torres","4321501",
  92. "Tramandaí","4321600","Travesseiro","4321626","Três Arroios","4321634","Três Cachoeiras","4321667","Três Coroas","4321709","Três de Maio","4321808","Três Forquilhas","4321832",
  93. "Três Palmeiras","4321857","Três Passos","4321907","Trindade do Sul","4321956","Triunfo","4322004","Tucunduva","4322103","Tunas","4322152",
  94. "Tupanci do Sul","4322186","Tupanciretã","4322202","Tupandi","4322251","Tuparendi","4322301","Turuçu","4322327","Ubiretama","4322343","União da Serra","4322350",
  95. "Unistalda","4322376","Uruguaiana","4322400","Vacaria","4322509","Vale do Sol","4322525","Vale Real","4322533","Vale Verde","4322541","Vanini","4322558","Venâncio Aires","4322608",
  96. "Vera Cruz","4322707","Veranópolis","4322806","Vespasiano Correa","4322855","Viadutos","4322905","Viamão","4323002","Vicente Dutra","4323101","Victor Graeff","4323200",
  97. "Vila Flores","4323309","Vila Lângaro","4323358","Vila Maria","4323408","Vila Nova do Sul","4323457","Vista Alegre","4323507","Vista Alegre do Prata","4323606","Vista Gaúcha","4323705",
  98. "Vitória das Missões","4323754","Westfalia","4323770","Xangri-lá","4323804"];
  99.  
  100. if(!('contains' in String.prototype)){String.prototype.contains = function(str, startIndex){return -1 !== String.prototype.indexOf.call(this, str, startIndex);};}
  101.  
  102. function comeca() {
  103.   var lugar = '.ttPage';
  104.   $(lugar).append($('\
  105. 	<form action = >\
  106. 	<fieldset>\
  107. 	<select id = "selLocal">\
  108. 	<option>Todas</option>\
  109. 	<option>no Estado</option>\
  110. 	<option>fora do Estado</option>\
  111. 	<option>Aceguá</option>\
  112. 	<option>Água Santa</option>\
  113. 	<option>Agudo</option>\
  114. 	<option>Ajuricaba</option>\
  115. 	<option>Alecrim</option>\
  116. 	<option>Alegrete</option>\
  117. 	<option>Alegria</option>\
  118. 	<option>Almirante Tamandaré do Sul</option>\
  119. 	<option>Alpestre</option>\
  120. 	<option>Alto Alegre</option>\
  121. 	<option>Alto Feliz</option>\
  122. 	<option>Alvorada</option>\
  123. 	<option>Amaral Ferrador</option>\
  124. 	<option>Ametista do Sul</option>\
  125. 	<option>André da Rocha</option>\
  126. 	<option>Anta Gorda</option>\
  127. 	<option>Antônio Prado</option>\
  128. 	<option>Arambaré</option>\
  129. 	<option>Araricá</option>\
  130. 	<option>Aratiba</option>\
  131. 	<option>Arroio do Meio</option>\
  132. 	<option>Arroio do Padre</option>\
  133. 	<option>Arroio do Sal</option>\
  134. 	<option>Arroio do Tigre</option>\
  135. 	<option>Arroio dos Ratos</option>\
  136. 	<option>Arroio Grande</option>\
  137. 	<option>Arvorezinha</option>\
  138. 	<option>Augusto Pestana</option>\
  139. 	<option>Áurea</option>\
  140. 	<option>Bagé</option>\
  141. 	<option>Balneário Pinhal</option>\
  142. 	<option>Barão</option>\
  143. 	<option>Barão de Cotegipe</option>\
  144. 	<option>Barão do Triunfo</option>\
  145. 	<option>Barra do Quaraí</option>\
  146. 	<option>Barra do Guarita</option>\
  147. 	<option>Barra do Ribeiro</option>\
  148. 	<option>Barra do Rio Azul</option>\
  149. 	<option>Barra Funda</option>\
  150. 	<option>Barracão</option>\
  151. 	<option>Barros Cassal</option>\
  152. 	<option>Benjamin Constant do Sul</option>\
  153. 	<option>Bento Gonçalves</option>\
  154. 	<option>Boa Vista das Missões</option>\
  155. 	<option>Boa Vista do Buricá</option>\
  156. 	<option>Boa Vista do Cadeado</option>\
  157. 	<option>Boa Vista do Incra</option>\
  158. 	<option>Boa Vista do Sul</option>\
  159. 	<option>Bom Jesus</option>\
  160. 	<option>Bom Princípio</option>\
  161. 	<option>Bom Progresso</option>\
  162. 	<option>Bom Retiro do Sul</option>\
  163. 	<option>Boqueirão do Leão</option>\
  164. 	<option>Bossoroca</option>\
  165. 	<option>Bozano</option>\
  166. 	<option>Braga</option>\
  167. 	<option>Brochier</option>\
  168. 	<option>Butiá</option>\
  169. 	<option>Caçapava do Sul</option>\
  170. 	<option>Cacequi</option>\
  171. 	<option>Cachoeira do Sul</option>\
  172. 	<option>Cachoeirinha</option>\
  173. 	<option>Cacique Doble</option>\
  174. 	<option>Caibaté</option>\
  175. 	<option>Caiçara</option>\
  176. 	<option>Camaquã</option>\
  177. 	<option>Camargo</option>\
  178. 	<option>Cambará do Sul</option>\
  179. 	<option>Campestre da Serra</option>\
  180. 	<option>Campina das Missões</option>\
  181. 	<option>Campinas do Sul</option>\
  182. 	<option>Campo Bom</option>\
  183. 	<option>Campo Novo</option>\
  184. 	<option>Campos Borges</option>\
  185. 	<option>Candelária</option>\
  186. 	<option>Cândido Godói</option>\
  187. 	<option>Candiota</option>\
  188. 	<option>Canela</option>\
  189. 	<option>Canguçu</option>\
  190. 	<option>Canoas</option>\
  191. 	<option>Canudos do Vale</option>\
  192. 	<option>Capão Bonito do Sul</option>\
  193. 	<option>Capão da Canoa</option>\
  194. 	<option>Capão do Cipó</option>\
  195. 	<option>Capão do Leão</option>\
  196. 	<option>Capela de Santana</option>\
  197. 	<option>Capitão</option>\
  198. 	<option>Capivari do Sul</option>\
  199. 	<option>Carazinho</option>\
  200. 	<option>Caraá</option>\
  201. 	<option>Carlos Barbosa</option>\
  202. 	<option>Carlos Gomes</option>\
  203. 	<option>Casca</option>\
  204. 	<option>Caseiros</option>\
  205. 	<option>Catuípe</option>\
  206. 	<option>Caxias do Sul</option>\
  207. 	<option>Centenário</option>\
  208. 	<option>Cerrito</option>\
  209. 	<option>Cerro Branco</option>\
  210. 	<option>Cerro Grande</option>\
  211. 	<option>Cerro Grande do Sul</option>\
  212. 	<option>Cerro Largo</option>\
  213. 	<option>Chapada</option>\
  214. 	<option>Charqueadas</option>\
  215. 	<option>Charrua</option>\
  216. 	<option>Chiapetta</option>\
  217. 	<option>Chuí</option>\
  218. 	<option>Chuvisca</option>\
  219. 	<option>Cidreira</option>\
  220. 	<option>Ciríaco</option>\
  221. 	<option>Colinas</option>\
  222. 	<option>Colorado</option>\
  223. 	<option>Condor</option>\
  224. 	<option>Constantina</option>\
  225. 	<option>Coqueiro Baixo</option>\
  226. 	<option>Coqueiros do Sul</option>\
  227. 	<option>Coronel Barros</option>\
  228. 	<option>Coronel Bicaco</option>\
  229. 	<option>Coronel Pilar</option>\
  230. 	<option>Cotiporã</option>\
  231. 	<option>Coxilha</option>\
  232. 	<option>Crissiumal</option>\
  233. 	<option>Cristal</option>\
  234. 	<option>Cristal do Sul</option>\
  235. 	<option>Cruz Alta</option>\
  236. 	<option>Cruzaltense</option>\
  237. 	<option>Cruzeiro do Sul</option>\
  238. 	<option>David Canabarro</option>\
  239. 	<option>Derrubadas</option>\
  240. 	<option>Dezesseis de Novembro</option>\
  241. 	<option>Dilermando de Aguiar</option>\
  242. 	<option>Dois Irmãos</option>\
  243. 	<option>Dois Irmãos das Missões</option>\
  244. 	<option>Dois Lajeados</option>\
  245. 	<option>Dom Feliciano</option>\
  246. 	<option>Dom Pedrito</option>\
  247. 	<option>Dom Pedro de Alcântara</option>\
  248. 	<option>Dona Francisca</option>\
  249. 	<option>Doutor Maurício Cardoso</option>\
  250. 	<option>Doutor Ricardo</option>\
  251. 	<option>Eldorado do Sul</option>\
  252. 	<option>Encantado</option>\
  253. 	<option>Encruzilhada do Sul</option>\
  254. 	<option>Engenho Velho</option>\
  255. 	<option>Entre-Ijuís</option>\
  256. 	<option>Entre Rios do Sul</option>\
  257. 	<option>Erebango</option>\
  258. 	<option>Erechim</option>\
  259. 	<option>Ernestina</option>\
  260. 	<option>Erval Grande</option>\
  261. 	<option>Erval Seco</option>\
  262. 	<option>Esmeralda</option>\
  263. 	<option>Esperança do Sul</option>\
  264. 	<option>Espumoso</option>\
  265. 	<option>Estação</option>\
  266. 	<option>Estância Velha</option>\
  267. 	<option>Esteio</option>\
  268. 	<option>Estrela</option>\
  269. 	<option>Estrela Velha</option>\
  270. 	<option>Eugênio de Castro</option>\
  271. 	<option>Fagundes Varela</option>\
  272. 	<option>Farroupilha</option>\
  273. 	<option>Faxinal do Soturno</option>\
  274. 	<option>Faxinalzinho</option>\
  275. 	<option>Fazenda Vilanova</option>\
  276. 	<option>Feliz</option>\
  277. 	<option>Flores da Cunha</option>\
  278. 	<option>Floriano Peixoto</option>\
  279. 	<option>Fontoura Xavier</option>\
  280. 	<option>Formigueiro</option>\
  281. 	<option>Forquetinha</option>\
  282. 	<option>Fortaleza dos Valos</option>\
  283. 	<option>Frederico Westphalen</option>\
  284. 	<option>Garibaldi</option>\
  285. 	<option>Garruchos</option>\
  286. 	<option>Gaurama</option>\
  287. 	<option>General Câmara</option>\
  288. 	<option>Gentil</option>\
  289. 	<option>Getúlio Vargas</option>\
  290. 	<option>Giruá</option>\
  291. 	<option>Glorinha</option>\
  292. 	<option>Gramado</option>\
  293. 	<option>Gramado dos Loureiros</option>\
  294. 	<option>Gramado Xavier</option>\
  295. 	<option>Gravataí</option>\
  296. 	<option>Guabiju</option>\
  297. 	<option>Guaíba</option>\
  298. 	<option>Guaporé</option>\
  299. 	<option>Guarani das Missões</option>\
  300. 	<option>Harmonia</option>\
  301. 	<option>Herval</option>\
  302. 	<option>Herveiras</option>\
  303. 	<option>Horizontina</option>\
  304. 	<option>Hulha Negra</option>\
  305. 	<option>Humaitá</option>\
  306. 	<option>Ibarama</option>\
  307. 	<option>Ibiaçá</option>\
  308. 	<option>Ibiraiaras</option>\
  309. 	<option>Ibirapuitã</option>\
  310. 	<option>Ibirubá</option>\
  311. 	<option>Igrejinha</option>\
  312. 	<option>Ijuí</option>\
  313. 	<option>Ilópolis</option>\
  314. 	<option>Imbé</option>\
  315. 	<option>Imigrante</option>\
  316. 	<option>Independência</option>\
  317. 	<option>Inhacorá</option>\
  318. 	<option>Ipê</option>\
  319. 	<option>Ipiranga do Sul</option>\
  320. 	<option>Iraí</option>\
  321. 	<option>Itaara</option>\
  322. 	<option>Itacurubi</option>\
  323. 	<option>Itapuca</option>\
  324. 	<option>Itaqui</option>\
  325. 	<option>Itati</option>\
  326. 	<option>Itatiba do Sul</option>\
  327. 	<option>Ivorá</option>\
  328. 	<option>Ivoti</option>\
  329. 	<option>Jaboticaba</option>\
  330. 	<option>Jacuizinho</option>\
  331. 	<option>Jacutinga</option>\
  332. 	<option>Jaguarão</option>\
  333. 	<option>Jaguari</option>\
  334. 	<option>Jaquirana</option>\
  335. 	<option>Jari</option>\
  336. 	<option>Jóia</option>\
  337. 	<option>Júlio de Castilhos</option>\
  338. 	<option>Lagoa Bonita do Sul</option>\
  339. 	<option>Lagoa dos Três Cantos</option>\
  340. 	<option>Lagoa Vermelha</option>\
  341. 	<option>Lagoão</option>\
  342. 	<option>Lajeado</option>\
  343. 	<option>Lajeado do Bugre</option>\
  344. 	<option>Lavras do Sul</option>\
  345. 	<option>Liberato Salzano</option>\
  346. 	<option>Lindolfo Collor</option>\
  347. 	<option>Linha Nova</option>\
  348. 	<option>Maçambara</option>\
  349. 	<option>Machadinho</option>\
  350. 	<option>Mampituba</option>\
  351. 	<option>Manoel Viana</option>\
  352. 	<option>Maquiné</option>\
  353. 	<option>Maratá</option>\
  354. 	<option>Marau</option>\
  355. 	<option>Marcelino Ramos</option>\
  356. 	<option>Mariana Pimentel</option>\
  357. 	<option>Mariano Moro</option>\
  358. 	<option>Marques de Souza</option>\
  359. 	<option>Mata</option>\
  360. 	<option>Mato Castelhano</option>\
  361. 	<option>Mato Leitão</option>\
  362. 	<option>Mato Queimado</option>\
  363. 	<option>Maximiliano de Almeida</option>\
  364. 	<option>Minas do Leão</option>\
  365. 	<option>Miraguaí</option>\
  366. 	<option>Montauri</option>\
  367. 	<option>Monte Alegre dos Campos</option>\
  368. 	<option>Monte Belo do Sul</option>\
  369. 	<option>Montenegro</option>\
  370. 	<option>Mormaço</option>\
  371. 	<option>Morrinhos do Sul</option>\
  372. 	<option>Morro Redondo</option>\
  373. 	<option>Morro Reuter</option>\
  374. 	<option>Mostardas</option>\
  375. 	<option>Muçum</option>\
  376. 	<option>Muitos Capões</option>\
  377. 	<option>Muliterno</option>\
  378. 	<option>Não-Me-Toque</option>\
  379. 	<option>Nicolau Vergueiro</option>\
  380. 	<option>Nonoai</option>\
  381. 	<option>Nova Alvorada</option>\
  382. 	<option>Nova Araçá</option>\
  383. 	<option>Nova Bassano</option>\
  384. 	<option>Nova Boa Vista</option>\
  385. 	<option>Nova Bréscia</option>\
  386. 	<option>Nova Candelária</option>\
  387. 	<option>Nova Esperança do Sul</option>\
  388. 	<option>Nova Hartz</option>\
  389. 	<option>Nova Pádua</option>\
  390. 	<option>Nova Palma</option>\
  391. 	<option>Nova Petrópolis</option>\
  392. 	<option>Nova Prata</option>\
  393. 	<option>Nova Ramada</option>\
  394. 	<option>Nova Roma do Sul</option>\
  395. 	<option>Nova Santa Rita</option>\
  396. 	<option>Novo Barreiro</option>\
  397. 	<option>Novo Cabrais</option>\
  398. 	<option>Novo Hamburgo</option>\
  399. 	<option>Novo Machado</option>\
  400. 	<option>Novo Tiradentes</option>\
  401. 	<option>Novo Xingu</option>\
  402. 	<option>Osório</option>\
  403. 	<option>Paim Filho</option>\
  404. 	<option>Palmares do Sul</option>\
  405. 	<option>Palmeira das Missões</option>\
  406. 	<option>Palmitinho</option>\
  407. 	<option>Panambi</option>\
  408. 	<option>Pantano Grande</option>\
  409. 	<option>Paraí</option>\
  410. 	<option>Paraíso do Sul</option>\
  411. 	<option>Pareci Novo</option>\
  412. 	<option>Parobé</option>\
  413. 	<option>Passa Sete</option>\
  414. 	<option>Passo do Sobrado</option>\
  415. 	<option>Passo Fundo</option>\
  416. 	<option>Paulo Bento</option>\
  417. 	<option>Paverama</option>\
  418. 	<option>Pedras Altas</option>\
  419. 	<option>Pedro Osório</option>\
  420. 	<option>Pejuçara</option>\
  421. 	<option>Pelotas</option>\
  422. 	<option>Picada Café</option>\
  423. 	<option>Pinhal</option>\
  424. 	<option>Pinhal da Serra</option>\
  425. 	<option>Pinhal Grande</option>\
  426. 	<option>Pinheirinho do Vale</option>\
  427. 	<option>Pinheiro Machado</option>\
  428. 	<option>Pirapó</option>\
  429. 	<option>Piratini</option>\
  430. 	<option>Planalto</option>\
  431. 	<option>Poço das Antas</option>\
  432. 	<option>Pontão</option>\
  433. 	<option>Ponte Preta</option>\
  434. 	<option>Portão</option>\
  435. 	<option>Porto Alegre</option>\
  436. 	<option>Porto Lucena</option>\
  437. 	<option>Porto Mauá</option>\
  438. 	<option>Porto Vera Cruz</option>\
  439. 	<option>Porto Xavier</option>\
  440. 	<option>Pouso Novo</option>\
  441. 	<option>Presidente Lucena</option>\
  442. 	<option>Progresso</option>\
  443. 	<option>Protásio Alves</option>\
  444. 	<option>Putinga</option>\
  445. 	<option>Quaraí</option>\
  446. 	<option>Quatro Irmãos</option>\
  447. 	<option>Quevedos</option>\
  448. 	<option>Quinze de Novembro</option>\
  449. 	<option>Redentora</option>\
  450. 	<option>Relvado</option>\
  451. 	<option>Restinga Seca</option>\
  452. 	<option>Rio dos Índios</option>\
  453. 	<option>Rio Grande</option>\
  454. 	<option>Rio Pardo</option>\
  455. 	<option>Riozinho</option>\
  456. 	<option>Roca Sales</option>\
  457. 	<option>Rodeio Bonito</option>\
  458. 	<option>Rolador</option>\
  459. 	<option>Rolante</option>\
  460. 	<option>Ronda Alta</option>\
  461. 	<option>Rondinha</option>\
  462. 	<option>Roque Gonzales</option>\
  463. 	<option>Rosário do Sul</option>\
  464. 	<option>Sagrada Família</option>\
  465. 	<option>Saldanha Marinho</option>\
  466. 	<option>Salto do Jacuí</option>\
  467. 	<option>Salvador das Missões</option>\
  468. 	<option>Salvador do Sul</option>\
  469. 	<option>Sananduva</option>\
  470. 	<option>Sant\'\Ana do Livramento</option>\
  471. 	<option>Santa Bárbara do Sul</option>\
  472. 	<option>Santa Cecília do Sul</option>\
  473. 	<option>Santa Clara do Sul</option>\
  474. 	<option>Santa Cruz do Sul</option>\
  475. 	<option>Santa Margarida do Sul</option>\
  476. 	<option>Santa Maria</option>\
  477. 	<option>Santa Maria do Herval</option>\
  478. 	<option>Santa Rosa</option>\
  479. 	<option>Santa Tereza</option>\
  480. 	<option>Santa Vitória do Palmar</option>\
  481. 	<option>Santana da Boa Vista</option>\
  482. 	<option>Santiago</option>\
  483. 	<option>Santo Ângelo</option>\
  484. 	<option>Santo Antônio da Patrulha</option>\
  485. 	<option>Santo Antônio das Missões</option>\
  486. 	<option>Santo Antônio do Palma</option>\
  487. 	<option>Santo Antônio do Planalto</option>\
  488. 	<option>Santo Augusto</option>\
  489. 	<option>Santo Cristo</option>\
  490. 	<option>Santo Expedito do Sul</option>\
  491. 	<option>São Borja</option>\
  492. 	<option>São Domingos do Sul</option>\
  493. 	<option>São Francisco de Assis</option>\
  494. 	<option>São Francisco de Paula</option>\
  495. 	<option>São Gabriel</option>\
  496. 	<option>São Jerônimo</option>\
  497. 	<option>São João da Urtiga</option>\
  498. 	<option>São João do Polêsine</option>\
  499. 	<option>São Jorge</option>\
  500. 	<option>São José das Missões</option>\
  501. 	<option>São José do Herval</option>\
  502. 	<option>São José do Hortêncio</option>\
  503. 	<option>São José do Inhacorá</option>\
  504. 	<option>São José do Norte</option>\
  505. 	<option>São José do Ouro</option>\
  506. 	<option>São José do Sul</option>\
  507. 	<option>São José dos Ausentes</option>\
  508. 	<option>São Leopoldo</option>\
  509. 	<option>São Lourenço do Sul</option>\
  510. 	<option>São Luiz Gonzaga</option>\
  511. 	<option>São Marcos</option>\
  512. 	<option>São Martinho</option>\
  513. 	<option>São Martinho da Serra</option>\
  514. 	<option>São Miguel das Missões</option>\
  515. 	<option>São Nicolau</option>\
  516. 	<option>São Paulo das Missões</option>\
  517. 	<option>São Pedro da Serra</option>\
  518. 	<option>São Pedro das Missões</option>\
  519. 	<option>São Pedro do Butiá</option>\
  520. 	<option>São Pedro do Sul</option>\
  521. 	<option>São Sebastião do Caí</option>\
  522. 	<option>São Sepé</option>\
  523. 	<option>São Valentim</option>\
  524. 	<option>São Valentim do Sul</option>\
  525. 	<option>São Valério do Sul</option>\
  526. 	<option>São Vendelino</option>\
  527. 	<option>São Vicente do Sul</option>\
  528. 	<option>Sapiranga</option>\
  529. 	<option>Sapucaia do Sul</option>\
  530. 	<option>Sarandi</option>\
  531. 	<option>Seberi</option>\
  532. 	<option>Sede Nova</option>\
  533. 	<option>Segredo</option>\
  534. 	<option>Selbach</option>\
  535. 	<option>Senador Salgado Filho</option>\
  536. 	<option>Sentinela do Sul</option>\
  537. 	<option>Serafina Corrêa</option>\
  538. 	<option>Sério</option>\
  539. 	<option>Sertão</option>\
  540. 	<option>Sertão Santana</option>\
  541. 	<option>Sete de Setembro</option>\
  542. 	<option>Severiano de Almeida</option>\
  543. 	<option>Silveira Martins</option>\
  544. 	<option>Sinimbu</option>\
  545. 	<option>Sobradinho</option>\
  546. 	<option>Soledade</option>\
  547. 	<option>Tabaí</option>\
  548. 	<option>Tapejara</option>\
  549. 	<option>Tapera</option>\
  550. 	<option>Tapes</option>\
  551. 	<option>Taquara</option>\
  552. 	<option>Taquari</option>\
  553. 	<option>Taquaruçu do Sul</option>\
  554. 	<option>Tavares</option>\
  555. 	<option>Tenente Portela</option>\
  556. 	<option>Terra de Areia</option>\
  557. 	<option>Teutônia</option>\
  558. 	<option>Tio Hugo</option>\
  559. 	<option>Tiradentes do Sul</option>\
  560. 	<option>Toropi</option>\
  561. 	<option>Torres</option>\
  562. 	<option>Tramandaí</option>\
  563. 	<option>Travesseiro</option>\
  564. 	<option>Três Arroios</option>\
  565. 	<option>Três Cachoeiras</option>\
  566. 	<option>Três Coroas</option>\
  567. 	<option>Três de Maio</option>\
  568. 	<option>Três Forquilhas</option>\
  569. 	<option>Três Palmeiras</option>\
  570. 	<option>Três Passos</option>\
  571. 	<option>Trindade do Sul</option>\
  572. 	<option>Triunfo</option>\
  573. 	<option>Tucunduva</option>\
  574. 	<option>Tunas</option>\
  575. 	<option>Tupanci do Sul</option>\
  576. 	<option>Tupanciretã</option>\
  577. 	<option>Tupandi</option>\
  578. 	<option>Tuparendi</option>\
  579. 	<option>Turuçu</option>\
  580. 	<option>Ubiretama</option>\
  581. 	<option>União da Serra</option>\
  582. 	<option>Unistalda</option>\
  583. 	<option>Uruguaiana</option>\
  584. 	<option>Vacaria</option>\
  585. 	<option>Vale do Sol</option>\
  586. 	<option>Vale Real</option>\
  587. 	<option>Vale Verde</option>\
  588. 	<option>Vanini</option>\
  589. 	<option>Venâncio Aires</option>\
  590. 	<option>Vera Cruz</option>\
  591. 	<option>Veranópolis</option>\
  592. 	<option>Vespasiano Correa</option>\
  593. 	<option>Viadutos</option>\
  594. 	<option>Viamão</option>\
  595. 	<option>Vicente Dutra</option>\
  596. 	<option>Victor Graeff</option>\
  597. 	<option>Vila Flores</option>\
  598. 	<option>Vila Lângaro</option>\
  599. 	<option>Vila Maria</option>\
  600. 	<option>Vila Nova do Sul</option>\
  601. 	<option>Vista Alegre</option>\
  602. 	<option>Vista Alegre do Prata</option>\
  603. 	<option>Vista Gaúcha</option>\
  604. 	<option>Vitória das Missões</option>\
  605. 	<option>Westfalia</option>\
  606. 	<option>Xangri-lá</option>\
  607.  </select>\
  608.   <input type = "button"\
  609.     value = "filtrar"\
  610.     id = "botaum"\
  611.   </fieldset>\
  612.  </form>\
  613. '));
  614.   $("#botaum").click (analisa);
  615. }
  616.  
  617. function analisa() {
  618. 	//TODO: mudar pagina antes da analize para &o=3
  619. 	var lugarbarra = '.ttPage > form:nth-child(1) > fieldset:nth-child(1)';
  620. 	$(lugarbarra).append($('\
  621. 		<style>\
  622. 	#myProgress {\
  623.   position: relative;\
  624.   width: 100%;\
  625.   height: 30px;\
  626.   background-color: #ddd;\
  627. 	}\
  628. 	#myBar {\
  629.   position: absolute;\
  630.   width: 0%;\
  631.   height: 100%;\
  632.   background-color: #4CAF50;\
  633. 	}\
  634. 	#label {\
  635.   text-align: center;\
  636.   line-height: 30px;\
  637.   color: white;\
  638. 	}\
  639. 	</style>\
  640. 		<div id="myProgress">\
  641.   <div id="myBar">\
  642.     <div id="label">0%</div>\
  643.   </div>\
  644. 	</div>\
  645. 	'));		
  646. 		
  647. 		
  648.   var tabela = document.getElementsByClassName('especies') [0];
  649.   var local = document.getElementById("selLocal");
  650.   var localb = local.options[local.selectedIndex].text;
  651. 	document.getElementById("selLocal").disabled = true;
  652. 	document.getElementById("botaum").disabled = true;
  653. 	$(".textpadding > div:nth-child(6) > b:nth-child(1) > a:nth-child(1)").text("");
  654. 	$(".textpadding > div:nth-child(6) > b:nth-child(2) > a:nth-child(1)").text("");
  655. 	$(".textpadding > div:nth-child(6) > b:nth-child(3) > a:nth-child(1)").text("");
  656. 	$(".titulo > td:nth-child(1) > a:nth-child(1)").removeAttr("href");
  657. 	$(".titulo > td:nth-child(2) > a:nth-child(1)").removeAttr("href");
  658. 	$(".titulo > td:nth-child(3) > a:nth-child(1)").removeAttr("href");
  659. 	$(".titulo > td:nth-child(4) > a:nth-child(1)").removeAttr("href");
  660. 	$(".titulo > td:nth-child(5) > a:nth-child(1)").removeAttr("href");
  661. 	
  662. 	if (localb==="no Estado"){
  663. 		emno=" ";
  664.     extcid = conecta("especies.php?&t=e&e=20");
  665. 	}
  666.  
  667. 	else if (localb==="Todas"){
  668. 		location.reload();
  669.     }
  670. 	else if (localb==="fora do Estado"){
  671. 		emno=" ";
  672. 		extcid = conecta("especies.php?t=t");
  673.     
  674. 	}
  675. 	else{
  676. 		extcid = conecta("especies.php?&t=c&c="+converte(localb));
  677. 	}
  678.  
  679.   for (var i = 2, row; i<=tabela.rows.length; i++) {
  680.     row = tabela.rows[i];
  681. 		pen = Math.ceil(parseFloat($("tr.especie:nth-child("+i+") > td:nth-child(5) > a:nth-child(1)").text())/10);
  682. 		seletorc =  'tr.especie:nth-child(' + i + ') > td:nth-child(3) > a:nth-child(1)';
  683. 		quuquu = $(seletorc).text();
  684. 		
  685. 		if (!extcid.contains(quuquu)){
  686. 			var cuia = 'tr.especie:nth-child(' + i + ')';
  687. 			$(cuia).hide();
  688. 		}
  689. 		
  690. 		else{
  691. 		
  692.     seletor = 'tr.especie:nth-child(' + i + ') > td:nth-child(5) > a:nth-child(1)';
  693.     seletorb = 'tr.especie:nth-child(' + i + ') > td:nth-child(4) > a:nth-child(1)';
  694.     quiqui = $(seletor).attr('href'); //registros foto
  695.     queque = $(seletorb).attr('href'); //registros sons
  696. 		
  697.     
  698. 	if (quiqui === undefined) { //SOH SOM
  699.     	
  700.      cc = conecta(queque);
  701.      if (localb==="fora do Estado"){
  702. 			 for (var g=0;g<estados.length;g++){
  703. 				 if (cc.contains(estados[g])){temest=true;dd=null;
  704. 					 break;
  705. 				 }
  706. 				
  707. 				}
  708.      } 
  709.      else{dd = converte(localb);}      
  710.       if (cc.contains(dd) == true||temest==true) {temest=false;} 
  711.       else {
  712.         var cuia = 'tr.especie:nth-child(' + i + ')';
  713.         $(cuia).hide();
  714.       }
  715.     }
  716. 			
  717. 			
  718.     else { // imagem E som ou soh imagem
  719. 	
  720. 			if (queque===undefined){ //n tem som
  721. 				for (var k=1;k<=pen;k++){
  722. 					cc=(conecta(quiqui+pe+k));
  723. 				 	if (localb==="fora do Estado"){
  724. 					 for (var g=0;g<estados.length;g++){
  725. 				 			if (cc.contains(estados[g])){temest=true;dd=null;
  726. 						 break;
  727. 								 }
  728. 						}
  729.      			} 
  730.      			else{dd = converte(localb);} 
  731. 						if (cc.contains(dd) == true||temest==true) {tem=true;break;
  732. 						}}
  733. 		 				if (tem==true) {tem=false;temest=false;}
  734. 		 				else{
  735.           		var cuia = 'tr.especie:nth-child(' + i + ')';
  736.           		$(cuia).hide();
  737. 							}
  738. 					}
  739. 	 
  740.      else{ //som e foto, ver som antes
  741. 			 cc=(conecta(queque)); //conecta com som
  742. 			 
  743. 			 if (localb==="fora do Estado"){ 
  744. 			 	for (var g=0;g<estados.length;g++){
  745. 				 if (cc.contains(estados[g])){temest=true;dd=null;
  746. 					 break;}}} 
  747.      	 else{dd = converte(localb);} 
  748. 			
  749. 			 if (cc.contains(dd) == true||temest==true) {temest=false;} 
  750. 		  
  751. 			 else{ //som não tem, bora ver foto
  752. 				 
  753. 				 for (var k=1;k<=pen;k++){
  754. 					cc=(conecta(quiqui+pe+k));
  755. 					 console.log("aqui "+quiqui);
  756. 				 		if (localb==="fora do Estado"){
  757. 			 				for (var g=0;g<estados.length;g++){
  758. 				 				if (cc.contains(estados[g])){temest=true;dd=null;
  759. 					 			break;}}} 
  760.      				else{dd = converte(localb);} 
  761. 				
  762. 					 if (cc.contains(dd) == true||temest==true) {tem=true;break;
  763. 						}}
  764. 		 			if (tem==true) {tem=false;temest=false;}
  765. 		 			else{
  766.           	var cuia = 'tr.especie:nth-child(' + i + ')';
  767.           	$(cuia).hide();
  768. 				
  769. 			}			
  770. 			}
  771. 		}
  772.     }
  773. 		}
  774. 		
  775. 		////AQYU
  776. 		var elem = document.getElementById("myBar");
  777. 		barrawidth+= (100/(tabela.rows.length));
  778. 		elem.style.width = barrawidth + '%';
  779. 		document.getElementById("label").innerHTML = (barrawidth.toFixed(2)) * 1  + '%';  
  780. 	}
  781.   
  782.   
  783. 	$(".total > b:nth-child(2)").text(contar(tabela));
  784. 	$(".total").append(emno + localb);
  785. 	$(".total").get(0).scrollIntoView();
  786. 	elem.style.width = "100%";
  787. 	document.getElementById("label").innerHTML = "100%";
  788. 	console.log(converte(localb));
  789. }
  790. 	
  791. function contar(atabela) {
  792. 	tt = 0;
  793. 	for (var i = 1, row; i<=atabela.rows.length; i++) {
  794. 		row = atabela.rows[i];
  795. 		var cuia = 'tr.especie:nth-child(' + i + ')';
  796. 		if ($(cuia).is(':visible')){
  797. 			tt++; //$(cuia).css("background-color","red");
  798. 			}
  799. 			}
  800. 	return (tt);
  801. 			}
  802. 				
  803. function conecta(x){
  804. 	var xhr;
  805. 	xhr = new XMLHttpRequest();
  806. 	xhr.open('GET', x, false);
  807. 	xhr.send();
  808. 	extrato = xhr.response;
  809. 	return (extrato);
  810. 	  
  811. }
  812.  
  813. function converte(cidade){ //cidade
  814.   if (cidade ==="no Estado"){
  815.     valorcidade = "/RS<";
  816.   }
  817.   else{
  818. 	var valorcidade = listacodIBGE[(listacodIBGE.indexOf(cidade)+1)];
  819.   }
  820. 	return valorcidade;
  821. }
  822.  
  823. waitForKeyElements('.ttPage', comeca);