1
0
mirror of https://github.com/RevCurtisP/C02.git synced 2024-11-29 01:49:19 +00:00
C02/asm.c

89 lines
1.6 KiB
C
Raw Normal View History

/*************************************
* C02 Assembly Language Routines *
*************************************/
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <string.h>
#include <errno.h>
#include "common.h"
#include "files.h"
#include "parse.h"
#include "asm.h"
char asmcmt[LINELEN]; //Processed Assembly Language Comment
/* Set comment to string */
void setcmt(char *s)
{
strcpy(cmtasm, s);
}
/* Append string to comment */
void addcmt(char *s)
{
2017-06-27 00:16:23 +00:00
//strcat(cmtasm, " ");
strcat(cmtasm, s);
}
/* Append character to comment */
void chrcmt(char c)
{
2017-06-27 00:16:23 +00:00
if (cmtasm[0] == 0 && c == ' ') return;
int i = strlen(cmtasm);
cmtasm[i++] = c;
cmtasm[i] = 0;
}
/* Process comment */
void prccmt()
{
if (strlen(cmtasm)) {
strcpy(asmcmt, ";");
strcat(asmcmt, cmtasm);
}
else
asmcmt[0] = 0;
setcmt("");
}
/* output a single line of assembly code */
void asmlin(char *opcode, char *oprnd)
{
if (strlen(lblasm)) strcat(lblasm, LABSFX);
prccmt();
fprintf(outfil, ASMFMT, lblasm, opcode, oprnd, asmcmt);
if (debug) printf(ASMFMT, lblasm, opcode, oprnd, asmcmt);
lblasm[0] = 0;
}
/* output a single comment line */
void cmtlin()
{
DEBUG("Writing Comment Line: %s\n", cmtasm);
fprintf(outfil, "; %s\n", cmtasm);
setcmt("");
}
/* Output a variable definition line *
* Uses: word - assembly oprnd */
void equlin()
{
fprintf(outfil, ASMFMT, lblasm, EQUOP, word, "");
if (debug) printf(ASMFMT, lblasm, EQUOP, word, "");
lblasm[0] = 0;
}
void prolog()
{
DEBUG("Writing Assembly Prolog\n", 0);
asmlin(CPUOP,CPUARG);
strcpy(cmtasm, "Program ");
strcat(cmtasm, srcnam);
cmtlin();
}