81 lines
2.0 KiB
C
81 lines
2.0 KiB
C
#include <string.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
void trit_flip(char *in, char *instruction) {
|
|
for (int i = 0; i<27; i++) {
|
|
in[i] = instruction[i];
|
|
}
|
|
}
|
|
int asm_rules(char *in, char *_asm){
|
|
|
|
for (int i = 0; i < 27; i++) {
|
|
_asm[i] = 0;
|
|
}
|
|
int pass = 0;
|
|
|
|
char *word = strtok(in, " ");
|
|
while(word != NULL) {
|
|
|
|
if (strcmp(word, "nop") == 0) {
|
|
//keeps the default value (0) if nop
|
|
} else if (word[0] == ';') {
|
|
//comments
|
|
break;
|
|
} else {
|
|
//cases make larger checks harder to read
|
|
if (strstr(word, "max")) {
|
|
trit_flip(_asm, "000000+00000+");
|
|
} else if (strstr(word, "min")) {
|
|
trit_flip(_asm, "000000+00000-");
|
|
} else if (strstr(word, "any")) {
|
|
trit_flip(_asm, "000000+000000");
|
|
} else if (strstr(word, "cons")) {
|
|
trit_flip(_asm, "000000+0000+-");
|
|
} else if (strstr(word, "add")) {
|
|
trit_flip(_asm, "000000+000+-+");
|
|
} else if (strstr(word, "sub")) {
|
|
trit_flip(_asm, "000000+000--+");
|
|
} else if (strstr(word, "mul")) {
|
|
trit_flip(_asm, "000000+000+0+");
|
|
} else if (strstr(word, "div")) {
|
|
trit_flip(_asm, "000000+000+0-");
|
|
} else if (strstr(word, "dec")) {
|
|
trit_flip(_asm, "000000+0000--");
|
|
} else if (strstr(word, "inc")) {
|
|
trit_flip(_asm, "000000+0000+-");
|
|
} else if (strstr(word, "iou")) {
|
|
trit_flip(_asm, "000000-0000--");
|
|
} else if (strstr(word, "ieq")) {
|
|
trit_flip(_asm, "000000-0000-+");
|
|
} else if (strstr(word, "jmp")) {
|
|
trit_flip(_asm, "000000-000000");
|
|
} else if (strstr(word, "jec")) {
|
|
trit_flip(_asm, "000000-00000+");
|
|
} else if (strstr(word, "mov")) {
|
|
trit_flip(_asm, "000000000000+");
|
|
} else if (strstr(word, "Nst")) { //underflow test
|
|
trit_flip(_asm, "-------------");
|
|
} else if (strstr(word, "Pst")) { //overflow test
|
|
trit_flip(_asm, "+++++++++++++");
|
|
}
|
|
if(word[0] == 'i') {
|
|
//integer
|
|
_asm[5] = '0';
|
|
} else if(word[0] == 'f') {
|
|
//floating
|
|
_asm[5] = '-';
|
|
}
|
|
if (word[0] == '$' || word[0] == '@') {
|
|
|
|
}
|
|
|
|
}
|
|
|
|
word = strtok(NULL, " ");
|
|
}
|
|
pass = 0;
|
|
return 0;
|
|
}
|
|
|