var tmpVar='';
function setChartParameter(paramName,paramValue) { 
  tmpVar += '|'+paramName+','+paramValue;
}
function userAp( sName, sValue ) { 
  return '<param name="'+sName+'" value="'+sValue+'">\n'
}
 function writeChartParams() {
  var tmpStr = '';
  var arrParams;
  var tmpArr;
  if (tmpVar != '') {
    var tt = tmpVar.substr(0,1);
    if (tt == '|') {
      tmpVar = tmpVar.substr(1);
     }
    arrParams = tmpVar.split('|');
    if (arrParams.length == 0) {
      arrParams[0] = tmpVar;
    }
    for (n=0; n< arrParams.length; n++) {
      tmpArr = arrParams[n].split(',');
      var tmp = tmpArr[1];
      for (i=2;i<tmpArr.length;i++) {
        tmp += ','+tmpArr[i];
      }
      tmpStr += userAp(tmpArr[0],tmp);
    }
  }
 return tmpStr;
}
function writeInstrMenu1(instrStr) {
  var tmpStr='';
  var n, arrVals,arrInstr,arrMenus;
  var subStr;
  arrMenus = instrStr.split(';');
  if (arrMenus.length == 1) {
    return writeInstrMenu(instrStr);
  }
  for (m=0;m<arrMenus.length;m++) {
    arrInstr = arrMenus[m].split('|');
    subStr = 'FRX'+(m+1);
    tmpStr+= '<param name="FRX_'+(m+1)+'" value="POPUP;'+arrInstr[0]+';'+subStr+'">\n';
    tmpStr+= '<param name='+subStr+'_* value= "';
    for (n=1;n < arrInstr.length;n++) {
      //tmpStr += '<param name="FRX_'+(n+1)+'" value=
      tmpStr += arrInstr[n]+';800;'+arrInstr[n]+'|';
    }
    //tmpStr = tmpStr.substring(0,tmpStr.length-1);
    tmpStr += '">\n';
  }
  return tmpStr;
}
 
function writeInstrMenu(instrStr) {
  var tmpStr='';
  var n,arrVals,arrInstr;
  arrInstr = instrStr.split('|');
  tmpStr = '<param name="FRX_*" value = "';
  for (n=0;n < arrInstr.length;n++) {
    //tmpStr += '<param name=FRX_'+(n+1)+' value=
	if (arrInstr[n].indexOf(';') > 0) {
      arrVals = arrInstr[n].split(';');
      tmpStr += arrVals[0]+';800;'+arrVals[1]+'|';
    }
    else {
      tmpStr += arrInstr[n]+';800;'+arrInstr[n]+'|';
    }
  }
  tmpStr += '">\n';
  return tmpStr;
}
function writeInstrMenu2(instrStr) {
}
function resolveDefault(val1,defaultVal) {
  var tmpVal = val1;
  tmpVal = (tmpVal == '' || tmpVal == 'undefined') ? defaultVal:tmpVal;
  return tmpVal;
}
function ChartApplet1(name, userId_,width_,height_,chartType_,instrList_,bgCol_,fgCol_,menuBG_,menuFG_,chartBG_,chartCol_,persistStr) {
var userId,width,height,chartType,instrList,bgCol,fgCol,menuBG,menuFG,chartCol,chartBG;
var tmpArr;
var instArr;
var alignStr;
if (userId_ == '' || userId == "0")
  return;
alignStr = '';
userId = userId_;
var ChartName=name;
width = resolveDefault(width_,'100%');
height = resolveDefault(height_,'100%');
chartType = resolveDefault(chartType_,'4');
instrList = resolveDefault(instrList_,'EURUSD');
bgCol = resolveDefault(bgCol_,'C0C0C0');
fgCol = resolveDefault(fgCol_,'000000');
chartBG = resolveDefault(chartBG_,'FFFFFF');
chartCol = resolveDefault(chartCol_,'000000');
menuBG = resolveDefault(menuBG_,'163456');
menuFG = resolveDefault(menuFG_,'FFFFFF');
  var appStr = '<Applet code="dk.midas.web.chart.applet.AppletChart.class" '+alignStr+' name="'+ChartName+'" id="'+ChartName+'" codebase="http://cf-charts.IITech.dk/_applets/Charts/" archive="DCChartApplet21_o.jar" width="'+width+'" height="'+height+'" MAYSCRIPT'
  function ap( sName, sValue ) { return '<param name="'+sName+'" value="'+sValue+'">\n'}
  appStr+=' VIEWASTEXT>'
  appStr+= writeChartParams();
  appStr += ap('persist',persistStr);
  appStr += ap('ServerStr', 'http://cf-charts.IITech.dk/_datafeed/Charts/IITDCChartFeedExt31.dll');
  appStr += ap('background',bgCol);
  appStr += ap('foreground',fgCol);
  appStr += ap('chart_area_background1',chartBG);
  appStr += ap('chart_area_background2',chartBG);
  appStr += ap('studies_area_background1',chartBG);
  appStr += ap('studies_area_background2',chartBG);
  appStr += ap('chart_line_color',chartCol);
  appStr += ap('UpCandleFrameColor',chartCol);
  appStr += ap('DownCandleFrameColor',chartCol);
  appStr += ap('axis_line_color',fgCol);
  appStr += ap('axis_font_color',fgCol);
  appStr += ap('axis_markers_color','FF0000');
  appStr += ap('chartType',chartType);
  appStr += ap('AnalyseHeight','150');
  tmpArr = instrList.split('|');
  if (instrList.indexOf(';') > 0) {
    instArr = tmpArr[0].split(';');
    appStr += ap('instrument',instArr[1]);
    appStr += ap('instrumentName',instArr[0]);
  } else {
    appStr += ap('instrument',tmpArr[0]);
    appStr += ap('instrumentName',tmpArr[0]);
  }
  appStr += ap('timeScale','60');
  appStr += ap('MenuBackground',menuBG);
  appStr += ap('MenuForeground',menuFG);
  appStr += ap('User',userId);
  appStr += ap('MenuBar','Instrument;FRX;Chart Type;CT;Time Scale;TS;View;VW;Lines;LN;Studies;STD;Zoom;ZM;Help;HLP');
  appStr += ap('Instruments_Tip','XXXX');
  appStr+= writeInstrMenu(instrList);
  appStr += ap('Chart Type_Tip','XXXX');
  appStr += ap('CT_1','Line Chart;-101');
  appStr += ap('CT_2','Dot Chart;-102');
  appStr += ap('CT_3','Line-Dot Chart;-103');
  appStr += ap('CT_4','Forest Chart;-107');
  appStr += ap('CT_5','BarOHLC;-104');
  appStr += ap('CT_6','BarHLC;-105');
  appStr += ap('CT_7','Candlestick;-106');
  appStr += ap('Time Scale_Tip','XXXX');
  appStr += ap('TS_1','1 minute;-201;1');
  appStr += ap('TS_2','5 minutes;-202;5');
  appStr += ap('TS_3','10 minutes;-203;10');
  appStr += ap('TS_4','15 minutes;-204;15');
  appStr += ap('TS_5','30 minutes;-205;30');
  appStr += ap('TS_6','1 hour;-206;60');
  appStr += ap('TS_7','2 hours;-207;120');
  appStr += ap('TS_8','4 hours;-208;240');
  appStr += ap('TS_9','6 hours;-213;360');
  appStr += ap('TS_10','8 hours;-209;480');
  appStr += ap('TS_11','Daily;-210;1440');
  appStr += ap('TS_12','Weekly;-211;10080');
  appStr += ap('TS_13','Monthly;-212;43200');
  appStr += ap('View_Tip','XXXX');
  appStr += ap('VW_1','Periods;301');
  appStr += ap('VW_2','Information;302');
  appStr += ap('VW_3','Volume;-330');
  appStr += ap('VW_4','Open Interest;-340');
  appStr += ap('VW_5','Logarithmic price scale;-350');
  appStr += ap('VW_6','Show the crosshair;-303');

  appStr += ap('Lines_Tip','Lines operations.');
  appStr += ap('LN_1','POPUP;Add;ADD');
  appStr += ap('ADD_1','Close;411');
  appStr += ap('ADD_2','High/Low;412');
  appStr += ap('ADD_3','Horizontal;413');
  appStr += ap('ADD_4','Freehand;414');
  appStr += ap('LN_2','Delete;420');
  appStr += ap('LN_3','Delete All;430');
  appStr += ap('LN_4','Parallel;450');
  appStr += ap('LN_5','Move line;460');
  appStr += ap('LN_6','Fibonacci;415');
  appStr += ap('LN_7','Support/Resistance;416');
  appStr += ap('Studies_Tip','Add different types of studies.');
  appStr += ap('STD_1','POPUP;Momentum;MOM');
  appStr += ap('MOM_1','New...;5011');
  appStr += ap('MOM_2','-');
  appStr += ap('STD_2','POPUP;RSI;RSI');
  appStr += ap('RSI_1','New...;5021');
  appStr += ap('RSI_2','-');
  appStr += ap('STD_3','POPUP;ROC;ROC');
  appStr += ap('ROC_1','New...;5031');
  appStr += ap('ROC_2','-');
  appStr += ap('STD_4','POPUP;Moving Averages;MVG');
  appStr += ap('MVG_1','New...;5041');
  appStr += ap('MVG_2','-');
		
  appStr += ap('STD_5','POPUP;MACD;MACD');
  appStr += ap('MACD_1','New...;5051');
  appStr += ap('MACD_2','-');
		
  appStr += ap('STD_6','POPUP;Oscillator;OSC');
  appStr += ap('OSC_1','New...;5061');
  appStr += ap('OSC_2','-');
  
  appStr += ap('STD_7','POPUP;Stochastic Slow;PKS');
  appStr += ap('PKS_1','New...;5071');
  appStr += ap('PKS_2','-');

  appStr += ap('STD_8','POPUP;Mov Avg Exponential;MAE');
  appStr += ap('MAE_1','New...;5081');
  appStr += ap('MAE_2','-');
		
  appStr += ap('STD_9','POPUP;Bollinger Bands;BOL');
  appStr += ap('BOL_1','New...;5091');
  appStr += ap('BOL_2','-');
		
  appStr += ap('STD_1','POPUP;Moving Averages;MVG');
  appStr += ap('MVG_1','New...;5041');
  appStr += ap('MVG_2','-');
  appStr += ap('STD_2','POPUP;Bollinger Bands;BOL');
  appStr += ap('BOL_1','New...;5091');
  appStr += ap('BOL_2','-');
		
  appStr += ap('STD_10','POPUP;Parabolic SAR ;PSAR');
  appStr += ap('PSAR_1','New...;5092');
  appStr += ap('PSAR_2','-');
		
  appStr += ap('STD_11','POPUP;Range ;RNG');
  appStr += ap('RNG_1','New...;5093');
  appStr += ap('RNG_2','-');
  appStr += ap('Initialize_0','C8C8C8;0000C8;C80000;00C800;FF00FF');
  appStr += ap('Zoom_Tip','Zoom in/out.');
  appStr += ap('ZM_1','Zoom In;601');
  appStr += ap('ZM_2','Zoom Out;602');
  appStr += ap('HLP_1','About;702');
  appStr += ap('MenuVerticalSpacing','2');
  appStr += ap('FooterHeight','20');
  appStr += ap('FooterBackground',menuBG);
  appStr += ap('FooterForeground',menuFG);
  appStr += ap('AppletDetachedText','Chart is detached...');
  appStr += ap('DetachWindowTitle','Chart window');
  appStr += ap('Button1','detach.gif,25,15,2,true,900');
  appStr += ap('ButtonTip1','Click to detach chart.');
  appStr += ap('Button2','cross.gif,25,15,2,true,-303');
  appStr += ap('ButtonTip2','Click to show/hide crosshair.');
  appStr += ap('UseMenuBar','true');
  appStr += ap('Buttons_Ok_Cancel value','OK;Cancel');
  appStr += ap('Dialog_View_Period','Input Period;Periods:');
  appStr += ap('Dialog_Study_Period','Input for [?];Period:');
  appStr += ap('DelayInfoStrings','Real-time data;Delayed;minutes');
  appStr += ap('DataInfoTitle','Information');
  appStr += ap('Dialog_Information','ID:;Date:;Time:;Tick Price:;Open Price:;Close Price:;High Price:;Low Price:');
  appStr += ap('loadtext','Loading data. Please wait ...');
  appStr += ap('ButtonTip1','Click to show/hide crosshair.');
  appStr += ap('StatusPanelDefaultText','Copyright (c) Saxo Bank 2004');
  appStr += ap('AutoStart','true');
  appStr += ap('UpCandleColor','00FF00');
  appStr += ap('DownCandleColor','FF0000');
  appStr+= writeChartParams();
  appStr += 'You must have a Java plugin installed and enabled.  Please download one from e.g. <a href=http://www.java.com/en/>Sun</a>'
  appStr += '</APPLET>';
  tmpVar='';
  document.write (appStr);
}