tell application "Internet Explorer"
	Activate
	do script "
		var bsetPrefix = 'Benriset';
		var bsetScriptName = 'ShowIDandNAME';
		bsetMain();

		function bsetMain(){
			if (!bsetIsFirstLaunch()) return;
			bsetShowIDandNAME();
		}
		
		function bsetShowIDandNAME() {
			var ElementsWithID = [];
			var AncohrWithName = [];
			var OBJs = document.getElementsByTagName('*');
			for (var i=0, n=OBJs.length; i<n; i++) {
				bsetShowProgress('Searching ID and NAME', i, n)
				obj = OBJs.item(i);
				if (obj.id) ElementsWithID[ElementsWithID.length] = obj;
					else if (obj.name && obj.tagName == 'A') AncohrWithName[AncohrWithName.length] = obj;
			}
			for (var i=0, n=ElementsWithID.length; i<n; i++) {
				bsetShowProgress('Appending link anchor to ID', i, n)
				var cA = document.createElement('a');
				bsetAppendStyle(cA);
				cA.href = '#' + ElementsWithID[i].id;
				cA.appendChild(document.createTextNode(ElementsWithID[i].id));
				ElementsWithID[i].insertBefore(cA, ElementsWithID[i].firstChild);
			}
			for (var i=0, n=AncohrWithName.length; i<n; i++) {
				bsetShowProgress('Appending link anchor to NAME', i, n)
				var cA = document.createElement('a');
				bsetAppendStyle(cA);
				cA.href = '#' + AncohrWithName[i].name;
				cA.appendChild(document.createTextNode(AncohrWithName[i].name));
				AncohrWithName[i].parentNode.insertBefore(cA, AncohrWithName[i]);
			}
		}
		
		function bsetAppendStyle(obj){
			with(obj.style){
				color = 'blue !important';
				background = '#ffffce !important';
				borderWidth = '1px !important';
				borderStyle = 'solid !important';
				borderColor =  '#bbbbbb #999999 #999999 #bbbbbb !important';
				margin = '0 2px !important';
				padding = '1px 2px !important';
				fontSize = '10px !important';
				fontWeight = 'normal !important';
				fontStyle = 'normal !important';
				textDecoration = 'underline !important';
			}
		}
		
		function bsetIsFirstLaunch() {
			var bsetNSURL = 'http://www.remus.dti.ne.jp/~a-satomi/bunsyorou/MacIE5_benriSet.html';
			var flagAttrName = bsetPrefix + ':' + bsetScriptName;
			var applyFlag = document.documentElement.getAttribute(flagAttrName);
			if (!applyFlag) {
				document.documentElement.setAttribute('xmlns:'+bsetPrefix, bsetNSURL);
				document.documentElement.setAttribute(flagAttrName, 'true');
				return true;
			} else {
				window.status = flagAttrName + ' is already applied.';
				return false;
			}
		}
		
		function bsetShowProgress(text, currentNo, wholeNo){
			currentNo++;
			window.status = text + ' (' + currentNo + '/' + wholeNo + ')';
			if (currentNo >= wholeNo) window.status = '';
		}
	"
end tell