add files

Author: coder114514

.gitignore

@@ -0,0 +1,2 @@
+.vscode
+*.exe

LICENSE.txt

@@ -0,0 +1,27 @@
+This is a **modified** version of the Casio emulator developed by [qiufuyu](https://github.com/qiufuyu123/CasioEmuX) and contains a nX/U8 disassembler written in lua and one written in cpp (their output formats are different).
+
+Files are modified so that they can work on windows.
+
+Note that ROMs are **not** included in the `models` folder (for copyright reasons), you have to obtain one from somewhere else or dump it from a real calculator or emulator. (note that models labeled with `_emu` are for ROMs dumped from official emulators)
+
+
+# CasioEmuX-win
+
+An emulator and disassembler for the CASIO calculator series using the nX-U8/100 core.  
+With debuggers.
+
+To build it, install tdm-gcc and run build.bat
+
+syntax:
+
+`casioemu key1=value1 key2=value2 ...`
+
+`model=<directory>` model directory, which should contain interface.png, model.lua, rom.bin(you can find it elsewhere) and _disas.txt(use disas-cpp on rom.bin to obtain this file)
+
+these arguments are optional:
+
+`script=<xxx.lua>` the supplied lua script will run on startup
+
+`exit_on_console_shutdown=true/false` pretty self-evident, default to false
+
+`history=<history file path>` input history

README.md

@@ -0,0 +1,32 @@
+# folder names 'bin' and 'obj' are hardcoded
+# tdm-gcc
+
+CCFLAGS = -D_GLIBCXX_DEBUG -O2 -std=c++14 -Wall -Wextra -Werror -pedantic
+CCFLAGS2 = -D_GLIBCXX_DEBUG -O2 -std=c++14 -Wall -Wextra -pedantic
+
+all: u8-disas u8-disas-split
+
+u8-disas: nX-U8_is.txt main Makefile example.cpp
+	main $< temp.cpp
+	g++ $(CCFLAGS) temp.cpp -o $@
+	del temp.cpp
+
+u8-disas-split: nX-U8_is_split.txt main Makefile example.cpp
+	main $< temp.cpp
+	g++ $(CCFLAGS) temp.cpp -o $@
+	del temp.cpp
+
+u8-disas-brief: nX-U8_brief.txt main Makefile example.cpp
+	main $< temp.cpp
+	g++ $(CCFLAGS2) temp.cpp -o $@
+	del temp.cpp
+
+main: main.cpp lib.h lib.cpp
+	g++ $(CCFLAGS) main.cpp lib.cpp -o $@
+
+clean:
+	if exist main.exe del main.exe
+	if exist u8-disas.exe del u8-disas.exe
+	if exist u8-disas-split.exe del u8-disas-split.exe
+	if exist u8-disas-split.exe del u8-disas-brief.exe
+	if exist temp.cpp del temp.cpp

disas-cpp/Makefile

@@ -0,0 +1,8 @@
+how to build:
+Use tdm-gcc, run `mingw32-make all` in this directory. If something goes wrong, run `mingw32-make clean` to clean up and start again.
+
+usage:
+`main` is for generating disassemblers, run it without arguments to show the help message
+`u8-disas` is the nX/u8 disassembler, run it without arguments to show the help message
+`u8-disas-split` splits 4-byte command into 2 2-byte commands, run it without arguments to show the help message
+`u8-disas-brief` well I do not know what it does, run it without arguments to show the help message

disas-cpp/README.md

@@ -0,0 +1,118 @@
+// Independent from the project.
+
+#include <iostream>
+#include <fstream>
+#include <string>
+#include <deque>
+#include <cstring>
+
+#define ip (totallen - length - buf.size())
+
+std::string tohex(int n, int len) {
+    std::string retval = "";
+    for (int x = 0; x < len; x++) {
+        retval = "0123456789ABCDEF"[n & 0xF] + retval;
+        n >>= 4;
+    }
+    return retval;
+}
+// Those are important to the disassembler.
+
+// ------------------------------------------------------------------ 1
+// ------------------------------------------------------------------ 2
+
+int main(int argc, char** argv) {
+    char* st = new char[0x400];
+    if (argc != 5) { // argv[0] = executable file name
+        std::ifstream fi {"help.txt"};
+        do {
+            fi.getline(st, 0x400);
+        } while (std::strcmp(st, "*") != 0);
+        while (true) {
+            fi.getline(st, 0x400);
+            if (fi.fail()) {
+                fi.close();
+                return 0;
+            }
+            std::cout << st << "\n";
+        }
+    }
+
+    std::ifstream in {argv[1], std::ios_base::binary};
+    in.seekg(std::stoi(argv[2], nullptr, 0));
+    int length = std::stoi(argv[3], nullptr, 0), l1, i, totallen = length;
+    std::ofstream out {argv[4]};
+    std::deque<std::uint8_t> buf {};
+    char* readbuf = new char[0x10000];
+
+    l1 = std::min(length, 0x10000);
+    in.read(readbuf, l1);
+    length -= l1;
+    for (i = 0; i < l1; i++) {
+        buf.push_back(readbuf[i]);
+    }
+
+    while (buf.size() > 0) { // assume the block is valid.
+        // That part read number in dequeue, pop_front it for some bytes and write to (ofstream) out.
+
+// ------------------------------------------------------------------ 3
+
+// #1
+
+// aaabbb00 f1 #{a}, #{b}
+if ((buf[0] & 0b00000011) == 0b00000000) {
+    int a = buf[0] >> 5 & 0b111, b = buf[0] >> 2 & 0b111; // >> has higher precedence than &
+    out << tohex(ip, 6) << "   " << tohex(buf[0], 2) << ' ' << "          " // IP and opcode
+        << "f1 #" << a << ", #" << b  // command
+        << "\n";
+    buf.pop_front();
+    goto done;
+}
+
+// aaabbb01 f2 #{a}, #{b}
+if ((buf[0] & 0b00000011) == 0b00000001) {
+    int a = buf[0] >> 5 & 0b111, b = buf[0] >> 2 & 0b111;
+    out << tohex(ip, 6) << "   " << tohex(buf[0], 2) << ' ' << "          " // def convenience: exceed 7 spaces, plus one
+        << "f2 #" << a << ", #" << b  // command
+        << "\n";
+    buf.pop_front();
+    goto done;
+}
+
+// #2
+
+// aaaaaa11 bbbbbbbb f3 #{a}, #{b}
+if ((buf[0] & 0b00000011) == 0b00000011 && (buf[1] & 0b00000000) == 0b00000000) {
+    int a = buf[0] >> 2 & 0b111111, b = buf[1] >> 0 & 0b11111111;
+    out << tohex(ip, 6) << "   " << tohex(buf[0], 2) << ' ' << tohex(buf[1], 2) << ' ' << "       "
+        << "f3 #" << a << ", #" << b  // command
+        << "\n";
+    buf.pop_front(); buf.pop_front();
+    goto done;
+}
+
+// *
+
+    out << tohex(ip, 6) << "   " << tohex(buf[0], 2) << ' ' << "          "
+        << "Unrecognized command"
+        << "\n";
+    buf.pop_front();
+
+// ------------------------------------------------------------------ 4
+
+done:
+        if (buf.size() < 0x20 && length != 0) { // assume all opcode is shorter than 0x20 bytes
+            l1 = std::min(length, 0x10000);
+            in.read(readbuf, l1);
+            length -= l1;
+            for (i = 0; i < l1; i++) {
+                buf.push_back(readbuf[i]);
+            }
+        }
+    }
+
+    in.close();
+    out.close();
+
+    return 0;
+}

disas-cpp/example.cpp

@@ -0,0 +1,20 @@
+Disassembler source code creator
+
+Usage:
+
+Disassembler instruction_set_file_name.txt output_file_name.cpp
+
+*
+
+??? disassembler
+
+Usage:
+
+a.exe file_to_disassemble start_position length output_file_name.txt
+
+start_position, length are:
+   + In decimal if there is no prefix or suffix
+   + In hexadecimal if there is 0x prefix
+   + In octal if there is 0 prefix
+
+Warning: If the disassembler work on invalid code it may crash!

disas-cpp/help.txt

@@ -0,0 +1,19 @@
+#include <string>
+
+std::string tohex(int n, int len) {
+    std::string retval = "";
+    for (int x = 0; x < len; x++) {
+        retval = "0123456789ABCDEF"[n & 0xF] + retval;
+        n >>= 4;
+    }
+    return retval;
+}
+
+std::string tobin(int n, int len) {
+    std::string retval = "";
+    for (int x = 0; x < len; x++) {
+        retval = "01"[n & 1] + retval;
+        n >>= 1;
+    }
+    return retval;
+}

disas-cpp/lib.cpp

@@ -0,0 +1,4 @@
+#pragma once
+
+std::string tohex(int, int);
+std::string tobin(int, int);