1var nowdiv = ''; 2var cur=''; 3var curpos="25px"; 4//commented-out for text & edit writes and tput = 0 5var tput=1; 6lt = new Array(); 7var dcount = 0; 8var sq ="\'"; 9var dcur=0; 10var will=true; 11lt[0]="ma1"; 12hi= new Array(); 13hi[1] = "Faq"; // defining folders 14hi[2] = "various"; 15hi[3] = "images"; 16hi[4] = "dance"; 17hi[5] = "cajun"; 18hi[6] = "songs"; 19hi[7]="ses"; 20hi[8]="canal"; 21hi[9]="songs"; 22hi[10]="map"; 23hi[11]="dance"; 24var hcur=0; 25var subd=0; 26var here =location.pathname; 27//here="/www.users.waitrose.com/~cresby/Faq/FAQMagyar3.htm" 28var mir=here.search("Mirror");// looking for where in the directory tree we are 29var loca=""; 30var rest; 31var dum2; 32var dum3; 33var dum4; 34if(mir<=0)mir=here.search("cresby/"); 35if(mir>=0)here=here.substring(mir+7) 36 for(tt=7;tt>=1;tt--){ // which folder? 37 hcur=hi[tt].length+1; 38 dum2 =hi[tt]+"\\"; 39 dum3 =here.substr(0,hcur); 40 dum4 =(dum2==dum3); 41 if(here.substr(0,hcur)==hi[tt]+"/"||here.substr(0,hcur)==hi[tt]+"\\"){ 42 subd=hi[tt]+"/"; 43 loca="../"; 44 } 45 } 46if(here.search("/")>=0)loca="../"; 47if((obj = findObj("mt0"))!=null) obj.style.cssText='z-index: 3;'; 48//0 width, 1 class , 2 mouse out.in, 3, href, 4 image, 5 text 49if( xist('mt1') ){ 50w1stline("dd"); 51wtd(50,0,'me2',"https://mister.red","Home",0); 52wtd(145,0,'lo2',0,"My Local Lists",0); 53wtd(123,0,'nl2',0,"Other Local Lists",0); 54wtd(90,0,'ma2',0,"Magazines",0); 55wtd(20,0,'fa2',0,'','https://mister.red/Faq/flags2.gif'); 56wtd(70,0,'fa2',0,"FAQ\'s",0); 57wtd(100,0,'ge2',0,"My Folk pages",0); 58wtd(55,0,'co2',0,"Contact",0); 59divend(2); 60} 61will = false; 62if (tput!=0){ 63 obj = findObj('mt1'); 64 obj.style.top = "5px"; 65 dend(5); 66} 67if( xist('lo2') ){ 68w1stline("de",280,1,4); 69wtrd(0,'',"My Local Lists",0,1); 70wtrd(0,'',"Dance, Festivals etc",0,2); 71wtrd(0,'https://mister.red/ses/ses.htm',"Sessions by DAY",0,1); 72wtrd(0,'https://dance.mister.red',"DANCE Diary",0,2); 73wtrd(0,'https://mister.red/ses/sesc.htm',"Sessions by COUNTY",0,1); 74wtrd(0,'https://mister.red/various/var3.htm#var2',"Local Ceilidh Bands",0,2); 75wtrd(0,'https://mister.red/fcd.htm',"Folk Clubs by DAY",0,1); 76wtrd(0,'https://mister.red/cajun/cajun.htm',"Cajun links",0,2); 77wtrd(0,'https://mister.red/fcc.htm',"Folk Clubs by COUNTY",0,1); 78wtrd(0,'https://mister.red/fest.html',"Festivals",0,2); 79wtrd(0,'https://mister.red/glospage.htm',"just GLOUCS Venues",0,1); 80wtrd(0,'https://mister.red/radio.htm',"Radio Programmes",0,2); 81wtrd(0,'https://mister.red/dmn.htm',"Dursley AMN",0,1); 82wtrd(0,'https://mister.red/CheltFC.htm',"Cheltenham FC",0,2); 83wtrd(0,'https://mister.red/tlink.htm',"further a-field",0,1); 84wtrd(0,'https://mister.red/various/var3.htm#dom3',"28 day Calendar",0,2); 85wtrd(0,'',"",0,1); 86wtrd(0,'https://map.mister.red/index.htm',"Folk Map",0,2); 87divend(3); 88} 89dend(5); 90//alert("lo2 done"); 91if( xist('ma2') ){ 92w1stline("de",170,1,2); 93wtrd(0,'',"Paper Magazines",0,0); 94wtrd(0,'.shredsandpatches.org.uk/',"Shreds & Patches (Shrops)",0,0); 95wtrd(0,'.shirefolk.org.uk',"Shire Folk (Oxon)",0,0); 96wtrd(0,'.kingate.co.uk/folk-monthly-magazine/',"Folk Monthly (W Mids)",0,0); 97wtrd(0,'.broadsheep.com',"Broadsheep (Marches)",0,0); 98wtrd(0,'.taplas.co.uk',"Taplas (Wales)",0,0); 99wtrd(0,'.fash.org.uk/solent_waves.htm',"Solent Waves",0,0); 100wtrd(0,'.frootsmag.com',"fRoots (national)",0,0); 101wtrd(0,'.folklife-west.co.uk',"FolkLife West",0,0); 102wtrd(0,'.devonfolk.org.uk/#',"Whats Afoot (Devon)",0,0); 103divend(3); 104} 105dend(300); 106//alert("ma2 done"); 107if( xist('ge2') ){ 108w1stline("de",165,1,4); 109wtrd(0,'',"My Folk pages",0,0); 110wtrd(0,'https://song.mister.red/',"Cresby\'s Songs",0,0); 111wtrd(0,'https://mister.red/songs/calltips.htm',"Dance callers\' tips",0,0); 112wtrd(0,"https://mister.red/various/var3.htm#dancepats","Ceilidh Dance sequences",0,0); 113wtrd(0,"https://mister.red/various/var3.htm#var7","Folklore resources",0,0); 114wtrd(0,'https://mister.red/various/var3.htm#forums',"Discussion Forums",0,0); 115wtrd(0,"https://mister.red/various/var3.htm#var6","General Websites",0,0); 116wtrd(0,"https://mister.red/various/var3.htm#lists","Listings further away",0,0); 117wtrd(0,"https://mister.red/various/videos.htm","My video page (ongoing)",0,0); 118wtrd(0,"https://stroudvices.co.uk","My Audio History of Stroud",0,0
118); 119wtrd(0,"https://benchmarks.mister.red","My OS Benchmarks",0,0); 120divend(3); 121} 122dend(480); 123//alert("ge2 done"); 124if( xist('co2') ){ 125w1stline("de",120,1,4); 126wtrd(0,'',"Contact Me",0,0); 127wtrd(0,'https://mister.red/contact.htm',"Contact Mr Red",0,0); 128wtrd(0,'https://mister.red/dance/dancecont.htm',"Your Dance Details",0,0); 129//try{if(goforit!=null)wtrd(0,'',goforit,0,0);}catch(e){} 130divend(3); 131} 132dend(577); 133if( xist('fa2') ){ 134w1stline("de",187,1); 135wtrd(0,'https://mister.red/Faq/FAQglobish.htm'," Globish",'https://mister.red/Faq/un.gif',1); 136wtrd(0,'https://mister.red/Faq/FAQ.htm',' English','https://mister.red/Faq/uk.gif',2); 137wtrd(0,'https://mister.red/Faq/FAQIt.htm',"Italiano ",'https://mister.red/Faq/it.gif',1); 138wtrd(0,'https://mister.red/Faq/FAQWelsh.htm',"Cymraeg ",'https://mister.red/Faq/wa.gif',2); 139wtrd(0,'https://mister.red/Faq/FAQCat.htm', ' Català','https://mister.red/Faq/Cats.gif',1); 140wtrd(0,'https://mister.red/Faq/FAQIrish.htm', ' Gaeilge','https://mister.red/Faq/Irish.gif',2); 141wtrd(0,'https://mister.red/Faq/FAQSpan.htm', ' Español','https://mister.red/Faq/sp.gif',1); 142wtrd(0,'https://mister.red/Faq/FAQFren.htm', ' Français','https://mister.red/Faq/fr.gif',2); 143wtrd(0,'https://mister.red/Faq/FAQBasq.htm', ' Euskaldun','https://mister.red/Faq/Basque.gif',1); 144wtrd(0,'https://mister.red/Faq/FAQPortu.htm',"Português ",'https://mister.red/Faq/po.gif',2); 145wtrd(0,'https://mister.red/Faq/FAQGal.htm', ' Gallego','https://mister.red/Faq/gal.gif',1); 146wtrd(0,'https://mister.red/Faq/FAQneder.htm',"Nederlands ",'https://mister.red/Faq/nd.gif',2); 147wtrd(0,'https://mister.red/Faq/FAQGerm.htm', ' Deutsch','https://mister.red/Faq/de.gif',1); 148wtrd(0,'https://mister.red/Faq/FAQFris.htm',"Frisian ",'https://mister.red/Faq/fris.gif',2); 149wtrd(0,'https://mister.red/Faq/FAQSvenske.htm', ' Svenska','https://mister.red/Faq/sv.gif',1); 150wtrd(0,'https://mister.red/Faq/FAQNorske.htm',"Norske ",'https://mister.red/Faq/nk.gif',2); 151wtrd(0,'https://mister.red/Faq/FAQDanske.htm', ' Dansk','https://mister.red/Faq/dk.gif',1); 152wtrd(0,'https://mister.red/Faq/FAQPolska.htm',"Polskie ",'https://mister.red/Faq/pk.gif',2); 153wtrd(0,'https://mister.red/Faq/FAQMagyar.htm', ' Magyar','https://mister.red/Faq/ma.gif',1); 154wtrd(0,'https://mister.red/Faq/FAQrus.htm',"русский язык ",'https://mister.red/Faq/ru.gif',2); 155wtrd(0,'https://mister.red/Faq/FAQThai.htm', ' Thai','https://mister.red/Faq/th.gif',1); 156wtrd(0,'https://mister.red/Faq/FAQch.htm',"Chinese ",'https://mister.red/Faq/ch.gif',2); 157wtrd(0,'https://mister.red/Faq/FAQczech.htm', ' Česky','https://mister.red/Faq/czech.gif',1); 158wtrd(0,'https://mister.red/Faq/FAQlat.htm','Latvijas','https://mister.red/Faq/lat.gif',2); 159wtrd(0,'https://mister.red/Faq/FAQOcc.htm',' Occitan','https://mister.red/Faq/Occ.gif',1); 160wtrd(0,'https://mister.red/Faq/FAQlit.htm','Lietuvis','https://mister.red/Faq/lit.gif',2); 161wtrd(0,'https://mister.red/Faq/FAQRom.htm', ' Româneşte','https://mister.red/Faq/rom.gif',1); 162wtrd(0,'https://mister.red/Faq/FAQTurk.htm','Türkiye','https://mister.red/Faq/Turkey.gif',2); 163wtrd(0,'https://mister.red/Faq/FAQSerb.htm', ' Srpsko / Hrvat','https://mister.red/Faq/Serbia.gif',1); 164wtrd(0,'https://mister.red/Faq/FAQSlov.htm','Slovensko','https://mister.red/Faq/Slovenia.gif',2); 165divend(3); 166} 167dend(380); 168if( xist('nl2') ){ 169w1stline("dz",0,1,3); 170wtrd(0,'','',0,1); 171wtd(0,'de','','','Other listing websites around this area and surrounding it.',0,11); 172wtrd('','',"",0,2); 173 174wtrd(0,'','Bristol',0,1); wtd(0,'dy','','','Devon',0); wtd(0,0,'','','Gloucs',0); wtd(0,'dy','','','H & W',0); 175wtd(0,0,'','','Oxon',0); wtd(0,'dy','','','Somerset',0); wtd(0,0,'','','Shrops',0);wtd(0,'dy','','','Wales',0); 176wtd(0,0,'','','Wilts',0); wtd(0,'dy','','','North',0); wtd(0,0,'','','South',0); wtrd('dy','',"National",0,2); 177 178wtrd(0,'.folkaroundbristol.org.uk','FAB','',1); 179wtd(0,'dy','','.devonfolk.co.uk','Devon',0); wtd(0,0,'','.glosfolk.org.uk','Glosfolk',0); wtd(0,'dy','','.worcesterfolk.org.uk','Worcs',0); wtd(0,0,'','.icknieldwaymorrismen.org.uk/folk_sessions.php','Sess',0); 180wtd(0,'dy','','.sadfolk.co.uk/regular.html','SaD',0); wtd(0,0,'','.bbc.co.uk/shropshire/music/folk/folk_diary_01.shtml','R Shrops',0); wtd(0,'dy','','.folkwales.org.uk/listings.html','FolkWales',0); wtd(0,0,'','.wiltsfolkassoc.webspace.virginmedia.com/','Folk Ass',0); 181wtd(0,'dy','','.nrkarts.co.uk/north%20staffs%20folk%20diary.pdf','Staffs',0); wtd(0,0,'','.broadsideman.co.uk','Broadside',0); wtrd('dy','various/var3.htm#lists',"My UK list",'',2); 182 183wtrd(0,'.folkaroundbristol.org.uk/list.htm','Avon FD','',1); 184wtd(0,'dy','','http://www.shammickacoustic.org.uk/events.htm','North',0); wtd(0,0,'','.mustrad.org.uk/sessions.htm','Rod<BR>Stradling',0); wtd(0,'dy','','.tbinnie.pwp.blueyonder.co.uk/2.html','Redditch',0); wtd(0,0,'','.icknieldwaymorrismen.org.uk/linker2_0_4/index.php?cat=11','FC\'s',0); 185wtd(0,'dy','','.folkmusicsomerset.co.uk/somerset_folk_diary.php','Somerset<BR>Folk',0); wtd(0,0,'','.sabrinaflu.co.uk/clubs.htm','Sabrinaflu',0); wtd(0,'dy','','.casbar.co.uk','Cas Smth',0); wtd(0,0,'','.broadsideman.co.uk','Broadside',0); 186wtd(0,'dy','','.lfd.org.uk','Leics',0); wtd(0,0,'','http://homepage.ntlworld.com/trevor.gilson/sw/index.htm','Solent<BR>Waves',0); wtrd('dy','.frootsmag.com/content/festivals',"fRoots",'',2); 187 188wtrd(0,'http://swampmen.pwp.blueyonder.co.uk/FolkAroundFishponds.htm','Fishponds',0,1);
188 wtd(0,'dy','','.harbertonfolk.co.uk','South 1',0); wtd(0,0,'','','',0); wtd(0,'dy','','.bromyardsessions.co.uk','Bromyard',0); 189wtd(0,0,'','.oxonfolk.co.uk/song.htm','Oxonfolk',0); wtd(0,'dy','','sanchobramble.weebly.com/','Wessex',0); wtd(0,0,'','.broadsheep.com/(vxxq1z2yzwgibq453jlgqpr4)/listings.aspx?page=music','Broadsheep',0); wtd(0,'dy','','http://gwenttrad.bravehost.com','Gwent',0); 190wtd(0,0,'','.wiltshirefolkarts.org.uk/wfdiary.htm','Folk Arts',0); wtd(0,'dy','','.covfolk.co.uk','Warks',0); wtd(0,0,'','.focsle.org.uk/SCoFF/index.htm','SCoFF',0); wtrd('dy','.efdss.org/events/morevents/',"EFDSS",'',2); 191 192wtrd(0,'.hiberniacentrebristol.org/sessionsinbristol.htm','Hibernia',0,1); wtd(0,'dy','','.flaxey-green.co.uk/Pages/Whats_On.html','South 2',0); wtd(0,'dy','','http://launch.groups.yahoo.com/group/TraditionalMusicCotswolds','Yahoo Costwolds',0,3); 193wtd(0,0,'','.bbc.co.uk/oxford/music/folk.shtml','BBC',0); wtd(0,'dy','','.mrch.freeserve.co.uk/sessions','Martin H',0); wtd(0,0,'','.shredsandpatches.org.uk','Shreds & Patches',0); wtd(0,'dy','','.pluckandsqueeze.com/events.htm','Pluck & Sq',0); 194wtd(0,0,'','http://homepage.ntlworld.com/djfoster/','Swindon',0); wtd(0,'dy','','.tradartsteam.co.uk/FM', "West Mids",0); wtd(0,0,'','.sadfolk.co.uk/regular.html','Dorset',0); wtrd('dy','http://web.ukonline.co.uk/martin.nail/Folkmus.htm#Regional',"Martin Nail",0,2); 195 196wtrd(0,'','',0,1); wtd(0,0,'dy','.users.waitrose.com/~pennymoor/page5.htm',"PennyM",0); wtd(0,0,'','','',0); wtd(0,0,'','http://cotswoldfolk.co.uk/','Cotswold',0); 197wtd(0,0,'','.folknoxford.co.uk','Folk in Oxon',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,'dy','','http://launch.groups.yahoo.com/group/welshfolk/','Yahoo',0); 198wtd(0,0,'','.salisburyfolk.co.uk/whatsonandwhere.htm','Salisbury',0); wtd(0,0,'','','',0); wtd(0,0,'','.sanchobramble.weebly.com','sanchobramble',0); wtrd('dy','.folking.com',"Folking.com",0,2); 199 200wtrd(0,'','',0,1); wtd(0,0,'','',"",0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); 201wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,'','','','',0); 202wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtrd('dy','.uksessions.net',"uksessions",0,2); 203 204wtrd(0,'','',0,1); wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); 205wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); 206wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtd(0,0,'','','',0); wtrd(0,'','',0,2); 207 208wtrd('dy','','dance',0,1); wtd(0,'dy','','http://fp.jculf.plus.com/hfolk/ceilidhs.htm','Devon',0); wtd(0,'dy','','dance.htm','Mr Red',0); wtd(0,'dy','','.frenchdanceleeds.co.uk/events/frenchdiaryuk.php','FrenchUK',0); 209wtd(0,'dy','','.oxonfolk.co.uk/dance.htm','Oxon',0); wtd(0,'dy','','.poppyrecords.co.uk/bathceilidh/links.htm','Bath',0); wtd(0,'dy','','.webfeet.org/events.html','Webfeet',0); wtd(0,'dy','','.areyoudancing.com','AreYouDancing',0,3); 210wtd(0,'dy','','.dancingfolk.org.uk/','Warks/WM',0); wtd(0,'dy','','.setandturnsingle.org.uk/diary/diary.htm','S&TSingle',0); wtrd('dy','http://www.cajunuk.motagator.net/who_are_we_2.html','Cajun',0,2); 211 212//wtrd(0,'url','text',0,1); wtd(0,'dy','','url','text2',0); wtd(0,0,'','url','text3',0); wtd(0,'dy','','url','text4',0); 213//wtd(0,0,'','url','text5',0); wtd(0,'dy','','url','text6',0); wtd(0,0,'','url','text7',0); wtd(0,'dy','','url','text8',0); 214//wtd(0,0,'','url','text9',0); wtd(0,'dy','','url','text10',0); wtd(0,0,'','url','text11',0); wtrd(0,'url','text12',0,2); 215 216divend(3); 217} 218dend(1); 219 220if( xist('me2') ){ 221w1stline("dd",110,1); 222wtrd(0,'https://mister.red/index.htm','','https://mister.red/images/redbtl.gif',0); 223wtrd(0,'','RED between the lines?','',0); 224wtrd(0,'',' ','',2); 225divend(3); 226} 227dend(5); 228hil('n'); 229 230//function w1stline 231//awid = width, 232//aclas = class 233//aout onMouseOut attribute = onMouseOver. if 'n' then only MouseOut written 234//ahref is the <A HREF= URL> TAG, if 0 no TAG is written 235//atext is the cell text 236//aleft is the image URL, if a number no image is TAGged, but if 9 then..... 237//apad - cell padding. 238 239nowdiv = null; 240var hash=self.location.hash;
241if(hash=="#noddm"){ //if asked - hide dropdown menu ie in a frame 242 var tmp=document.getElementsByTagName("a"); 243 for(var i=0;i<tmp.length;i++){ 244 tmp[i].target="_self";//if in a frame stay in frame 245 tmp3=""; 246 if(tmp[i].href.substr(tmp[i].href.length-1)=="/")tmp3="/";//if a domain or subdomain 247 tmp[i].href=tmp[i].href+tmp3+"#noddm"; 248 } 249 hash=document.getElementById("mt1"); 250 hash.style.visibility="hidden"; 251 hash=self.document.getElementById("schpiel"); 252 if(hash!=null)hash.innerHTML="<BR><BR>" 253} 254function w1stline(atext,awid,aout,apad){ 255 var xmov="<DIV id="+nowdiv+" class="+nowdiv 256 if(aout==1)xmov=xmov+" onMouseOut=hil(\'"+nowdiv+"\') onMouseOver=shl(\'"+nowdiv+"\')"; 257 xmov=xmov+"><table id=ddtab class="+atext; 258 if(apad!=null&&apad>=1)xmov=xmov+" cellpadding="+apad; 259 if(awid!=null&&awid>=10)xmov=xmov+" width="+awid; 260 dw(xmov+"><TR>"); 261 nowdiv=''; 262} 263 264function divend(aclas){ 265var dmov=''; 266 if(aclas>=1&&aclas<=2)dnd(); 267 if(aclas>=2)dmov=dmov+"</Table></DIV>"; 268 dw(dmov); 269} 270function dend(aleft){ 271 var obj; 272 if(tput!=0){ 273 obj=findObj(cur); 274 obj.style.left = aleft+"px"; 275 if(dcur!=1){ 276 obj.style.top = "25px"; 277 obj.style.visibility = 'hidden'; 278 } 279 } 280} 281 282function dnd(){ 283 dw("</TR>"); 284} 285 286function wtd(awid,aclas,aout,ahref,atext,aimg,lr){ //awid sets a mandatory width, aclas = class , aout,ahref , atext , aimg , lr alignment 287 var temp=""; 288 var dum=""; 289 var duma=''; 290 var dumb=''; 291 var dumc=''; 292 var loca1=loca; 293 var targ=" target='_top'"; 294 var tmov="<TD"; 295 if(lr==1)tmov=tmov+" align=left"; 296 if(lr==2)tmov=tmov+" align=right"; 297 if(lr>=3)tmov=tmov+" align=center colspan="+(lr-1); 298 if(awid>=10)tmov=tmov+" width="+awid; 299 if(aclas!=0)tmov=tmov+" class="+aclas; 300 if(aout.length!=0){ 301 if (will) { 302 tmov=tmov+" onMouseOut=hil(\'"+aout+"\')"; // no out on cells only divs 303 if (aout!="n") tmov=tmov+" onMouseOver=shl(\'"+aout+"\')"; 304 } 305 }//aout.length!=0 306 tmov=tmov+">"; 307 temp=''; 308 if(ahref!=0){ temp="<A HREF="; 309 ahref=mrred(ahref); //if from subdomain, 310 if(ahref.substr(0,1)=='.') ahref="http://www"+ahref; 311 if(ahref.search("http:")==-1){ //**HP** 312 if(ahref.search("mailto:")!=-1)loca1="" ; 313 dum=ahref.search("#"); 314 if(subd!=0&&ahref.substr(0,subd.length)==subd&&subd!="ses/"){ 315 loca1=""; 316 targ = " target='_self'"; 317 dumb=".htm"; 318 if(ahref.substr(ahref.length-3,30)=="htm"||ahref.substr(ahref.length-4,30)=="html")dumb=""; 319 ahref= ahref.substr(dum+1,30)+dumb; 320 } 321 if(ahref.toString().search("https://")>-1){ 322 temp=temp+ahref} 323 else if(ahref.search("/")!=-1){ 324 temp=temp+loca+ahref;} 325 } else{//ahref.search("http:") //**HP** 326 temp=temp+ahref; 327 } 328 tmov=tmov+temp+targ+">"; 329 }//ahref!=0 330 temp=''; 331 if(aimg!=0){// alert(aimg); 332 aimg=mrred(aimg); 333 if(aimg.substr(0,5)!="http:"){ //**HP** 334 if((here.substr(0,3)==aimg.substr(0,3))&&(loca.length==0))aimg="../"+aimg;// for IE local it can't see \ 335 if(aimg.toString().search("https")<0)aimg=loca+aimg;} // 336 temp="<img src="+aimg; 337 dum = aimg.toLowerCase(); 338 if(dum.substr(0,3)=="faq") temp = temp +" width=22 height=16"; 339 temp = temp+" border=0>"; 340 } //aimg!=0 341if(lr<=1) tmov=tmov+temp+atext; 342 if(lr==null||lr>=2)tmov=tmov+atext+temp; 343 if(ahref!=0){ 344 tmov=tmov+"</A>"; 345 } //ahref!=0 346 dw(tmov+"</TD>"); 347} //function 348 349function dw(dwtext){ //£ = <, $ = >, ^ = &, add <BR> and write 350//for text & edit of homepage tables 351if(tput==0){ 352 for(i=0;i<dwtext.length;i++){ 353 if(dwtext.substr(i,1)=="<")dwtext=dwtext.substr(0,i)+"£"+dwtext.substr(i+1,dwtext.length); 354 if(dwtext.substr(i,1)==">")dwtext=dwtext.substr(0,i)+"$"+dwtext.substr(i+1,dwtext.length); 355 if(dwtext.substr(i,1)=="&")dwtext=dwtext.substr(0,i)+"^"+dwtext.substr(i+1,dwtext.length); 356 }//for 357 dwtext=dwtext+"<BR>"; 358} 359self.document.write(dwtext); 360}//function 361 362function wtrd(aclas,ahref,atext,aimg,lr){ //aclas =class (default ""), ahref, atext, lr=0 or 2 closes the row after this cell.. 363 var temp=''; 364 var notavar=mrred(aimg); 365 if(lr==1)temp="<TR>"; 366 if(lr==0)temp="<TR align=center>"; 367 dw(temp); 368 temp=''; 369 if(lr==0||lr>=2)temp = ("</TR>"); 370 wtd(0,aclas,"",ahref,atext,aimg,lr); 371dw(temp); 372} 373 374function wtr(awid,aclas){ 375 var rmov="<TR"; 376 if(awid!=0)rmov=rmov+" width="+awid; 377 if(aclas!=null)rmov=rmov+" class="+aclas; 378 dw(rmov+">"); 379} 380 381function findObj(theObj, theDoc) 382{ if(theObj==""){ 383 return; // trap no object temporary code 384 } 385 var p, i, foundObj,z; 386 if(!theDoc) theDoc = document; 387 z=0; 388 if(theObj!=null){theObj.indexOf("?")}; 389 if( (p = z) > 0 && parent.frames.length) 390 { 391 theDoc = parent.frames[theObj.substring(p+1)].document; 392 theObj = theObj.substring(0,p); 393 } 394 if(!(foundObj = theDoc[theObj]) && theDoc.all) foundObj = theDoc.all[theObj]; 395 for (i=0;
395 !foundObj && i < theDoc.forms.length; i++) foundObj = theDoc.forms[i][theObj]; 396 for(i=0; !foundObj && theDoc.layers && i < theDoc.layers.length; i++) foundObj = findObj(theObj,theDoc.layers[i].document); 397 if(!foundObj && document.getElementById) foundObj = document.getElementById(theObj); 398 399 return foundObj; 400} 401 402function xist(lay){ 403 var obj; 404 nowdiv=lay; 405 cur=lay; 406 lt[dcur++]=lay; 407 return ((obj=findObj(lay))==null); 408} 409 410function shl(lid){ 411 nowdiv=lid; 412 if((obj = findObj(lid))!=null) { 413 obj.style.top= curpos; 414 obj.style.visibility = 'visible'; 415 } 416}// function 417 418function hil(lod){ 419 if((obj= findObj(nowdiv))!=null) obj.style.visibility = 'hidden'; 420 if(++dcount==9) { 421 if((obj = findObj('mt0'))!=null) obj.style.visibility = 'hidden'; 422 if((obj = findObj('rl1'))!=null) obj.style.visibility = 'hidden'; 423 } 424 nowdiv = null; 425}// function 426function mrred(a){// test for numerals 427 if(a.toString().search("https://mister.red")>-1)return a; 428 if(a==0)return a; 429 var b=a.toLowerCase(); 430 if(b.substr(0,4)=="http"){return a; 431 }else if(b.substr(0,1)=="."){return a; 432 }else if(b.substr(0,7)=="mailto:"){return a; 433 }else {c=location.href.substr(6); 434 for( var i=8;i<hi.length;i++) { 435 if(c.substr(0,hi[i].length+2)=="/"+hi[i]+".")return "https://mister.red/"+a;} 436 } 437 return a; 438}// function
Line numbers count LF bytes from the start of the resource, as the search results do. Vendor segments are library code the classifier recognised; they are stored but not indexed. Bytes are shown as Latin1 characters, one per byte.