//##################################
//  Generador de galerias TGP 
// (c) 2008 www.rinconvoyeur.com 
//##################################


var destino='http://rinconvoyeur.com/view/'; 

var mydate= new Date();
var month = mydate.getMonth(); // mes del aņo, (enero =0)
var daym  = mydate.getDate();  // dia del mes
var dias  = 30*month+daym ;    // nš de dias desde q empezo el aņo

var urlbase;
var gal = new Array // guarda cada una de la galerias
var lnk = new Array // guarda los enlaces de TODAS la galerias
var url_img  = new Array
var url_thumb= new Array // guarda los enlaces de las imagenes reducidas
var dim= ""; // tamaņo del icono
var  x = 0;  // indice de la lista de enlaces lnk[]
var  p = 0;  // posicion total del primer enlace dentro de cada galeria

//################################################################
var host = {

    hush_candid:  "http://hush-hush.com/1stpeep/sample/",
    hush_nudist:  "http://hush-hush.com/1stchance/sample/",    
    hush_downb:   "http://hush-hush.com/1stglance/sample/",    
    hush_upskirt: "http://hush-hush.com/1stfloor/sample/",    
    hush_teennude:"http://hush-hush.com/1stteen/sample/",    
    hush_nonude:  "http://hush-hush.com/1stfair/sample/",    
    hush_bikini:  "http://hush-hush.com/1stswim/sample/",    
    hush_flashing:"http://hush-hush.com/1stflash/sample/",
    
    goddesspost:  "http://www.goddesspost.com/photos/",
    enriquebeach: "http://www.enriquesbeach.com/tgp/"
}


function SHOWgallery(gal){

 if (gal=='beachcandid1')   HTML=showCANDID()
 if (gal=='beachcandid2')   HTML=showILTB('nonude')
 if (gal=='beachcandid3')   HTML=showENRIQUE('nonude')
  
 if (gal=='beachnudist1')   HTML=showENRIQUE('nude')
 if (gal=='beachnudist2')   HTML=showHUNTER('nudist')
 if (gal=='contry1')     HTML=showCONTRY() 
 
 
 if (gal=='nudebeach1b') HTML=showHUNTER2('nude')
 if (gal=='sexnudebeach')HTML=showHUNTER2('sex')
 if (gal=='sexbeach-video')  HTML=showHUNTER('sex')
 if (gal=='nudebeach2')  HTML=showHUSH("hush_nudist")



 if (gal=='upskirt1')   HTML=showHUSH("hush_upskirt")
 if (gal=='downblouse1')HTML=showHUSH("hush_downb")
 if (gal=='flashing1')  HTML=showHUSH("hush_flashing")
 if (gal=='1stteen')    HTML=showHUSH("hush_teennude")
 if (gal=='1stpeep')    HTML=showHUSH("hush_candid")
 
 if (gal=='xray')        HTML=showXRAY()

return HTML
}


function SHOWthumb(gal){ // devuelve solo la imagen de muestra

  SHOWgallery(gal); // da valores a los arrays
//  var n=0;
//  if (gal=='candid'|| gal=='xray'|| gal=='nudebeach1'|| gal=='contry1'|| gal=='sexnudebeach') {  n=p;  }
//  x=n// n es local, y x global, asi se pasa el valor de lnk[x]
//  alert(url_thumb [n])
//  }
  if ( gal=='beachnudist2'|| gal=='sexbeach-video'|| gal=='flashing1'|| gal=='upskirt1'|| gal=='downblouse1') {  p=0;  }

return  url_thumb [p];
}


//############################# GALERIAS ######################################

//############################## www.hush-hush.com  ##############################
function showHUSH(hh) {
urlbase=host[hh]
  lnk = new Array
  dim =''
  m=5
  var cero=''
  for (i=1;i<=5;i++){
    if(month%2!=0) cero='0' // los meses pares (enero) sample01.jpg y los impares (febrero) sample1.jpg
    if(month%2!=0) lng =2  
  url_img[i-1]  = '&pos='+i+'&h='+hh+'&img=sample'+cero+'@@.jpg&tb=tsample'+cero+'@@.jpg&rg=1+2+3+4+5'
  url_thumb[i-1]= urlbase+'tsample'+cero+i+'.jpg'
  lnk[i-1] = enlaces(url_img[i-1],url_thumb[i-1],dim)
  }
  p=0
  HTML = tabla(5,1,m,p)  

return HTML
}// fin galerias HUSH-HUSH ==============================================

//########################## www.beach-candid.com ############################
//http://www.candidresources.com/galleries/  
//http://www.candidresources.com/galleries/beachcandid/6/img/topless-beach-thumb-01.jpg
//http://www.candidresources.com/galleries/beachcandid/6/img/candid-beach-01.jpg
//http://www.candidresources.com/galleries/thecandidplace/7/img/beach_candids_th_02.jpg
//http://www.candidresources.com/galleries/thecandidplace/7/img/beach_candids_02.jpg

function showCANDID(){

  urlbase='http://www.candidresources.com/galleries/';
  // arrays con los datos de las galerias
  lnk = new Array // reinicia los enlaces de TODAS la galerias
  x=0;  // indice de la lista de enlaces lnk[] = nš de imagenes disponibles
  dim=' width="89" height="135"';// son todas iguales, no hace falta array
  m=6 //fotos expuestas por dia

// Lista de galerias (total 90)=======================
// beachcandid    -> 1-33 (cada una con 12 fotos)
// candidbob      -> 1-40
// thecandidplace -> 1-17

for (i=1; i<=90; i++){ // guardamos en arrays las url de TODAS las imagenes

  // valores para i<=33
    base2 = 'beachcandid/';
    base3 = '/img/candid-beach-';
    base3th = '/img/topless-beach-thumb-';
    gals =i

  if (i > 33) {
    base2 = 'candidbob/';
    base3  = '/img/candid-beach-';
    base3th = '/img/topless-beach-thumb-';
    gals=i-33;}
    
  if (i > 73) {
    base2 = 'thecandidplace/';
    base3  = '/img/beach_candids_';
    base3th = '/img/beach_candids_th_';
    gals=i-73;}

  for (j=1; j<=12; j++){
      if (j<10)  j='0'+ j;

  url_img[x]  = urlbase + base2 + gals + base3   + j +'.jpg' // url directa
//  url_img[x]  = urlbase + base2 + gals + base3 + '[01-12].jpg'+'&pos='+j // con paginacion de 12
  url_thumb[x]= urlbase + base2 + gals + base3th + j +'.jpg'
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)

  x++;}// fin bucle fotos galeria
}// fin bucle galerias

  p =(dias%parseInt(x/m))*m // posicion actual, galeria del dia
  HTML = tabla(6,1,m,p) // c=columnas, f=filas, m=nš imagenes, p=posicion 1Š imagen

return HTML;
}// fin galerias BEACHCANDID ================================================


function showILTB(mode) {
// 300 fotos de calidad de topless y nudismo
// www.ilovethebeach.com/sitedepth/upcoming/1/[351-650]-lg.jpg  imagen HD
// www.ilovethebeach.com/sitedepth/upcoming/1/[351-650]-sm.jpg (icono 165x165)
  
  urlbase='http://www.ilovethebeach.com/sitedepth/upcoming/1/';
  url_thumb = new Array
  lnk = new Array // reinicia los enlaces de TODAS la galerias
  x=0;  // indice de la lista de enlaces lnk[] = nš de imagenes disponibles
  dim="";//' width="165" height="124"';
  m=4 //fotos expuestas por dia

nulos='367-373-376-377-447-581-582-583-584-585-586-587-588-589-590-591-592-593-594-595'// error
  +'357-358-359-398-399-400-401-403-404-405-406-407-408-409-410-417-419-446' // repetidos
nude='368-374-387-388-389-413-421-435-459-467-468-472-475-478-482-485-488-494-498-499'
  +'-503-506-513-524-526-528-537-538-540-542-546-547-549-555-559-563-569-572-576-596'
  +'-600-604-607-611-612-617-620-622-624-625-628-629-633-636-643-644-648'

for (i=0; i<300; i++){ // barre todas las imagenes
  j=i+351
if (nulos.indexOf(j)==-1) { // filtra los nulos
if (((mode!="nude") && (nude.indexOf(j)==-1)) || ((mode=="nude") && (nude.indexOf(j)!=-1))  ){
  url_img[x]  = urlbase+ j + "-lg.jpg";
  url_thumb[x]= urlbase+ j + "-sm.jpg";
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)  
x++;
}}
}// fin contador

  p =(dias%parseInt(x/m))*m // posicion actual, galeria del dia
  HTML = tabla(4,1,m,p) // c=columnas, f=filas, m=nš imagenes, p=posicion 1Š imagen

return HTML; 
}// fin galerias ILOVETHEBEACH =========================================


//########################## x-ray  #####################################

function showXRAY() {

  urlbase='http://gals.xrayhunter.com/';
  // los datos de las galerias en estos arrays
  //gal=new Array // reinicia cada una de la galerias
  lnk=new Array // reinicia los enlaces de TODAS la galerias
  x=0;  // indice de la lista de enlaces lnk[]
  dim='';// tamaņos distintos de iconos
  m=4 //fotos expuestas por dia 


gal ="07-08-09-10-11-12-13-14-15-16-17-18-19-26-27-31".split("-")  //16 fotos
url_a="xray-voyeur/images/xray-beach-";
url_b=".jpg";
src_a=url_a;
src_b="_small.jpg";
dim=' width="98" height="73"';
for (i=0; i<gal.length; i++){ // guardamos en arrays las url de TODAS las imagenes
  url_img[x]  = urlbase + url_a+ gal[i] +url_b
  url_thumb[x]= urlbase + src_a+ gal[i] +src_b
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}

gal="01-02-03-04-05-06-07-08-09-10-11-12-13-14-15-16".split("-")  //16 fotos
src_a="see-through-xray/images/xray-pic-"; 
src_b=".jpg";
dim=" height=137 width=138";
url_a="see-through-xray/images/xray-"; 
url_b=".jpg";
for (i=0; i<gal.length; i++){ // guardamos en arrays las url de TODAS las imagenes
  url_img[x]  = urlbase + url_a+ gal[i] +url_b
  url_thumb[x]= urlbase + src_a+ gal[i] +src_b
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}


gal="007-010-023-027-043-070-089-097-098-110-124-160-179-186-197".split("-")  //15 fotos
url_a="see-thru-xray-vision/images/see-thru-xray-";
url_b=".jpg";
src_a=url_a;
src_b="_small.jpg";
dim=" height=83 width=125";
for (i=0; i<gal.length; i++){ // guardamos en arrays las url de TODAS las imagenes
  url_img[x]  = urlbase + url_a+ gal[i] +url_b
  url_thumb[x]= urlbase + src_a+ gal[i] +src_b
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}


gal="001-003-004-005-006-007-009-012-013-014-015-016-017-018-019-020".split("-")  //16 fotos
url_a="xray-see-through/images/see-thru-xray-vision-";
url_b=".jpg";
src_a=url_a;
src_b="_small.jpg";
dim=" height=98 width=148";
for (i=0; i<gal.length; i++){ // guardamos en arrays las url de TODAS las imagenes
  url_img[x]  = urlbase + url_a+ gal[i] +url_b
  url_thumb[x]= urlbase + src_a+ gal[i] +src_b
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}


  urlbase='http://www.xraywatcher.com/galleries/xray1/images/';
  dim=' width="110" height="80"';
for (i=2; i<22; i++){
  j=i
  if (i<10) j='0'+i;
  url_img[x]  = urlbase + 'xray-pool-pussy-view-00'+j+'.jpg'
  url_thumb[x]= urlbase + 'th_xray-pool-pussy-view-00'+j+'.jpg'
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}

  gal="01-02-03-08-11-14-17-18-19-20-21-22-23-24-25-26-28-31".split("-")  //18 fotos
  urlbase='http://www.xraywatcher.com/galleries/xray16/images/';
  dim=' width="110" height="80"';
for (i=0; i<gal.length; i++){
  url_img[x]  = urlbase + 'student-xray-slotview-waterpark-cameltoevid500'+gal[i]+'.jpg'
  url_thumb[x]= urlbase + 'th_student-xray-slotview-waterpark-cameltoevid500'+gal[i]+'.jpg'
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}

  gal="01-15-16-18-19-20-21-22-23-24-25-26-27-28-29-30-31".split("-")  //17 fotos
  urlbase='http://upskirt-voyeur.adultlux.com/gallery/freeupskirt1/';
  dim=' width="125" height="100"';
for (i=0; i<gal.length; i++){
  url_img[x]  = urlbase + 'xray-swimsuit-sea2-00'+gal[i]+'.JPG'
  url_thumb[x]= urlbase + 'TN_xray-swimsuit-sea2-00'+gal[i]+'.JPG'
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}

  gal="03-04-06-08-09-11-12-13-15-17-18-19-20-21-22-23-25-26-28-29".split("-")  //20 fotos
  urlbase='http://upskirt-voyeur.adultlux.com/gallery/freeupskirt1/';
  dim=' width="125" height="100"';
for (i=0; i<gal.length; i++){
  url_img[x]  = urlbase + 'xray-student-at-sea7-00'+gal[i]+'.JPG'
  url_thumb[x]= urlbase + 'TN_xray-student-at-sea7-00'+gal[i]+'.JPG'
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}

  p =(dias%parseInt(x/m))*m // posicion actual, galeria del dia
  HTML = tabla(2,2,m,p) // c=columnas, f=filas, m=nš imagenes, p=posicion 1Š imagen

return HTML;
}// fin galerias XRAY ========================================================


//######## enriquebeach.com ###################################################
function showENRIQUE(mode){

  urlbase="http://www.enriquesbeach.com/tgp/";
  gls = new Array // guarda las imagenes de cada galeria
  gal = new Array // reinicia cada una de la galerias
  lnk = new Array // reinicia los enlaces de TODAS la galerias
  x=0;  // indice de la lista de enlaces lnk[]
  dim=" width=133 height=100"; 
  m=4; // muestra 4 imagenes al dia 
  
// ultima actualizacion 10-03-08
//http://www.enriquesbeach.com/tgp/080111/nude[18 19 20].html  8,12,10 fotos
gls.push("080111-42_728-43_162-43_165-43_171-43_189-43_492-43_522-44_208"
      +"-43_338-43_350-43_362-43_366-43_371-43_440-43_377-43_381-43_383-43_394-43_401-43_422"
      +"-44_617-44_625-44_632-44_641-44_643-44_644-44_656-44_664-44_712-44_740");
//http://www.enriquesbeach.com/tgp/080310/21.html 8 fotos
gls.push("080310-45_161-45_173-45_487-47_187-48_516-48_533-48_534-48_549");
//http://www.enriquesbeach.com/tgp/070425/nude17.html 10 fotos
gls.push("070425-42_683-42_684-42_692-42_693-42_696"
      +"-42_711-42_734-42_735r-42_737-42_755");
//http://www.enriquesbeach.com/tgp/070215/nude16.html  8 fotos
gls.push("070215-39_014-39_021-39_071-39_088-39_095-39_097-39_098-39_099");
//http://www.enriquesbeach.com/tgp/061021/nude[14,15].html  6+8 fotos
gls.push("061021-36_396-36_434-36_440-36_450-36_461-36_501"
      +"-37_213-37_238-37_300-37_307-38_157-38_192-38_258-38_520");
//http://www.enriquesbeach.com/tgp/060619/nude[11,12,13].html  6+6+5 fotos
gls.push("060619-34_029-34_031-34_059-34_060-34_064-34_078"
      +"-34_474-34_483-34_494-34_510-35_127-36_105"
      +"-36_430-36_805-38_155-38_195-38_573");
//http://www.enriquesbeach.com/tgp/050912/  4+8+6+6 fotos
gls.push("050912-30_015-30_030-30_031-30_041");
//http://www.enriquesbeach.com/tgp/050609/  8+8+8 fotos
gls.push("050609-27_480-27_485-27_490-27_491-27_507-27_524-27_533-27_546"
      +"-21__527-23_467r-25_377-25_387-25_632-26_170-26_238-26_493"
      +"-21__027-21__031-21__034-21__037-21__038-21__040-21__041-21__046");


if (mode=='nonude'){ //======================================

gls = new Array // borra los elementos definidos antes
//http://www.enriquesbeach.com/tgp/080310/[44-48].html
gls.push("080310-44_756-44_832-48_031-48_075-48_113-48_159-48_261-48_280" // 8 fotos
      +"-44_779-44_800-47_016-47_046-47_091-47_108-47_163-48_014"
      +"-41_636-46_031-46_042-46_111-46_140-46_186-46_197-47_169"
      +"-45_024-45_032-46_029-46_034-46_038-46_044-46_082-46_100"
      +"-45_077-45_079-45_084-45_091-45_095-45_113-45_119-45_133");
//http://www.enriquesbeach.com/tgp/080111/beach[40-43].html
gls.push("080111-43_985-43_999-44_095-44_155-44_321-44_353-44_444-44_568" // 8 fotos
      +"-43_1046-43_1048-43_1054-43_1061-43_1065-43_1067-43_1089-43_1094-43_1095-43_1100-43_1120-43_1124"
      +"-43_219-43_222-43_303-43_238-43_296-43_251-43_256-43_266-43_272-43_281-43_286-43_295"
      +"-42_655-42_664-42_799-43_040-43_065-43_136-43_137-43_779");
//http://www.enriquesbeach.com/tgp/050912/  4+8+6+6 fotos
gls.push("050912-30_079-30_080-30_086-30_089-30_110-30_111-30_123-30_165" 
      +"-32_249-32_257-32_265-32_266-32_270-32_272"); 

//COMPLETARRRRRRRRRRRRRRRRRRRR
}// fin nonude ===========================
//m=40
for (g in gls) { // recorre todas las galerias
  gal=gls[g].split("-")
for (i=1;i<gal.length;i++){
  url_img[x]  = urlbase+ gal[0] + "/images/enr"+ gal[i]+'.jpg"';
  url_thumb[x]= urlbase+ gal[0] + "/thumbnails/enr"+ gal[i]+'.jpg'
  lnk[x] = enlaces(url_img[x],url_thumb[x],dim)
x++;}
}
  p =(dias%parseInt(x/m))*m // posicion actual, galeria del dia
  HTML = tabla(4,1,m,p) // c=columnas, f=filas, m=nš imagenes, p=posicion 1Š imagen

return HTML; 
}


//=================== funciones auxiliares ==========================

function enlaces(img,tb,dim){
    tag ='<A href="'+destino+'index.html?src='+ img +'" target="view">';
    tag+='<IMG src="'+tb+'"'+ dim +' border=1></a>';
return tag}//========================================================


function tabla(c,f,m,p){ // construye la tabla con las imagenes: m <= c*f

  HTML = '<table border="0" align="center">'
    for (i=0; i<m; i=i+c){ // f filas
    HTML += '<tr>' // c columnas  
    for (j=0; j<c; j++){  HTML += '<td>'+ lnk[parseInt(p+j+i)] +'</td>' }
    HTML += '</tr>'
    }
  HTML += '</table>'

return HTML}//========================================================



//########################## voyeurweb.com  #######################################
//----------- contribuciones nudistas ----------------
//http://www.voyeurweb.com/winmaster/winn12-2006/vs20061226-212819/V.jpg -> NO VA
//http://www.voyeurweb.com/winmaster/winn12-2006/vs20061226-212819/ -> NO VA
//-------- a partir de 2007 cambia el formato --------
//http://www.voyeurweb.com/winners.2008/200801/images/20080116-53540.jpg
//http://www.voyeurweb.com/winners.2008/200801/20080116-53540/
function showCONTRY() {

  lnk=new Array // reinicia los enlaces de TODAS la galerias
  url_thumb=new Array // 
  x=0;  // contador de contribuciones (galerias)
  m=2 //fotos expuestas por dia

var contris=new Array (
'200701#20070119-6181#20070111-4825#20070119-6058#20070116-5589#20070122-6471',
'200702#20070216-10069#20070129-7546#20070201-7985#20070123-6686#20070208-9041#20070202-8147#20070207-8829',
'200703#20070316-13726#20070317-13861#20070304-12177#20070317-13893#20070315-13630#20070322-14617',
'200704#20070420-18683#20070421-18781#20070420-18587#20070419-18564#20070416-17921#20070404-16410',
'200705#20070523-22863#20070504-20479#20070522-22660#20070515-21856',
'200706#20070620-26518#20070601-23980#20070616-26020#20070617-26159',
'200707#20070716-29932#20070719-30509#20070710-29173#20070718-30306#20070716-30010#20070718-30270#20070716-30046',
'200708#20070822-34999#20070824-35410#20070823-35220#20070815-34059#20070801-32144#20070730-31832#20070729-31775',
'200709#20070825-35473#20070923-39392#20070920-39009#20070920-38923#20070925-39601#20070925-39684#20070914-38178#20070829-36041#20070919-38801#20070906-37091#20070918-38647#20070912-37919',
'200710#20071012-42052#20071010-41805#20071022-43283#20071024-43570#20071005-41075#20071024-43519#20071009-41578#20071014-42284',
'200711#20071110-45761#20071112-45998#20071120-47092#20071120-46988#20071123-47427#20071125-47668#20071117-46672#20071115-46391#20071120-46991',
'200712#20071215-49940#20071216-50091#20071206-48930#20071219-50443#20071129-48095#20071201-48300',
'200801#20080115-53350#20080121-54107#20080122-54276#20080116-53405#20080121-54120#20080123-54364#20080115-53354#20071231-51558#20080116-53540',
'200802#20080210-56524#20080219-57572#20080220-57811#20080221-57879#20080211-56576#20080205-55883#20080212-56773',
'200803#20080319-61262#20080325-61922#20080323-61684#20080326-61981#20080317-60965#20080324-61748#20080317-60994',
'200804#20080421-64875#20080423-65064#20080424-65196#20080420-64717#20080417-64477#20080331-62512#20080412-63919#20080424-65143#20080410-63703',
'200805#20080508-66570#20080525-68248#20080525-68220#20080501-65863#20080514-67131#20080510-66802',
'200806#20080624-71453#20080618-70790#20080620-71017#20080624-71412#20080622-71228#20080621-71115#20080617-70592#20080624-71442#20080624-71444#20080625-71512',
'200807#20080723-74399#20080724-74529#20080717-73718#20080716-73689#20080723-74335#20080724-74455#20080705-72494#20080627-71786#20080627-71724#20080719-73907'
//'200808#20080825-78241#20080824-78126#20080825-78184#20080803-75537#20080819-77523'  // No operativo hasta q se almacene como winner
);


for (i in contris) {
contridelmes = contris[i].split('#');

  for (j=1;j<contridelmes.length;j++){ 
    if(parseInt(contridelmes[0].substr(0,4))>=2007) { // formato aņo 2007

      var url_base='http://www.voyeurweb.com/winners.2008/';
      url_thumb[x]=url_base+contridelmes[0]+'/images/'+contridelmes[j]+'.jpg';
      lnk[x]=url_base+contridelmes[0]+'/'+contridelmes[j];  

    }else {
    /* ENLACES NO operativos
      var url_base='http://www.voyeurweb.com/winmaster/winn';
      var vs='/vs';
      if (contridelmes[j].indexOf('-')==-1) vs='/VS'
      lnk[x]=url_base+contridelmes[0]+vs+contridelmes[j];    
      url_thumb[x]=lnk[x]+'/V.jpg';
    */
    } 
    x++;    
  }
}// fin bucle 

  p =(dias%parseInt(x/m))*m 
  HTML='<table border="0" align="center"><tr>'
  HTML+='<td><a href="'+lnk[p]+'" target="view"><img src="'+url_thumb[p]+'" border="1"></a></td>'
  HTML+='<td><a href="'+lnk[p+1]+'" target="view"><img src="'+url_thumb[p+1]+'" border="1"></a></td></tr></table>'
return HTML;
}// fin contribuciones voyeurweb ============================================















//######## www.beachhunters.com  ###############################################

function showHUNTER2(bh) { // fotos TGP
// http://crazybeach.info/gal/beach/002/gallery007.html
// http://crazybeach.info/gal/beach/002/content/bh_007_01.jpg
// http://crazybeach.info/gal/beach/008/content/bht_049_01.jpg 

urlbase="http://crazybeach.info/gal/beach/0"
gal=new Array // reinicia cada una de la galerias
lnk=new Array // reinicia los enlaces de TODAS la galerias
  x=0;  // indice de la lista de enlaces lnk[]
  dim=" width=120 height=150"; // son todas iguales, no hace falta array
  var gls=""
sex='14-15-16-18-21-22-23-25-26-27-28-31-77-78-79-80' // galerias sex
    
for (i=1;i<=30;i++){ // 48 galerias (actualizado marzo 2008)
  if (i<10) i='0'+i

if (((bh=='sex') && (sex.indexOf(i)!=-1)) || ((bh=='nude') && (sex.indexOf(i)==-1))) {
//alert(i+'-'+sex.indexOf(i))

  gls=parseInt(i/7)+1
  if (gls<10) gls='0'+gls

for (j=1;j<=15;j++){ // 15 fotos por galeria
  if (j<10) j='0'+j

lnk[x] ='<A href="'+destino+'?src='+urlbase+ gls +"/content/bh_0"+ i+'_'+ j +'.jpg" target="view">';
//lnk[x] ='<A href="'+
url_thumb[x]=urlbase+ gls + "/content/bht_0"+ i +'_'+ j +'.jpg'
lnk[x]+='<IMG src="'+destino+'pic.php?img='+url_thumb[x]+'"'+ dim +' border=1></a>';
x++  
  
}}}

nf=lnk.length// nš total de fotos disponibles
m=5 //fotos expuestas por dia
nd=parseInt(nf/m) //=144, dias totales para los que tenemos fotos
d=(dias%nd) // posicion actual
p=d*5

  HTML='<table border="0" align="center"><tr>'
//  HTML+='<iframe width="120"  HEIGHT="150" id="fr0" src="http://crazybeach.info/gal/beach/004/gallery023.html" scrolling="no" frameborder="0" MARGINHEIGHT="0" MARGINWIDTH="0" ALLOWTRANSPARENCY="true" >'
/*  HTML+='<td>'+ '<iframe '+dim+' src="'+url_thumb[p]+  '" scrolling="no" frameborder="0" MARGINHEIGHT="0" MARGINWIDTH="0">'+'</td>'
  HTML+='<td>'+ '<iframe '+dim+' src="'+url_thumb[p+1]+'" scrolling="no" frameborder="0" MARGINHEIGHT="0" MARGINWIDTH="0">'+'</td>'
  HTML+='<td>'+ '<iframe '+dim+' src="'+url_thumb[p+2]+'" scrolling="no" frameborder="0" MARGINHEIGHT="0" MARGINWIDTH="0">'+'</td>'
  HTML+='<td>'+ '<iframe '+dim+' src="'+url_thumb[p+3]+'" scrolling="no" frameborder="0" MARGINHEIGHT="0" MARGINWIDTH="0">'+'</td>'
  HTML+='<td>'+ '<iframe '+dim+' src="'+url_thumb[p+4]+'" scrolling="no" frameborder="0" MARGINHEIGHT="0" MARGINWIDTH="0">'+'</td></tr></table>'
*/

  HTML+='<td>'+ lnk[p]   +'</td>'
  HTML+='<td>'+ lnk[p+1] +'</td>'
  HTML+='<td>'+ lnk[p+2] +'</td>'
  HTML+='<td>'+ lnk[p+3] +'</td>'
  HTML+='<td>'+ lnk[p+4] +'</td></tr></table>'
  
return HTML;
}


function showHUNTER(bh) { // videos

  urlbase="http://www.zuzazu.com/gals/spy_camera/"
  gal= new Array // reinicia cada una de la galerias
  lnk= new Array // reinicia los enlaces de TODAS la galerias
  url_thumb=new Array // 
//x=0;// indice para los iconos VARIABLES YA USADA!!!!!!!!
  
gal=new Array (// hay 49 galerias
3072,3099,3172,3173,3178,3225,3227,3247,
3258,3288,3342,3344,3369,3395,3396,3397,
3429,3431,3434,3488,3524,3549,3552,3579,
3604,3613,3619,3641,3646,3647,3648,3652,
3675,3696,3714,3718,3770,3775,3826,3828,
3884,4083,4088,4108,4130,4133,4137,4197);

if (bh=='sex') {
gal=new Array (//  galerias sex
3090,3151,3218,3268,3297,3306,3321,3432,
3449,3529,3559,3591,3612,3636,3651,3701,
3708,3766,3796,3827,3874,3934,3964,4006,
4092,4134,4194);
}

x=(dias%24)
var g=x; //g=x*2 si ponemos 2 galerias 
//x=aleatorio(0,24);  // selecciona uno de los 24 videos aleatoriamente
//g=parseInt(x/4)

//v=1+((x-1)%4);
//if (x<10) x="0"+x;
//alert(x+"-"+g+"-"+gal[g]+"-"+v)
HTML='<table border="0" align="center"><tr>'
HTML+='<td>'+enlace(gal[g],1)+'</td>'
HTML+='<td>'+enlace(gal[g],2)+'</td></tr></table>'//<tr>
//HTML+='<td>'+enlace(gal[g+1],1)+'</td>'
//HTML+='<td>'+enlace(gal[g+1],2)+'</td></tr></table>'
return HTML
}

//document.write (HTML);


function enlace(galeria,n){

  url_page  = urlbase + galeria+ "/index.html"
  url_thumb[0] = urlbase + galeria+ "/"+n+".jpg"
  
  url_video = urlbase + galeria+ "/"+n+".wmv"
lnk2 ='<a href="'+destino+'?src='+url_video+'" target="view">'
lnk2+='<img src="'+url_thumb[0]+'" title="Video 320x256" width="160" height="128" border="1"></a>'


return lnk2;
}
/*
function aleatorio(inferior,superior){
numPosibilidades = superior - inferior
aleat = Math.random() * numPosibilidades
aleat = Math.round(aleat)
return parseInt(inferior) + aleat
}
*/