// You can find instructions for this file here:
// http://www.treeview.net

USETEXTLINKS = 1  
STARTALLOPEN = 0
HIGHLIGHT = 1
HIGHLIGHT_COLOR = 'YELLOW'
HIGHLIGHT_BG = '#000000'
PERSERVESTATE = 0


// If you don't have server-side coding, make your nodes.js file similar to the others
// in the ZIP, not this one.
// Without a database, the auxiliary functions defined and used here are the only way 
// I am able to test the "PERSERVESTATE through .xID keys" functionality. 
// Your server side code will do something similar, but without the need to these functions.
// It will simply output nodes with two lines of statements, one for insDoc or insFld call,
// the other with the assignment of xID to an actual database ID
// See online instructions for limitations on the use of xID
var counterI = 0
function insFldX(parentOb, childOb)
{
  childOb.xID = 'X' + counterI;
  counterI--;
  return insFld(parentOb, childOb)
}
function insDocX(parentOb, childOb)
{
  childOb.xID = 'Y' + counterI;
  counterI--;
  return insDoc(parentOb, childOb)
}
//In my QA tests I use this function to test what happens in terms of PERSERVESTATE 
//when the structure of the tree changes
function insertExtraFolder(parentOb)
{
  auxxx1 = insFld(parentOb, gFld("insert",  "http://www.treeview.net/treemenu/demopics/beenthere_london.jpg"))
  auxxx1.xID = "gg1"
  auxxx2 = insDoc(auxxx1, gLnk("R", "Ben", "http://www.treeview.net/treemenu/demopics/beenthere_london.jpg"))
  auxxx2.xID = "gg2"  
}

foldersTree = gFld("", "../otr_depot.htm")
foldersTree.treeID = "big"
foldersTree.xID = "01"
foldersTree.iconSrc = ICONPATH + "home2.gif"
foldersTree.iconSrcClosed = ICONPATH + "home2.gif"


counterI--;
//insertExtraFolder(foldersTree)

aux1 = insFld(foldersTree, gFld("", "../orson2.htm"))
aux1.xID = "02"
aux1.iconSrc = ICONPATH + "orson_open.jpg"
aux1.iconSrcClosed = ICONPATH + "orson.jpg"

aux1a = insDoc(aux1, gLnk("R", "&nbsp;&nbsp;<b>More from Orson</b>", "../orson3.htm"))
aux1a.xID = "02a"  
aux1a.iconSrc = ICONPATH + "../listen1.jpg"
aux1a.iconSrcClosed = ICONPATH + "../listen1.jpg"


aux2 = insFld(foldersTree, gFld("", "../all.htm#archive_all"))
aux2.xID = "02D"
aux2.iconSrc = ICONPATH + "browse_open.jpg"
aux2.iconSrcClosed = ICONPATH + "browse.jpg"

aux3 = insFld(foldersTree, gFld("", "../all.htm#hsotr"))
aux3.xID = "03"
aux3.iconSrc = ICONPATH + "latest_open.jpg"
aux3.iconSrcClosed = ICONPATH + "latest.jpg"

aux4 = insFld(foldersTree, gFld("", "../special.htm"))
aux4.xID = "04"
aux4.iconSrc = ICONPATH + "special_offers_open.jpg"
aux4.iconSrcClosed = ICONPATH + "special_offers.jpg"

aux5 = insFld(foldersTree, gFld("", "../change_station.htm"))
aux5.xID = "05"
aux5.iconSrc = ICONPATH + "cats_open.jpg"
aux5.iconSrcClosed = ICONPATH + "cats.jpg"

aux5a = insFld(aux5, gFld("", "../adventure.htm"))
aux5a.xID = "05a"
aux5a.iconSrc = ICONPATH + "adventure_ani.gif"
aux5a.iconSrcClosed = ICONPATH + "adventure.jpg"

aux5b = insFld(aux5, gFld("", "../british.htm"))
aux5b.xID = "05b"
aux5b.iconSrc = ICONPATH + "British_ani.gif"
aux5b.iconSrcClosed = ICONPATH + "British.jpg"


aux5c = insFld(aux5, gFld("", "../children.htm"))
aux5c.xID = "05c"
aux5c.iconSrc = ICONPATH + "children_ani.gif"
aux5c.iconSrcClosed = ICONPATH + "children.jpg"

aux5d = insFld(aux5, gFld("", "../comedy.htm"))
aux5d.xID = "05d"
aux5d.iconSrc = ICONPATH + "comedy_ani.gif"
aux5d.iconSrcClosed = ICONPATH + "comedy.jpg"

aux5e = insFld(aux5, gFld("", "../crime.htm"))
aux5e.xID = "05e"
aux5e.iconSrc = ICONPATH + "crime_ani.gif"
aux5e.iconSrcClosed = ICONPATH + "crime.jpg"

aux5f = insFld(aux5, gFld("", "../drama.htm"))
aux5f.xID = "05f"
aux5f.iconSrc = ICONPATH + "drama_ani.gif"
aux5f.iconSrcClosed = ICONPATH + "drama.jpg"

aux5g = insFld(aux5, gFld("", "../historical.htm"))
aux5g.xID = "05g"
aux5g.iconSrc = ICONPATH + "historical_ani.gif"
aux5g.iconSrcClosed = ICONPATH + "historical.jpg"

aux5g1 = insFld(aux5, gFld("", "../hsotr.htm"))
aux5g1.xID = "05g1"
aux5g1.iconSrc = ICONPATH + "hollywood_open.jpg"
aux5g1.iconSrcClosed = ICONPATH + "hollywood.jpg"

aux5h = insFld(aux5, gFld("", "../horror.htm"))
aux5h.xID = "05h"
aux5h.iconSrc = ICONPATH + "horror_ani.gif"
aux5h.iconSrcClosed = ICONPATH + "horror.jpg"

aux5i = insFld(aux5, gFld("", "../mystery.htm"))
aux5i.xID = "05i"
aux5i.iconSrc = ICONPATH + "mystery_ani.gif"
aux5i.iconSrcClosed = ICONPATH + "mystery.jpg"

aux5j = insFld(aux5, gFld("", "../rare.htm"))
aux5j.xID = "05j"
aux5j.iconSrc = ICONPATH + "rare_ani.gif"
aux5j.iconSrcClosed = ICONPATH + "rare.jpg"

aux5k = insFld(aux5, gFld("", "../romance.htm"))
aux5k.xID = "05k"
aux5k.iconSrc = ICONPATH + "romance_ani.gif"
aux5k.iconSrcClosed = ICONPATH + "romance.jpg"

aux5l = insFld(aux5, gFld("", "../sci-fi.htm"))
aux5l.xID = "05l"
aux5l.iconSrc = ICONPATH + "sci-fi_ani.gif"
aux5l.iconSrcClosed = ICONPATH + "sci-fi.jpg"

aux5m = insFld(aux5, gFld("", "../US.htm"))
aux5m.xID = "05m"
aux5m.iconSrc = ICONPATH + "US_ani.gif"
aux5m.iconSrcClosed = ICONPATH + "US.jpg"

aux5n = insFld(aux5, gFld("", "../westerns.htm"))
aux5n.xID = "05n"
aux5n.iconSrc = ICONPATH + "westerns_ani.gif"
aux5n.iconSrcClosed = ICONPATH + "westerns.jpg"

aux5o = insFld(aux5, gFld("", "../WWII.htm"))
aux5o.xID = "05o"
aux5o.iconSrc = ICONPATH + "WWII_ani.gif"
aux5o.iconSrcClosed = ICONPATH + "WWII.jpg"

aux6 = insFld(foldersTree, gFld("", "../all.htm"))
aux6.xID = "06"
aux6.iconSrc = ICONPATH + "a-z_open.jpg"
aux6.iconSrcClosed = ICONPATH + "a-z.jpg"

aux60 = insFld(aux6, gFld("", "../series-0.htm"))
aux60.xID = "060"
aux60.iconSrc = ICONPATH + "0-9_ani.gif"
aux60.iconSrcClosed = ICONPATH + "0-9.jpg"

aux6a = insFld(aux6, gFld("", "../series-a.htm"))
aux6a.xID = "06a"
aux6a.iconSrc = ICONPATH + "A_ani.gif"
aux6a.iconSrcClosed = ICONPATH + "A.jpg"

aux6b = insFld(aux6, gFld("", "../series-b.htm"))
aux6b.xID = "06b"
aux6b.iconSrc = ICONPATH + "B_ani.gif"
aux6b.iconSrcClosed = ICONPATH + "B.jpg"

aux6c = insFld(aux6, gFld("", "../series-c.htm"))
aux6c.xID = "06c"
aux6c.iconSrc = ICONPATH + "C_ani.gif"
aux6c.iconSrcClosed = ICONPATH + "C.jpg"

aux6d = insFld(aux6, gFld("", "../series-d.htm"))
aux6d.xID = "06d"
aux6d.iconSrc = ICONPATH + "D_ani.gif"
aux6d.iconSrcClosed = ICONPATH + "D.jpg"

aux6e = insFld(aux6, gFld("", "../series-e.htm"))
aux6e.xID = "06e"
aux6e.iconSrc = ICONPATH + "E_ani.gif"
aux6e.iconSrcClosed = ICONPATH + "E.jpg"

aux6f = insFld(aux6, gFld("", "../series-f.htm"))
aux6f.xID = "06f"
aux6f.iconSrc = ICONPATH + "F_ani.gif"
aux6f.iconSrcClosed = ICONPATH + "F.jpg"

aux6g = insFld(aux6, gFld("", "../series-g.htm"))
aux6g.xID = "06g"
aux6g.iconSrc = ICONPATH + "G_ani.gif"
aux6g.iconSrcClosed = ICONPATH + "G.jpg"

aux6h = insFld(aux6, gFld("", "../series-h.htm"))
aux6h.xID = "06h"
aux6h.iconSrc = ICONPATH + "H_ani.gif"
aux6h.iconSrcClosed = ICONPATH + "H.jpg"

aux6i = insFld(aux6, gFld("", "../series-i.htm"))
aux6i.xID = "06i"
aux6i.iconSrc = ICONPATH + "I_ani.gif"
aux6i.iconSrcClosed = ICONPATH + "I.jpg"

aux6j = insFld(aux6, gFld("", "../series-j.htm"))
aux6j.xID = "06j"
aux6j.iconSrc = ICONPATH + "J_ani.gif"
aux6j.iconSrcClosed = ICONPATH + "J.jpg"

aux6k = insFld(aux6, gFld("", "../series-k.htm"))
aux6k.xID = "06k"
aux6k.iconSrc = ICONPATH + "K_ani.gif"
aux6k.iconSrcClosed = ICONPATH + "K.jpg"

aux6l = insFld(aux6, gFld("", "../series-l.htm"))
aux6l.xID = "06l"
aux6l.iconSrc = ICONPATH + "L_ani.gif"
aux6l.iconSrcClosed = ICONPATH + "L.jpg"

aux6m = insFld(aux6, gFld("", "../series-m.htm"))
aux6m.xID = "06m"
aux6m.iconSrc = ICONPATH + "M_ani.gif"
aux6m.iconSrcClosed = ICONPATH + "M.jpg"

aux6n = insFld(aux6, gFld("", "../series-n.htm"))
aux6n.xID = "06n"
aux6n.iconSrc = ICONPATH + "N_ani.gif"
aux6n.iconSrcClosed = ICONPATH + "N.jpg"

aux6o = insFld(aux6, gFld("", "../series-o.htm"))
aux6o.xID = "06o"
aux6o.iconSrc = ICONPATH + "O_ani.gif"
aux6o.iconSrcClosed = ICONPATH + "O.jpg"

aux6p = insFld(aux6, gFld("", "../series-p.htm"))
aux6p.xID = "06p"
aux6p.iconSrc = ICONPATH + "P_ani.gif"
aux6p.iconSrcClosed = ICONPATH + "P.jpg"

aux6q = insFld(aux6, gFld("", "../series-q.htm"))
aux6q.xID = "06q"
aux6q.iconSrc = ICONPATH + "Q_ani.gif"
aux6q.iconSrcClosed = ICONPATH + "Q.jpg"

aux6r = insFld(aux6, gFld("", "../series-r.htm"))
aux6r.xID = "06r"
aux6r.iconSrc = ICONPATH + "R_ani.gif"
aux6r.iconSrcClosed = ICONPATH + "R.jpg"

aux6s = insFld(aux6, gFld("", "../series-s.htm"))
aux6s.xID = "06s"
aux6s.iconSrc = ICONPATH + "S_ani.gif"
aux6s.iconSrcClosed = ICONPATH + "S.jpg"

aux6t = insFld(aux6, gFld("", "../series-t.htm"))
aux6t.xID = "06t"
aux6t.iconSrc = ICONPATH + "T_ani.gif"
aux6t.iconSrcClosed = ICONPATH + "T.jpg"

aux6u = insFld(aux6, gFld("", "../series-u.htm"))
aux6u.xID = "06u"
aux6u.iconSrc = ICONPATH + "U_ani.gif"
aux6u.iconSrcClosed = ICONPATH + "U.jpg"

aux6v = insFld(aux6, gFld("", "../series-v.htm"))
aux6v.xID = "06v"
aux6v.iconSrc = ICONPATH + "V_ani.gif"
aux6v.iconSrcClosed = ICONPATH + "V.jpg"

aux6w = insFld(aux6, gFld("", "../series-w.htm"))
aux6w.xID = "06w"
aux6w.iconSrc = ICONPATH + "W_ani.gif"
aux6w.iconSrcClosed = ICONPATH + "W.jpg"

aux6x = insFld(aux6, gFld("", "../series-x.htm"))
aux6x.xID = "06x"
aux6x.iconSrc = ICONPATH + "X_ani.gif"
aux6x.iconSrcClosed = ICONPATH + "X.jpg"

aux6y = insFld(aux6, gFld("", "../series-y.htm"))
aux6y.xID = "06y"
aux6y.iconSrc = ICONPATH + "Y_ani.gif"
aux6y.iconSrcClosed = ICONPATH + "Y.jpg"

aux6z = insFld(aux6, gFld("", "../series-z.htm"))
aux6z.xID = "06z"
aux6z.iconSrc = ICONPATH + "Z_ani.gif"
aux6z.iconSrcClosed = ICONPATH + "Z.jpg"

aux7 = insFld(foldersTree, gFld("", "../audiocds.htm"))
aux7.xID = "07"
aux7.iconSrc = ICONPATH + "audiocds_open.jpg"
aux7.iconSrcClosed = ICONPATH + "audiocds.jpg"

aux70a = insFld(aux7, gFld("&nbsp;<b>Best of 1928-87</b>", "../audiocds.htm#years"))
aux70a.xID = "070a"
aux70a.iconSrc = ICONPATH + "cd.gif"
aux70a.iconSrcClosed = ICONPATH + "cd2.gif"

aux70b = insFld(aux7, gFld("&nbsp;<b>Best of 1920s-80s</b>", "../audiocds.htm#decades"))
aux70b.xID = "070b"
aux70b.iconSrc = ICONPATH + "cd.gif"
aux70b.iconSrcClosed = ICONPATH + "cd2.gif"

aux70c = insFld(aux7, gFld("&nbsp;<b>Best of genres</b>", "../audiocds.htm#categories"))
aux70c.xID = "070c"
aux70c.iconSrc = ICONPATH + "cd.gif"
aux70c.iconSrcClosed = ICONPATH + "cd2.gif"

aux7a = insFld(foldersTree, gFld("", "../sound_samples.htm"))
aux7a.xID = "07a0"
aux7a.iconSrc = ICONPATH + "sound_samples_open.jpg"
aux7a.iconSrcClosed = ICONPATH + "sound_samples.jpg"

aux7a01 = insDoc(aux7a, gLnk("R", "&nbsp;&nbsp;<b>What's on the radio?</b>", "../whatson.htm"))
aux7a01.xID = "07a01"  
aux7a01.iconSrc = ICONPATH + "../listen1.jpg"
aux7a01.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a1 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Adventure</b>", "../adventure_sound_sample.htm"))
aux7a1.xID = "07a1"  
aux7a1.iconSrc = ICONPATH + "../listen1.jpg"
aux7a1.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a2 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>British</b>", "../british_sound_sample.htm"))
aux7a2.xID = "07a2"  
aux7a2.iconSrc = ICONPATH + "../listen1.jpg"
aux7a2.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a3 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Children</b>", "../children_sound_sample.htm"))
aux7a3.xID = "07a3"  
aux7a3.iconSrc = ICONPATH + "../listen1.jpg"
aux7a3.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a4 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Comedy</b>", "../comedy_sound_sample.htm"))
aux7a4.xID = "07a4"  
aux7a4.iconSrc = ICONPATH + "../listen1.jpg"
aux7a4.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a5 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Crime</b>", "../crime_sound_sample.htm"))  
aux7a5.xID = "07a5" 
aux7a5.iconSrc = ICONPATH + "../listen1.jpg"
aux7a5.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a6 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Drama</b>", "../drama_sound_sample.htm"))
aux7a6.xID = "07a6" 
aux7a6.iconSrc = ICONPATH + "../listen1.jpg"
aux7a6.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a7 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Historical</b>", "../historical_sound_sample.htm"))
aux7a7.xID = "07a7"  
aux7a7.iconSrc = ICONPATH + "../listen1.jpg"
aux7a6.iconSrcClosed = ICONPATH + "../listen1.jpg"   

aux7a8 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Horror</b>", "../horror_sound_sample.htm"))
aux7a8.xID = "07a8" 
aux7a8.iconSrc = ICONPATH + "../listen1.jpg"
aux7a8.iconSrcClosed = ICONPATH + "../listen1.jpg"   
  
aux7a9 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Mystery</b>", "../mystery_sound_sample.htm"))
aux7a9.xID = "07a9"  
aux7a9.iconSrc = ICONPATH + "../listen1.jpg"
aux7a9.iconSrcClosed = ICONPATH + "../listen1.jpg"   

aux7a10 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Rare</b>", "../rare_sound_sample.htm"))
aux7a10.xID = "07a10" 
aux7a10.iconSrc = ICONPATH + "../listen1.jpg"
aux7a10.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7a11 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Romance</b>", "../romance_sound_sample.htm"))
aux7a11.xID = "07a11"  
aux7a11.iconSrc = ICONPATH + "../listen1.jpg"
aux7a11.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7a12 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Sci-Fi</b>", "../sci-fi_sound_sample.htm"))
aux7a12.xID = "07a12"  
aux7a12.iconSrc = ICONPATH + "../listen1.jpg"
aux7a12.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7A12a = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Sport</b>", "../johnston_sound_sample.htm"))
aux7A12a.xID = "07a12a"  
aux7A12a.iconSrc = ICONPATH + "../listen1.jpg"
aux7A12a.iconSrcClosed = ICONPATH + "../listen1.jpg"

aux7a13 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>U.S.</b>", "../US_sound_sample.htm"))
aux7a13.xID = "07a13" 
aux7a13.iconSrc = ICONPATH + "../listen1.jpg"
aux7a13.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7a14 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Westerns</b>", "../westerns_sound_sample.htm"))
aux7a14.xID = "07a14"  
aux7a14.iconSrc = ICONPATH + "../listen1.jpg"
aux7a14.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7a15 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>WWII</b>", "../WWII_sound_sample.htm"))
aux7a15.xID = "07a15" 
aux7a15.iconSrc = ICONPATH + "../listen1.jpg"
aux7a15.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7a16 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<b>Lone Ranger's farewell</b>", "../loneranger_sound_sample.htm"))
aux7a16.xID = "07a16"  
aux7a16.iconSrc = ICONPATH + "../listen1.jpg"
aux7a16.iconSrcClosed = ICONPATH + "../listen1.jpg" 

aux7a17 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<FONT size=3><b>Warning", "../warning.htm"))
aux7a17.xID = "07a17"  
aux7a17.iconSrc = ICONPATH + "warning.gif"
aux7a17.iconSrcClosed = ICONPATH + "warning.gif"

aux7a18 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<font color='darkbrown'><b>Jack Palance</b>", "../palance_sound_sample.htm"))
aux7a18.xID = "07a18"  
aux7a18.iconSrc = ICONPATH + "../listen2.gif"
aux7a18.iconSrcClosed = ICONPATH + "../listen2.gif" 

aux7a19 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<font color='darkbrown'><b>Orson's tantrum</b>", "../orson.htm"))
aux7a19.xID = "07a19"  
aux7a19.iconSrc = ICONPATH + "../listen2.gif"
aux7a19.iconSrcClosed = ICONPATH + "../listen2.gif" 

aux7a20 = insDoc(aux7a, gLnk("B", "&nbsp;&nbsp;<font color='darkbrown'><b>More from Orson</b>",  "../orson1.htm")) 
aux7a20.xID = "07a20"  
aux7a20.iconSrc = ICONPATH + "../listen2.gif"
aux7a20.iconSrcClosed = ICONPATH + "../listen2.gif" 


aux7a21 = insDoc(aux7a, gLnk("R", "&nbsp;&nbsp;<font color='darkbrown'><b>OTR Babylon</b>", "../sound_samples1.htm"))
aux7a21.xID = "07a21"  
aux7a21.iconSrc = ICONPATH + "../listen2.gif"
aux7a21.iconSrcClosed = ICONPATH + "../listen2.gif" 

aux8 = insFld(foldersTree, gFld("", "../order.htm"))
aux8.xID = "08"
aux8.iconSrc = ICONPATH + "how_to_order_open.jpg"
aux8.iconSrcClosed = ICONPATH + "how_to_order.jpg"

aux9 = insFld(foldersTree, gFld("", "../faq.htm"))
aux9.xID = "09"
aux9.iconSrc = ICONPATH + "faq_open.jpg"
aux9.iconSrcClosed = ICONPATH + "faq.jpg"

aux10 = insFld(foldersTree, gFld("", "../aboutotrdepot.htm"))
aux10.xID = "10"
aux10.iconSrc = ICONPATH + "about_open.jpg"
aux10.iconSrcClosed = ICONPATH + "about.jpg"

aux11 = insFld(foldersTree, gFld("", "../contact.htm"))
aux11.xID = "11"
aux11.iconSrc = ICONPATH + "contact_open.jpg"
aux11.iconSrcClosed = ICONPATH + "contact.jpg"

aux12 = insDoc(aux11, gLnk("R", "&nbsp;&nbsp;<b>Contact</b>", "../contact.htm"))
aux12.xID = "12"  
aux12.iconSrc = ICONPATH + "emailicon.gif"
aux12.iconSrcClosed = ICONPATH + "emailicon.gif" 


aux13 = insDoc(aux11, gLnk("R", "&nbsp;&nbsp;<b>Email</b>", "mailto:deejayp4@hotmail.com?subject=old%20time%20radio%20shows"))
aux13.xID = "13"  
aux13.iconSrc = ICONPATH + "emailicon.gif"
aux13.iconSrcClosed = ICONPATH + "emailicon.gif"