{{{
//{{{
config.macros.PlotFunction = {
  handler: function (place, macroName, params, wikifier, paramString, tiddler)
  {
     var resultString;
     var wolframAlphaQuery;

     var xml;
     var width = '500';
     var height = '270';

     if (params[1] != null)
     {
           width = params[1];
     }

     if (params[2] != null)
     {
           height = params[2];
     }

     wolframAlphaQuery = '/query_wolfram/v1/query?input=';
     wolframAlphaQuery += params[0];
     wolframAlphaQuery += '&format=image&appid=beta824g5';
     var xmlDoc=document.implementation.createDocument("","",null);

     resultString = "<html>";
     resultString += '<iframe ';
     resultString += 'src="';
     resultString += QueryWolframAlpha(wolframAlphaQuery);
     resultString += '"';
     resultString += ' width=' + width;
     resultString += ' height=' + height;
     resultString +='">';
     resultString += '</iframe>';
     resultString += '</html>';

     wikify(resultString,place);
   }
 }

function QueryWolframAlpha(s)
{
     var xmlhttp=false;
     var resultString = "";
     var partialResultString  = "";
     var xmlDoc;

     try {
          xmlhttp = new XMLHttpRequest();
     } catch (e) {
          xmlhttp=false;
     }

     xmlhttp.open("GET",s,false);
     xmlhttp.send(null);
     if (xmlhttp.readyState==4) {
          xmlDoc = xmlhttp.responseXML;
          var xPathRes;
              xPathRes= xmlDoc.evaluate('/queryresult[@success="true"]/pod[@title="Plots"]/subpod[@title=""]/img/@src', xmlDoc, null, XPathResult.ANY_TYPE,null);
               if (xPathRes.resultType == 4)
               {
                    xPathRes = xPathRes.iterateNext();
                    partialResultString = xPathRes.value;
               }
     }
     return (partialResultString);
}

//}}}
}}}
bag
plugins_public
created
Sun, 17 Jan 2010 20:46:00 GMT
creator
dirkjan
modified
Sun, 17 Jan 2010 20:46:00 GMT
modifier
dirkjan
tags
systemConfig
creator
dirkjan