Título: Aprendemos TCL Publicado por: Erik# en 8 Octubre 2008, 18:55 pm Aprendemos TCL
Bueno, hoy, voy a introducir unas lecciones del manual de Aprendemos TCL. 1.Aprendemos TCL - Descarga Bueno, principalmente, el manual es orientado a linux, pero, podeis descargar de activestate: activetcl, lo instalais y listo. Los que usen debian, ubuntu o otros distros deribados, usad los sudo: (y los que no, usad google) sudo apt-get install tcl8.4 2.Flujos de salida Para mostrar variable, datos, texto plano y etc... usaremos la función puts "", bastante conocida de otros lenguajes, aqui un ejemplo: Código: puts "Hello World" 3.Aprendemos TCL - Variables Para crear una variable, tendremos que usar la sentencia SET: Código: set <nombre_de_la_variable> <valor> Por ejemplo, aqui uno: Código: set variableinicial 1995 Creariamos una variable llamada variableinicial con el valor 1995. Para mostrar variables con la funcion puts pondremos la variable como en la mayoria de lenguajes script: $variable. Para juntar texto con variable, nada mas tenemos que poner $nuestra_variable dentro de los "", no necesitaremos ponerlo fuera ni nada, ejemplo: Código: set años 13 Mostrara, Hola, Tengo 13 años. Tambien podemos crear variables de tipo string, cuando declaremos la variable, el contenido lo ponemos entre "", por ejemplo: Código: set hm "Hola mundo" Y mostrara Hola mundo... En la proxima lección, aprenderemos los flujos de entrada. Título: Re: Aprendemos TCL Publicado por: Erik# en 8 Octubre 2008, 19:01 pm 4.Funciones matematicas
Ya se que decia que pondria flujos de entrada, pero me ha surgido algo interesante para las variables, y son las funciones matematicas, aqui os dejo un listado de las funciones que hay: Primero operadores: * / % Multiplicación, división, resto. + - Sumar, restar. ++ -- Incremento o decremento. acos( x ) ArcoCoseno de x. asn( x ) ArcSeno de x. atan( x ) Arcotangente de x. atan2( y,x ) De rectangulares ( x,y ) a polares (r, th ). atan2 devuelve th. ceil ( x ) Primer valor entero mayor o igual que x. cos( x ) Coseno de x. cosh( x ) Coseno hiperbólico de x. exp( x ) Exponencial de x. floor( x ) Primer valor entero menor o igual que x. fmod( x, y ) valor en coma flotante resto de x/y. hypot( x, y ) Devuelve sqrt(x*x + y*y). log( x ) Logaritmo natural de x. log10( x ) Logaritmo en base 10 de x. pow( x,y ) x elevado a y. sin( x ) Seno de x. sinh( x ) Seno hiperbólico de x. sqrt( x ) raíz cuadrada de x. tan( x ) Tangente de x. tanh( x ) Tangente hiperbólica de x. abs( x ) valor absoluto de x. double( x ) Convierte a x en un valor en coma flotante. int( x ) trunca x a un entero. rand() Genera un número aletario entre 0 y 1. la semilla puede venir del reloj o inicializarse mediante srand. round( x ) Redondea x a un entero. srand(arg) Donde arg debe de ser un entero. Inicializa la semilla para la generación de números aleatorios. Título: Re: Aprendemos TCL Publicado por: Erik# en 8 Octubre 2008, 19:13 pm 5.Flujos de entrada
Bueno, llego el momento de aprender una simplisima funcion llamada GETS, nosotros unicamente la utilizaremos para hacer entradas mediante STDIN, es la misma funcion que perl. Sintaxis: Código: gets stdin nombre_de_mi_variable Esto crearia una variable con los datos introducidos por ti. Ahora veremos un ejemplo de entrada: Código: puts "Introduce tu nombre: " Como veis es algo simple. Título: Re: Aprendemos TCL Publicado por: Erik# en 8 Octubre 2008, 19:16 pm 6.Operaciones matematicas
Como veis, en las variables solo se introducen datos simples, no puedes efectuar funciones matematicas, para eso tenemos la funcion expr que efectua una funcion matematica de las que hemos expuesto antes. Por ejemplo: Código: expr 2+2 Mostraria 4. Pero si queremos hacer que sumen por ejemplo, 2 variables, hariamos algo asi: Código: set a 12 Esto mostraria 28. Espero que os sirva. Título: Re: Aprendemos TCL Publicado por: Erik# en 8 Octubre 2008, 19:23 pm 7.Nuestra primera aplicación
Nuestra primera aplicación sera una calculadora universal de 4 funciones, sumas, restas, mult. y divisiones. Código: #!/usr/bin/tcl Título: Re: Aprendemos TCL Publicado por: ^Tifa^ en 11 Octubre 2008, 04:27 am Conozco intermedio programacion Tcl/Tk :rolleyes: asi que creo que puedo aportar algo, para la parte de Tcl digo.
Abrir un archivo y leerlo : Código: set archivo [ open "archivito.txt" r ] Si es solo la primera linea : Código: set archivo [ open "archivito.txt" r ] :-* Título: Re: Aprendemos TCL Publicado por: Erik# en 11 Octubre 2008, 10:03 am Genial, muchas gracias, si puedes poner esto al inicio del todo:
Código: [size=24pt]8.Archivos[/size] |