User:Jts1882/common.js

 //importScript('User:Jts1882/taxonomybrowser.js');
 //importScript('User:Jts1882/taxonomybrowser2.js');
 //importScript("User:Smith609/toolbox.js");

 //mw.loader.load('//en.wikipedia.org/wiki/User:Qwerfjkl/scripts/generatedoi.js'); // Backlink: [[User:Qwerfjkl/scripts/generatedoi.js]]
 mw.util.addPortletLink('p-tb','https://alyw234237.github.io/wiki-doi-gbooks-citation-maker/','Generate citation','pt-doigenerate','Generate citations from a doi');// copied from [[User:Qwerfjkl/scripts/generatedoi.js]]

 importScript('User:Jackmcbarn/advancedtemplatesandbox.js');// Linkback: [[User:Jackmcbarn/advancedtemplatesandbox.js]]

 if(mw.config.get('wgCanonicalSpecialPageName')==='Search'||(mw.config.get('wgArticleId')===0&&mw.config.get('wgCanonicalSpecialPageName')===false)){
 importScript('MediaWiki:Wdsearch.js');
 }
 window.popupMaxPreviewCharacters=6000// allows navigation popups to work with large infoboxes


 //---------------------------------------------------------------------------------
 // This is the developmental version of the taxonomy browser script
 //------------------------------------------------------------------------------------
 varnLevels=3;// this determines how many levels are show in each iteration
 varnListLevels=3;
 varnInteractiveLevels=1;
 vardebug=true;
 varnRun=1;
 varntt=false;//true; // enable create new taxonomy template tool (development only)
 varbullets="nobullets";// suppress the bullets and place expand/collapse symbols to left: nobullets|bullets
 vargenus="";

 /**
  * This script adds a tool and dialog using code modified from the following tutorial script
  * 
  * Tutorial script: QuickRC ("Quick Recent Changes")
  *
  * A tutorial user script which adds a "Quick changelog" link to the page skin's
  * toolbox, and when clicked it pops up a dialog with up to 25 recent edits.
  *
  * Demonstrates:
  * - Use of the API
  * - Use of jQuery
  * - Use of ResourceLoader and some of the default modules that come with it
  * - Use of localization
  *
  * (Be bold and improve it!)
  *
  * Authors:
  * Erik Moeller, 2011, public domain
  * Brion Vibber, 2012, public domain
  */

 messages={
 'en':{
 'taxonomy-title':'Taxonomy template browser',
 'taxonomy-greeting':'Welcome, 1ドル!',
 'taxonomy-intro':'The following templates are children of this taxon taxonomy template:',
 'taxonomy-link':'Taxonomy browser',
 'taxonomy-link2':'Taxonomy (test)',
 'taxonomy-tooltip':'Get children for particular taxonomy template',
 'ntt-link':'Create new template',
 'ntt-tooltip':'Create new taxonomy template'
 }
 };

 mw.messages.set(messages.en);
 varlang=mw.config.get('wgUserLanguage');
 if(lang&&lang!='en'&&langinmessages){
 mw.messages.set(messages[lang]);
 }

 // Import the jQuery dialog plugin before starting the rest of this script
 mw.loader.using(['jquery.ui'],function(){

 functionopenTaxonBrowserDialog(taxon){
 taxon=getDefaultTaxonName(taxon);
 var$dialog=$('<div id="dialog" ></div>')
 .html(showTaxonomyBrowserForm(taxon)
 //	+ '<div id="output" class="taxonomy-browser" style="align:left">Tree will appear here</div>'
 //	+ showNewTaxonomyTemplateForm(taxon)
 )
 .dialog({
 autoOpen:true,
 title:mw.message('taxonomy-title').plain(),
 width:'60%',
 modal:true
 });
 }
 functionopenCreateTaxonomyTemplateDialog(taxon){
 taxon=getDefaultTaxonName(taxon);
 var$dialog=$('<div></div>')
 .html(showNewTaxonomyTemplateForm(taxon))
 .dialog({
 autoOpen:true,
 title:mw.message('taxonomy-title').plain(),
 width:'50%',
 modal:true
 });
 }
 functionrenderTaxonomyDialog(output){
 var$dialog=$('<div></div>')
 .html(
 '<strong>'+mw.message('taxonomy-greeting',mw.user.getName()).escaped()+'</strong> '
 +mw.message('taxonomy-intro').escaped()
 +output
 )
 .dialog({
 autoOpen:true,
 title:mw.message('taxonomy-title').plain(),
 width:'60%',
 modal:true
 });
 }
 //------------------------------------ the dialog functions ---------------------------
 functionshowTaxonomyBrowserForm(taxon){

 if(bullets=="nobullets")$('<style>ul.nobullets{list-style: none;}</style>').appendTo('head');

 vartext="";
 text+='<div id="tb" class="taxonomy-browser" style="background-color:#f8f9fa;">';
 text+='<div style="border:1px;padding:0.2em;margin:0.5em;" >'
 +'Taxon name:&nbsp;<input id="taxonId" type="text" name="taxonname" style="width:200px;" value="'+taxon+'">'
 +'&nbsp;&nbsp;<input id="gettree" type="submit" value="Get taxonomic tree">'
 //+ ' <button id="gettree2" >Test</button>'
 +'</div>\n';
 text+='<div style="width:20em;float:left;border:1px solid #dddddd;padding:0.2em;margin:0.5em;" >'
 +'<div style="width:100%;float:left;" title="number of levels in hierarchical tree" >'
 +'Levels to display: <input id="levelsId" type="text" name="levels" value="1" style="width:20px;text-align:right;float:right;" ></div>'
 +'<div style="width:100%;float:left;" title="do not show extinct taxa" >'
 +'Hide extinct taxa: <input id="extinctId" type="checkbox" name="extinct" value="no" style="float:right;"></div>'
 +'<div style="width:100%;float:left;" title="bold taxa that would be displayed in automatic taxobox" >'
 +'Bold displayed taxa: <input id="bolddisplayId" type="checkbox" name="bolddisplay" value="no" style="float:right;"></div>'
 +'<div style="width:100%;float:left;" title="do not show taxa with no children" >'
 +'Hide childless taxa: <input id="childlessId" type="checkbox" name="childless" value="no" style="float:right;" ></div>'
 +'<div style="width:100%;float:left;" title="link Wikipedia articles" >'
 +'Link the Wikipedia article: <input id="wikiArticleId" type="checkbox" name="childless" value="no" style="float:right;" ></div>'
 +'<div style="width:100%;float:left;" title="show speciesboxes" >'
 +'Show speciesboxes: <input id="showSpeciesboxesId" type="checkbox" name="childless" value="yes" checked style="float:right;" ></div>'
 +'<div style="width:100%;float:left;" title="show all speciesboxes at genus" >'
 +'Show speciesboxes (all on genus): <input id="showSpeciesboxesAllId" type="checkbox" name="childless" value="no" style="float:right;" ></div>'
 +'</div>\n';
 text+='<div style="width:9em;float:left;border:1px solid #dddddd;padding:0.2em;margin:0.5em;">'
 +'Output mode: '
 +'<div style="width:100%;float:left;" title="simple listing of set number of levels in taxonomic tree" >'
 +'<input id="mode-list" type="radio" name="mode" value="list" >List</div>'
 +'<div style="width:100%;float:left;" title="interactive traversing of taxonomic tree" >'
 +'<input id="mode-interactive" type="radio" name="mode" value="interactive" checked >Interactive</div>'
 +'</div>\n';
 text+='<div style="width:10em;float:left;border:1px solid #dddddd;padding:0.2em;margin:0.5em;">'
 +'Show parameters:'
 +'<div style="width:100%;float:left;" title="show rank and show template parameters in tooltip" >'
 +'<input id="params-show" type="radio" name="parammode" value="show" checked >Yes</div>'
 +'<div style="width:100%;float:left;" title="" >'
 +'<input id="params-hide" type="radio" name="parammode" value="hide" >No</div>'
 +'</div>\n';
 text+='<div style="width:11em;float:left;border:1px solid #dddddd;padding:0.2em;margin:0.5em;">'//visibility:hidden;">'
 +'Search:'
 +'<div style="width:100%;float:left;" title="strict matching of parent taxa (excludes variant templates)" >'
 +'<input id="search-strict" type="radio" name="searchtype" value="strict" >Strict</div>'
 +'<div style="width:100%;float:left;" title="default matching of parent taxa (merge variant templates)" >'
 +'<input id="search-default" type="radio" name="searchtype" value="default" checked >Default</div>'
 +'<div style="width:100%;float:left;" title="loose matching of parent taxa (includes variant templates as children)" >'
 +'<input id="search-loose" type="radio" name="searchtype" value="loose" >Loose</div>'
 +'<div style="width:100%;float:left;" title="ignore matching of parent taxa (includes variant templates and overlapping names)" >'
 +'<input id="search-all" type="radio" name="searchtype" value="all" >All</div>'
 +'<div style="width:100%;float:left;" title="uses same_as= to assign parent templates when parent not set (slow)" >'
 +'<input id="search-sameas" type="radio" name="searchtype" value="sameas" >Same as (slow)</div>'
 +'</div>\n';
 text+='<input id="export-html" type="submit" value="Export tree html">';
 text+='<div style="clear:both;"> </div>';
 text+='</div>\n';
 //text += '<div style="clear:both;"> </div>'; 
 // add container for tree
 text+='<div id="output" class="taxonomy-browser" style="clear:both;"> </div>';
 text+='<div class="taxonomy-browser" style="clear:both;"> \
 		 <textarea id="html-text" rows="4" name="html-text" style="width:100%;" ></textarea> \
 		 </div>';
 returntext;
 }
 functionshowNewTaxonomyTemplateForm(taxon){
 vartext="";
 text+='<div id="tb" class="taxonomy-browser" >';
 text+='<div style="border:1px;padding:0.2em;margin:0.5em;" >'
 +'Taxon name:<input id="ntt-taxon" type="text" name="taxonname" value="'+taxon+'" style="width:250px;">'
 +'<button id="nnt-createtemplate" >Create new taxonomy template</button><br/>'
 +'</div>\n';
 text+='<div style="width:325px;float:left;border:0px solid #dddddd;padding:0.2em;margin:0.5em;" >'
 +'<div style="width:100%;padding:0.2em;float:left;" title="parent taxon of taxon" >'
 +'<code>parent=</code> <input id="ntt-parent" type="text" name="parent" value="" style="width:250px;float:right;" ></div>'
 +'<div style="width:100%;padding:0.2em;float:left;" title="rank of taxon" >'
 +'<code>rank=</code> <input id="ntt-rank" type="text" name="rank" value="" style="width:250px;float:right;" ></div>'
 +'<div style="width:100%;padding:0.2em;float:left;" title="name of taxon with redirect to wikipedia article link if necessary" >'
 +'<code>link=</code> <input id="ntt-link" type="text" name="link" value="'+taxon+'" style="width:250px;float:right;" ></div>'
 +'<div style="width:100%;padding:0.2em;float:left;" title="get unset parents from another taxonomy template" >'
 +'<code>same as=</code> <input id="ntt-sameas" type="text" name="sameas" value="" style="width:250px;float:right;" ></div>'
 +'</div>\n';
 text+='<div style="width:150px;float:left;border:1px solid #dddddd;padding:0.2em;margin:1em;" >'
 +'<div style="width:100%;padding:0.2em;float:left;" title="set Yes to indicate extinct taxon" >'
 +'<code>extinct=</code> <input id="ntt-extinct" type="checkbox" name="extinct" value="no" style="float:right;"></div>'
 +'<div style="width:100%;padding:0.2em;float:left;" title="set Yes to always display in taxobox=" >'
 +'<code>display_always=</code> <input id="ntt-alwaysdisplay" type="checkbox" name="displayalways" value="no" style="float:right;"></div>'
 +'</div>\n';
 text+='<div style="width:575px;float:left;border:0px solid #dddddd;padding:0.2em;margin:0.5em;" >'
 +'<div style="width:100%;padding:0.2em;float:left;" title="reference for taxonomic information" >'
 //+	'<code>refs=</code> <input id="ntt-refs" type="text" name="refs" value="" style="width:500px;text-align:right;float:right;" ></div>'
 +'<code>refs=</code> <textarea id="ntt-refs" rows="4" name="comment" style="width:505px;float:right;" ></textarea></div>'
 +'</div>\n';

 text+='</div>\n';
 returntext;
 }
 functioncreateNewTemplate(taxon){
 //taxon = prompt("Enter taxon name for new taxonomy template:", getDefaultTaxonName(taxon));

 varlink=$('#ntt-link').val();// use taxon 
 //alert(link);
 //if (link.includes("|")) link.replace("|","%7c"); 
 //alert(link);
 varparent=$('#ntt-parent').val();
 varrank=$('#ntt-rank').val();
 varsameas=$('#ntt-sameas').val();
 varrefs=$('#ntt-refs').val();

 varextinct="";
 if($("#ntt-extinct").prop("checked"))extinct="yes";// set to yes or leave empty
 varalwaysdisplay="";
 if($("#ntt-alwaysdisplay").prop("checked"))alwaysdisplay="yes";// set to yes or leave empty


 varurl='https://en.wikipedia.org/w/index.php?action=edit&title=Template:taxonomy/'
 +$('#ntt-taxon').val()
 +'&preload=User:Jts1882/Taxonomy/preload'
 +'&preloadparams%5b%5d='+link// link=1ドル use taxon 
 +'&preloadparams%5b%5d='+parent// parent=2ドル
 +'&preloadparams%5b%5d='+rank// rank=3ドル
 +'&preloadparams%5b%5d='+extinct// extinct=4ドル
 +'&preloadparams%5b%5d='+alwaysdisplay// display_always=5ドル
 +'&preloadparams%5b%5d='+refs// refs=6ドル
 +'&preloadparams%5b%5d='+sameas;// same_as=7ドル

 //window.location = url; //"www.example.com/index.php?id=" + this.id;
 window.open(url,'window name','window settings');


 // target="_blank">
 }
 functionexportTree(){// Note this needs a title in the <a> tag to work properly

 //alert("HTML code of taxonomic tree copied to clipboard");
 vartext=$('#output').html();// get content of div containing tree

 /*<li id="Ranidae-2-1" class="taxon_identifier">
  	 <a href="/wiki/Template:Taxonomy/Ranidae" 
  	 title="parameters: rank=familia parent=Ranoidea link=True frog|Ranidae">Ranidae</a>
  	 <span class="tree-info"> [familia] [12]</span> 
  	 <span class="childbutton" id="Ranidae-2-1-load" style="font-size:120%;"> ⊞ </span> 
  	 <span class="childbutton" id="Ranidae-2-1-collapse" style="font-size:120%;display: none;"> ⊟ </span> 
  	 <span class="childbutton" id="Ranidae-2-1-expand" style="font-size:120%;display: none;"> ⊞ </span>	</li> 	*/

 //var title = text.match(/" title[\s]*=[\s]*[\w\s\|\.=\[\]\/"':]*>/g); // match /" title= ... >/
 //console.log(title);

 text=text.replace(/" title[\s]*=[\s]*[\w\s\|\.=\[\]\(\)\/"':]*"/g,"#");// replace title with #
 text=text.replace(/ class="new"/g,'');// remove class="new"
 text=text.replace(/<a href="\/wiki\//g,"[[");// replace <a> opening with wikitext
 text=text.replace(/#>/g,'|');// replace the #> with a pipe
 text=text.replace(/" target="_blank">/g,'|');// remove target="_blank" and add pipe
 text=text.replace(/<\/a>/g,']]');/// replace <a> closing with wikitext

 text=text.replace(/<span class=\"childbutton\"[\w\d\s\|\/\.=_\[\]"':;<>\%\-]*[⊞⊟ ]*<\/span>/g,"");//remove interactive symbols

 $('#html-text').val(text);// place in textarea

 $('#html-text').select();// Select the text field
 document.execCommand("copy");// Copy the text in the textarea to the clipboard
 }

 functiongetTree(taxon){

 cleanUpAfterPreviousRuns();
 varlevel=nListLevels;
 vardepth=1;

 //taxon = prompt("Enter the parent taxon:", getDefaultTaxonName(taxon));
 taxon=$('#taxonId').val();

 level=$('#levelsId').val();// can be changed in getTaxonName

 varmode="LIST";
 if($("#mode-interactive").prop("checked")){
 mode="INTERACTIVE";
 }


 nInteractiveLevels=level;// TODO remove multiple level parameters when two methods combined
 taxon=taxon.replace(/_/g," ");
 vartaxonId=encodeID(taxon,depth,1);// + '-li';

 // note class="bullets" or "nobullets";
 varoutput='<br/><ul class="'+bullets+'">'
 +'<li class="taxon_identifier" id="'+taxonId+'"><b>'+taxon+'</b>'
 +'<span class="tree-info"></span>'
 +'</li>'
 +'<br/></ul>';

 $('#output').html(output);

 //addChildrenInteractive(taxon, level, mode , depth, taxonId);

 // we don't ahve the rank, so first get the rank (needed to get speciesboxes for genus)
 varsearch='intitle:Taxonomy\\/'+escapeSeq(taxon)+' insource:/\| *rank *= *[a-zA-Z]+/';
 console.log(search);


 jQuery.getJSON(
 mw.util.wikiScript('api'),
 {'format':'json','action':'query','list':'search','srnamespace':10,'srlimit':5000,'srsearch':search},
 function(data){
 if(data.query==undefined)return;// intermittant and seemingly random - not clear why
 varnResults=data.query.searchinfo.totalhits;
 console.log(data.query);

 if(nResults===0){
 console.log('no results for rank of taxon '+taxon);
 addChildrenInteractive(taxon,level,mode,depth,taxonId);// pass without a rank
 }
 else{// so we have some results
 $.each(data.query.search,function(index,sr){
 if(sr.title=="Template:Taxonomy/"+taxon){
 console.log(sr.snippet);
 varmatch=sr.snippet.match(/rank[\s]*=[\s]*([a-zA-Z ]*)/);
 if(match&&match[1]){
 varrank=match[1];
 console.log("rank="+rank);
 addChildrenInteractive(taxon,level,mode,depth,taxonId,rank);

 }
 }
 });
 }
 }
 );

 nRun+=1;
 }


 // ----------------------------- utlity functions -------------------------------
 functionescapeSeq(taxon){
 // Special Regex Characters: ., +*?^$()[]{}| 
 // Only these four characters require escape sequence inside the bracket list: ^-]\
 taxon=taxon.replace(" ("," \\(");
 taxon=taxon.replace(")","\\)");
 taxon=taxon.replace("?","\\?");
 //taxon = taxon.replace("/","\\/");
 taxon=taxon.replace(/\//g,"\\/");
 taxon=taxon.replace(".","\\.");

 returntaxon;
 }
 functionencodeID(taxon,depth,count,parent){

 //if (parent) taxon = taxon + '-' + parent; 
 //taxon = taxon.replace("/","_X_");
 //taxon = taxon.replace("(","_Y_");
 //taxon = taxon.replace(")","_Z_");
 //taxon = taxon.replace(" ","_S_");
 //taxon = taxon.replace("?","_Q_");
 taxon=taxon.replace(/\//g,"_X_");
 taxon=taxon.replace(/\(/g,"_Y_");
 taxon=taxon.replace(/\)/g,"_Z_");
 taxon=taxon.replace(/ /g,"_S_");
 taxon=taxon.replace(/\?/g,"_Q_");
 taxon=taxon.replace(/\./g,"_D_");
 taxon=taxon.replace(/\"/g,"_E_");
 //return taxon + '-' + depth.toString() + '-' + count.toString();
 if($('#'+taxon).length>0)taxon=taxon+'-1';// if duplicate due to variant templates
 returntaxon;
 //return encodeURIComponent(taxon);
 }
 functiondecodeID(taxon){
 //taxon = taxon.replace("_X_","/");
 //taxon = taxon.replace("_Y_","(");
 //taxon = taxon.replace("_Z_",")");
 //taxon = taxon.replace("_S_"," ");
 //taxon = taxon.replace("_Q_","?");
 taxon=taxon.replace(/_X_/g,"/");
 taxon=taxon.replace(/_Y_/g,"(");
 taxon=taxon.replace(/_Z_/g,")");
 taxon=taxon.replace(/_S_/g," ");
 taxon=taxon.replace(/_Q_/g,"?");
 taxon=taxon.replace(/_D_/g,".");
 returntaxon;
 //return encodeURIComponent(taxon);
 }
 functiongetTaxonName(taxon){

 taxon=prompt("Enter the parent taxon:",getDefaultTaxonName(taxon));
 varsplit=taxon.split(" ");
 if(split[1]){
 varnumber=parseInt(split[1]);
 //if (number != NaN) nLevels = number;
 if(!isNaN(number)){
 nLevels=number;
 nInteractiveLevels=number;// TODO make decision on level parameters
 nListLevels=number;
 }
 taxon=split[0];
 }
 returntaxon;
 }
 functiongetDefaultTaxonName(taxon){// get default from page name

 varpage=mw.config.get('wgPageName');

 if(page.includes("Template:Taxonomy/")){
 varres=page.split("Template:Taxonomy/");
 taxon=res[1];
 }
 else{
 vartitle=newmw.Title(page);
 varns=title.getNamespaceId();
 if(ns===0&&!page.includes(" "))taxon=page;
 }
 returntaxon;
 }
 functiongetParameterString(index,sr){

 varparamString="parameters: ";//" [extra info] ";

 varsnippet=sr.snippet;// this contains the template code

 if(snippet.includes("rank")){
 //var rank = templateData.match(/rank[\s]*=[\s]*[a-zA-Z]*/); //gets "rank%s=%sclassis"
 varrank=snippet.match(/rank[\s]*=[\s]*([a-zA-Z ]*)/);
 //if (rank && rank[0] ) 	extraInfo = ' ['+rank[0]+']';
 if(rank&&rank[0])paramString+=rank[0];
 }
 if(snippet.includes("parent")){
 varparent=snippet.match(/parent[\s]*=[\s]*([a-zA-Z\-\(\)\._ \/\?]*)/);
 if(parent&&parent[0])paramString+=' '+parent[0];
 }
 if(snippet.includes("link")){
 varlink=snippet.match(/link[\s]*=[\s]*([a-zA-Z\-\|#\.\(\)"'&; ]*)/);
 //if (snippet.includes("Ichthyostegalia")) alert(link[0] + '_' + link[1] + '_');
 if(link&&link[0])paramString+=' '+link[0];
 }
 if(snippet.includes("extinct")){
 varextinct=snippet.match(/extinct[\s]*=[\s]*([a-zA-Z ]*)/);
 if(extinct&&extinct[0])paramString+=' '+extinct[0];
 }
 if(snippet.includes("always_display")){
 varalways=snippet.match(/always_display[\s]*=[\s]*([a-zA-Z ]*)/);
 if(always&&always[0])paramString+=' '+always[0];
 }
 if(snippet.includes("same_as")||snippet.includes("same as")){
 varsameas=snippet.match(/same[ _]as[\s]*=[\s]*([a-zA-Z]*)/);
 if(sameas&&sameas[0])paramString+=' '+sameas[0];
 }
 if(snippet.includes("refs")){
 varrefs=snippet.match(/refs[\s]*=[\s]*([a-zA-Z0-9{}| ]*)/);
 varrefText='refs=[empty]';
 if(refs&&refs[1])refText='refs=[...]';
 paramString+=' '+refText;
 }
 //paramString = paramString.replace(/\"/g, '\\\"'); // " already replaced by &quot; in snippet
 return'title="'+paramString+'" ';
 //return 'title="' + encodeURI(paramString) + '" '; // what if " in title string

 }
 functiongetSameAs(index,sr){
 varsnippet=sr.snippet;// this contains the template code
 if(snippet.includes("same_as")||snippet.includes("same as")){
 varsameas=snippet.match(/same[ _]as[\s]*=[\s]*([a-zA-Z]*)/);
 if(sameas&&sameas[0])
 return' [same_as=<a href="/wiki/Template:Taxonomy/'+sameas[1]+'" title="">'+sameas[1]+'</a>]';
 }
 returnfalse;
 }
 functiongetExtinct(index,sr){
 varsnippet=sr.snippet;// this contains the template code
 if(snippet.includes("extinct")){
 varextinct=snippet.match(/extinct[\s]*=[\s]*([a-zA-Z ]*)/);
 if(extinct&&extinct[1]){
 varvalue=extinct[1].toLowerCase();
 if(value=="yes"||value=="true")returntrue;
 }
 }
 returnfalse;
 }
 functiongetAlwaysDisplay(index,sr){

 if(!$("#bolddisplayId").prop("checked"))returnfalse;

 varsnippet=sr.snippet;// this contains the template code
 if(snippet.includes("always_display")){
 varalwaysDisplay=snippet.match(/always_display[\s]*=[\s]*([a-zA-Z ]*)/);
 if(alwaysDisplay&&alwaysDisplay[1]){
 varvalue=alwaysDisplay[1].toLowerCase();
 if(value=="yes"||value=="true")returntrue;
 }
 }
 if(snippet.includes("rank")){
 varrank=snippet.match(/rank[\s]*=[\s]*([a-zA-Z ]*)/);
 if(rank&&rank[1]){
 varvalue=rank[1].toLowerCase();
 if(value=='ordo'||value=='order'||value=='classis'||value=='class'
 ||value=='kingdom'||value=='phylum'||value=='divisio'||value=='division'
 ||value=='familia'||value=='family'||value=='classis'||value=='class'
 )returntrue;
 }
 }
 returnfalse;
 }
 functiongetParent(index,sr){
 varsnippet=sr.snippet;// this contains the template code
 if(snippet.includes("parent")){
 //if (snippet.includes("Vaccinium")) alert(snippet);

 // snippet contains "<span class=\"searchmatch\">parent=Reptiliomorpha</span>" (not with regex search)
 //snippet = snippet.replace("</span>",""); 

 //var parent = snippet.match(/parent[\s]*=[\s]*([a-zA-Z\._ \/\?]*)/); 
 varparent=snippet.match(/parent[\s]*=[\s]*([a-zA-Z\-\(\)\._ \/\?]*)/);
 if(parent&&parent[1]){
 returnparent[1].trim();
 }
 }
 returnfalse;
 }
 functiongetLink(index,sr){
 varsnippet=sr.snippet;// this contains the template code
 if(snippet.includes("link")){
 varlink=snippet.match(/link[\s]*=[\s]*([a-zA-Z\-\|#\.\(\)"'&; ]*)/);
 //if (link && link[0] ) 	return link[0];
 if(link&&link[1]){
 varredirect=link[1].match(/([a-zA-Z\-#\.\(\)"'&; ]*)|(.*)/);
 if(redirect&&redirect[1])returnredirect[1];
 returnlink[1];
 //return link[1];
 }
 }
 }
 functiongetSnippet(index,sr){
 varsnippet=sr.snippet;// this contains the template code
 snippet=snippet.replace('<span class=\"searchmatch\">',"");
 snippet=snippet.replace("</span>","");
 returnsnippet;
 }
 functiongetRank(index,sr){
 varsnippet=sr.snippet;// this contains the template code
 if(snippet.includes("rank")){
 varrank=snippet.match(/rank[\s]*=[\s]*([a-zA-Z ]*)/);
 if(rank&&rank[1])returnrank[1];
 }
 /*	if (snippet.includes("same_as") || snippet.includes("same as") ) {
 			var sameas = snippet.match(/same[ _]as[\s]*=[\s]*([a-zA-Z]*)/);
 			if (sameas && sameas[0] ) 	return sameas[0];
 		}*/
 returnfalse;//"unknown rank";
 }
 functionformatByRank(name,rank){
 // check for genus and species; inlcude should pick up subgenus, species group, etc
 if(rank&&(rank.includes("genus")||rank.includes("species"))){
 name='<i>'+name+'</i>';
 }
 returnname;
 }
 functioncleanUpAfterPreviousRuns(){
 if(nRun>1){
 //if (debug) alert ("run number = "+ nRun);
 $('.taxon_identifier').remove();
 }
 }

 functionInfraGenericRank(rank){
 switch(rank){
 case"genus":
 case"subgenus":
 case"sectio":
 case"series":
 returntrue;
 default:
 returnfalse;
 }
 }

 functiondoesPageExist(child,linkx,childIdx,rankx,namex,callback){

 vartaxon=child;
 varoutput="";
 //API request: https://en.wikipedia.org/w/api.php?action=query&format=json&prop=&titles=Sirenidae%7CProsirenidae&formatversion=2

 jQuery.getJSON(
 mw.util.wikiScript('api'),
 {
 'format':'json',
 'action':'query',
 'titles':taxon,
 },
 function(data){
 console.log(data.query);

 if(data.query==undefined){
 // intermittant and seemingly random - not clear why
 alert("undefined data.query: taxon="+taxon);
 return;
 }
 //var index = 0;
 varexists=false;
 $.each(data.query.pages,function(index,element){
 vartitle=data.query.pages[index].title;
 if(data.query.pages[index].pageid){
 varpageid=data.query.pages[index].pageid;
 exists=true;
 //console.log("index="+index+"; title="+title+"; pageid="+pageid+"; taxon="+taxon+"; exists="+exists);
 }
 elseif(data.query.pages[index].missing==""){// the API returns missing="" (the API sandbox returns missing=true)
 varmissing=data.query.pages[index].missing;
 exists=false;
 //console.log("index="+index+"; title="+title+"; missing="+missing+"; taxon="+taxon);
 }
 callback(exists);
 });
 //console.log(taxon);
 }
 );
 }


 functiongetTaxonRank(taxon,callback){

 varsearch='hastemplate:Taxonomy/'+taxon+' insource:/\| *rank *=[a-zA-Z]+/';

 jQuery.getJSON(
 mw.util.wikiScript('api'),
 {
 'format':'json',
 'action':'query',
 'list':'search',
 'srnamespace':10,// search in template namespace
 'srlimit':500,
 'srsearch':search

 },
 function(data){

 if(data.query==undefined){
 // intermittant and seemingly random - not clear why
 alert("undefined data.query: id="+taxonId);
 return;
 }
 varnResults=data.query.searchinfo.totalhits;
 console.log(data.query);

 if(nResults===0){
 console.log('no results for rank of taxon '+taxon);
 }
 else{// so we have some results
 $.each(data.query.search,function(index,sr){
 if(sr.title=="Template:Taxonomy/"+taxon){
 //console.log(sr.snippet);
 varmatch=sr.snippet.match(/rank[\s]*=[\s]*([a-zA-Z ]*)/);
 if(match&&match[1]){
 varrank=match[1];
 console.log("rank="+rank);
 callback;
 return(rank);
 }
 }
 });
 }
 }
 );
 }

 functiongetTreeInteractive(taxon){

 cleanUpAfterPreviousRuns();

 //taxon = prompt("Enter the parent taxon:", getDefaultTaxonName(taxon));
 taxon=getTaxonName(taxon);

 varoutput='<br/><ul><li class="taxon_identifier" id="'+encodeID(taxon)+'-li"><b>'+taxon+'</b></li><br/></ul>';
 //var output= '<br/><ul><li class="taxon_identifier" id="' + taxon + '-li"><b>' + taxon + '</b></li><br/></ul>';

 varlevel=nInteractiveLevels;// nLevels is globally set at top
 addChildrenInteractive(taxon,level,"INTERACTIVE");
 renderTaxonomyDialog(output);
 nRun+=1;
 }

 functionaddChildrenInteractive(taxon,level,mode,depth,taxonId,rank,parent){
 if(level==0)return;

 level-=1;
 depth+=1;

 // perform search using API with one of jQuery's AJAX functions
 //var search = 'insource:/parent[ ]*=[ ]*' + escapeSeq(taxon) + '[\\s]*/ prefix:Template:Taxonomy/';

 // strict search using RegEx /search terms/
 varsearch='insource:/parent[ ]*=[ ]*';// search for parent
 if($("#search-sameas").prop("checked")){// else search for parent or same as
 // insource: /[ps]a[rm]e[n ][ta][s]*[ ]*=[ ]*Archaeplastida/ prefix:Template:Taxonomy/
 search='insource: /[ps]a[rm]e[n _][ta][s]*[ ]*=[ ]*';
 }
 search+=escapeSeq(taxon)
 +'[a-zA-Z0-9 \\.\\/\\?\\(\\)\\\s]*/'// regex expression for search - we want the name and variants
 +' prefix:Template:Taxonomy/';// restrict search to taxonomy templates

 // looser search with "search terms" 
 // -- this gives 9 children for Reptilomorpha and Reptilomorpha/? instead of 9 and 2
 // -- but the issue is handling the variant templates (see parent match code below)
 //	 if ($("#search-loose").prop("checked")) {
 //	 	search = 'insource:"parent[ ]+=[ ]+' + escapeSeq(taxon) + '" prefix:Template:Taxonomy/';
 //	 	alert("loose search");
 //	 }
 // not what is wanted: the search wants to retrieve the full name, then decide how to handle it

 varshowParameters=true;
 if($("#params-hide").prop("checked"))showParameters=false;
 varhideExtinct=false;
 if($("#extinctId").prop("checked"))hideExtinct=true;
 varhideChildless=false;
 if($("#childlessId").prop("checked"))hideChildless=true;
 varlinkWikiArticle=false;
 if($("#wikiArticleId").prop("checked"))linkWikiArticle=true;
 varshowSpeciesboxes=false;
 varshowSpeciesboxesAll=false;
 if($("#showSpeciesboxesId").prop("checked"))showSpeciesboxes=true;
 if($("#showSpeciesboxesAllId").prop("checked"))showSpeciesboxesAll=true;

 //TODO Ass [a-zA-Z\/\?\s]*
 //alert(search);
 //search ="insource:/parent[ ]*=[ ]*Reptiliomorpha\\/\\?[\\s]*/ prefix:Template:Taxonomy/";

 jQuery.getJSON(
 mw.util.wikiScript('api'),
 {
 'format':'json',
 'action':'query',
 'list':'search',
 'srnamespace':10,// search in template namespace
 'srlimit':500,
 //	'srqiprofile' : 'classic', 
 'srsearch':search// uses /regex/

 },
 function(data){
 varoutput="";

 if(data.query==undefined){
 // intermittant and seemly random - not clear why
 alert("undefined data.query: id="+taxonId);
 // try again?
 addChildrenInteractive(taxon,level+1,mode,depth-1,taxonId,rank,parent);
 return;
 }
 varnResults=data.query.searchinfo.totalhits;
 //alert ("nResults="+nResults);
 varcount=0;

 if(nResults===0){
 // if (debug) alert ('no results for taxon (rank) = ' + taxon + ' (' + rank + ')');
 // speciesboxes search now launched after the end of the if else results loop

 output=' [no child templates]';// "zero hits: " + taxon;
 if(hideChildless){
 $('#'+taxonId).hide();// hide taxon
 }
 else{
 if(showParameters)$('#'+taxonId+' span.tree-info').append(output);
 if(rank!="genus"&&rank!="subgenus"&&rank!="sectio"&&rank!="series"){
 $('#'+taxonId+'-collapse').html('<span style="color:grey;"> &#8865; </span>').off("click");// change symbols and disable
 }
 }
 }
 else{// so we have some results
 if(debug&&showParameters)$('#'+taxonId+' span.tree-info').append(" ["+nResults+"]");// number of results; includes variants

 $('#'+taxonId).append('<ul class="'+bullets+'"></ul>');// add ul element to contain children
 varlistCount=0;

 data.query.search.sort(function(a,b){returna.title>b.title});// sort on title
 console.log(data.query.search);

 $.each(data.query.search,function(index,sr){

 varchild=sr.title.replace("Template:Taxonomy/","");
 varrank=getRank(index,sr);
 varextinct=getExtinct(index,sr);
 varlink=getLink(index,sr);
 varparent=getParent(index,sr);
 varvariant="";
 varalwaysDisplay=getAlwaysDisplay(index,sr);
 varsameAs=getSameAs(index,sr);
 vartitleString=' title=""';// alt text to display on mouse over [default empty to help export code]
 //var pageId = sr.pageid.toString();

 if(showParameters){
 //titleString = 'title="rank='+rank+'; parent='+parent+'; always_display='+alwaysDisplay+'" '; 
 titleString=getParameterString(index,sr);
 }
 if(hideExtinct&&extinct)returntrue;// don't show extinct taxa 

 if(rank=='genus')genus=child;// a global required for speciesbox searching

 // select taxa to display
 // the search results for Template:Taxonomy/TAXON will also include
 // variant templates, e.g. Template:Taxonomy/TAXON/displayed 
 // longer names, e.g. Template:Taxonomy/MAMMALIAformes
 // we normally (strict search) don't want to include those under base template name
 if(1==1&&(!parent||parent!=taxon)){

 if(debug&&parent&&parent.includes("Vaccinium")){// special case
 alert("parent not matching for child "+child+"\nparent="+parent+"\ntaxon="+taxon);
 }

 varaccept=false;// we have a parent mismatch

 if($("#search-loose").prop("checked")||$("#search-default").prop("checked")){// if loose match allowed

 //if (debug) alert("in loose: child="+child+"; taxon="+taxon+"; parent="+parent);
 if(parent&&parent.includes(taxon+"/")){
 accept=true;//accept variants - "taxon/variant"
 variant=' [parent='+parent+']';
 }

 if($("#search-default").prop("checked")){
 if($("#"+child.split("/")).length>0){
 //if (debug) alert(child.split("/")[0]);
 accept=false;// don't shown the variants in list (their content will show in main list) 
 }
 }
 }

 if($("#search-all").prop("checked")){// if all matches wanted
 accept=true;
 variant=' [parent='+parent+']';
 }

 if(sameAs&&$("#search-sameas").prop("checked")){// accept if sameas (any or =taxon)
 accept=true;
 //if (debug) alert('child='+child+': no parent, same_as='+sameAs);
 }
 if(accept==false)returntrue;// skip to next in each loop (equivalent of continue;
 }// check parents loop

 // if ($("#search-loose").prop("checked")) { // if loose match (testing)
 // // can we exlude reptilomorpha/? if sister reptilomorpha
 // // skip variant if element at base name exists (unreliable as requires base name before variants)
 // 	if (child.includes("/")) { 
 // 		var value = child.split("/");
 // 		if (value[1] && $('#'+encodeID(value[0],depth)+'-li').length ) {
 // 		//alert('child='+child+'; value1='+value[0]); 
 // 		return true; 
 // 		}
 // }
 // }

 // display the selected child taxa (either matched parents or allowed loose match)
 count+=1;
 varname=formatByRank(child,rank);// italicise if genus or species rank
 if(alwaysDisplay)name='<b>'+name+'</b>';

 varchildId=encodeID(child,depth,count,parent);// + '-li';
 output='<li id="'+childId+'" class="taxon_identifier" >';
 if(extinct)output+='†';
 output+='<a href="/wiki/'+sr.title+'" '+titleString+' target="_blank" >'+name+'</a>';

 output+='<span class="tree-info">';// span for add information
 if(showParameters){
 if(rank)output+=' ['+rank+']';
 if(sameAs)output+=sameAs;
 if(variant)output+=variant;
 }

 if(linkWikiArticle){
 varoutputWiki="";
 vartest=doesPageExist(child,link,childId,rank,name,function(exists){
 //console.log("callback; exists="+exists);

 if(exists&&link==child){
 outputWiki+=' (article: <a href="/wiki/'+child+'" '+' target="_blank" >'+name+'</a>)';// name is formated
 }
 elseif(!exists&&link==child){
 outputWiki+=' (redlink: <a class="new" href="/wiki/'+child+'" '+' target="_blank" >'+name+'</a>)';// name is formated
 }
 else
 {
 outputWiki+=' (redirects to: <a href="/wiki/'+link+'" '+' target="_blank" >'+formatByRank(link,rank)+'</a>';
 //output += ' ; redirects from <a href="/wiki/' + child + '" ' + ' target="_blank" >' + name + '</a>'; //keep for debugging
 outputWiki+=')';
 }
 alert(outputWiki);
 console.log(outputWiki);
 $('#'+childId+' span.tree-info').append(outputWiki);
 });
 }


 if(debug){
 //output += extraText(index , sr); 
 //output += " [child="+child+"; parent="+parent+"; taxon="+taxon+ "]";
 }
 output+='</span>';// close info span

 varoutput2="";// add the spans with interactive elements
 if(level===0&&mode=="INTERACTIVE"){
 output2+=' <span class="childbutton" id="'+childId+'-load" style="font-size:120%;"> &#8862; </span>';// +/- in square &#8862;/&#8863; +/-/x in circle &#8853;/&#8854;/&#8855;
 output2+=' <span class="childbutton" id="'+childId+'-collapse" style="font-size:120%;display: none;"> &#8863; </span>';// +/- in square &#8862;/&#8863; +/-/x in circle &#8853;/&#8854;/&#8855;
 output2+=' <span class="childbutton" id="'+childId+'-expand" style="font-size:120%;display: none;"> &#8862; </span>';// +/- in square &#8862;/&#8863; +/-/x in circle &#8853;/&#8854;/&#8855;
 }
 //output += output2; // if interactive elements on right
 output+='</li>';

 $('#'+taxonId+' > ul').append(output);// append child li element
 listCount+=1;
 if(bullets=="nobullets"){
 $('#'+childId).prepend(output2);// insert interactive element before (no bullets)
 }else{
 $('#'+childId).append(output2);// insert interactive element after (with default bullets)
 }

 // code for interactive loading, collapsing and expanding tree 
 if(level===0&&mode=="INTERACTIVE"){
 //console.log("adding interactive stuff");
 // load children, hide load icon, show collapse icon
 $('#'+childId+'-load').click(function(e){
 e.preventDefault();
 addChildrenInteractive(child,nInteractiveLevels,mode,depth,childId,rank,taxon);// trigger new run
 $(this).hide();
 $('#'+childId+'-collapse').show();
 });
 // hide children of node; show expand icon
 $('#'+childId+'-collapse').click(function(e){
 $('#'+childId+' > ul').hide();
 $(this).hide();
 $('#'+childId+'-expand').show();
 });
 // show children of node, show collapse icon
 $('#'+childId+'-expand').click(function(e){
 $('#'+childId+' > ul').show();
 $(this).hide();
 $('#'+childId+'-collapse').show();
 });
 }

 if(level>0){// if expanding multiple levelss
 console.log("level > 0 for taxon "+taxon);
 addChildrenInteractive(child,level,mode,depth,childId,rank,taxon);
 }
 });// end @each loop

 if(listCount==0){// we are here when there are no strict results
 // e.g. with Panthera, which has results with "parent=Pantherapsida"
 console.log("no results with strict matching of "+taxon+' ('+rank+')');
 }

 if(showParameters){
 $('#'+taxonId+' > span.tree-info').append(" ["+count+" child templates]");// number of results; excludes variants
 }
 }// end if results 

 if(showSpeciesboxesAll){// check speciesboxes at genus level (including infrageneric ranks)
 if(rank=='genus'||rank=='subgenus'){//alway check speciesboxes at genus level
 //if (debug) alert ('Checking for all speciesboxes associated with this genus');
 if($('#'+taxonId+' ul.speciesboxes').length){
 //if (debug) alert ('Speciesbox block already exists');
 }else{
 //if (debug) alert ("Speciesbox block doesn't exist; will add one");
 addSpeciesboxes(taxon,level,mode,depth,taxonId,rank,parent);// look for species boxes
 }
 }
 }
 elseif(showSpeciesboxes){// check speciesboxes even when there are child templates
 if(rank=='genus'||rank=='subgenus'||rank=='sectio'||rank=='series'){
 //if (debug) alert ('rank = ' + rank + '; taxon = ' + taxon + '; parent = ' + parent );
 addSpeciesboxes(taxon,level,mode,depth,taxonId,rank,parent);
 }
 }


 }// end processing function (data)
 );
 }// end function addChildrenInteractive()

 //------------------------------------function to check species boxes under generic taxa---------------------------------------------

 functionaddSpeciesboxes(taxon,level,mode,depth,taxonId,rank,parentTaxon){

 //if (debug) alert ('Call to addSpeciesboxs for taxon (rank) = ' + taxon + ' (' + rank + '); parent = ' + parent );

 varshowParameters=true;
 if($("#params-hide").prop("checked"))showParameters=false;
 //var hideExtinct = false;
 //if ($("#extinctId").prop("checked")) hideExtinct = true;
 varhideChildless=false;
 if($("#childlessId").prop("checked"))hideChildless=true;
 //var showSpeciesboxes = false;
 //if ($("#showSpeciesboxesId").prop("checked")) showSpeciesboxes = true;
 varshowSpeciesboxesAll=false;
 if($("#showSpeciesboxesAllId").prop("checked"))showSpeciesboxesAll=true;

 // hastemplate:speciesbox insource:Panthera insource:/\| *[gt][ea][nx][uo][sn] *= *Panthera/
 varsearch='hastemplate:speciesbox'// pages with speciesbox template
 +' insource:'+escapeSeq(taxon)// reduce to pages with taxon before regex inquiry
 //	 + ' insource:' + '/\| *genus *= *Neofelis/'; //search += escapeSeq(taxon) 
 //	 + ' insource:' + '/\| *[gt][ea][nx][uo][sn] *= *' + escapeSeq(taxon) + '/' 
 +' insource:'+'/\| *[gt][ea][nx][uo][sn] *= *'+escapeSeq(taxon)+'[^a-z]/';// match word, e.g. exclude Mustela from Mus
 //+ '[a-zA-Z0-9 \\.\\/\\?\\\s]*/' // regex expression for search - we want the name and variants
 if(rank=="genus"&&!showSpeciesboxesAll){
 //search += ' -insource:' + '/\| *parent *= *' + escapeSeq(taxon) +'/';
 search+=' -insource:'+'/\| *parent *= *[a-zA-Z]+/';
 console.log(search);
 }
 if(rank=="subgenus"||rank=="sectio"||rank=='series'){
 search='hastemplate:speciesbox'// pages with speciesbox template
 +' insource:'+escapeSeq(taxon)// reduce to pages with taxon before regex inquiry
 +' insource:'+'/\| *parent *= *'+escapeSeq(taxon)+'[^a-z]/';// match word, e.g. exclude Mustela from Mus
 }
 console.log(search);




 jQuery.getJSON(
 mw.util.wikiScript('api'),
 {
 'format':'json',
 'action':'query',
 'list':'search',
 'srnamespace':0,// search in main namespace
 'srlimit':500,
 //	'srqiprofile' : 'classic', 
 'srsearch':search// uses /regex/

 },
 function(data){
 varoutput="";

 if(data.query==undefined){
 // intermittant and seemingly random - not clear why
 alert("undefined data.query: id="+taxonId);
 return;
 }
 varnResults=data.query.searchinfo.totalhits;
 //alert ("nResults="+nResults);
 varcount=0;
 console.log(data.query);//.searchinfo);

 if(nResults===0){
 console.log('no speciesbox results for taxon (rank) = '+taxon+' ('+rank+')');
 if(rank=='genus'||rank=='subgenus'||rank=='sectio'){
 console.log('No speciesboxes associated with genus '+taxon)
 }

 output=' [no speciesboxes]';// "zero hits: " + taxon;
 if(hideChildless){
 $('#'+taxonId).hide();// hide taxon
 }
 else{
 if(showParameters)$('#'+taxonId+' > span.tree-info').append(output);
 // 		$('#'+taxonId+'-collapse').hide(); // hide collapse button TODO not with genus
 $('#'+taxonId+'-collapse').html('<span style="color:grey;"> &#8865; </span>').off("click");// change symbols and disable

 }
 }
 else{// so we have some results
 if(showParameters)$('#'+taxonId+' > span.tree-info').append(" ["+nResults+" speciesboxes]");// number of results; includes variants

 if(showSpeciesboxesAll&&rank=="genus"){
 //$('#'+taxonId).parent().prepend('<li>speciesboxes for whole genus<ul id="' + rank + '" class="' + bullets + ' speciesboxes"></ul></li>');
 $('#'+taxonId).append('<ul class="'+bullets+'"><li>speciesboxes for whole genus<ul id="'+rank+'" class="'+bullets+' speciesboxes"></ul></li></ul>');
 }else{
 //$('#'+taxonId).append('<ul class="' + bullets + ' speciesboxes">ul block for speciesboxes</ul>'); // add ul element to contain children
 $('#'+taxonId).append('<ul class="'+bullets+' speciesboxes"></ul>');// add ul element to contain children
 }

 data.query.search.sort(function(a,b){returna.title>b.title});

 $.each(data.query.search,function(index,sr){

 //var rank = getRank(index , sr);
 //var extinct = getExtinct(index , sr);
 //if (hideExtinct && extinct) return true; // don't show extinct taxa (info not available for speciesboxes)

 // display the selected child taxa 
 count+=1;

 varchild=sr.title.replace(" ","_");
 vargenus="";
 varspecies="";
 varparent="";
 varbinomial="";
 varcomment="";
 if(sr.snippet.search(/taxon *=/)>0){
 varsnippet=sr.snippet.replace('<span class="searchmatch">','');// remove highlighting from search snippet
 snippet=snippet.replace('</span>','');
 //var snippetTaxon = snippet.replace(/[\s\S]+taxon *= *(\w+) (\w+)[\s\S]+/, "1ドル 2ドル");
 varsnippetTaxon=snippet.replace(/[\s\S]+taxon *= *(\w+) ([ ×ばつ\w]+)[\s\S]+/,"1ドル 2ドル");
 //	snippetTaxon = snippet.replace(/[\s\S]+taxon *= *(\w+ \w+)[\s\S]+/, "1ドル");
 if(snippetTaxon==snippet){
 if(debug)comment=" [taxon not available in search snippet]";// 
 }else{
 binomial=snippetTaxon;// should snippetTaxon be checke?
 }
 console.log("taxon="+snippetTaxon+comment);
 }
 elseif(sr.snippet.search(/genus *=/)>0&&sr.snippet.search(/species *=/)>0){// if speciesbox with genus= and species=
 genus=sr.snippet.replace(/[\s\S]+genus *= *(\w+)[\s\S]+/,"1ドル");
 species=sr.snippet.replace(/[\s\S]+species *= *([\w ×ばつ]+)[\s\S]*/,"1ドル");
 binomial=genus+" "+species;
 if(species==sr.snippet){// if species epithet not available in search snippet
 species="</i>sp.";
 comment=" [species epithet not available in search snippet]";// when species not available in snippet
 }
 console.log("taxon(genus+species)="+genus+" "+species+" "+comment);
 }else{
 comment=" [snippet doesn't contain taxon or genus and species]";
 binomial="not available";
 }
 parent=sr.snippet.replace(/[\s\S]+parent *= *(\w+[\w \.]*\w+)[\s\S]+/,"1ドル");
 //parent = sr.snippet.replace(/[\s\S]+parent *= *(\w+)[\s\S]+/, "1ドル");
 if(parent==sr.snippet){// if parent not captured
 if(debug)comment+=" [no parent or not in snippet]";
 }else{
 if(debug)comment+=" [parent = "+parent+"]";
 }

 varname=sr.title;
 if(binomial==sr.title){
 binomial="";// don't show if binomial if same as page title 
 name="<i>"+name+"</i>";// italicise page title if binomial
 }else{
 binomial=" (<i>"+binomial+"</i>)";// display binomial after page title if different
 if(genus==sr.title)name="<i>"+name+"</i>";// italicise page title is monotypic genus
 }

 vartitleString=' title=""';
 if(showParameters){
 //titleString = ' title="' + encodeURIComponent(sr.snippet) +'"';
 }


 varchildId=sr.title.replace(" ","_")+"_SPECIES";// + '-li';
 output='<li id="'+childId+'" class="taxon_identifier" >';
 //if (extinct) output += '†'; // cannot know extinct status for speciesbox
 output+='<a href="/wiki/'+sr.title+'" '+titleString+' target="_blank" >'+name+'</a>';

 output+='<span class="tree-info" style="color:grey;" >';// span for add information
 output+=binomial;
 if(debug){
 //output += extraText(index , sr); 
 output+=comment;
 }
 output+='</span>';// close info span
 output+='</li>';

 if(rank=="subgenus"||rank=="sectio"||rank=='series'){
 $('#'+taxonId+' > ul.speciesboxes').append(output);// append child li element
 }else{
 $('#'+taxonId+' ul.speciesboxes').append(output);// append child li element
 }
 });
 if(showParameters){
 //$('#'+rank).parent().prepend(" [" + count + " ???]"); // number of results; excludes variants
 }
 }
 }// end processing function (data)
 );

 }// end function addChildrenInteractive()


 // ----------------- document ready - add functions to tool menu ------------------
 $(document).ready(function(){

 // alert("hello") // my test that the page is loading

 // mw.util.addPortletLink( portletId, href, text, id, tooltip, accesskey, nextnode );
 // Add a link to the toolbox
 varlink=mw.util.addPortletLink(
 'p-tb',
 '#',
 mw.message('taxonomy-link').plain(),
 't-prettylinkwidget',
 mw.message('taxonomy-tooltip').plain(),
 '/'
 //'#t-whatlinkshere' // this places it at the top of the tools
 );
 if(debug){
 varlink2=mw.util.addPortletLink('p-tb','#',mw.message('taxonomy-link2').plain(),'t-prettylinkwidget',mw.message('taxonomy-tooltip').plain());
 }
 if(ntt){
 varlink3=mw.util.addPortletLink('p-tb','#',mw.message('ntt-link').plain(),'t-prettylinkwidget',mw.message('ntt-tooltip').plain());
 }
 // Create a jQuery object for this link so that we get to use jQuery awesomeness 
 // like .click() for binding functions to events and methods like e.preventDefault();
 $(link).click(function(e){
 e.preventDefault();// Avoid the browser going to '#'
 //getChildren("Felidae"); // get children for prompted taxon
 //getTreeList("Plantae"); // get more than one level of tree 
 if(nRun>1){
 $('.taxonomy-browser').remove();// remove previous instances of form and output divs (prevents multiple IDs)
 }
 openTaxonBrowserDialog("Eukaryota");
 $('#gettree').click(function(e){
 e.preventDefault();
 getTree("Plantae");
 });
 $('#export-html').click(function(e){
 e.preventDefault();
 exportTree();
 });
 });
 if(debug){
 $(link2).click(function(e){
 e.preventDefault();// Avoid the browser going to '#'
 //getTreeInteractive("Carnivora"); // get more than one level of tree
 getTreeInteractive("Tetrapoda");// get more than one level of tree
 });
 }
 if(ntt){
 $(link3).click(function(e){
 e.preventDefault();// Avoid the browser going to '#'
 openCreateTaxonomyTemplateDialog("Miodocus");
 $('#nnt-createtemplate').click(function(e){
 e.preventDefault();
 createNewTemplate("Miodocus");
 });
 });
 }
 });

 });