juegos de caracteres

This commit is contained in:
Gabriel Lorenzo 2005-01-28 18:49:36 +00:00
parent d03743b75f
commit b1e3b88e16
2 changed files with 24 additions and 6 deletions

View file

@ -0,0 +1,12 @@
JUEGOS DE CARACTERES SOPORTADOS POR TEXT.DLL
----------------------------------------------
referencia: http://www.iana.org/assignments/character-sets
FIXME: hacer latin1 el verdadero latin1! (y quizás un fichero nuevo para windows-1252)
MIBenum Nombre Fichero Notas
------- ------ ------- -----
4 ISO-8859-1 latin1 En realidad es 2252/windows-1252!!
(aka WinLatin1, parcialmente compatible con latin1)
2011 IBM437 msdos Juego de caracteres de DIV (IBM codepage 437)

View file

@ -31,6 +31,12 @@ int ExportaFuncs(EXPORTAFUNCS_PARAMS)
{ {
CONST("all_text",0); CONST("all_text",0);
/* ver juegos de caracteres.txt (son los MIBenum) */
CONST("charset_latin1",4);
CONST("charset_msdos",2011);
GLOBAL("charset",2011);
FUNCTION("load_fnt",1,eDiv_LoadFnt) ; FUNCTION("load_fnt",1,eDiv_LoadFnt) ;
FUNCTION("write",5,eDiv_Write) ; FUNCTION("write",5,eDiv_Write) ;
FUNCTION("write_int",5,eDiv_WriteInt) ; FUNCTION("write_int",5,eDiv_WriteInt) ;
@ -38,7 +44,7 @@ int ExportaFuncs(EXPORTAFUNCS_PARAMS)
FUNCTION("delete_text",1,eDiv_DeleteText) ; FUNCTION("delete_text",1,eDiv_DeleteText) ;
ENTRYPOINT( frame ) ; ENTRYPOINT( frame ) ;
ENTRYPOINT(first_load) ; ENTRYPOINT(first_load) ;
return TRUE ; return TRUE ;
} }
@ -87,7 +93,7 @@ int eDiv_LoadFnt(FUNCTION_PARAMS)
fuente_control_s[i].imagen=temp; fuente_control_s[i].imagen=temp;
} }
fclose(fuente) ; fclose(fuente) ;
fclose(fichero) ; fclose(fichero) ;
existe[i] = 1 ; existe[i] = 1 ;
@ -219,7 +225,7 @@ int eDiv_WriteInt(FUNCTION_PARAMS)
itoa( fp->mem[ textos[i].offset_var ] , texto2 , 10 ) ; itoa( fp->mem[ textos[i].offset_var ] , texto2 , 10 ) ;
texto = texto2 ; texto = texto2 ;
/* Calculamos el ancho del fichero */ /* Calculamos el ancho del fichero */
w = 0 ; w = 0 ;
for ( j = 0 ; (unsigned)j < strlen(texto) ; j++ ) for ( j = 0 ; (unsigned)j < strlen(texto) ; j++ )
@ -321,7 +327,7 @@ void frame(FUNCTION_PARAMS)
itoa( fp->mem[ textos[i].offset_var ] , texto2 , 10 ) ; itoa( fp->mem[ textos[i].offset_var ] , texto2 , 10 ) ;
texto = texto2 ; texto = texto2 ;
/* Calculamos el ancho del fichero */ /* Calculamos el ancho del fichero */
w = 0 ; w = 0 ;
for ( j = 0 ; (unsigned)j < strlen(texto) ; j++ ) for ( j = 0 ; (unsigned)j < strlen(texto) ; j++ )
@ -380,7 +386,7 @@ void frame(FUNCTION_PARAMS)
* falta hacer los scrolls :P * falta hacer los scrolls :P
*/ */
/* /*
if ( fp->existe.dibuja ) if ( fp->existe.dibuja )
{ {
if ( fp->files[0].existe ) if ( fp->files[0].existe )
{ {
@ -394,7 +400,7 @@ void frame(FUNCTION_PARAMS)
} }
} }
} }
*/ */
} }