home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2000 May / MICD_2000_05.iso / Www / Tolkien / webring / webring.js < prev   
Text File  |  2000-03-04  |  1KB  |  43 lines
  1. function Dodaj(href) {
  2. WebRing[++NumerwRingu] = new WebRingObject(href);
  3. if (location.href.indexOf(href) > -1)
  4. GdziewRingu = NumerwRingu;
  5. }
  6.  
  7. function WebRingObject(href) {
  8. this.href = href;
  9. }
  10.  
  11. var GdziewRingu = 0, NumerwRingu = 0, WebRing = new Array();
  12.  
  13. Dodaj("http://www.tolkien.px.pl/");
  14. Dodaj("http://www.phys.uni.torun.pl/~jacek/tolkien/");
  15. Dodaj("http://www.th.w.pl");
  16. Dodaj("http://www.morgul.prv.pl");
  17. Dodaj("http://www.progres.zabrze.pl/lotr/");
  18.  
  19. if (GdziewRingu == 0) GdziewRingu = 1;
  20.  
  21. if (GdziewRingu == 1)
  22. Poprzedni = NumerwRingu;
  23. else
  24. Poprzedni = GdziewRingu - 1;
  25.  
  26. if (GdziewRingu == NumerwRingu)
  27. Nastepny = 1;
  28. else
  29. Nastepny = GdziewRingu + 1;
  30.  
  31. var wynik =' ';
  32.  
  33. wynik += '<A HREF="' + WebRing[Poprzedni].href + '" TARGET="_top">';
  34.  
  35. wynik += '<IMG SRC="http://www.tolkien.px.pl/webring/prev.gif" BORDER="0" WIDTH="50" HEIGHT="50" ALT="poprzedni"></A>';
  36.  
  37. wynik += '<A HREF="http://www.tolkien.px.pl/webring/"><IMG SRC="http://www.tolkien.px.pl/webring/webring.gif" BORDER="0" WIDTH="300" HEIGHT="50" ALT="TOLKIEN WEBRING"></A>';
  38.  
  39. wynik += '<A HREF="' + WebRing[Nastepny].href + '" TARGET="_top">';
  40.  
  41. wynik += '<IMG SRC="http://www.tolkien.px.pl/webring/next.gif" BORDER="0" WIDTH="50" HEIGHT="50" ALT="nastΩpny"></A>';
  42.  
  43. document.write(wynik);