>?


;)tluser$(tluser_eerf_lqsym    

    	

}    

;]"sutatsresu"[wor$ ohce        

;]"emanlluf"[wor$ ohce        

;]"diresu"[wor$ ohce        

{ ))tluser$(cossa_hctef_lqsym = wor$( elihw    

sutatsresu$ dna ,emanlluf$ ,diresu$ etaerc neht       //    

ll'uoy ,pool gniwollof eht edisni ;)wor$(tcartxe tup uoy fI :etoN //    

pool a esu ot deen on ,wor eno tsuj gnitcepxe er'uoy fI :etoN //    

yarra evitaicossa na sa wor$ ni wor taht tup ,stsixe atad fo wor a elihW //    


}    

;tixe        

;"gnitixe ma os tnirp ot gnihton ,dnuof swor oN" ohce        

{ )0 == )tluser$(swor_mun_lqsym( fi    

    

}    

;tixe        

;)(rorre_lqsym . " :BD morf )lqs$( yreuq nur yllufsseccus ton dluoC" ohce        

{ )tluser$!( fi    


;)lqs$(yreuq_lqsym = tluser$    


;"1 = sutatsresu  EREHW            

elbatemos   MORF            

 sutatsresu ,emanlluf ,diresu sa di TCELES" = lqs$    

    

}    

;tixe        

;)(rorre_lqsym . " :emanbdym tceles ot elbanU" ohce        

{ ))"emanbdym"(bd_tceles_lqsym!( fi    

    

}    

;tixe        

;)(rorre_lqsym . " :BD ot tcennoc ot elbanU" ohce        

{ )nnoc$!( fi    

    

;)"drowssap_lqsym" ,"resu_lqsym" ,"tsohlacol"(tcennoc_lqsym = nnoc$    


php?<