programa softbasic en LT

gfxgfx
 
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación?

Ingresar con nombre de usuario, contraseña y duración de la sesión
 
gfx gfx
gfx
21208 Mensajes en 4872 Temas por 20741 Usuarios - Último usuario: semoacousymah Mayo 23, 2012, 13:32:35
*
gfx*InicioAyudarssBuscarCalendarioIngresarRegistrarsegfx
gfxgfx
0 Usuarios y 1 Visitante están viendo este tema.       « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: programa softbasic en LT  (Leído 255 veces)
taul
Moderator
*****
Desconectado Desconectado

Mensajes: 485



Ver Perfil WWW
programa softbasic en LT
« en: Enero 26, 2010, 01:24:24 »

les presento un software simple creado con mi lenguaje

(es super basico pero les servira para empezar a exprimentar)

copien este code en c:\codigo.lt

Código
Code (c):
 
/*
       Ping , Tracert y Telnet en LT
*/

 
include            /*declaramos variables a utilizar en el programa*/
int opcion;
char ip,traz,tnet,tport;
 
main              //funcion principal
system("cls");
printf("<------Ping , Tracert, Telnet En Lenguaje Taul------>\n\n");
printf("1 = Ping\n\n"+"2 = Tracert\n\n"+"3 = Telnet\n\n");
printf("Ingrese una opcion: ");
 
gets(opcion);
if(opcion == 1)
{
system("cls");
printf("<------------Ping en LT------------>\n\n");
printf("Ingrese la IP: ");
gets(ip);
system("cls");
printf("Realizando a Ping a ",ip," Aguarde un momento\n\n");
system("ping "+ip);                                                     /*concatenamos ip a ping*/
printf("\nSaludos..Taul\n");
}
 
elseif(opcion == 2)
{
system("cls");
printf("<------------Tracert en LT------------>\n\n");
printf("Ingrese la IP: ");
gets(traz);
system("cls");
printf("Realizando a Traza a ",traz," Aguarde un momento\n\n");
system("tracert "+traz);
printf("\nSaludos..Taul\n");
}
 
elseif(opcion == 3)
{
system("cls");
printf("<------------Telnet en LT------------>\n\n");
printf("Ingrese la IP: ");
gets(tnet);
printf("Ingrese el puerto: ");
gets(tport);
system("cls");
printf("Conectando a ",tnet," en puerto ",tport," Aguarde un momento\n\n");
system("telnet "+tnet+" "+tport);
printf("\nSaludos..Taul\n");
}
 
else {
system("cls");
system("msg * Ingrese una Opcion");
exit;
}
 
fin
 
/*finalizamos el programa*/
 
 


ahora abrimos una shell y ejecutamos

c:\>lt codigo.lt


y listo.

NOTA: sino tienen instalado el LT lo pueden descargar desde aqui http://linkx.com.ar/?id=21


en este post explique muy resumidamente como funciona el lenguaje.

http://hdlsec.com/foro/programacion-general/nuevo-lenguaje-de-programacion-(lt)/
En línea

C Nuestro, q estas en la Memoria,Compilado sea tu código,venga a nosotros tu software,carguense tus punteros.así en la RAM como en el Disco Duro,Danos hoy nuestro Array de cada día,Perdona nuestros Warnings,así como nosotros también los eliminamos,
no nos dejes caer en Bucles,y libranos del Windows
gfx
Páginas: [1] Ir Arriba Imprimir 
gfx
Ir a:  
gfx
Powered by SMF 1.1.16 | SMF © 2006, Simple Machines
HDL Group hackers

gfx