CP/M: De binario a ensamblador

[FloppySoftware]

Hola,

Lo que sigue es un pequeño programa en MESCC (compilador de "C" para CP/M), fácilmente adaptable a otros "C", que lee un fichero binario, y lo convierte a un fichero en ensamblador.

Es de mucha utilidad para tomar sprites, pantallas, fuentes, etc. y convertirlas a un formato que entienda un compilador de C, o un ensamblador.

Yo lo utilizo mucho en mis proyectos para CP/M y PCW.

Y si no cumple al 100% con nuestros requisitos particulares, siempre se puede modificar y recompilar.

Ahí os lo dejo.

Saludos.

Código: Seleccionar todo

/* BinToAsm.c

Converts a binary file into an assembler file for Z80.

Copyright (C) 2007 Floppy Software, Valencia, Spain.

This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 2, or (at your option) any
later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.

Compiled with MESCC.

Revisions:

22 Feb 2004 : v1.00
03 Apr 2007 : v1.01 / Minor changes.
10 Apr 2007 : Output 8 bytes in a line instead of 16.
15 May 2007 : v1.02 / Added title & usage help.
*/

#include <mescc.h>
#include <conio.h>
#include <string.h>
#include <ctype.h>
#include <fileio.h>
#include <printf.h>
#include <fprintf.h>

#define VERSION "1.02 / 15 May 2007"

FILE *fpi, *fpo;

int data, chpos;
unsigned counter;

main(argc, argv)
int argc, argv[];
{
printf("BinToAsm v%s\n\n", VERSION);

if(argc!=3)
{
printf("Usage: bintoasm binfile asmfile\n");
exit(1);
}

if((fpi=fopen(argv[1],"rb"))==NULL)
error("Opening input file");

if((fpo=fopen(argv[2],"w"))==NULL)
error("Opening output file");

counter=chpos=0;

while((data=fgetc(fpi))!=EOF)
{
if(!chpos)
fprintf(fpo, " DEFB");

fprintf(fpo, " %03d", data);

if(++chpos!=8)
fprintf(fpo, ",");
else
{
fprintf(fpo, "\n");
chpos=0;
}

++counter;
}

printf("%d bytes\n", counter);

if(fclose(fpi))
error("Closing input file");

if(fclose(fpo))
error("Closing output file");
}

error(txt)
char *txt;
{
printf("ERROR: %s\n", txt);
exit(1);
}