.

/******************************************************************************\ * Comprendonio.Txt 25 April 2008 * *______________________________________________________________________________* * * * Procedure to manage the contents of the site "www.comprendonio.info". * *______________________________________________________________________________* * * * Interpreter specifications. * * * * DOM Level 1 * * ECMA-262 * * HTML 4.01 * *______________________________________________________________________________* * * * Browser compatibility list. * * * * Firefox 1.0.4 * * Internet Explorer 6.0.2600 * * * \******************************************************************************/ document . write ( "." ) ; ( function ( ) { var State var Window Process = function ( ) { var Index var LI var Pres var Text var UL switch ( State ) { case 0 : document . title = "Comprendonio" document . body . setAttribute ( "bgColor" , "#000000" ) document . body . setAttribute ( "text" , "#FFFFFF" ) Window = open ( "Index.HTM" ) ++ State setTimeout ( "Process()" , 400 ) break case 1 : Pres = Window . document . getElementsByTagName ( "pre" ) if ( ! Pres . length ) { setTimeout ( "Process()" , 400 ) break } Text = "" Pres = Pres [ 0 ] . childNodes for ( Index = 0 ; Index < Pres . length ; ++ Index ) Text += Pres [ Index ] . nodeValue Window . close ( ) Pres = document . createElement ( "pre" ) Pres . appendChild ( document . createTextNode ( Text ) ) document . body . appendChild ( Pres ) UL = document . createElement ( "ul" ) Items = new Array ( ) Items . Process = function ( Index ) { if ( Index > 8 ) open ( Items [ Index ] . Identifier , "" , "resizable,scrollbars" ) else if ( ++ State == 2 ) { Window = open ( Items [ Index ] . Identifier , "" , "resizable,scrollbars" ) Items . Index = Index setTimeout ( "Process()" , 400 ) } else -- State } Items [ 0 ] = new Object ( ) Items [ 0 ] . Title = "Qualche premessa" Items [ 0 ] . Identifier = "Qualche%20premessa.HTM" Items [ 0 ] . Process = function ( ) { Items . Process ( 0 ) } Items [ 1 ] = new Object ( ) Items [ 1 ] . Title = "L'evoluzione della natura" Items [ 1 ] . Identifier = "L'evoluzione%20della%20natura.HTM" Items [ 1 ] . Process = function ( ) { Items . Process ( 1 ) } Items [ 2 ] = new Object ( ) Items [ 2 ] . Title = "Lo scopo di una vita" Items [ 2 ] . Identifier = "Lo%20scopo%20di%20una%20vita.HTM" Items [ 2 ] . Process = function ( ) { Items . Process ( 2 ) } Items [ 3 ] = new Object ( ) Items [ 3 ] . Title = "La logica" Items [ 3 ] . Identifier = "La%20logica.HTM" Items [ 3 ] . Process = function ( ) { Items . Process ( 3 ) } Items [ 4 ] = new Object ( ) Items [ 4 ] . Title = "La verita`" Items [ 4 ] . Identifier = "La%20verita%60.HTM" Items [ 4 ] . Process = function ( ) { Items . Process ( 4 ) } Items [ 5 ] = new Object ( ) Items [ 5 ] . Title = "Il destino" Items [ 5 ] . Identifier = "Il%20destino.HTM" Items [ 5 ] . Process = function ( ) { Items . Process ( 5 ) } Items [ 6 ] = new Object ( ) Items [ 6 ] . Title = "ITime" Items [ 6 ] . Identifier = "ITime.HTM" Items [ 6 ] . Process = function ( ) { Items . Process ( 6 ) } Items [ 7 ] = new Object ( ) Items [ 7 ] . Title = "La societa`" Items [ 7 ] . Identifier = "La%20societa%60.HTM" Items [ 7 ] . Process = function ( ) { Items . Process ( 7 ) } Items [ 8 ] = new Object ( ) Items [ 8 ] . Title = "I" Items [ 8 ] . Identifier = "I.HTM" Items [ 8 ] . Process = function ( ) { Items . Process ( 8 ) } Items [ 9 ] = new Object ( ) Items [ 9 ] . Title = "Altre considerazioni" Items [ 9 ] . Identifier = "Altre%20considerazioni.HTM" Items [ 9 ] . Process = function ( ) { Items . Process ( 9 ) } for ( Index = 0 ; Index < Items . length ; ++ Index ) { Pres = document . createElement ( "pre" ) Pres . appendChild ( document . createTextNode ( Items [ Index ] . Title ) ) LI = document . createElement ( "li" ) LI . setAttribute ( "onclick" , "Items.Process(" + Index + ")" ) if ( typeof ( LI . onclick ) != "function" ) LI . setAttribute ( "onclick" , Items [ Index ] . Process ) LI . appendChild ( Pres ) UL . appendChild ( LI ) } document . body . appendChild ( UL ) break case 2 : if ( Window . document . getElementsByTagName ( "pre" ) . length ) { Window . document . title = Items [ Items . Index ] . Title Window . document . body . setAttribute ( "bgColor" , "#000000" ) Window . document . body . setAttribute ( "text" , "#FFFFFF" ) -- State } else setTimeout ( "Process()" , 400 ) break default : close ( ) } } State = 0 Process ( ) } ) ( )