https://inegi.org.mx/app/buscador/scripts/code/algoritmo.min.js

1function buttonAlgoritmo(){busqueda=$("#inputQ").val(),busqueda=busqueda.replace(/[.,;+-_*'="|°/¿?¡!:<>&%#*+?^${}[(\)]|[\]\\]/g," ");AlgoritmoBusqueda.init(busqueda)}AlgoritmoBusqueda={init:function(e,a){var o="",s="",t="";if(e=e.replace(/['=¿?¡!:/<>&%#*;+-.,?^${}[(\)]|[\]\\]/g," "),1==a){var u,r=(s=(s=AlgoritmoBusqueda.trataTexto(e)).replace(s.charAt(-1),"+")).split(" ");busqueda="";for(var n=0;n<r.length;n++)""!=r[n]&&(u=r[n].charAt(0),busqueda+="+"!=u&&"-"!=u&&"'"!=u?" +"+r[n]:r[n]);o=AlgoritmoBusqueda.buscaAndLess(busqueda,"+")}return 2==a&&(s=AlgoritmoBusqueda.trataTexto(e),o=AlgoritmoBusqueda.buscaOr(s)),3==a&&(e='"'+e+'"',t=AlgoritmoBusqueda.replaceComillas(e),o=AlgoritmoBusqueda.buscaExacta(t,"'")),o.substring(1,o.length)},buscaExacta:function(e,a){for(var o,s,t,u,r,n="",l=e,i=e.indexOf(a);-1!=i;)s=-1==(o=l.substring(i,l.length)).indexOf("'",i+1)?o.length-1:o.indexOf("'",i+1),r=l.charAt(i-1),t=""==AlgoritmoBusqueda.putLetter(r)?"O":AlgoritmoBusqueda.putLetter(r),u=AlgoritmoBusqueda.putLetter(a),l=o.substring(s+1,o.length),n+=","+t+"_"+o.substring(1,s)+"_"+u,i=l.indexOf(a);return n},buscaAndLess:function(e,a){var o=e.indexOf(a),s=e.charAt(o+1);o="'"==s?-1:o;for(var t,u,r="",n=e;-1!=o;)u=-1==(t=n.substring(o,n.length)).indexOf(" ")?t.length:t.indexOf(" "),n=t.substring(u,t.length),r+=","+t.substring(1,u)+"_"+AlgoritmoBusqueda.putLetter(a),o=n.indexOf(a),o="'"==(s=n.charAt(o+1))?-1:o;return r},buscaOr:function(e){for(var a,o=e.replace(/'/g,"").split(" "),s="",t=0;t<o.length;t++)""!=o[t]&&"+"!=(a=o[t].charAt(0))&&"-"!=a&&"'"!=a&&(s+=","+o[t]+"_O");return s},putLetter:function(e){var a="";switch(e){case"+":a="A";break;case"-":a="L";break;case"'":a="E"}return a},removeExacta:function(e){for(var a,o,s=e,t=e.indexOf("'");-1!=t;)a=-1==s.indexOf("'",t+1)?s.length-1:s.indexOf("'",t+1),o=""==s.charAt(t-1)?"'"+s.substring(t+1,a)+"'":s.charAt(t-1)+"'"+s.substring(t+1,a)+"'",t=(s=s.replace(o,"")).indexOf("'");return s},replaceComillas:function(e){var a=new RegExp('"',"g");return e.replace(a,"'")},trataTexto:function(e){for(var a=["insert","drop","delete","truncate",";","--","xp_","in","table","exec","of","with","the","from","al","as","is","can"," also "," already "," more "," you "," others "," and "," but "," between "," are "," than ","one","no","your","it","a","e","i","o","u","adónde","al","algo","alguien","alguna","algunas","alguno","algunos","ante","aquel","aquél","aquella","aquélla","aquellas","aquéllas","aquello","aquellos","aquéllos","bajo","cabe","como","cómo","con","conmigo","consigo","contigo","contra","cual","cuál","cuales","cuáles","cualesquiera","cualquiera","cuando","cuándo","cuanta","cuánta","cuantas","cuántas","cuánto","cuantos","cuántos","cuya","cuyas","cuyo","cuyos","de","del","demás","desde","donde","dónde","durante","el","él","ella","ellas","ello","ellos","en","entre","es","esa","ésa","esas","ésas","ese","ése","eso","esos","ésos","esotra","esotro","esta","está","ésta","estas","éstas","este","éste","esto","estos","éstos","hacia","hasta","la","las","le","les","lo","los","más","me","mediante","mí","mía","mías","mío","míos","misma","mismas","mismo","mismos","mucha","muchas","mucho","muchos","nada","nadie","ninguna","ningunas","ninguno","ningunos","no","nos","nosotras","nosotros","nuestra","nuestras","nuestro","nuestros","os","otra","otras","otro","otros","para","pero","poca","pocas","poco","pocos","por","puede","que","qué","quien","quién","quienes","quiénes","se","según","sí","sin","so","sobre","son","su","suya","suyas","suyo","suyos","también","tanta","tantas","tanto","tantos","te","ti","toda","todas","todo","todos","tras","tú","tuya","tuyas","tuyo","tuyos","última","últimas","último","últimos","un","una","unas","uno","unos","usted","ustedes","varias","varios","versus","vía","vos","vosotras","vosotros","vuestra","vuestras","vuestro","vuestros","y","ya","yo"],o=AlgoritmoBusqueda.reemplazaTodo(e,",","").replace(/\./g,"").trim().split(/\s/),s=0;s<o.length;s++)for(var t=0;t<a.length;t++)if(a[t]==o[s].toLowerCase()){o[s]="";break}newTexto=o.join(" ");var u=newTexto.replace(/([\ \t]+(?=[\ \t])|^\s+|\s+$)/g,"");return AlgoritmoBusqueda.trataSoundex(u)},reemplazaTodo:function(e,a,o){for(var s=e,t=s.indexOf(a);-1!=t;)t=(s=s.replace(a,o)).indexOf(a);return s},trataSoundex:function(e){var a=e.toUpperCase();return a=AlgoritmoBusqueda.reemplazaTodo(a,"Á","A"),a=AlgoritmoBusqueda.reemplazaTodo(a,"À","A"),a=AlgoritmoBusqueda.reemplazaTodo(a,"É","E"),a=AlgoritmoBusqueda.reemplazaTodo(a,"È","E"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Í","I"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ì","I"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ó","O"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ö","O"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ò","O"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ú","U"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ü","U"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ù","U"),a=AlgoritmoBusqueda.reemplazaTodo(a,"Ñ","N")}};