Programadores de España

Programador en Java, Python , Perl y C++.

i'm trying to make cute things over here... ٩꒰๑• ̫•๑꒱ ۶♡

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>
#include <fcntl.h>

char *invertir(char*cadena) {
int longitud = strlen(cadena);
char temporal;
for (int izquierda = 0, derecha = longitud - 1; izquierda < (longitud / 2);
izquierda++, derecha--) {
temporal = cadena[izquierda];
cadena[izquierda] = cadena[derecha];
cadena[derecha] = temporal;
}
return cadena;
}

char*convertido(char*convertidor){
int i;


for(i=0;i<strlen(convertidor);i++){

if(convertidor[i]=='1')
convertidor[i]='a';
if(convertidor[i]=='2')
convertidor[i]='e';
if(convertidor[i]=='3')
convertidor[i]='i';
if(convertidor[i]=='4')
convertidor[i]='o';
if(convertidor[i]=='5')
convertidor[i]='u';
}

return convertidor;
}




int main(void) {
char delimitador[] = " ";
const char* filename = "lista.txt";
char *token;

FILE* input_file = fopen(filename, "r");
if (!input_file)
exit(EXIT_FAILURE);

char *contents = NULL;
size_t len = 0;











printf("mensaje decifrado : \n");
while (getline(&contents, &len, input_file) != -1){
token = strtok(contents, delimitador);
token=invertir(token);
token=convertido(token);

if(token != NULL){
while(token != NULL){
// Sólo en la primera pasamos la cadena; en las siguientes pasamos NULL
printf(" %s ", token);
token = strtok(NULL, delimitador);
if(token!=NULL){
token=invertir(token);
token=convertido(token);

}
//printf("\n");
}
}

//printf("%s", contents);
}

fclose(input_file);
free(contents);

exit(EXIT_SUCCESS);
}

Si bien no me dedico a la programación de forma profesional y estoy completamente desfasado en el uso de tecnologías y lenguajes modernos, llevo más de 30 años escribiendo programas y desarrollando pequeñas utilidades que puedan servir a todo tipo de usuarios.

Mis orígenes con la programación se remonta a las plataformas de 8 bits de Sinclair (ZX-81 y ZX-Spectrum) y más tarde pasé escribir programas, principalmente en BASIC, aunque también escribí algunas aplicaciones de gestión a medida en DBASE, para plataformas MS-DOS y posteriormente Windows, utilizando para ello VisualBASIC 5/6

En la actualidad, aunque parezca una locura o una mera aficción "retro", lo cierto es que sigo programando y mantenimiendo mis pequeños desarrollos en Visual Basic 5 y lo hago en Windows XP, 7, 8, 10 y 11 etc.. sin ningún problema.

Salvando pequeños obstáculos con la instalación y haciendo un pequeño cambio en el sistema puedes acceder incluso a las potentes ayudas HLP incluidas en VB

Ahora precisamente estoy creando una versión portable de VB5 muy sencilla para compilar incluso desde la consola.

El software generado es x86 pero saber que corre sin problemas en practicamente cualquier plataforma, incluso Linux con Wine, es para mí una ventaja a tener en cuenta, eso sí, nunca utilizo librerías ni controles externos, haces más código pero de esa forma evitas dependencias problemáticas.

Mi aplicaciones son Freeware y puedes encontrarla en la red, EuroSuite Utilities, GUTENBERG 3.0, ZX-DRAW, COVERBOOST, etc. Son en su mayoría pequeñitas utilidades que sirven para algo concreto, bueno, salvo EuroSuite que es algo más grande, y todas funcionan todavía bastante bien en cualquier sistema, desde un W95 hasta W11, no está mal, por ello creo que tienen recorrido aún.

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>
#include <fcntl.h>

char *invertir(char*cadena) {
int longitud = strlen(cadena);
char temporal;
for (int izquierda = 0, derecha = longitud - 1; izquierda < (longitud / 2);
izquierda++, derecha--) {
temporal = cadena[izquierda];
cadena[izquierda] = cadena[derecha];
cadena[derecha] = temporal;
}
return cadena;
}

char*convertido(char*convertidor){
int i;


for(i=0;i<strlen(convertidor);i++){

if(convertidor[i]=='1')
convertidor[i]='a';
if(convertidor[i]=='2')
convertidor[i]='e';
if(convertidor[i]=='3')
convertidor[i]='i';
if(convertidor[i]=='4')
convertidor[i]='o';
if(convertidor[i]=='5')
convertidor[i]='u';
}

return convertidor;
}




int main(void) {
char delimitador[] = " ";
const char* filename = "lista.txt";
char *token;

FILE* input_file = fopen(filename, "r");
if (!input_file)
exit(EXIT_FAILURE);

char *contents = NULL;
size_t len = 0;











printf("mensaje decifrado : \n");
while (getline(&contents, &len, input_file) != -1){
token = strtok(contents, delimitador);
token=invertir(token);
token=convertido(token);

if(token != NULL){
while(token != NULL){
// Sólo en la primera pasamos la cadena; en las siguientes pasamos NULL
printf(" %s ", token);
token = strtok(NULL, delimitador);
if(token!=NULL){
token=invertir(token);
token=convertido(token);

}
//printf("\n");
}
}

//printf("%s", contents);
}

fclose(input_file);
free(contents);

exit(EXIT_SUCCESS);
}