writeln(''); close(); } } } function dive(n,x) { cdive = n; if(x!=0) s_dtype(x); else disp_dive(cdive); } function prev() { if(cdive==fdive) return; if(intrack!=1) alert("I'm lost"); else cdive--; disp_dive(cdive); } function next() { if(cdive==ldive) return; if(intrack!=1) alert("I'm lost"); else cdive++; disp_dive(cdive); } function s_dtype(n) { if(n==dtype) return; dtype = n; switch(dtype) { case 0: pref = 'dive_'; suff = '.htm'; if(cdive==0) cdive=1; break; case 1: pref = 'vsp_'; suff = '.gif'; break; case 2: dtype = 2; main.location.href = 'stat.htm'; return; break; } disp_dive(cdive); } //-->